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 | <?xml version="1.0" encoding="utf-8"?> <?qbxml version="16.0"?> <QBXML> <QBXMLMsgsRq onError="stopOnError"> <ReceivePaymentModRq> <ReceivePaymentMod> <!-- required --> <TxnID >IDTYPE</TxnID> <!-- required --> <EditSequence >STRTYPE</EditSequence> <!-- required --> <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 --> <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> <CreditCardTxnInfoMod> <!-- optional --> <CreditCardTxnInputInfoMod> <!-- optional --> <CreditCardNumber >STRTYPE</CreditCardNumber> <!-- optional --> <ExpirationMonth >INTTYPE</ExpirationMonth> <!-- optional --> <ExpirationYear >INTTYPE</ExpirationYear> <!-- optional --> <NameOnCard >STRTYPE</NameOnCard> <!-- optional --> <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 --> </CreditCardTxnInputInfoMod> <CreditCardTxnResultInfoMod> <!-- optional --> <ResultCode >INTTYPE</ResultCode> <!-- optional --> <ResultMessage >STRTYPE</ResultMessage> <!-- optional --> <CreditCardTransID >STRTYPE</CreditCardTransID> <!-- optional --> <MerchantAccountNumber >STRTYPE</MerchantAccountNumber> <!-- optional --> <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> <!-- optional --> <TxnAuthorizationTime >DATETIMETYPE</TxnAuthorizationTime> <!-- optional --> <TxnAuthorizationStamp >INTTYPE</TxnAuthorizationStamp> <!-- optional --> <ClientTransID >STRTYPE</ClientTransID> <!-- optional --> </CreditCardTxnResultInfoMod> </CreditCardTxnInfoMod> <AppliedToTxnMod> <!-- optional, may repeat --> <TxnID >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> </AppliedToTxnMod> </ReceivePaymentMod> <IncludeRetElement >STRTYPE</IncludeRetElement> <!-- optional, may repeat --> </ReceivePaymentModRq> <ReceivePaymentModRs 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> </ReceivePaymentModRs> </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 | '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 DoReceivePaymentMod() 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 BuildReceivePaymentModRq(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 WalkReceivePaymentModRs(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 BuildReceivePaymentModRq(requestMsgSet as IMsgSetRequest) Dim ReceivePaymentModRq as IReceivePaymentMod ReceivePaymentModRq= requestMsgSet.AppendReceivePaymentModRq() 'Set field value for TxnID ReceivePaymentModRq.TxnID.SetValue("200000-1011023419") 'Set field value for EditSequence ReceivePaymentModRq.EditSequence.SetValue("ab") 'Set field value for ListID ReceivePaymentModRq.CustomerRef.ListID.SetValue("200000-1011023419") 'Set field value for FullName ReceivePaymentModRq.CustomerRef.FullName.SetValue("ab") 'Set field value for ListID ReceivePaymentModRq.ARAccountRef.ListID.SetValue("200000-1011023419") 'Set field value for FullName ReceivePaymentModRq.ARAccountRef.FullName.SetValue("ab") 'Set field value for TxnDate ReceivePaymentModRq.TxnDate.SetValue(DateTime.Parse("12/15/2007")) 'Set field value for RefNumber ReceivePaymentModRq.RefNumber.SetValue("ab") 'Set field value for TotalAmount ReceivePaymentModRq.TotalAmount.SetValue(10.01) 'Set field value for ExchangeRate ReceivePaymentModRq.ExchangeRate.SetValue("IQBFloatType") 'Set field value for ListID ReceivePaymentModRq.PaymentMethodRef.ListID.SetValue("200000-1011023419") 'Set field value for FullName ReceivePaymentModRq.PaymentMethodRef.FullName.SetValue("ab") 'Set field value for Memo ReceivePaymentModRq.Memo.SetValue("ab") 'Set field value for ListID ReceivePaymentModRq.DepositToAccountRef.ListID.SetValue("200000-1011023419") 'Set field value for FullName ReceivePaymentModRq.DepositToAccountRef.FullName.SetValue("ab") 'Set field value for CreditCardNumber ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.CreditCardNumber.SetValue("ab") 'Set field value for ExpirationMonth ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.ExpirationMonth.SetValue(6) 'Set field value for ExpirationYear ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.ExpirationYear.SetValue(6) 'Set field value for NameOnCard ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.NameOnCard.SetValue("ab") 'Set field value for CreditCardAddress ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.CreditCardAddress.SetValue("ab") 'Set field value for CreditCardPostalCode ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.CreditCardPostalCode.SetValue("ab") 'Set field value for CommercialCardCode ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.CommercialCardCode.SetValue("ab") 'Set field value for TransactionMode ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.TransactionMode.SetValue(ENTransactionMode.tmCardNotPresent [DEFAULT]) 'Set field value for CreditCardTxnType ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.CreditCardTxnType.SetValue(ENCreditCardTxnType.ccttAuthorization) 'Set field value for ResultCode ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.ResultCode.SetValue(6) 'Set field value for ResultMessage ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.ResultMessage.SetValue("ab") 'Set field value for CreditCardTransID ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.CreditCardTransID.SetValue("ab") 'Set field value for MerchantAccountNumber ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.MerchantAccountNumber.SetValue("ab") 'Set field value for AuthorizationCode ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.AuthorizationCode.SetValue("ab") 'Set field value for AVSStreet ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.AVSStreet.SetValue(ENAVSStreet.avssPass) 'Set field value for AVSZip ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.AVSZip.SetValue(ENAVSZip.avszPass) 'Set field value for CardSecurityCodeMatch ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.CardSecurityCodeMatch.SetValue(ENCardSecurityCodeMatch.cscmPass) 'Set field value for ReconBatchID ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.ReconBatchID.SetValue("ab") 'Set field value for PaymentGroupingCode ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.PaymentGroupingCode.SetValue(6) 'Set field value for PaymentStatus ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.PaymentStatus.SetValue(ENPaymentStatus.pssUnknown) 'Set field value for TxnAuthorizationTime ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.TxnAuthorizationTime.SetValue(DateTime.Parse("12/15/2007 12:15:12"),false) 'Set field value for TxnAuthorizationStamp ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.TxnAuthorizationStamp.SetValue(6) 'Set field value for ClientTransID ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.ClientTransID.SetValue("ab") Dim AppliedToTxnMod18764 as IAppliedToTxnMod AppliedToTxnMod18764=ReceivePaymentModRq.AppliedToTxnModList.Append() 'Set field value for TxnID AppliedToTxnMod18764.TxnID.SetValue("200000-1011023419") 'Set field value for PaymentAmount AppliedToTxnMod18764.PaymentAmount.SetValue(10.01) Dim SetCredit18765 as ISetCredit SetCredit18765=AppliedToTxnMod18764.SetCreditList.Append() 'Set field value for CreditTxnID SetCredit18765.CreditTxnID.SetValue("200000-1011023419") 'Set attributes 'Set field value for useMacro SetCredit18765.useMacro.SetValue("IQBStringType") 'Set field value for AppliedAmount SetCredit18765.AppliedAmount.SetValue(10.01) 'Set field value for Override SetCredit18765.Override.SetValue(True) 'Set field value for DiscountAmount AppliedToTxnMod18764.DiscountAmount.SetValue(10.01) 'Set field value for ListID AppliedToTxnMod18764.DiscountAccountRef.ListID.SetValue("200000-1011023419") 'Set field value for FullName AppliedToTxnMod18764.DiscountAccountRef.FullName.SetValue("ab") 'Set field value for ListID AppliedToTxnMod18764.DiscountClassRef.ListID.SetValue("200000-1011023419") 'Set field value for FullName AppliedToTxnMod18764.DiscountClassRef.FullName.SetValue("ab") 'Set field value for IncludeRetElementList 'May create more than one of these if needed ReceivePaymentModRq.IncludeRetElementList.Add("ab") End Sub Public Sub WalkReceivePaymentModRs( 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.rtReceivePaymentModRs) 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 TxnID18766 as String TxnID18766 = ReceivePaymentRet.TxnID.GetValue() End If 'Get value of TimeCreated if ( not ReceivePaymentRet.TimeCreated is nothing) then Dim TimeCreated18767 as DateTime TimeCreated18767 = ReceivePaymentRet.TimeCreated.GetValue() End If 'Get value of TimeModified if ( not ReceivePaymentRet.TimeModified is nothing) then Dim TimeModified18768 as DateTime TimeModified18768 = ReceivePaymentRet.TimeModified.GetValue() End If 'Get value of EditSequence if ( not ReceivePaymentRet.EditSequence is nothing) then Dim EditSequence18769 as String EditSequence18769 = ReceivePaymentRet.EditSequence.GetValue() End If 'Get value of TxnNumber if ( not ReceivePaymentRet.TxnNumber is nothing) then Dim TxnNumber18770 as Integer TxnNumber18770 = 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 ListID18771 as String ListID18771 = ReceivePaymentRet.CustomerRef.ListID.GetValue() End If 'Get value of FullName if ( not ReceivePaymentRet.CustomerRef.FullName is nothing) then Dim FullName18772 as String FullName18772 = 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 ListID18773 as String ListID18773 = ReceivePaymentRet.ARAccountRef.ListID.GetValue() End If 'Get value of FullName if ( not ReceivePaymentRet.ARAccountRef.FullName is nothing) then Dim FullName18774 as String FullName18774 = ReceivePaymentRet.ARAccountRef.FullName.GetValue() End If End If 'Get value of TxnDate if ( not ReceivePaymentRet.TxnDate is nothing) then Dim TxnDate18775 as DateTime TxnDate18775 = ReceivePaymentRet.TxnDate.GetValue() End If 'Get value of RefNumber if ( not ReceivePaymentRet.RefNumber is nothing) then Dim RefNumber18776 as String RefNumber18776 = ReceivePaymentRet.RefNumber.GetValue() End If 'Get value of TotalAmount if ( not ReceivePaymentRet.TotalAmount is nothing) then Dim TotalAmount18777 as Double TotalAmount18777 = 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 ListID18778 as String ListID18778 = ReceivePaymentRet.CurrencyRef.ListID.GetValue() End If 'Get value of FullName if ( not ReceivePaymentRet.CurrencyRef.FullName is nothing) then Dim FullName18779 as String FullName18779 = ReceivePaymentRet.CurrencyRef.FullName.GetValue() End If End If 'Get value of ExchangeRate if ( not ReceivePaymentRet.ExchangeRate is nothing) then Dim ExchangeRate18780 as IQBFloatType ExchangeRate18780 = ReceivePaymentRet.ExchangeRate.GetValue() End If 'Get value of TotalAmountInHomeCurrency if ( not ReceivePaymentRet.TotalAmountInHomeCurrency is nothing) then Dim TotalAmountInHomeCurrency18781 as Double TotalAmountInHomeCurrency18781 = 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 ListID18782 as String ListID18782 = ReceivePaymentRet.PaymentMethodRef.ListID.GetValue() End If 'Get value of FullName if ( not ReceivePaymentRet.PaymentMethodRef.FullName is nothing) then Dim FullName18783 as String FullName18783 = ReceivePaymentRet.PaymentMethodRef.FullName.GetValue() End If End If 'Get value of Memo if ( not ReceivePaymentRet.Memo is nothing) then Dim Memo18784 as String Memo18784 = 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 ListID18785 as String ListID18785 = ReceivePaymentRet.DepositToAccountRef.ListID.GetValue() End If 'Get value of FullName if ( not ReceivePaymentRet.DepositToAccountRef.FullName is nothing) then Dim FullName18786 as String FullName18786 = ReceivePaymentRet.DepositToAccountRef.FullName.GetValue() End If End If if (not ReceivePaymentRet.CreditCardTxnInfo. is nothing) then 'Get value of CreditCardNumber Dim CreditCardNumber18787 as String CreditCardNumber18787 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardNumber.GetValue() 'Get value of ExpirationMonth Dim ExpirationMonth18788 as Integer ExpirationMonth18788 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.ExpirationMonth.GetValue() 'Get value of ExpirationYear Dim ExpirationYear18789 as Integer ExpirationYear18789 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.ExpirationYear.GetValue() 'Get value of NameOnCard Dim NameOnCard18790 as String NameOnCard18790 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.NameOnCard.GetValue() 'Get value of CreditCardAddress if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardAddress is nothing) then Dim CreditCardAddress18791 as String CreditCardAddress18791 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardAddress.GetValue() End If 'Get value of CreditCardPostalCode if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardPostalCode is nothing) then Dim CreditCardPostalCode18792 as String CreditCardPostalCode18792 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardPostalCode.GetValue() End If 'Get value of CommercialCardCode if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CommercialCardCode is nothing) then Dim CommercialCardCode18793 as String CommercialCardCode18793 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CommercialCardCode.GetValue() End If 'Get value of TransactionMode if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.TransactionMode is nothing) then Dim TransactionMode18794 as ENTransactionMode TransactionMode18794 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.TransactionMode.GetValue() End If 'Get value of CreditCardTxnType if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardTxnType is nothing) then Dim CreditCardTxnType18795 as ENCreditCardTxnType CreditCardTxnType18795 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardTxnType.GetValue() End If 'Get value of ResultCode Dim ResultCode18796 as Integer ResultCode18796 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ResultCode.GetValue() 'Get value of ResultMessage Dim ResultMessage18797 as String ResultMessage18797 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ResultMessage.GetValue() 'Get value of CreditCardTransID Dim CreditCardTransID18798 as String CreditCardTransID18798 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.CreditCardTransID.GetValue() 'Get value of MerchantAccountNumber Dim MerchantAccountNumber18799 as String MerchantAccountNumber18799 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.MerchantAccountNumber.GetValue() 'Get value of AuthorizationCode if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AuthorizationCode is nothing) then Dim AuthorizationCode18800 as String AuthorizationCode18800 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AuthorizationCode.GetValue() End If 'Get value of AVSStreet if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSStreet is nothing) then Dim AVSStreet18801 as ENAVSStreet AVSStreet18801 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSStreet.GetValue() End If 'Get value of AVSZip if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSZip is nothing) then Dim AVSZip18802 as ENAVSZip AVSZip18802 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSZip.GetValue() End If 'Get value of CardSecurityCodeMatch if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.CardSecurityCodeMatch is nothing) then Dim CardSecurityCodeMatch18803 as ENCardSecurityCodeMatch CardSecurityCodeMatch18803 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.CardSecurityCodeMatch.GetValue() End If 'Get value of ReconBatchID if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ReconBatchID is nothing) then Dim ReconBatchID18804 as String ReconBatchID18804 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ReconBatchID.GetValue() End If 'Get value of PaymentGroupingCode if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.PaymentGroupingCode is nothing) then Dim PaymentGroupingCode18805 as Integer PaymentGroupingCode18805 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.PaymentGroupingCode.GetValue() End If 'Get value of PaymentStatus Dim PaymentStatus18806 as ENPaymentStatus PaymentStatus18806 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.PaymentStatus.GetValue() 'Get value of TxnAuthorizationTime Dim TxnAuthorizationTime18807 as DateTime TxnAuthorizationTime18807 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.TxnAuthorizationTime.GetValue() 'Get value of TxnAuthorizationStamp if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.TxnAuthorizationStamp is nothing) then Dim TxnAuthorizationStamp18808 as Integer TxnAuthorizationStamp18808 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.TxnAuthorizationStamp.GetValue() End If 'Get value of ClientTransID if ( not ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ClientTransID is nothing) then Dim ClientTransID18809 as String ClientTransID18809 = ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ClientTransID.GetValue() End If End If 'Get value of UnusedPayment if ( not ReceivePaymentRet.UnusedPayment is nothing) then Dim UnusedPayment18810 as Double UnusedPayment18810 = ReceivePaymentRet.UnusedPayment.GetValue() End If 'Get value of UnusedCredits if ( not ReceivePaymentRet.UnusedCredits is nothing) then Dim UnusedCredits18811 as Double UnusedCredits18811 = ReceivePaymentRet.UnusedCredits.GetValue() End If 'Get value of ExternalGUID if ( not ReceivePaymentRet.ExternalGUID is nothing) then Dim ExternalGUID18812 as String ExternalGUID18812 = ReceivePaymentRet.ExternalGUID.GetValue() End If if (not ReceivePaymentRet.AppliedToTxnRetList is nothing) Dim i18813 as Integer for i18813 = 0 to ReceivePaymentRet.AppliedToTxnRetList.Count - 1 Dim AppliedToTxnRet as IAppliedToTxnRet AppliedToTxnRet = ReceivePaymentRet.AppliedToTxnRetList.GetAt(i18813) 'Get value of TxnID Dim TxnID18814 as String TxnID18814 = AppliedToTxnRetTxnID.GetValue() 'Get value of TxnType Dim TxnType18815 as ENTxnType TxnType18815 = AppliedToTxnRetTxnType.GetValue() 'Get value of TxnDate if ( not AppliedToTxnRetTxnDate is nothing) then Dim TxnDate18816 as DateTime TxnDate18816 = AppliedToTxnRetTxnDate.GetValue() End If 'Get value of RefNumber if ( not AppliedToTxnRetRefNumber is nothing) then Dim RefNumber18817 as String RefNumber18817 = AppliedToTxnRetRefNumber.GetValue() End If 'Get value of BalanceRemaining if ( not AppliedToTxnRetBalanceRemaining is nothing) then Dim BalanceRemaining18818 as Double BalanceRemaining18818 = AppliedToTxnRetBalanceRemaining.GetValue() End If 'Get value of Amount if ( not AppliedToTxnRetAmount is nothing) then Dim Amount18819 as Double Amount18819 = AppliedToTxnRetAmount.GetValue() End If 'Get value of DiscountAmount if ( not AppliedToTxnRetDiscountAmount is nothing) then Dim DiscountAmount18820 as Double DiscountAmount18820 = AppliedToTxnRetDiscountAmount.GetValue() End If if (not AppliedToTxnRetDiscountAccountRef. is nothing) then 'Get value of ListID if ( not AppliedToTxnRetDiscountAccountRef.ListID is nothing) then Dim ListID18821 as String ListID18821 = AppliedToTxnRetDiscountAccountRef.ListID.GetValue() End If 'Get value of FullName if ( not AppliedToTxnRetDiscountAccountRef.FullName is nothing) then Dim FullName18822 as String FullName18822 = 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 ListID18823 as String ListID18823 = AppliedToTxnRetDiscountClassRef.ListID.GetValue() End If 'Get value of FullName if ( not AppliedToTxnRetDiscountClassRef.FullName is nothing) then Dim FullName18824 as String FullName18824 = AppliedToTxnRetDiscountClassRef.FullName.GetValue() End If End If if (not AppliedToTxnRetLinkedTxnList is nothing) Dim i18825 as Integer for i18825 = 0 to AppliedToTxnRetLinkedTxnList.Count - 1 Dim LinkedTxn as ILinkedTxn LinkedTxn = AppliedToTxnRetLinkedTxnList.GetAt(i18825) 'Get value of TxnID Dim TxnID18826 as String TxnID18826 = LinkedTxnTxnID.GetValue() 'Get value of TxnType Dim TxnType18827 as ENTxnType TxnType18827 = LinkedTxnTxnType.GetValue() 'Get value of TxnDate Dim TxnDate18828 as DateTime TxnDate18828 = LinkedTxnTxnDate.GetValue() 'Get value of RefNumber if ( not LinkedTxnRefNumber is nothing) then Dim RefNumber18829 as String RefNumber18829 = LinkedTxnRefNumber.GetValue() End If 'Get value of LinkType if ( not LinkedTxnLinkType is nothing) then Dim LinkType18830 as ENLinkType LinkType18830 = LinkedTxnLinkType.GetValue() End If 'Get value of Amount Dim Amount18831 as Double Amount18831 = LinkedTxnAmount.GetValue() Next i18825 End If Next i18813 End If if (not ReceivePaymentRet.DataExtRetList is nothing) Dim i18832 as Integer for i18832 = 0 to ReceivePaymentRet.DataExtRetList.Count - 1 Dim DataExtRet as IDataExtRet DataExtRet = ReceivePaymentRet.DataExtRetList.GetAt(i18832) 'Get value of OwnerID if ( not DataExtRetOwnerID is nothing) then Dim OwnerID18833 as String OwnerID18833 = DataExtRetOwnerID.GetValue() End If 'Get value of DataExtName Dim DataExtName18834 as String DataExtName18834 = DataExtRetDataExtName.GetValue() 'Get value of DataExtType Dim DataExtType18835 as ENDataExtType DataExtType18835 = DataExtRetDataExtType.GetValue() 'Get value of DataExtValue Dim DataExtValue18836 as String DataExtValue18836 = DataExtRetDataExtValue.GetValue() Next i18832 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 | //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 DoReceivePaymentMod() { 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; BuildReceivePaymentModRq(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; WalkReceivePaymentModRs(responseMsgSet); } catch (Exception e) { MessageBox.Show(e.Message, "Error"); if (sessionBegun) { sessionManager.EndSession(); } if (connectionOpen) { sessionManager.CloseConnection(); } } } void BuildReceivePaymentModRq(IMsgSetRequest requestMsgSet) { IReceivePaymentMod ReceivePaymentModRq= requestMsgSet.AppendReceivePaymentModRq(); //Set field value for TxnID ReceivePaymentModRq.TxnID.SetValue("200000-1011023419"); //Set field value for EditSequence ReceivePaymentModRq.EditSequence.SetValue("ab"); //Set field value for ListID ReceivePaymentModRq.CustomerRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ReceivePaymentModRq.CustomerRef.FullName.SetValue("ab"); //Set field value for ListID ReceivePaymentModRq.ARAccountRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ReceivePaymentModRq.ARAccountRef.FullName.SetValue("ab"); //Set field value for TxnDate ReceivePaymentModRq.TxnDate.SetValue(DateTime.Parse("12/15/2007")); //Set field value for RefNumber ReceivePaymentModRq.RefNumber.SetValue("ab"); //Set field value for TotalAmount ReceivePaymentModRq.TotalAmount.SetValue(10.01); //Set field value for ExchangeRate ReceivePaymentModRq.ExchangeRate.SetValue("IQBFloatType"); //Set field value for ListID ReceivePaymentModRq.PaymentMethodRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ReceivePaymentModRq.PaymentMethodRef.FullName.SetValue("ab"); //Set field value for Memo ReceivePaymentModRq.Memo.SetValue("ab"); //Set field value for ListID ReceivePaymentModRq.DepositToAccountRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ReceivePaymentModRq.DepositToAccountRef.FullName.SetValue("ab"); //Set field value for CreditCardNumber ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.CreditCardNumber.SetValue("ab"); //Set field value for ExpirationMonth ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.ExpirationMonth.SetValue(6); //Set field value for ExpirationYear ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.ExpirationYear.SetValue(6); //Set field value for NameOnCard ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.NameOnCard.SetValue("ab"); //Set field value for CreditCardAddress ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.CreditCardAddress.SetValue("ab"); //Set field value for CreditCardPostalCode ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.CreditCardPostalCode.SetValue("ab"); //Set field value for CommercialCardCode ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.CommercialCardCode.SetValue("ab"); //Set field value for TransactionMode ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.TransactionMode.SetValue(ENTransactionMode.tmCardNotPresent [DEFAULT]); //Set field value for CreditCardTxnType ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnInputInfoMod.CreditCardTxnType.SetValue(ENCreditCardTxnType.ccttAuthorization); //Set field value for ResultCode ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.ResultCode.SetValue(6); //Set field value for ResultMessage ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.ResultMessage.SetValue("ab"); //Set field value for CreditCardTransID ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.CreditCardTransID.SetValue("ab"); //Set field value for MerchantAccountNumber ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.MerchantAccountNumber.SetValue("ab"); //Set field value for AuthorizationCode ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.AuthorizationCode.SetValue("ab"); //Set field value for AVSStreet ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.AVSStreet.SetValue(ENAVSStreet.avssPass); //Set field value for AVSZip ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.AVSZip.SetValue(ENAVSZip.avszPass); //Set field value for CardSecurityCodeMatch ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.CardSecurityCodeMatch.SetValue(ENCardSecurityCodeMatch.cscmPass); //Set field value for ReconBatchID ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.ReconBatchID.SetValue("ab"); //Set field value for PaymentGroupingCode ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.PaymentGroupingCode.SetValue(6); //Set field value for PaymentStatus ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.PaymentStatus.SetValue(ENPaymentStatus.pssUnknown); //Set field value for TxnAuthorizationTime ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.TxnAuthorizationTime.SetValue(DateTime.Parse("12/15/2007 12:15:12"),false); //Set field value for TxnAuthorizationStamp ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.TxnAuthorizationStamp.SetValue(6); //Set field value for ClientTransID ReceivePaymentModRq.CreditCardTxnInfoMod.CreditCardTxnResultInfoMod.ClientTransID.SetValue("ab"); IAppliedToTxnMod AppliedToTxnMod18691=ReceivePaymentModRq.AppliedToTxnModList.Append(); //Set field value for TxnID AppliedToTxnMod18691.TxnID.SetValue("200000-1011023419"); //Set field value for PaymentAmount AppliedToTxnMod18691.PaymentAmount.SetValue(10.01); ISetCredit SetCredit18692=AppliedToTxnMod18691.SetCreditList.Append(); //Set field value for CreditTxnID SetCredit18692.CreditTxnID.SetValue("200000-1011023419"); //Set attributes //Set field value for useMacro SetCredit18692.useMacro.SetValue("IQBStringType"); //Set field value for AppliedAmount SetCredit18692.AppliedAmount.SetValue(10.01); //Set field value for Override SetCredit18692.Override.SetValue(true); //Set field value for DiscountAmount AppliedToTxnMod18691.DiscountAmount.SetValue(10.01); //Set field value for ListID AppliedToTxnMod18691.DiscountAccountRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName AppliedToTxnMod18691.DiscountAccountRef.FullName.SetValue("ab"); //Set field value for ListID AppliedToTxnMod18691.DiscountClassRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName AppliedToTxnMod18691.DiscountClassRef.FullName.SetValue("ab"); //Set field value for IncludeRetElementList //May create more than one of these if needed ReceivePaymentModRq.IncludeRetElementList.Add("ab"); } void WalkReceivePaymentModRs(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.rtReceivePaymentModRs) { //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 TxnID18693 = (string)ReceivePaymentRet.TxnID.GetValue(); } //Get value of TimeCreated if (ReceivePaymentRet.TimeCreated != null) { DateTime TimeCreated18694 = (DateTime)ReceivePaymentRet.TimeCreated.GetValue(); } //Get value of TimeModified if (ReceivePaymentRet.TimeModified != null) { DateTime TimeModified18695 = (DateTime)ReceivePaymentRet.TimeModified.GetValue(); } //Get value of EditSequence if (ReceivePaymentRet.EditSequence != null) { string EditSequence18696 = (string)ReceivePaymentRet.EditSequence.GetValue(); } //Get value of TxnNumber if (ReceivePaymentRet.TxnNumber != null) { int TxnNumber18697 = (int)ReceivePaymentRet.TxnNumber.GetValue(); } if (ReceivePaymentRet.CustomerRef != null) { //Get value of ListID if (ReceivePaymentRet.CustomerRef.ListID != null) { string ListID18698 = (string)ReceivePaymentRet.CustomerRef.ListID.GetValue(); } //Get value of FullName if (ReceivePaymentRet.CustomerRef.FullName != null) { string FullName18699 = (string)ReceivePaymentRet.CustomerRef.FullName.GetValue(); } } if (ReceivePaymentRet.ARAccountRef != null) { //Get value of ListID if (ReceivePaymentRet.ARAccountRef.ListID != null) { string ListID18700 = (string)ReceivePaymentRet.ARAccountRef.ListID.GetValue(); } //Get value of FullName if (ReceivePaymentRet.ARAccountRef.FullName != null) { string FullName18701 = (string)ReceivePaymentRet.ARAccountRef.FullName.GetValue(); } } //Get value of TxnDate if (ReceivePaymentRet.TxnDate != null) { DateTime TxnDate18702 = (DateTime)ReceivePaymentRet.TxnDate.GetValue(); } //Get value of RefNumber if (ReceivePaymentRet.RefNumber != null) { string RefNumber18703 = (string)ReceivePaymentRet.RefNumber.GetValue(); } //Get value of TotalAmount if (ReceivePaymentRet.TotalAmount != null) { double TotalAmount18704 = (double)ReceivePaymentRet.TotalAmount.GetValue(); } if (ReceivePaymentRet.CurrencyRef != null) { //Get value of ListID if (ReceivePaymentRet.CurrencyRef.ListID != null) { string ListID18705 = (string)ReceivePaymentRet.CurrencyRef.ListID.GetValue(); } //Get value of FullName if (ReceivePaymentRet.CurrencyRef.FullName != null) { string FullName18706 = (string)ReceivePaymentRet.CurrencyRef.FullName.GetValue(); } } //Get value of ExchangeRate if (ReceivePaymentRet.ExchangeRate != null) { IQBFloatType ExchangeRate18707 = (IQBFloatType)ReceivePaymentRet.ExchangeRate.GetValue(); } //Get value of TotalAmountInHomeCurrency if (ReceivePaymentRet.TotalAmountInHomeCurrency != null) { double TotalAmountInHomeCurrency18708 = (double)ReceivePaymentRet.TotalAmountInHomeCurrency.GetValue(); } if (ReceivePaymentRet.PaymentMethodRef != null) { //Get value of ListID if (ReceivePaymentRet.PaymentMethodRef.ListID != null) { string ListID18709 = (string)ReceivePaymentRet.PaymentMethodRef.ListID.GetValue(); } //Get value of FullName if (ReceivePaymentRet.PaymentMethodRef.FullName != null) { string FullName18710 = (string)ReceivePaymentRet.PaymentMethodRef.FullName.GetValue(); } } //Get value of Memo if (ReceivePaymentRet.Memo != null) { string Memo18711 = (string)ReceivePaymentRet.Memo.GetValue(); } if (ReceivePaymentRet.DepositToAccountRef != null) { //Get value of ListID if (ReceivePaymentRet.DepositToAccountRef.ListID != null) { string ListID18712 = (string)ReceivePaymentRet.DepositToAccountRef.ListID.GetValue(); } //Get value of FullName if (ReceivePaymentRet.DepositToAccountRef.FullName != null) { string FullName18713 = (string)ReceivePaymentRet.DepositToAccountRef.FullName.GetValue(); } } if (ReceivePaymentRet.CreditCardTxnInfo != null) { //Get value of CreditCardNumber string CreditCardNumber18714 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardNumber.GetValue(); //Get value of ExpirationMonth int ExpirationMonth18715 = (int)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.ExpirationMonth.GetValue(); //Get value of ExpirationYear int ExpirationYear18716 = (int)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.ExpirationYear.GetValue(); //Get value of NameOnCard string NameOnCard18717 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.NameOnCard.GetValue(); //Get value of CreditCardAddress if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardAddress != null) { string CreditCardAddress18718 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardAddress.GetValue(); } //Get value of CreditCardPostalCode if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardPostalCode != null) { string CreditCardPostalCode18719 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardPostalCode.GetValue(); } //Get value of CommercialCardCode if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CommercialCardCode != null) { string CommercialCardCode18720 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CommercialCardCode.GetValue(); } //Get value of TransactionMode if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.TransactionMode != null) { ENTransactionMode TransactionMode18721 = (ENTransactionMode)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.TransactionMode.GetValue(); } //Get value of CreditCardTxnType if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardTxnType != null) { ENCreditCardTxnType CreditCardTxnType18722 = (ENCreditCardTxnType)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnInputInfo.CreditCardTxnType.GetValue(); } //Get value of ResultCode int ResultCode18723 = (int)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ResultCode.GetValue(); //Get value of ResultMessage string ResultMessage18724 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ResultMessage.GetValue(); //Get value of CreditCardTransID string CreditCardTransID18725 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.CreditCardTransID.GetValue(); //Get value of MerchantAccountNumber string MerchantAccountNumber18726 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.MerchantAccountNumber.GetValue(); //Get value of AuthorizationCode if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AuthorizationCode != null) { string AuthorizationCode18727 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AuthorizationCode.GetValue(); } //Get value of AVSStreet if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSStreet != null) { ENAVSStreet AVSStreet18728 = (ENAVSStreet)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSStreet.GetValue(); } //Get value of AVSZip if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSZip != null) { ENAVSZip AVSZip18729 = (ENAVSZip)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.AVSZip.GetValue(); } //Get value of CardSecurityCodeMatch if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.CardSecurityCodeMatch != null) { ENCardSecurityCodeMatch CardSecurityCodeMatch18730 = (ENCardSecurityCodeMatch)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.CardSecurityCodeMatch.GetValue(); } //Get value of ReconBatchID if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ReconBatchID != null) { string ReconBatchID18731 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ReconBatchID.GetValue(); } //Get value of PaymentGroupingCode if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.PaymentGroupingCode != null) { int PaymentGroupingCode18732 = (int)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.PaymentGroupingCode.GetValue(); } //Get value of PaymentStatus ENPaymentStatus PaymentStatus18733 = (ENPaymentStatus)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.PaymentStatus.GetValue(); //Get value of TxnAuthorizationTime DateTime TxnAuthorizationTime18734 = (DateTime)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.TxnAuthorizationTime.GetValue(); //Get value of TxnAuthorizationStamp if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.TxnAuthorizationStamp != null) { int TxnAuthorizationStamp18735 = (int)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.TxnAuthorizationStamp.GetValue(); } //Get value of ClientTransID if (ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ClientTransID != null) { string ClientTransID18736 = (string)ReceivePaymentRet.CreditCardTxnInfo.CreditCardTxnResultInfo.ClientTransID.GetValue(); } } //Get value of UnusedPayment if (ReceivePaymentRet.UnusedPayment != null) { double UnusedPayment18737 = (double)ReceivePaymentRet.UnusedPayment.GetValue(); } //Get value of UnusedCredits if (ReceivePaymentRet.UnusedCredits != null) { double UnusedCredits18738 = (double)ReceivePaymentRet.UnusedCredits.GetValue(); } //Get value of ExternalGUID if (ReceivePaymentRet.ExternalGUID != null) { string ExternalGUID18739 = (string)ReceivePaymentRet.ExternalGUID.GetValue(); } if (ReceivePaymentRet.AppliedToTxnRetList != null) { for (int i18740 = 0; i18740 < ReceivePaymentRet.AppliedToTxnRetList.Count; i18740++) { IAppliedToTxnRet AppliedToTxnRet = ReceivePaymentRet.AppliedToTxnRetList.GetAt(i18740); //Get value of TxnID string TxnID18741 = (string)AppliedToTxnRet.TxnID.GetValue(); //Get value of TxnType ENTxnType TxnType18742 = (ENTxnType)AppliedToTxnRet.TxnType.GetValue(); //Get value of TxnDate if (AppliedToTxnRet.TxnDate != null) { DateTime TxnDate18743 = (DateTime)AppliedToTxnRet.TxnDate.GetValue(); } //Get value of RefNumber if (AppliedToTxnRet.RefNumber != null) { string RefNumber18744 = (string)AppliedToTxnRet.RefNumber.GetValue(); } //Get value of BalanceRemaining if (AppliedToTxnRet.BalanceRemaining != null) { double BalanceRemaining18745 = (double)AppliedToTxnRet.BalanceRemaining.GetValue(); } //Get value of Amount if (AppliedToTxnRet.Amount != null) { double Amount18746 = (double)AppliedToTxnRet.Amount.GetValue(); } //Get value of DiscountAmount if (AppliedToTxnRet.DiscountAmount != null) { double DiscountAmount18747 = (double)AppliedToTxnRet.DiscountAmount.GetValue(); } if (AppliedToTxnRet.DiscountAccountRef != null) { //Get value of ListID if (AppliedToTxnRet.DiscountAccountRef.ListID != null) { string ListID18748 = (string)AppliedToTxnRet.DiscountAccountRef.ListID.GetValue(); } //Get value of FullName if (AppliedToTxnRet.DiscountAccountRef.FullName != null) { string FullName18749 = (string)AppliedToTxnRet.DiscountAccountRef.FullName.GetValue(); } } if (AppliedToTxnRet.DiscountClassRef != null) { //Get value of ListID if (AppliedToTxnRet.DiscountClassRef.ListID != null) { string ListID18750 = (string)AppliedToTxnRet.DiscountClassRef.ListID.GetValue(); } //Get value of FullName if (AppliedToTxnRet.DiscountClassRef.FullName != null) { string FullName18751 = (string)AppliedToTxnRet.DiscountClassRef.FullName.GetValue(); } } if (AppliedToTxnRet.LinkedTxnList != null) { for (int i18752 = 0; i18752 < AppliedToTxnRet.LinkedTxnList.Count; i18752++) { ILinkedTxn LinkedTxn = AppliedToTxnRet.LinkedTxnList.GetAt(i18752); //Get value of TxnID string TxnID18753 = (string)LinkedTxn.TxnID.GetValue(); //Get value of TxnType ENTxnType TxnType18754 = (ENTxnType)LinkedTxn.TxnType.GetValue(); //Get value of TxnDate DateTime TxnDate18755 = (DateTime)LinkedTxn.TxnDate.GetValue(); //Get value of RefNumber if (LinkedTxn.RefNumber != null) { string RefNumber18756 = (string)LinkedTxn.RefNumber.GetValue(); } //Get value of LinkType if (LinkedTxn.LinkType != null) { ENLinkType LinkType18757 = (ENLinkType)LinkedTxn.LinkType.GetValue(); } //Get value of Amount double Amount18758 = (double)LinkedTxn.Amount.GetValue(); } } } } if (ReceivePaymentRet.DataExtRetList != null) { for (int i18759 = 0; i18759 < ReceivePaymentRet.DataExtRetList.Count; i18759++) { IDataExtRet DataExtRet = ReceivePaymentRet.DataExtRetList.GetAt(i18759); //Get value of OwnerID if (DataExtRet.OwnerID != null) { string OwnerID18760 = (string)DataExtRet.OwnerID.GetValue(); } //Get value of DataExtName string DataExtName18761 = (string)DataExtRet.DataExtName.GetValue(); //Get value of DataExtType ENDataExtType DataExtType18762 = (ENDataExtType)DataExtRet.DataExtType.GetValue(); //Get value of DataExtValue string DataExtValue18763 = (string)DataExtRet.DataExtValue.GetValue(); } } } } } |