Receives a customer payment into QuickBooks. A receive payment transaction is used for one or more of these purposes:
Request
Response
XMLOps
VB.NET
C#
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 | <?xml version="1.0" encoding="utf-8"?> <?qbxml version="16.0"?> <QBXML> <QBXMLMsgsRq onError="stopOnError"> <ReceivePaymentAddRq> <ReceivePaymentAdd defMacro="MACROTYPE"> <!-- required --> <CustomerRef> <!-- required --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </CustomerRef> <ARAccountRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ARAccountRef> <TxnDate >DATETYPE</TxnDate> <!-- optional --> <RefNumber >STRTYPE</RefNumber> <!-- optional --> <TotalAmount >AMTTYPE</TotalAmount> <!-- optional --> <ExchangeRate >FLOATTYPE</ExchangeRate> <!-- optional --> <PaymentMethodRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </PaymentMethodRef> <Memo >STRTYPE</Memo> <!-- optional --> <DepositToAccountRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </DepositToAccountRef> <CreditCardTxnInfo> <!-- optional --> <CreditCardTxnInputInfo> <!-- required --> <CreditCardNumber >STRTYPE</CreditCardNumber> <!-- required --> <ExpirationMonth >INTTYPE</ExpirationMonth> <!-- required --> <ExpirationYear >INTTYPE</ExpirationYear> <!-- required --> <NameOnCard >STRTYPE</NameOnCard> <!-- required --> <CreditCardAddress >STRTYPE</CreditCardAddress> <!-- optional --> <CreditCardPostalCode >STRTYPE</CreditCardPostalCode> <!-- optional --> <CommercialCardCode >STRTYPE</CommercialCardCode> <!-- optional --> <!-- TransactionMode may have one of the following values: CardNotPresent [DEFAULT], CardPresent --> <TransactionMode >ENUMTYPE</TransactionMode> <!-- optional --> <!-- CreditCardTxnType may have one of the following values: Authorization, Capture, Charge, Refund, VoiceAuthorization --> <CreditCardTxnType >ENUMTYPE</CreditCardTxnType> <!-- optional --> </CreditCardTxnInputInfo> <CreditCardTxnResultInfo> <!-- required --> <ResultCode >INTTYPE</ResultCode> <!-- required --> <ResultMessage >STRTYPE</ResultMessage> <!-- required --> <CreditCardTransID >STRTYPE</CreditCardTransID> <!-- required --> <MerchantAccountNumber >STRTYPE</MerchantAccountNumber> <!-- required --> <AuthorizationCode >STRTYPE</AuthorizationCode> <!-- optional --> <!-- AVSStreet may have one of the following values: Pass, Fail, NotAvailable --> <AVSStreet >ENUMTYPE</AVSStreet> <!-- optional --> <!-- AVSZip may have one of the following values: Pass, Fail, NotAvailable --> <AVSZip >ENUMTYPE</AVSZip> <!-- optional --> <!-- CardSecurityCodeMatch may have one of the following values: Pass, Fail, NotAvailable --> <CardSecurityCodeMatch >ENUMTYPE</CardSecurityCodeMatch> <!-- optional --> <ReconBatchID >STRTYPE</ReconBatchID> <!-- optional --> <PaymentGroupingCode >INTTYPE</PaymentGroupingCode> <!-- optional --> <!-- PaymentStatus may have one of the following values: Unknown, Completed --> <PaymentStatus >ENUMTYPE</PaymentStatus> <!-- required --> <TxnAuthorizationTime >DATETIMETYPE</TxnAuthorizationTime> <!-- required --> <TxnAuthorizationStamp >INTTYPE</TxnAuthorizationStamp> <!-- optional --> <ClientTransID >STRTYPE</ClientTransID> <!-- optional --> </CreditCardTxnResultInfo> </CreditCardTxnInfo> <ExternalGUID >GUIDTYPE</ExternalGUID> <!-- optional --> <!-- BEGIN OR --> <IsAutoApply >BOOLTYPE</IsAutoApply> <!-- optional --> <!-- OR --> <AppliedToTxnAdd> <!-- optional, may repeat --> <TxnID useMacro="MACROTYPE">IDTYPE</TxnID> <!-- required --> <PaymentAmount >AMTTYPE</PaymentAmount> <!-- optional --> <SetCredit> <!-- optional, may repeat --> <CreditTxnID useMacro="MACROTYPE">IDTYPE</CreditTxnID> <!-- required --> <AppliedAmount >AMTTYPE</AppliedAmount> <!-- required --> <Override >BOOLTYPE</Override> <!-- optional --> </SetCredit> <DiscountAmount >AMTTYPE</DiscountAmount> <!-- optional --> <DiscountAccountRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </DiscountAccountRef> <DiscountClassRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </DiscountClassRef> </AppliedToTxnAdd> <!-- END OR --> </ReceivePaymentAdd> <IncludeRetElement >STRTYPE</IncludeRetElement> <!-- optional, may repeat --> </ReceivePaymentAddRq> <ReceivePaymentAddRs statusCode="INTTYPE" statusSeverity="STRTYPE" statusMessage="STRTYPE"> <ReceivePaymentRet> <!-- optional --> <TxnID >IDTYPE</TxnID> <!-- optional --> <TimeCreated >DATETIMETYPE</TimeCreated> <!-- optional --> <TimeModified >DATETIMETYPE</TimeModified> <!-- optional --> <EditSequence >STRTYPE</EditSequence> <!-- optional --> <TxnNumber >INTTYPE</TxnNumber> <!-- optional --> <CustomerRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </CustomerRef> <ARAccountRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ARAccountRef> <TxnDate >DATETYPE</TxnDate> <!-- optional --> <RefNumber >STRTYPE</RefNumber> <!-- optional --> <TotalAmount >AMTTYPE</TotalAmount> <!-- optional --> <CurrencyRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </CurrencyRef> <ExchangeRate >FLOATTYPE</ExchangeRate> <!-- optional --> <TotalAmountInHomeCurrency >AMTTYPE</TotalAmountInHomeCurrency> <!-- optional --> <PaymentMethodRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </PaymentMethodRef> <Memo >STRTYPE</Memo> <!-- optional --> <DepositToAccountRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </DepositToAccountRef> <CreditCardTxnInfo> <!-- optional --> <CreditCardTxnInputInfo> <!-- required --> <CreditCardNumber >STRTYPE</CreditCardNumber> <!-- required --> <ExpirationMonth >INTTYPE</ExpirationMonth> <!-- required --> <ExpirationYear >INTTYPE</ExpirationYear> <!-- required --> <NameOnCard >STRTYPE</NameOnCard> <!-- required --> <CreditCardAddress >STRTYPE</CreditCardAddress> <!-- optional --> <CreditCardPostalCode >STRTYPE</CreditCardPostalCode> <!-- optional --> <CommercialCardCode >STRTYPE</CommercialCardCode> <!-- optional --> <!-- TransactionMode may have one of the following values: CardNotPresent [DEFAULT], CardPresent --> <TransactionMode >ENUMTYPE</TransactionMode> <!-- optional --> <!-- CreditCardTxnType may have one of the following values: Authorization, Capture, Charge, Refund, VoiceAuthorization --> <CreditCardTxnType >ENUMTYPE</CreditCardTxnType> <!-- optional --> </CreditCardTxnInputInfo> <CreditCardTxnResultInfo> <!-- required --> <ResultCode >INTTYPE</ResultCode> <!-- required --> <ResultMessage >STRTYPE</ResultMessage> <!-- required --> <CreditCardTransID >STRTYPE</CreditCardTransID> <!-- required --> <MerchantAccountNumber >STRTYPE</MerchantAccountNumber> <!-- required --> <AuthorizationCode >STRTYPE</AuthorizationCode> <!-- optional --> <!-- AVSStreet may have one of the following values: Pass, Fail, NotAvailable --> <AVSStreet >ENUMTYPE</AVSStreet> <!-- optional --> <!-- AVSZip may have one of the following values: Pass, Fail, NotAvailable --> <AVSZip >ENUMTYPE</AVSZip> <!-- optional --> <!-- CardSecurityCodeMatch may have one of the following values: Pass, Fail, NotAvailable --> <CardSecurityCodeMatch >ENUMTYPE</CardSecurityCodeMatch> <!-- optional --> <ReconBatchID >STRTYPE</ReconBatchID> <!-- optional --> <PaymentGroupingCode >INTTYPE</PaymentGroupingCode> <!-- optional --> <!-- PaymentStatus may have one of the following values: Unknown, Completed --> <PaymentStatus >ENUMTYPE</PaymentStatus> <!-- required --> <TxnAuthorizationTime >DATETIMETYPE</TxnAuthorizationTime> <!-- required --> <TxnAuthorizationStamp >INTTYPE</TxnAuthorizationStamp> <!-- optional --> <ClientTransID >STRTYPE</ClientTransID> <!-- optional --> </CreditCardTxnResultInfo> </CreditCardTxnInfo> <UnusedPayment >AMTTYPE</UnusedPayment> <!-- optional --> <UnusedCredits >AMTTYPE</UnusedCredits> <!-- optional --> <ExternalGUID >GUIDTYPE</ExternalGUID> <!-- optional --> <AppliedToTxnRet> <!-- optional, may repeat --> <TxnID >IDTYPE</TxnID> <!-- required --> <!-- TxnType may have one of the following values: ARRefundCreditCard, Bill, BillPaymentCheck, BillPaymentCreditCard, BuildAssembly, Charge, Check, CreditCardCharge, CreditCardCredit, CreditMemo, Deposit, Estimate, InventoryAdjustment, Invoice, ItemReceipt, JournalEntry, LiabilityAdjustment, Paycheck, PayrollLiabilityCheck, PurchaseOrder, ReceivePayment, SalesOrder, SalesReceipt, SalesTaxPaymentCheck, Transfer, VendorCredit, YTDAdjustment --> <TxnType >ENUMTYPE</TxnType> <!-- required --> <TxnDate >DATETYPE</TxnDate> <!-- optional --> <RefNumber >STRTYPE</RefNumber> <!-- optional --> <BalanceRemaining >AMTTYPE</BalanceRemaining> <!-- optional --> <Amount >AMTTYPE</Amount> <!-- optional --> <DiscountAmount >AMTTYPE</DiscountAmount> <!-- optional --> <DiscountAccountRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </DiscountAccountRef> <DiscountClassRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </DiscountClassRef> <LinkedTxn> <!-- optional, may repeat --> <TxnID >IDTYPE</TxnID> <!-- required --> <!-- TxnType may have one of the following values: ARRefundCreditCard, Bill, BillPaymentCheck, BillPaymentCreditCard, BuildAssembly, Charge, Check, CreditCardCharge, CreditCardCredit, CreditMemo, Deposit, Estimate, InventoryAdjustment, Invoice, ItemReceipt, JournalEntry, LiabilityAdjustment, Paycheck, PayrollLiabilityCheck, PurchaseOrder, ReceivePayment, SalesOrder, SalesReceipt, SalesTaxPaymentCheck, Transfer, VendorCredit, YTDAdjustment --> <TxnType >ENUMTYPE</TxnType> <!-- required --> <TxnDate >DATETYPE</TxnDate> <!-- required --> <RefNumber >STRTYPE</RefNumber> <!-- optional --> <!-- LinkType may have one of the following values: AMTTYPE, QUANTYPE --> <LinkType >ENUMTYPE</LinkType> <!-- optional --> <Amount >AMTTYPE</Amount> <!-- required --> </LinkedTxn> </AppliedToTxnRet> <DataExtRet> <!-- optional, may repeat --> <OwnerID >GUIDTYPE</OwnerID> <!-- optional --> <DataExtName >STRTYPE</DataExtName> <!-- required --> <!-- DataExtType may have one of the following values: AMTTYPE, DATETIMETYPE, INTTYPE, PERCENTTYPE, PRICETYPE, QUANTYPE, STR1024TYPE, STR255TYPE --> <DataExtType >ENUMTYPE</DataExtType> <!-- required --> <DataExtValue >STRTYPE</DataExtValue> <!-- required --> </DataExtRet> </ReceivePaymentRet> <ErrorRecovery> <!-- optional --> <!-- BEGIN OR --> <ListID >IDTYPE</ListID> <!-- optional --> <!-- OR --> <OwnerID >GUIDTYPE</OwnerID> <!-- optional --> <!-- OR --> <TxnID >IDTYPE</TxnID> <!-- optional --> <!-- END OR --> <TxnNumber >INTTYPE</TxnNumber> <!-- optional --> <EditSequence >STRTYPE</EditSequence> <!-- optional --> <ExternalGUID >GUIDTYPE</ExternalGUID> <!-- optional --> </ErrorRecovery> </ReceivePaymentAddRs> </QBXMLMsgsRq> </QBXML> |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 | 'The following sample code is generated as an illustration of 'Creating requests and parsing responses ONLY 'This code is NOT intended to show best practices or ideal code 'Use at your most careful discretion imports System imports System.Net imports System.Drawing imports System.Collections imports System.ComponentModel imports System.Windows.Forms imports System.Data imports System.IO imports Interop.QBFC16 Module com.intuit.idn.samples Public Class Sample Public Sub DoReceivePaymentAdd() Dim sessionBegun as Boolean sessionBegun = False Dim connectionOpen as Boolean connectionOpen = False Dim sessionManager as QBSessionManager sessionManager = nothing Try 'Create the session Manager object sessionManager = new QBSessionManager 'Create the message set request object to hold our request Dim requestMsgSet as IMsgSetRequest requestMsgSet = sessionManager.CreateMsgSetRequest("US",16,0) requestMsgSet.Attributes.OnError = ENRqOnError.roeContinue BuildReceivePaymentAddRq(requestMsgSet) 'Connect to QuickBooks and begin a session sessionManager.OpenConnection("","Sample Code from OSR") connectionOpen = True sessionManager.BeginSession("", ENOpenMode.omDontCare) sessionBegun = True 'Send the request and get the response from QuickBooks Dim responseMsgSet as IMsgSetResponse responseMsgSet = sessionManager.DoRequests(requestMsgSet) 'End the session and close the connection to QuickBooks sessionManager.EndSession() sessionBegun = False sessionManager.CloseConnection() connectionOpen = False WalkReceivePaymentAddRs(responseMsgSet) Catch e as Exception MessageBox.Show(e.Message, "Error") if (sessionBegun) then sessionManager.EndSession() End If if (connectionOpen) then sessionManager.CloseConnection() End If End Try End Sub Public Sub BuildReceivePaymentAddRq(requestMsgSet as IMsgSetRequest) Dim ReceivePaymentAddRq as IReceivePaymentAdd ReceivePaymentAddRq= requestMsgSet.AppendReceivePaymentAddRq() 'Set field value for ListID ReceivePaymentAddRq.CustomerRef.ListID.SetValue("200000-1011023419") 'Set field value for FullName ReceivePaymentAddRq.CustomerRef.FullName.SetValue("ab") 'Set field value for ListID ReceivePaymentAddRq.ARAccountRef.ListID.SetValue("200000-1011023419") 'Set field value for FullName ReceivePaymentAddRq.ARAccountRef.FullName.SetValue("ab") 'Set field value for TxnDate ReceivePaymentAddRq.TxnDate.SetValue(DateTime.Parse("12/15/2007")) 'Set field value for RefNumber ReceivePaymentAddRq.RefNumber.SetValue("ab") 'Set field value for TotalAmount ReceivePaymentAddRq.TotalAmount.SetValue(10.01) 'Set field value for ExchangeRate ReceivePaymentAddRq.ExchangeRate.SetValue("IQBFloatType") 'Set field value for ListID ReceivePaymentAddRq.PaymentMethodRef.ListID.SetValue("200000-1011023419") 'Set field value for FullName ReceivePaymentAddRq.PaymentMethodRef.FullName.SetValue("ab") 'Set field value for Memo ReceivePaymentAddRq.Memo.SetValue("ab") 'Set field value for ListID ReceivePaymentAddRq.DepositToAccountRef.ListID.SetValue("200000-1011023419") 'Set field value for FullName ReceivePaymentAddRq.DepositToAccountRef.FullName.SetValue("ab") 'Set field value for CreditCardNumber ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardNumber.SetValue("ab") 'Set field value for ExpirationMonth ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.ExpirationMonth.SetValue(6) 'Set field value for ExpirationYear ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.ExpirationYear.SetValue(6) 'Set field value for NameOnCard ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.NameOnCard.SetValue("ab") 'Set field value for CreditCardAddress ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardAddress.SetValue("ab") 'Set field value for CreditCardPostalCode ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardPostalCode.SetValue("ab") 'Set field value for CommercialCardCode ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.CommercialCardCode.SetValue("ab") 'Set field value for TransactionMode ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.TransactionMode.SetValue(ENTransactionMode.tmCardNotPresent [DEFAULT]) 'Set field value for CreditCardTxnType ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardTxnType.SetValue(ENCreditCardTxnType.ccttAuthorization) 'Set field value for ResultCode ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.ResultCode.SetValue(6) 'Set field value for ResultMessage ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.ResultMessage.SetValue("ab") 'Set field value for CreditCardTransID ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.CreditCardTransID.SetValue("ab") 'Set field value for MerchantAccountNumber ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.MerchantAccountNumber.SetValue("ab") 'Set field value for AuthorizationCode ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.AuthorizationCode.SetValue("ab") 'Set field value for AVSStreet ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSStreet.SetValue(ENAVSStreet.avssPass) 'Set field value for AVSZip ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSZip.SetValue(ENAVSZip.avszPass) 'Set field value for CardSecurityCodeMatch ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.CardSecurityCodeMatch.SetValue(ENCardSecurityCodeMatch.cscmPass) 'Set field value for ReconBatchID ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.ReconBatchID.SetValue("ab") 'Set field value for PaymentGroupingCode ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.PaymentGroupingCode.SetValue(6) 'Set field value for PaymentStatus ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.PaymentStatus.SetValue(ENPaymentStatus.pssUnknown) 'Set field value for TxnAuthorizationTime ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.TxnAuthorizationTime.SetValue(DateTime.Parse("12/15/2007 12:15:12"),false) 'Set field value for TxnAuthorizationStamp ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.TxnAuthorizationStamp.SetValue(6) 'Set field value for ClientTransID ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.ClientTransID.SetValue("ab") 'Set field value for ExternalGUID ReceivePaymentAddRq.ExternalGUID.SetValue(System.Guid.NewGuid().ToString()) Dim ORApplyPaymentElementType18617 as String ORApplyPaymentElementType18617 = "IsAutoApply" if (ORApplyPaymentElementType18617 == "IsAutoApply") then 'Set field value for IsAutoApply ReceivePaymentAddRq.ORApplyPayment.IsAutoApply.SetValue(True) End If if (ORApplyPaymentElementType18617 == "AppliedToTxnAddList") then Dim AppliedToTxnAdd18618 as IAppliedToTxnAdd AppliedToTxnAdd18618=ReceivePaymentAddRq.ORApplyPayment.AppliedToTxnAddList.Append() 'Set field value for TxnID AppliedToTxnAdd18618.TxnID.SetValue("200000-1011023419") 'Set attributes 'Set field value for useMacro AppliedToTxnAdd18618.useMacro.SetValue("IQBStringType") 'Set field value for PaymentAmount AppliedToTxnAdd18618.PaymentAmount.SetValue(10.01) Dim SetCredit18619 as ISetCredit SetCredit18619=AppliedToTxnAdd18618.SetCreditList.Append() 'Set field value for CreditTxnID SetCredit18619.CreditTxnID.SetValue("200000-1011023419") 'Set attributes 'Set field value for useMacro SetCredit18619.useMacro.SetValue("IQBStringType") 'Set field value for AppliedAmount SetCredit18619.AppliedAmount.SetValue(10.01) 'Set field value for Override SetCredit18619.Override.SetValue(True) 'Set field value for DiscountAmount AppliedToTxnAdd18618.DiscountAmount.SetValue(10.01) 'Set field value for ListID AppliedToTxnAdd18618.DiscountAccountRef.ListID.SetValue("200000-1011023419") 'Set field value for FullName AppliedToTxnAdd18618.DiscountAccountRef.FullName.SetValue("ab") 'Set field value for ListID AppliedToTxnAdd18618.DiscountClassRef.ListID.SetValue("200000-1011023419") 'Set field value for FullName AppliedToTxnAdd18618.DiscountClassRef.FullName.SetValue("ab") End If 'Set field value for IncludeRetElementList 'May create more than one of these if needed ReceivePaymentAddRq.IncludeRetElementList.Add("ab") End Sub Public Sub WalkReceivePaymentAddRs( responseMsgSet as IMsgSetResponse) if (responseMsgSet is nothing) then Exit Sub End If Dim responseList as IResponseList responseList = responseMsgSet.ResponseList if (responseList is nothing) then Exit Sub End If 'if we sent only one request, there is only one response, we'll walk the list for this sample for j=0 to responseList.Count-1 Dim response as IResponse response = responseList.GetAt(j) 'check the status code of the response, 0=ok, >0 is warning if (response.StatusCode >= 0) then 'the request-specific response is in the details, make sure we have some if (not response.Detail is nothing) then 'make sure the response is the type we're expecting Dim responseType as ENResponseType responseType = CType(response.Type.GetValue(),ENResponseType) if (responseType == ENResponseType.rtReceivePaymentAddRs) then 'upcast to more specific type here, this is safe because we checked with response.Type check above Dim ReceivePaymentRet as IReceivePaymentRet ReceivePaymentRet = CType(response.Detail,IReceivePaymentRet) WalkReceivePaymentRet(ReceivePaymentRet) End If End If End If Next j End Sub Public Sub WalkReceivePaymentRet(ReceivePaymentRet as IReceivePaymentRet) if (ReceivePaymentRet is nothing) then Exit Sub End If 'Go through all the elements of IReceivePaymentRet 'Get value of TxnID if ( not ReceivePaymentRet.TxnID is nothing) then Dim TxnID18620 as String TxnID18620 = ReceivePaymentRet.TxnID.GetValue() End If 'Get value of TimeCreated if ( not ReceivePaymentRet.TimeCreated is nothing) then Dim TimeCreated18621 as DateTime TimeCreated18621 = ReceivePaymentRet.TimeCreated.GetValue() End If 'Get value of TimeModified if ( not ReceivePaymentRet.TimeModified is nothing) then Dim TimeModified18622 as DateTime TimeModified18622 = ReceivePaymentRet.TimeModified.GetValue() End If 'Get value of EditSequence if ( not ReceivePaymentRet.EditSequence is nothing) then Dim EditSequence18623 as String EditSequence18623 = ReceivePaymentRet.EditSequence.GetValue() End If 'Get value of TxnNumber if ( not ReceivePaymentRet.TxnNumber is nothing) then Dim TxnNumber18624 as Integer TxnNumber18624 = ReceivePaymentRet.TxnNumber.GetValue() End If if (not ReceivePaymentRet.CustomerRef. is nothing) then 'Get value of ListID if ( not ReceivePaymentRet.CustomerRef.ListID is nothing) then Dim ListID18625 as String ListID18625 = ReceivePaymentRet.CustomerRef.ListID.GetValue() End If 'Get value of FullName if ( not ReceivePaymentRet.CustomerRef.FullName is nothing) then Dim FullName18626 as String FullName18626 = ReceivePaymentRet.CustomerRef.FullName.GetValue() End If End If if (not ReceivePaymentRet.ARAccountRef. is nothing) then 'Get value of ListID if ( not ReceivePaymentRet.ARAccountRef.ListID is nothing) then Dim ListID18627 as String ListID18627 = ReceivePaymentRet.ARAccountRef.ListID.GetValue() End If 'Get value of FullName if ( not ReceivePaymentRet.ARAccountRef.FullName is nothing) then Dim FullName18628 as String FullName18628 = ReceivePaymentRet.ARAccountRef.FullName.GetValue() End If End If 'Get value of TxnDate if ( not ReceivePaymentRet.TxnDate is nothing) then Dim TxnDate18629 as DateTime TxnDate18629 = ReceivePaymentRet.TxnDate.GetValue() End If 'Get value of RefNumber if ( not ReceivePaymentRet.RefNumber is nothing) then Dim RefNumber18630 as String RefNumber18630 = ReceivePaymentRet.RefNumber.GetValue() End If 'Get value of TotalAmount if ( not ReceivePaymentRet.TotalAmount is nothing) then Dim TotalAmount18631 as Double TotalAmount18631 = ReceivePaymentRet.TotalAmount.GetValue() End If if (not ReceivePaymentRet.CurrencyRef. is nothing) then 'Get value of ListID if ( not ReceivePaymentRet.CurrencyRef.ListID is nothing) then Dim ListID18632 as String ListID18632 = ReceivePaymentRet.CurrencyRef.ListID.GetValue() End If 'Get value of FullName if ( not ReceivePaymentRet.CurrencyRef.FullName is nothing) then Dim FullName18633 as String FullName18633 = ReceivePaymentRet.CurrencyRef.FullName.GetValue() End If End If 'Get value of ExchangeRate if ( not ReceivePaymentRet.ExchangeRate is nothing) then Dim ExchangeRate18634 as IQBFloatType ExchangeRate18634 = ReceivePaymentRet.ExchangeRate.GetValue() End If 'Get value of TotalAmountInHomeCurrency if ( not ReceivePaymentRet.TotalAmountInHomeCurrency is nothing) then Dim TotalAmountInHomeCurrency18635 as Double TotalAmountInHomeCurrency18635 = ReceivePaymentRet.TotalAmountInHomeCurrency.GetValue() End If if (not ReceivePaymentRet.PaymentMethodRef. is nothing) then 'Get value of ListID if ( not ReceivePaymentRet.PaymentMethodRef.ListID is nothing) then Dim ListID18636 as String ListID18636 = ReceivePaymentRet.PaymentMethodRef.ListID.GetValue() End If 'Get value of FullName if ( not ReceivePaymentRet.PaymentMethodRef.FullName is nothing) then Dim FullName18637 as String FullName18637 = ReceivePaymentRet.PaymentMethodRef.FullName.GetValue() End If End If 'Get value of Memo if ( not ReceivePaymentRet.Memo is nothing) then Dim Memo18638 as String Memo18638 = ReceivePaymentRet.Memo.GetValue() End If if (not ReceivePaymentRet.DepositToAccountRef. is nothing) then 'Get value of ListID if ( not ReceivePaymentRet.DepositToAccountRef.ListID is nothing) then Dim ListID18639 as String ListID18639 = ReceivePaymentRet.DepositToAccountRef.ListID.GetValue() End If 'Get value of FullName if ( not ReceivePaymentRet.DepositToAccountRef.FullName is nothing) then Dim FullName18640 as String FullName18640 = ReceivePaymentRet.DepositToAccountRef.FullName.GetValue() End If End If if (not ReceivePaymentRet.CreditCardTxnInfo. is nothing) then 'Get value of CreditCardNumber Dim CreditCardNumber18641 as String CreditCardNumber18641 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardNumber.GetValue() 'Get value of ExpirationMonth Dim ExpirationMonth18642 as Integer ExpirationMonth18642 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.ExpirationMonth.GetValue() 'Get value of ExpirationYear Dim ExpirationYear18643 as Integer ExpirationYear18643 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.ExpirationYear.GetValue() 'Get value of NameOnCard Dim NameOnCard18644 as String NameOnCard18644 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.NameOnCard.GetValue() 'Get value of CreditCardAddress if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardAddress is nothing) then Dim CreditCardAddress18645 as String CreditCardAddress18645 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardAddress.GetValue() End If 'Get value of CreditCardPostalCode if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardPostalCode is nothing) then Dim CreditCardPostalCode18646 as String CreditCardPostalCode18646 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardPostalCode.GetValue() End If 'Get value of CommercialCardCode if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CommercialCardCode is nothing) then Dim CommercialCardCode18647 as String CommercialCardCode18647 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CommercialCardCode.GetValue() End If 'Get value of TransactionMode if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.TransactionMode is nothing) then Dim TransactionMode18648 as ENTransactionMode TransactionMode18648 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.TransactionMode.GetValue() End If 'Get value of CreditCardTxnType if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardTxnType is nothing) then Dim CreditCardTxnType18649 as ENCreditCardTxnType CreditCardTxnType18649 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardTxnType.GetValue() End If 'Get value of ResultCode Dim ResultCode18650 as Integer ResultCode18650 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ResultCode.GetValue() 'Get value of ResultMessage Dim ResultMessage18651 as String ResultMessage18651 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ResultMessage.GetValue() 'Get value of CreditCardTransID Dim CreditCardTransID18652 as String CreditCardTransID18652 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.CreditCardTransID.GetValue() 'Get value of MerchantAccountNumber Dim MerchantAccountNumber18653 as String MerchantAccountNumber18653 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.MerchantAccountNumber.GetValue() 'Get value of AuthorizationCode if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AuthorizationCode is nothing) then Dim AuthorizationCode18654 as String AuthorizationCode18654 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AuthorizationCode.GetValue() End If 'Get value of AVSStreet if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSStreet is nothing) then Dim AVSStreet18655 as ENAVSStreet AVSStreet18655 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSStreet.GetValue() End If 'Get value of AVSZip if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSZip is nothing) then Dim AVSZip18656 as ENAVSZip AVSZip18656 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSZip.GetValue() End If 'Get value of CardSecurityCodeMatch if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.CardSecurityCodeMatch is nothing) then Dim CardSecurityCodeMatch18657 as ENCardSecurityCodeMatch CardSecurityCodeMatch18657 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.CardSecurityCodeMatch.GetValue() End If 'Get value of ReconBatchID if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ReconBatchID is nothing) then Dim ReconBatchID18658 as String ReconBatchID18658 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ReconBatchID.GetValue() End If 'Get value of PaymentGroupingCode if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.PaymentGroupingCode is nothing) then Dim PaymentGroupingCode18659 as Integer PaymentGroupingCode18659 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.PaymentGroupingCode.GetValue() End If 'Get value of PaymentStatus Dim PaymentStatus18660 as ENPaymentStatus PaymentStatus18660 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.PaymentStatus.GetValue() 'Get value of TxnAuthorizationTime Dim TxnAuthorizationTime18661 as DateTime TxnAuthorizationTime18661 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.TxnAuthorizationTime.GetValue() 'Get value of TxnAuthorizationStamp if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.TxnAuthorizationStamp is nothing) then Dim TxnAuthorizationStamp18662 as Integer TxnAuthorizationStamp18662 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.TxnAuthorizationStamp.GetValue() End If 'Get value of ClientTransID if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ClientTransID is nothing) then Dim ClientTransID18663 as String ClientTransID18663 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ClientTransID.GetValue() End If End If 'Get value of UnusedPayment if ( not ReceivePaymentRet.UnusedPayment is nothing) then Dim UnusedPayment18664 as Double UnusedPayment18664 = ReceivePaymentRet.UnusedPayment.GetValue() End If 'Get value of UnusedCredits if ( not ReceivePaymentRet.UnusedCredits is nothing) then Dim UnusedCredits18665 as Double UnusedCredits18665 = ReceivePaymentRet.UnusedCredits.GetValue() End If 'Get value of ExternalGUID if ( not ReceivePaymentRet.ExternalGUID is nothing) then Dim ExternalGUID18666 as String ExternalGUID18666 = ReceivePaymentRet.ExternalGUID.GetValue() End If if (not ReceivePaymentRet.AppliedToTxnRetList is nothing) Dim i18667 as Integer for i18667 = 0 to ReceivePaymentRet.AppliedToTxnRetList.Count - 1 Dim AppliedToTxnRet as IAppliedToTxnRet AppliedToTxnRet = ReceivePaymentRet.AppliedToTxnRetList.GetAt(i18667) 'Get value of TxnID Dim TxnID18668 as String TxnID18668 = AppliedToTxnRetTxnID.GetValue() 'Get value of TxnType Dim TxnType18669 as ENTxnType TxnType18669 = AppliedToTxnRetTxnType.GetValue() 'Get value of TxnDate if ( not AppliedToTxnRetTxnDate is nothing) then Dim TxnDate18670 as DateTime TxnDate18670 = AppliedToTxnRetTxnDate.GetValue() End If 'Get value of RefNumber if ( not AppliedToTxnRetRefNumber is nothing) then Dim RefNumber18671 as String RefNumber18671 = AppliedToTxnRetRefNumber.GetValue() End If 'Get value of BalanceRemaining if ( not AppliedToTxnRetBalanceRemaining is nothing) then Dim BalanceRemaining18672 as Double BalanceRemaining18672 = AppliedToTxnRetBalanceRemaining.GetValue() End If 'Get value of Amount if ( not AppliedToTxnRetAmount is nothing) then Dim Amount18673 as Double Amount18673 = AppliedToTxnRetAmount.GetValue() End If 'Get value of DiscountAmount if ( not AppliedToTxnRetDiscountAmount is nothing) then Dim DiscountAmount18674 as Double DiscountAmount18674 = AppliedToTxnRetDiscountAmount.GetValue() End If if (not AppliedToTxnRetDiscountAccountRef. is nothing) then 'Get value of ListID if ( not AppliedToTxnRetDiscountAccountRef.ListID is nothing) then Dim ListID18675 as String ListID18675 = AppliedToTxnRetDiscountAccountRef.ListID.GetValue() End If 'Get value of FullName if ( not AppliedToTxnRetDiscountAccountRef.FullName is nothing) then Dim FullName18676 as String FullName18676 = AppliedToTxnRetDiscountAccountRef.FullName.GetValue() End If End If if (not AppliedToTxnRetDiscountClassRef. is nothing) then 'Get value of ListID if ( not AppliedToTxnRetDiscountClassRef.ListID is nothing) then Dim ListID18677 as String ListID18677 = AppliedToTxnRetDiscountClassRef.ListID.GetValue() End If 'Get value of FullName if ( not AppliedToTxnRetDiscountClassRef.FullName is nothing) then Dim FullName18678 as String FullName18678 = AppliedToTxnRetDiscountClassRef.FullName.GetValue() End If End If if (not AppliedToTxnRetLinkedTxnList is nothing) Dim i18679 as Integer for i18679 = 0 to AppliedToTxnRetLinkedTxnList.Count - 1 Dim LinkedTxn as ILinkedTxn LinkedTxn = AppliedToTxnRetLinkedTxnList.GetAt(i18679) 'Get value of TxnID Dim TxnID18680 as String TxnID18680 = LinkedTxnTxnID.GetValue() 'Get value of TxnType Dim TxnType18681 as ENTxnType TxnType18681 = LinkedTxnTxnType.GetValue() 'Get value of TxnDate Dim TxnDate18682 as DateTime TxnDate18682 = LinkedTxnTxnDate.GetValue() 'Get value of RefNumber if ( not LinkedTxnRefNumber is nothing) then Dim RefNumber18683 as String RefNumber18683 = LinkedTxnRefNumber.GetValue() End If 'Get value of LinkType if ( not LinkedTxnLinkType is nothing) then Dim LinkType18684 as ENLinkType LinkType18684 = LinkedTxnLinkType.GetValue() End If 'Get value of Amount Dim Amount18685 as Double Amount18685 = LinkedTxnAmount.GetValue() Next i18679 End If Next i18667 End If if (not ReceivePaymentRet.DataExtRetList is nothing) Dim i18686 as Integer for i18686 = 0 to ReceivePaymentRet.DataExtRetList.Count - 1 Dim DataExtRet as IDataExtRet DataExtRet = ReceivePaymentRet.DataExtRetList.GetAt(i18686) 'Get value of OwnerID if ( not DataExtRetOwnerID is nothing) then Dim OwnerID18687 as String OwnerID18687 = DataExtRetOwnerID.GetValue() End If 'Get value of DataExtName Dim DataExtName18688 as String DataExtName18688 = DataExtRetDataExtName.GetValue() 'Get value of DataExtType Dim DataExtType18689 as ENDataExtType DataExtType18689 = DataExtRetDataExtType.GetValue() 'Get value of DataExtValue Dim DataExtValue18690 as String DataExtValue18690 = DataExtRetDataExtValue.GetValue() Next i18686 End If End Sub End Class End Module |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 | //The following sample code is generated as an illustration of //Creating requests and parsing responses ONLY //This code is NOT intended to show best practices or ideal code //Use at your most careful discretion using System; using System.Net; using System.Drawing; using System.Collections; using System.ComponentModel; using System.Windows.Forms; using System.Data; using System.IO; using Interop.QBFC16; namespace com.intuit.idn.samples { public class Sample { public void DoReceivePaymentAdd() { bool sessionBegun = false; bool connectionOpen = false; QBSessionManager sessionManager = null; try { //Create the session Manager object sessionManager = new QBSessionManager(); //Create the message set request object to hold our request IMsgSetRequest requestMsgSet = sessionManager.CreateMsgSetRequest("US",16,0); requestMsgSet.Attributes.OnError = ENRqOnError.roeContinue; BuildReceivePaymentAddRq(requestMsgSet); //Connect to QuickBooks and begin a session sessionManager.OpenConnection("","Sample Code from OSR"); connectionOpen = true; sessionManager.BeginSession("", ENOpenMode.omDontCare); sessionBegun = true; //Send the request and get the response from QuickBooks IMsgSetResponse responseMsgSet = sessionManager.DoRequests(requestMsgSet); //End the session and close the connection to QuickBooks sessionManager.EndSession(); sessionBegun = false; sessionManager.CloseConnection(); connectionOpen = false; WalkReceivePaymentAddRs(responseMsgSet); } catch (Exception e) { MessageBox.Show(e.Message, "Error"); if (sessionBegun) { sessionManager.EndSession(); } if (connectionOpen) { sessionManager.CloseConnection(); } } } void BuildReceivePaymentAddRq(IMsgSetRequest requestMsgSet) { IReceivePaymentAdd ReceivePaymentAddRq= requestMsgSet.AppendReceivePaymentAddRq(); //Set attributes //Set field value for defMacro ReceivePaymentAddRq.defMacro.SetValue("IQBStringType"); //Set field value for ListID ReceivePaymentAddRq.CustomerRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ReceivePaymentAddRq.CustomerRef.FullName.SetValue("ab"); //Set field value for ListID ReceivePaymentAddRq.ARAccountRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ReceivePaymentAddRq.ARAccountRef.FullName.SetValue("ab"); //Set field value for TxnDate ReceivePaymentAddRq.TxnDate.SetValue(DateTime.Parse("12/15/2007")); //Set field value for RefNumber ReceivePaymentAddRq.RefNumber.SetValue("ab"); //Set field value for TotalAmount ReceivePaymentAddRq.TotalAmount.SetValue(10.01); //Set field value for ExchangeRate ReceivePaymentAddRq.ExchangeRate.SetValue("IQBFloatType"); //Set field value for ListID ReceivePaymentAddRq.PaymentMethodRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ReceivePaymentAddRq.PaymentMethodRef.FullName.SetValue("ab"); //Set field value for Memo ReceivePaymentAddRq.Memo.SetValue("ab"); //Set field value for ListID ReceivePaymentAddRq.DepositToAccountRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ReceivePaymentAddRq.DepositToAccountRef.FullName.SetValue("ab"); //Set field value for CreditCardNumber ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardNumber.SetValue("ab"); //Set field value for ExpirationMonth ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.ExpirationMonth.SetValue(6); //Set field value for ExpirationYear ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.ExpirationYear.SetValue(6); //Set field value for NameOnCard ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.NameOnCard.SetValue("ab"); //Set field value for CreditCardAddress ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardAddress.SetValue("ab"); //Set field value for CreditCardPostalCode ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardPostalCode.SetValue("ab"); //Set field value for CommercialCardCode ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.CommercialCardCode.SetValue("ab"); //Set field value for TransactionMode ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.TransactionMode.SetValue(ENTransactionMode.tmCardNotPresent [DEFAULT]); //Set field value for CreditCardTxnType ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardTxnType.SetValue(ENCreditCardTxnType.ccttAuthorization); //Set field value for ResultCode ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.ResultCode.SetValue(6); //Set field value for ResultMessage ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.ResultMessage.SetValue("ab"); //Set field value for CreditCardTransID ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.CreditCardTransID.SetValue("ab"); //Set field value for MerchantAccountNumber ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.MerchantAccountNumber.SetValue("ab"); //Set field value for AuthorizationCode ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.AuthorizationCode.SetValue("ab"); //Set field value for AVSStreet ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSStreet.SetValue(ENAVSStreet.avssPass); //Set field value for AVSZip ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSZip.SetValue(ENAVSZip.avszPass); //Set field value for CardSecurityCodeMatch ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.CardSecurityCodeMatch.SetValue(ENCardSecurityCodeMatch.cscmPass); //Set field value for ReconBatchID ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.ReconBatchID.SetValue("ab"); //Set field value for PaymentGroupingCode ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.PaymentGroupingCode.SetValue(6); //Set field value for PaymentStatus ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.PaymentStatus.SetValue(ENPaymentStatus.pssUnknown); //Set field value for TxnAuthorizationTime ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.TxnAuthorizationTime.SetValue(DateTime.Parse("12/15/2007 12:15:12"),false); //Set field value for TxnAuthorizationStamp ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.TxnAuthorizationStamp.SetValue(6); //Set field value for ClientTransID ReceivePaymentAddRq.CreditCardTxnInfo.CreditCardTxnResultInfo.ClientTransID.SetValue("ab"); //Set field value for ExternalGUID ReceivePaymentAddRq.ExternalGUID.SetValue(Guid.NewGuid().ToString()); string ORApplyPaymentElementType18543 = "IsAutoApply"; if (ORApplyPaymentElementType18543 == "IsAutoApply") { //Set field value for IsAutoApply ReceivePaymentAddRq.ORApplyPayment.IsAutoApply.SetValue(true); } if (ORApplyPaymentElementType18543 == "AppliedToTxnAddList") { IAppliedToTxnAdd AppliedToTxnAdd18544=ReceivePaymentAddRq.ORApplyPayment.AppliedToTxnAddList.Append(); //Set field value for TxnID AppliedToTxnAdd18544.TxnID.SetValue("200000-1011023419"); //Set attributes //Set field value for useMacro AppliedToTxnAdd18544.useMacro.SetValue("IQBStringType"); //Set field value for PaymentAmount AppliedToTxnAdd18544.PaymentAmount.SetValue(10.01); ISetCredit SetCredit18545=AppliedToTxnAdd18544.SetCreditList.Append(); //Set field value for CreditTxnID SetCredit18545.CreditTxnID.SetValue("200000-1011023419"); //Set attributes //Set field value for useMacro SetCredit18545.useMacro.SetValue("IQBStringType"); //Set field value for AppliedAmount SetCredit18545.AppliedAmount.SetValue(10.01); //Set field value for Override SetCredit18545.Override.SetValue(true); //Set field value for DiscountAmount AppliedToTxnAdd18544.DiscountAmount.SetValue(10.01); //Set field value for ListID AppliedToTxnAdd18544.DiscountAccountRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName AppliedToTxnAdd18544.DiscountAccountRef.FullName.SetValue("ab"); //Set field value for ListID AppliedToTxnAdd18544.DiscountClassRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName AppliedToTxnAdd18544.DiscountClassRef.FullName.SetValue("ab"); } //Set field value for IncludeRetElementList //May create more than one of these if needed ReceivePaymentAddRq.IncludeRetElementList.Add("ab"); } void WalkReceivePaymentAddRs(IMsgSetResponse responseMsgSet) { if (responseMsgSet == null) return; IResponseList responseList = responseMsgSet.ResponseList; if (responseList == null) return; //if we sent only one request, there is only one response, we'll walk the list for this sample for(int i=0; i < responseList.Count; i++) { IResponse response = responseList.GetAt(i); //check the status code of the response, 0=ok, >0 is warning if (response.StatusCode >= 0) { //the request-specific response is in the details, make sure we have some if (response.Detail != null) { //make sure the response is the type we're expecting ENResponseType responseType = (ENResponseType)response.Type.GetValue(); if (responseType == ENResponseType.rtReceivePaymentAddRs) { //upcast to more specific type here, this is safe because we checked with response.Type check above IReceivePaymentRet ReceivePaymentRet = (IReceivePaymentRet)response.Detail; WalkReceivePaymentRet(ReceivePaymentRet); } } } } } void WalkReceivePaymentRet(IReceivePaymentRet ReceivePaymentRet) { if (ReceivePaymentRet == null) return; //Go through all the elements of IReceivePaymentRet //Get value of TxnID if (ReceivePaymentRet.TxnID != null) { string TxnID18546 = (string)ReceivePaymentRet.TxnID.GetValue(); } //Get value of TimeCreated if (ReceivePaymentRet.TimeCreated != null) { DateTime TimeCreated18547 = (DateTime)ReceivePaymentRet.TimeCreated.GetValue(); } //Get value of TimeModified if (ReceivePaymentRet.TimeModified != null) { DateTime TimeModified18548 = (DateTime)ReceivePaymentRet.TimeModified.GetValue(); } //Get value of EditSequence if (ReceivePaymentRet.EditSequence != null) { string EditSequence18549 = (string)ReceivePaymentRet.EditSequence.GetValue(); } //Get value of TxnNumber if (ReceivePaymentRet.TxnNumber != null) { int TxnNumber18550 = (int)ReceivePaymentRet.TxnNumber.GetValue(); } if (ReceivePaymentRet.CustomerRef != null) { //Get value of ListID if (ReceivePaymentRet.CustomerRef.ListID != null) { string ListID18551 = (string)ReceivePaymentRet.CustomerRef.ListID.GetValue(); } //Get value of FullName if (ReceivePaymentRet.CustomerRef.FullName != null) { string FullName18552 = (string)ReceivePaymentRet.CustomerRef.FullName.GetValue(); } } if (ReceivePaymentRet.ARAccountRef != null) { //Get value of ListID if (ReceivePaymentRet.ARAccountRef.ListID != null) { string ListID18553 = (string)ReceivePaymentRet.ARAccountRef.ListID.GetValue(); } //Get value of FullName if (ReceivePaymentRet.ARAccountRef.FullName != null) { string FullName18554 = (string)ReceivePaymentRet.ARAccountRef.FullName.GetValue(); } } //Get value of TxnDate if (ReceivePaymentRet.TxnDate != null) { DateTime TxnDate18555 = (DateTime)ReceivePaymentRet.TxnDate.GetValue(); } //Get value of RefNumber if (ReceivePaymentRet.RefNumber != null) { string RefNumber18556 = (string)ReceivePaymentRet.RefNumber.GetValue(); } //Get value of TotalAmount if (ReceivePaymentRet.TotalAmount != null) { double TotalAmount18557 = (double)ReceivePaymentRet.TotalAmount.GetValue(); } if (ReceivePaymentRet.CurrencyRef != null) { //Get value of ListID if (ReceivePaymentRet.CurrencyRef.ListID != null) { string ListID18558 = (string)ReceivePaymentRet.CurrencyRef.ListID.GetValue(); } //Get value of FullName if (ReceivePaymentRet.CurrencyRef.FullName != null) { string FullName18559 = (string)ReceivePaymentRet.CurrencyRef.FullName.GetValue(); } } //Get value of ExchangeRate if (ReceivePaymentRet.ExchangeRate != null) { IQBFloatType ExchangeRate18560 = (IQBFloatType)ReceivePaymentRet.ExchangeRate.GetValue(); } //Get value of TotalAmountInHomeCurrency if (ReceivePaymentRet.TotalAmountInHomeCurrency != null) { double TotalAmountInHomeCurrency18561 = (double)ReceivePaymentRet.TotalAmountInHomeCurrency.GetValue(); } if (ReceivePaymentRet.PaymentMethodRef != null) { //Get value of ListID if (ReceivePaymentRet.PaymentMethodRef.ListID != null) { string ListID18562 = (string)ReceivePaymentRet.PaymentMethodRef.ListID.GetValue(); } //Get value of FullName if (ReceivePaymentRet.PaymentMethodRef.FullName != null) { string FullName18563 = (string)ReceivePaymentRet.PaymentMethodRef.FullName.GetValue(); } } //Get value of Memo if (ReceivePaymentRet.Memo != null) { string Memo18564 = (string)ReceivePaymentRet.Memo.GetValue(); } if (ReceivePaymentRet.DepositToAccountRef != null) { //Get value of ListID if (ReceivePaymentRet.DepositToAccountRef.ListID != null) { string ListID18565 = (string)ReceivePaymentRet.DepositToAccountRef.ListID.GetValue(); } //Get value of FullName if (ReceivePaymentRet.DepositToAccountRef.FullName != null) { string FullName18566 = (string)ReceivePaymentRet.DepositToAccountRef.FullName.GetValue(); } } if (ReceivePaymentRet.CreditCardTxnInfo != null) { //Get value of CreditCardNumber string CreditCardNumber18567 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardNumber.GetValue(); //Get value of ExpirationMonth int ExpirationMonth18568 = (int)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.ExpirationMonth.GetValue(); //Get value of ExpirationYear int ExpirationYear18569 = (int)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.ExpirationYear.GetValue(); //Get value of NameOnCard string NameOnCard18570 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.NameOnCard.GetValue(); //Get value of CreditCardAddress if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardAddress != null) { string CreditCardAddress18571 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardAddress.GetValue(); } //Get value of CreditCardPostalCode if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardPostalCode != null) { string CreditCardPostalCode18572 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardPostalCode.GetValue(); } //Get value of CommercialCardCode if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CommercialCardCode != null) { string CommercialCardCode18573 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CommercialCardCode.GetValue(); } //Get value of TransactionMode if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.TransactionMode != null) { ENTransactionMode TransactionMode18574 = (ENTransactionMode)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.TransactionMode.GetValue(); } //Get value of CreditCardTxnType if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardTxnType != null) { ENCreditCardTxnType CreditCardTxnType18575 = (ENCreditCardTxnType)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardTxnType.GetValue(); } //Get value of ResultCode int ResultCode18576 = (int)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ResultCode.GetValue(); //Get value of ResultMessage string ResultMessage18577 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ResultMessage.GetValue(); //Get value of CreditCardTransID string CreditCardTransID18578 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.CreditCardTransID.GetValue(); //Get value of MerchantAccountNumber string MerchantAccountNumber18579 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.MerchantAccountNumber.GetValue(); //Get value of AuthorizationCode if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AuthorizationCode != null) { string AuthorizationCode18580 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AuthorizationCode.GetValue(); } //Get value of AVSStreet if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSStreet != null) { ENAVSStreet AVSStreet18581 = (ENAVSStreet)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSStreet.GetValue(); } //Get value of AVSZip if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSZip != null) { ENAVSZip AVSZip18582 = (ENAVSZip)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSZip.GetValue(); } //Get value of CardSecurityCodeMatch if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.CardSecurityCodeMatch != null) { ENCardSecurityCodeMatch CardSecurityCodeMatch18583 = (ENCardSecurityCodeMatch)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.CardSecurityCodeMatch.GetValue(); } //Get value of ReconBatchID if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ReconBatchID != null) { string ReconBatchID18584 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ReconBatchID.GetValue(); } //Get value of PaymentGroupingCode if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.PaymentGroupingCode != null) { int PaymentGroupingCode18585 = (int)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.PaymentGroupingCode.GetValue(); } //Get value of PaymentStatus ENPaymentStatus PaymentStatus18586 = (ENPaymentStatus)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.PaymentStatus.GetValue(); //Get value of TxnAuthorizationTime DateTime TxnAuthorizationTime18587 = (DateTime)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.TxnAuthorizationTime.GetValue(); //Get value of TxnAuthorizationStamp if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.TxnAuthorizationStamp != null) { int TxnAuthorizationStamp18588 = (int)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.TxnAuthorizationStamp.GetValue(); } //Get value of ClientTransID if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ClientTransID != null) { string ClientTransID18589 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ClientTransID.GetValue(); } } //Get value of UnusedPayment if (ReceivePaymentRet.UnusedPayment != null) { double UnusedPayment18590 = (double)ReceivePaymentRet.UnusedPayment.GetValue(); } //Get value of UnusedCredits if (ReceivePaymentRet.UnusedCredits != null) { double UnusedCredits18591 = (double)ReceivePaymentRet.UnusedCredits.GetValue(); } //Get value of ExternalGUID if (ReceivePaymentRet.ExternalGUID != null) { string ExternalGUID18592 = (string)ReceivePaymentRet.ExternalGUID.GetValue(); } if (ReceivePaymentRet.AppliedToTxnRetList != null) { for (int i18593 = 0; i18593 < ReceivePaymentRet.AppliedToTxnRetList.Count; i18593++) { IAppliedToTxnRet AppliedToTxnRet = ReceivePaymentRet.AppliedToTxnRetList.GetAt(i18593); //Get value of TxnID string TxnID18594 = (string)AppliedToTxnRet.TxnID.GetValue(); //Get value of TxnType ENTxnType TxnType18595 = (ENTxnType)AppliedToTxnRet.TxnType.GetValue(); //Get value of TxnDate if (AppliedToTxnRet.TxnDate != null) { DateTime TxnDate18596 = (DateTime)AppliedToTxnRet.TxnDate.GetValue(); } //Get value of RefNumber if (AppliedToTxnRet.RefNumber != null) { string RefNumber18597 = (string)AppliedToTxnRet.RefNumber.GetValue(); } //Get value of BalanceRemaining if (AppliedToTxnRet.BalanceRemaining != null) { double BalanceRemaining18598 = (double)AppliedToTxnRet.BalanceRemaining.GetValue(); } //Get value of Amount if (AppliedToTxnRet.Amount != null) { double Amount18599 = (double)AppliedToTxnRet.Amount.GetValue(); } //Get value of DiscountAmount if (AppliedToTxnRet.DiscountAmount != null) { double DiscountAmount18600 = (double)AppliedToTxnRet.DiscountAmount.GetValue(); } if (AppliedToTxnRet.DiscountAccountRef != null) { //Get value of ListID if (AppliedToTxnRet.DiscountAccountRef.ListID != null) { string ListID18601 = (string)AppliedToTxnRet.DiscountAccountRef.ListID.GetValue(); } //Get value of FullName if (AppliedToTxnRet.DiscountAccountRef.FullName != null) { string FullName18602 = (string)AppliedToTxnRet.DiscountAccountRef.FullName.GetValue(); } } if (AppliedToTxnRet.DiscountClassRef != null) { //Get value of ListID if (AppliedToTxnRet.DiscountClassRef.ListID != null) { string ListID18603 = (string)AppliedToTxnRet.DiscountClassRef.ListID.GetValue(); } //Get value of FullName if (AppliedToTxnRet.DiscountClassRef.FullName != null) { string FullName18604 = (string)AppliedToTxnRet.DiscountClassRef.FullName.GetValue(); } } if (AppliedToTxnRet.LinkedTxnList != null) { for (int i18605 = 0; i18605 < AppliedToTxnRet.LinkedTxnList.Count; i18605++) { ILinkedTxn LinkedTxn = AppliedToTxnRet.LinkedTxnList.GetAt(i18605); //Get value of TxnID string TxnID18606 = (string)LinkedTxn.TxnID.GetValue(); //Get value of TxnType ENTxnType TxnType18607 = (ENTxnType)LinkedTxn.TxnType.GetValue(); //Get value of TxnDate DateTime TxnDate18608 = (DateTime)LinkedTxn.TxnDate.GetValue(); //Get value of RefNumber if (LinkedTxn.RefNumber != null) { string RefNumber18609 = (string)LinkedTxn.RefNumber.GetValue(); } //Get value of LinkType if (LinkedTxn.LinkType != null) { ENLinkType LinkType18610 = (ENLinkType)LinkedTxn.LinkType.GetValue(); } //Get value of Amount double Amount18611 = (double)LinkedTxn.Amount.GetValue(); } } } } if (ReceivePaymentRet.DataExtRetList != null) { for (int i18612 = 0; i18612 < ReceivePaymentRet.DataExtRetList.Count; i18612++) { IDataExtRet DataExtRet = ReceivePaymentRet.DataExtRetList.GetAt(i18612); //Get value of OwnerID if (DataExtRet.OwnerID != null) { string OwnerID18613 = (string)DataExtRet.OwnerID.GetValue(); } //Get value of DataExtName string DataExtName18614 = (string)DataExtRet.DataExtName.GetValue(); //Get value of DataExtType ENDataExtType DataExtType18615 = (ENDataExtType)DataExtRet.DataExtType.GetValue(); //Get value of DataExtValue string DataExtValue18616 = (string)DataExtRet.DataExtValue.GetValue(); } } } } } |