APIJSON | JSON Transmission Protocol and an ORM Library | Object-Relational Mapping library

    private func setupViewModel() {
    viewModel.isTransfer = isTransfer
    viewModel.loan = loan
    viewModel.getBalance()
    
    
    transferButton.rx.tap.asObservable().subscribe(onNext: { [weak self] _ in
        guard let strongSelf = self else { return }
        if let isVerified = UserManager.shared.get()?.IsVerified.value, isVerified{
            strongSelf.viewModel.phoneNumberText.accept(strongSelf.phoneNumberTextField.text ?? "")
            strongSelf.viewModel.amountText.accept(strongSelf.amountTextField.text ?? "")
            strongSelf.viewModel.transfer()
        }else{
            strongSelf.showVerificationAlert()
        }
    }).disposed(by: disposeBag)
    
    viewModel.accountInfo.asObservable().subscribe(onNext: { [weak self] accountInfo in
        if let account = accountInfo{
            guard let strongSelf = self else { return }
            strongSelf.accountInfo = account
            let request = LocalTransactionRequest(Identification: UserManager.shared.identification ?? "", Amount: Double(strongSelf.amountTextField.text!)!, ReceiverPhoneNumber: strongSelf.phoneNumberTextField.text!, IDBankAccount: UserManager.shared.defaultBankAccountId ?? -1, IsFromTransfer: strongSelf.isTransfer, Description: strongSelf.descriptionTF.text!)
            strongSelf.transferRequest.accept(request)
            strongSelf.performSegue(withIdentifier: "segue_toConfirmTransfer", sender: account)
        }
    }).disposed(by: disposeBag)
}

    private func setupViewModel(){
    viewModel.isTransfer = isTransfer
    viewModel.getBalance()

    transferButton.rx.tap.asObservable().subscribe(onNext: { [weak self] _ in
        guard let strongSelf = self else { return }
        if let isVerified = UserManager.shared.get()?.IsVerified.value, isVerified{
            strongSelf.viewModel.bankNumberText.accept(strongSelf.bankNumberTextField.text ?? "")
            strongSelf.viewModel.firstName.accept(strongSelf.firstNameTextField.text ?? "")
            strongSelf.viewModel.lastName.accept(strongSelf.lastNameTextField.text ?? "")
            strongSelf.viewModel.amountText.accept(strongSelf.amountTextField.text ?? "")
            strongSelf.viewModel.descriptionText.accept(strongSelf.descriptionTF.text ?? "")
            strongSelf.viewModel.transferNational()
        }else{
            strongSelf.showVerificationAlert()
        }
    

    }).disposed(by: disposeBag)
    
    viewModel.transferRequest.asObservable().subscribe(onNext: { [weak self] bankRequest in
        if let bank = bankRequest{
            guard let strongSelf = self else { return }
            strongSelf.bankTransferRequest = bank
            let request = BankTransactionRequest(Identification: UserManager.shared.identification ?? "", ReceiverBankAccount: strongSelf.bankNumberTextField.text!, ReceiverFirst: strongSelf.firstNameTextField.text!, ReceiverLast: strongSelf.lastNameTextField.text!, Amount: Double(strongSelf.amountTextField.text!)!, Description: strongSelf.descriptionTF.text!)
            strongSelf.nationalTransferRequest.accept(request)
            DispatchQueue.main.async {
                strongSelf.performSegue(withIdentifier: "segue_toConfirmTransfer", sender: bank)
            }
        }
    }).disposed(by: disposeBag)
    }


This is view model of BankTransferViewController

import RxCocoa
import RxSwift

class BankTransferViewModel: BaseViewModel {
    private let transferUseCase: TransferUseCase
    
    var accountInfo: BehaviorRelay<AccountExistModel?> = BehaviorRelay(value: nil)
    var balance: BehaviorRelay<BalanceModel?> = BehaviorRelay(value: nil)
    var bankNumberText: BehaviorRelay<String> = BehaviorRelay(value: "")
    var firstName: BehaviorRelay<String> = BehaviorRelay(value: "")
    var lastName: BehaviorRelay<String> = BehaviorRelay(value: "")
    var amountText: BehaviorRelay<String> = BehaviorRelay(value: "")
    var descriptionText: BehaviorRelay<String> = BehaviorRelay(value: "")
    var transferRequest: BehaviorRelay<BankTransactionRequest?> = BehaviorRelay(value: nil)

    var accountExist = PublishSubject<Bool>()
    var hasMoney = PublishSubject<Bool>()
    var invalidBankNumber = PublishSubject<Bool>()
    var accountCannotRecieve = PublishSubject<Bool>()
    var isTransfer : Bool = true
    
    var transferPressed: AnyObserver<Void> {
        return AnyObserver { [weak self] event in
            switch event {
            case .next:
                guard let strongSelf = self else {
                    return
                }
                strongSelf.checkValidation()
            default:
                break
            }
        }
    }
    
    init(transferUseCase: TransferUseCase) {
        self.transferUseCase = transferUseCase
    }
    
    func transferNational() {
        self.checkValidation()
    }
    
    private func checkValidation() {
        guard let balance = self.balance.value else {
            state.onNext(.error(error: RepoError(with: "Dështoi verifikimi i disponueshmërisë financiare. Ju lusim të provoni më vonë.")))
            return
        }
        
        
        if bankNumberText.value == ""{
            state.onNext(.error(error: RepoError(with: "Plotëso fushën për numrin e bankës të pranuesit.")))
            return
        }
        
        if bankNumberText.value.count < 6{
            state.onNext(.error(error: RepoError(with:"Ju lutemi, shtypni një numër valid të gjirollogarisë")))
            return
        }
        
        guard let doubleAmount = Double(amountText.value), doubleAmount > 0 else {
            state.onNext(.error(error: RepoError(with: "Shuma jo e rregullt")))
            return
        }
        
        if amountText.value == ""{
            state.onNext(.error(error: RepoError(with: "Shuma jo e 
    saktë.")))
            return
        }
        
        
        if balance.Balance < doubleAmount{
            state.onNext(.error(error: RepoError(with: "Nuk keni fonde të mjaftueshme për realizimin e transaksionit.")))
            return
        }
    
        
        if bankNumberText.value != "" && amountText.value != "" && (balance.Balance >= doubleAmount) {
            
//            checkAccountExist()
        }
    }
    
    
        func checkModulus16(accountNumber: String) -> Bool {
        if accountNumber.isEmpty{
            return false
        }
        
        let newValue = accountNumber.dropLast(2)
        let mod = Int64(newValue + "00")! % 97
        let result = 98 - mod
        let derivedData = newValue + "" + (result < 10 ? "0\(result)" : "\(result)")
        
        return Int64(derivedData) == Int64(accountNumber)
    }
    
    
        func showError(with message: String ) {
          state.onNext(.error(error: RepoError(with: message)))
    }
    
    
        func getBalance(){
        let params = ["Identification": UserManager.shared.identification ?? "" ] as ApiJson
        transferUseCase.getBalance(with: params) {[weak self] (balance, error) in
            guard let strongSelf = self else { return }
            if let error = error {
                strongSelf.state.onNext(.error(error: error))
                strongSelf.accountExist.onNext(false)
            }else if let balance = balance{
                UserManager.shared.userBonus = balance.BonusAmount
                strongSelf.state.onNext(.content)
                strongSelf.balance.accept(balance)
                strongSelf.accountExist.onNext(true)
                UserManager.shared.updateBalance(with: balance)
            }
        }
    }
    
    //MARK: - baseViewModel
    
        override func tryAgain() {
        self.getBalance()
        
    }

}

Option Explicit

Sub ConvertAndSend()
    Dim apiJSON As String
    apiJSON = ConvertJSON
    
    Dim apiResponse As String
    apiResponse = httpPost("put in api endpoint url", apiJSON)
End Sub

Function ConvertJSON() As String
    
    Dim wkb As Workbook
    Dim wks As Worksheet
    Set wkb = ThisWorkbook
    Set wks = wkb.Sheets(1)
            
    Dim lcolumn As Long
    lcolumn = wks.Cells(1, Columns.Count).End(xlToLeft).Column
    
    Dim lrow As Long
    lrow = wks.Cells(Rows.Count, "A").End(xlUp).Row
    
    Dim titles() As String
    ReDim titles(lcolumn)
    Dim i As Long
    For i = 1 To lcolumn
        titles(i) = wks.Cells(1, i)
    Next i
    
    Dim json As String
    json = "["
    
    Dim dq As String
    
    dq = """"
    
    Dim j As Long
    For j = 2 To lrow
        For i = 1 To lcolumn
            If i = 1 Then
                json = json & "{"
            End If
            
            Dim cellvalue As Variant 'or declare as String
            cellvalue = wks.Cells(j, i)
            json = json & dq & titles(i) & dq & ":" & dq & cellvalue & dq
            If i <> lcolumn Then
                json = json & ","
            End If
        Next i
        json = json & "}"
        If j <> lrow Then
            json = json & ","
        End If
    Next j
    ConvertJSON = json & "]"
End Function

Function httpPost(url As String, msg As String) As String
    With CreateObject("WinHttp.WinHttpRequest.5.1")
        .Open "POST", url, False
        .setRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"    'Don't think it's necessary
        .setRequestHeader "Content-type", "application/x-www-form-urlencoded"   'Consult API documentation on the required Content-Type
        '.setRequestHeader "secret-pass-key", "your-key"    <--if needed
        .send msg
        httpPost = .responseText
    End With
End Function

$jsonData = @"
{
        "ReqId": 37,
        "First Name": "John",
        "Middle Name": "",
        "Last Name": "O'Brian",
        "Preferred Name": "John",
        "Date": "04/28/2021 05:00:00",
        "Email": "test@xyz.com",
        "Notes": "This is a note with Special characters"
}
"@ | ConvertTo-Json;

$convData = ConvertTo-Html -InputObject ($jsonData);
$apiJson = @"
    {
        "Title" : "This is Test",
        "Description" : "This is Test Description.<br ><br /> $convData"
    }
    "@

{
    "Test" : "This is Test",
    "description" : "This is Test.<br > <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//E
N"  "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> <html xmlns="http://www.w3.org/1999/x
html"> <head> <title>HTML TABLE</title> </head><body> <table> <colgroup><col/></colgroup> <tr>
<th>*</th></tr> <tr><td>539</td></tr> </table> </body></html>"
}

cell?.imageView.invalidateIntrinsicContentSize()
cell?.imageView.setNeedsUpdateConstraints()
cell?.imageView.setNeedsLayout()
cell?.imageView.layoutIfNeeded()
cell?.imageView.setNeedsDisplay()
cell?.imageView.translatesAutoresizingMaskIntoConstraints = false

func tableView(_ tableView: UITableView, cellForRowAt indexPath: IndexPath) -> UITableViewCell {

        var cell: GProjectsFTContentTVCell = tableView.dequeueReusableCell(withIdentifier: "GProjFTContentHeaderCellID") as! GProjectsFTContentTVCell

        cell.performPopulateData(data: self.contentInfo![indexPath.row])

        tableView.reloadRows(at: [indexPath], with: UITableView.RowAnimation.automatic)

        return cell
    }

func performPopulateData(data: APIJSON.ProjectList)
{
   let urlFriendlyFileName: String? = data.cover?.replacingOccurrences(of: " ", with: "%20")
        self.vwGPFTCTVCBannerPanel.layer.cornerRadius = 20
        self.vwGPFTCTVCBannerPanel.dropShadow()
        self.ivGPFTCTVCBannerImage.roundCorners(corners: [.topLeft, .topRight], radius: 20.0)

        AF.request(urlFriendlyFileName ?? "").responseImage(completionHandler: { response in

            if let image = response.value {
                self.ivGPFTCTVCBannerImage.image = image

            }
        })

        self.lblGPFTCTVCTitle.text = data.title
        self.lblGPFTCTVCTitle.font = FontPredefine.SFProSemiBold(withSize: 16.0)
        self.lblGPFTCTVCTitle.textColor = ColorPredefine.greenTextColor
        self.lblGPFTCTVCSubTitle.text = data.subtitle
        self.lblGPFTCTVCSubTitle.font = FontPredefine.SFProRegular(withSize: 12.0)

}

 #calling some API in a loop Start

        $apijson = Invoke-WebRequest -Uri $api -ErrorAction SilentlyContinue | ConvertFrom-Json
        $response = $apijson| ConvertTo-Json 

        $null = $data.Add($response);

 #calling some API in a loop End

  {
            "host": "tet",
            "port": 443,
            "protocol": "http",
            "isPublic": false,
            "status": "READY",
            "startTime": 1585220081665,
            "testTime": 1585220127003,
            "engineVersion": "2.1.0",
            "criteriaVersion": "2009q",
            "endpoints": [
                {
                    "delegation": 1
                }
            ]
        }

[
    {
        "name":  "TLE",
        "Strength":  128
    },
    {
        "name":  "TLS",
        "trength":  415
    }
]

{
            "host": "tet",
            "port": 443,
            "protocol": "http",
            "isPublic": false,
            "status": "READY",
            "startTime": 1585220081665,
            "testTime": 1585220127003,
            "engineVersion": "2.1.0",
            "criteriaVersion": "2009q",
            "endpoints": [
                {
                    "delegation": 1
                }
            ]
        },
    "Strength": [
         {
            "name":  "TLE",
            "Strength":  128
          },
        {
           "name":  "TLS",
           "trength":  415
        }
       ]