The Credit Card charge mod request allows you to modify an existing credit card charge transaction using the SDK. You can modify most of the fields that can be modified in the QuickBooks UI. That is, this request can be used to modify Purchased from, date, credit card and modify lines from the item table and the expense table.
The following list describes what you can and cannot due with this request:
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 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 | <?xml version="1.0" encoding="utf-8"?> <?qbxml version="17.0"?> <QBXML> <QBXMLMsgsRq onError="stopOnError"> <CreditCardChargeModRq> <CreditCardChargeMod> <!-- required --> <TxnID >IDTYPE</TxnID> <!-- required --> <EditSequence >STRTYPE</EditSequence> <!-- required --> <AccountRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </AccountRef> <PayeeEntityRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </PayeeEntityRef> <TxnDate >DATETYPE</TxnDate> <!-- optional --> <RefNumber >STRTYPE</RefNumber> <!-- optional --> <Memo >STRTYPE</Memo> <!-- optional --> <IsTaxIncluded >BOOLTYPE</IsTaxIncluded> <!-- optional --> <SalesTaxCodeRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesTaxCodeRef> <ExchangeRate >FLOATTYPE</ExchangeRate> <!-- optional --> <ClearExpenseLines >BOOLTYPE</ClearExpenseLines> <!-- optional --> <ExpenseLineMod> <!-- optional, may repeat --> <TxnLineID >IDTYPE</TxnLineID> <!-- required --> <AccountRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </AccountRef> <Amount >AMTTYPE</Amount> <!-- optional --> <Memo >STRTYPE</Memo> <!-- optional --> <CustomerRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </CustomerRef> <ClassRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ClassRef> <SalesTaxCodeRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesTaxCodeRef> <!-- BillableStatus may have one of the following values: Billable, NotBillable, HasBeenBilled --> <BillableStatus >ENUMTYPE</BillableStatus> <!-- optional --> <SalesRepRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesRepRef> </ExpenseLineMod> <ClearItemLines >BOOLTYPE</ClearItemLines> <!-- optional --> <!-- BEGIN OR --> <ItemLineMod> <!-- optional --> <TxnLineID >IDTYPE</TxnLineID> <!-- required --> <ItemRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ItemRef> <InventorySiteRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </InventorySiteRef> <InventorySiteLocationRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </InventorySiteLocationRef> <!-- BEGIN OR --> <SerialNumber >STRTYPE</SerialNumber> <!-- optional --> <!-- OR --> <LotNumber >STRTYPE</LotNumber> <!-- optional --> <!-- END OR --> <ExpirationDateForSerialLotNumber>STRTYPE</ExpirationDateForSerialLotNumber> <!-- optional --> <Desc >STRTYPE</Desc> <!-- optional --> <Quantity >QUANTYPE</Quantity> <!-- optional --> <UnitOfMeasure >STRTYPE</UnitOfMeasure> <!-- optional --> <OverrideUOMSetRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </OverrideUOMSetRef> <Cost >PRICETYPE</Cost> <!-- optional --> <Amount >AMTTYPE</Amount> <!-- optional --> <CustomerRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </CustomerRef> <ClassRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ClassRef> <SalesTaxCodeRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesTaxCodeRef> <!-- BillableStatus may have one of the following values: Billable, NotBillable, HasBeenBilled --> <BillableStatus >ENUMTYPE</BillableStatus> <!-- optional --> <OverrideItemAccountRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </OverrideItemAccountRef> <SalesRepRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesRepRef> </ItemLineMod> <!-- OR --> <ItemGroupLineMod> <!-- optional --> <TxnLineID >IDTYPE</TxnLineID> <!-- required --> <ItemGroupRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ItemGroupRef> <Quantity >QUANTYPE</Quantity> <!-- optional --> <UnitOfMeasure >STRTYPE</UnitOfMeasure> <!-- optional --> <OverrideUOMSetRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </OverrideUOMSetRef> <ItemLineMod> <!-- optional, may repeat --> <TxnLineID >IDTYPE</TxnLineID> <!-- required --> <ItemRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ItemRef> <InventorySiteRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </InventorySiteRef> <InventorySiteLocationRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </InventorySiteLocationRef> <!-- BEGIN OR --> <SerialNumber >STRTYPE</SerialNumber> <!-- optional --> <!-- OR --> <LotNumber >STRTYPE</LotNumber> <!-- optional --> <!-- END OR --> <ExpirationDateForSerialLotNumber>STRTYPE</ExpirationDateForSerialLotNumber> <!-- optional --> <Desc >STRTYPE</Desc> <!-- optional --> <Quantity >QUANTYPE</Quantity> <!-- optional --> <UnitOfMeasure >STRTYPE</UnitOfMeasure> <!-- optional --> <OverrideUOMSetRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </OverrideUOMSetRef> <Cost >PRICETYPE</Cost> <!-- optional --> <Amount >AMTTYPE</Amount> <!-- optional --> <CustomerRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </CustomerRef> <ClassRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ClassRef> <SalesTaxCodeRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesTaxCodeRef> <!-- BillableStatus may have one of the following values: Billable, NotBillable, HasBeenBilled --> <BillableStatus >ENUMTYPE</BillableStatus> <!-- optional --> <OverrideItemAccountRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </OverrideItemAccountRef> <SalesRepRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesRepRef> </ItemLineMod> </ItemGroupLineMod> <!-- END OR --> </CreditCardChargeMod> <IncludeRetElement >STRTYPE</IncludeRetElement> <!-- optional, may repeat --> </CreditCardChargeModRq> <CreditCardChargeModRs statusCode="INTTYPE" statusSeverity="STRTYPE" statusMessage="STRTYPE"> <CreditCardChargeRet> <!-- optional --> <TxnID >IDTYPE</TxnID> <!-- required --> <TimeCreated >DATETIMETYPE</TimeCreated> <!-- required --> <TimeModified >DATETIMETYPE</TimeModified> <!-- required --> <EditSequence >STRTYPE</EditSequence> <!-- required --> <TxnNumber >INTTYPE</TxnNumber> <!-- optional --> <AccountRef> <!-- required --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </AccountRef> <PayeeEntityRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </PayeeEntityRef> <TxnDate >DATETYPE</TxnDate> <!-- required --> <Amount >AMTTYPE</Amount> <!-- required --> <CurrencyRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </CurrencyRef> <ExchangeRate >FLOATTYPE</ExchangeRate> <!-- optional --> <AmountInHomeCurrency >AMTTYPE</AmountInHomeCurrency> <!-- optional --> <RefNumber >STRTYPE</RefNumber> <!-- optional --> <Memo >STRTYPE</Memo> <!-- optional --> <IsTaxIncluded >BOOLTYPE</IsTaxIncluded> <!-- optional --> <SalesTaxCodeRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesTaxCodeRef> <ExternalGUID >GUIDTYPE</ExternalGUID> <!-- optional --> <ExpenseLineRet> <!-- optional, may repeat --> <TxnLineID >IDTYPE</TxnLineID> <!-- required --> <AccountRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </AccountRef> <Amount >AMTTYPE</Amount> <!-- optional --> <Memo >STRTYPE</Memo> <!-- optional --> <CustomerRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </CustomerRef> <ClassRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ClassRef> <SalesTaxCodeRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesTaxCodeRef> <!-- BillableStatus may have one of the following values: Billable, NotBillable, HasBeenBilled --> <BillableStatus >ENUMTYPE</BillableStatus> <!-- optional --> <SalesRepRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesRepRef> <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> </ExpenseLineRet> <!-- BEGIN OR --> <ItemLineRet> <!-- optional --> <TxnLineID >IDTYPE</TxnLineID> <!-- required --> <ItemRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ItemRef> <InventorySiteRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </InventorySiteRef> <InventorySiteLocationRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </InventorySiteLocationRef> <!-- BEGIN OR --> <SerialNumber >STRTYPE</SerialNumber> <!-- optional --> <!-- OR --> <LotNumber >STRTYPE</LotNumber> <!-- optional --> <!-- END OR --> <ExpirationDateForSerialLotNumber>STRTYPE</ExpirationDateForSerialLotNumber> <!-- optional --> <Desc >STRTYPE</Desc> <!-- optional --> <Quantity >QUANTYPE</Quantity> <!-- optional --> <UnitOfMeasure >STRTYPE</UnitOfMeasure> <!-- optional --> <OverrideUOMSetRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </OverrideUOMSetRef> <Cost >PRICETYPE</Cost> <!-- optional --> <Amount >AMTTYPE</Amount> <!-- optional --> <CustomerRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </CustomerRef> <ClassRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ClassRef> <SalesTaxCodeRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesTaxCodeRef> <!-- BillableStatus may have one of the following values: Billable, NotBillable, HasBeenBilled --> <BillableStatus >ENUMTYPE</BillableStatus> <!-- optional --> <SalesRepRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesRepRef> <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> </ItemLineRet> <!-- OR --> <ItemGroupLineRet> <!-- optional --> <TxnLineID >IDTYPE</TxnLineID> <!-- required --> <ItemGroupRef> <!-- required --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ItemGroupRef> <Desc >STRTYPE</Desc> <!-- optional --> <Quantity >QUANTYPE</Quantity> <!-- optional --> <UnitOfMeasure >STRTYPE</UnitOfMeasure> <!-- optional --> <OverrideUOMSetRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </OverrideUOMSetRef> <TotalAmount >AMTTYPE</TotalAmount> <!-- required --> <ItemLineRet> <!-- optional, may repeat --> <TxnLineID >IDTYPE</TxnLineID> <!-- required --> <ItemRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ItemRef> <InventorySiteRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </InventorySiteRef> <InventorySiteLocationRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </InventorySiteLocationRef> <!-- BEGIN OR --> <SerialNumber >STRTYPE</SerialNumber> <!-- optional --> <!-- OR --> <LotNumber >STRTYPE</LotNumber> <!-- optional --> <!-- END OR --> <ExpirationDateForSerialLotNumber>STRTYPE</ExpirationDateForSerialLotNumber> <!-- optional --> <Desc >STRTYPE</Desc> <!-- optional --> <Quantity >QUANTYPE</Quantity> <!-- optional --> <UnitOfMeasure >STRTYPE</UnitOfMeasure> <!-- optional --> <OverrideUOMSetRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </OverrideUOMSetRef> <Cost >PRICETYPE</Cost> <!-- optional --> <Amount >AMTTYPE</Amount> <!-- optional --> <CustomerRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </CustomerRef> <ClassRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ClassRef> <SalesTaxCodeRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesTaxCodeRef> <!-- BillableStatus may have one of the following values: Billable, NotBillable, HasBeenBilled --> <BillableStatus >ENUMTYPE</BillableStatus> <!-- optional --> <SalesRepRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesRepRef> <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> </ItemLineRet> <DataExt> <!-- optional, may repeat --> <OwnerID >GUIDTYPE</OwnerID> <!-- required --> <DataExtName >STRTYPE</DataExtName> <!-- required --> <DataExtValue >STRTYPE</DataExtValue> <!-- required --> </DataExt> </ItemGroupLineRet> <!-- END OR --> <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> </CreditCardChargeRet> <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> </CreditCardChargeModRs> </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 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886 887 888 889 890 891 892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 | '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 DoCreditCardChargeMod()
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
BuildCreditCardChargeModRq(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
WalkCreditCardChargeModRs(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 BuildCreditCardChargeModRq(requestMsgSet as IMsgSetRequest)
Dim CreditCardChargeModRq as ICreditCardChargeMod
CreditCardChargeModRq= requestMsgSet.AppendCreditCardChargeModRq()
'Set field value for TxnID
CreditCardChargeModRq.TxnID.SetValue("200000-1011023419")
'Set field value for EditSequence
CreditCardChargeModRq.EditSequence.SetValue("ab")
'Set field value for ListID
CreditCardChargeModRq.AccountRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
CreditCardChargeModRq.AccountRef.FullName.SetValue("ab")
'Set field value for ListID
CreditCardChargeModRq.PayeeEntityRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
CreditCardChargeModRq.PayeeEntityRef.FullName.SetValue("ab")
'Set field value for TxnDate
CreditCardChargeModRq.TxnDate.SetValue(DateTime.Parse("12/15/2007"))
'Set field value for RefNumber
CreditCardChargeModRq.RefNumber.SetValue("ab")
'Set field value for Memo
CreditCardChargeModRq.Memo.SetValue("ab")
'Set field value for IsTaxIncluded
CreditCardChargeModRq.IsTaxIncluded.SetValue(True)
'Set field value for ListID
CreditCardChargeModRq.SalesTaxCodeRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
CreditCardChargeModRq.SalesTaxCodeRef.FullName.SetValue("ab")
'Set field value for ExchangeRate
CreditCardChargeModRq.ExchangeRate.SetValue("IQBFloatType")
'Set field value for ClearExpenseLines
CreditCardChargeModRq.ClearExpenseLines.SetValue(True)
Dim ExpenseLineMod4239 as IExpenseLineMod
ExpenseLineMod4239=CreditCardChargeModRq.ExpenseLineModList.Append()
'Set field value for TxnLineID
ExpenseLineMod4239.TxnLineID.SetValue("200000-1011023419")
'Set field value for ListID
ExpenseLineMod4239.AccountRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ExpenseLineMod4239.AccountRef.FullName.SetValue("ab")
'Set field value for Amount
ExpenseLineMod4239.Amount.SetValue(10.01)
'Set field value for Memo
ExpenseLineMod4239.Memo.SetValue("ab")
'Set field value for ListID
ExpenseLineMod4239.CustomerRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ExpenseLineMod4239.CustomerRef.FullName.SetValue("ab")
'Set field value for ListID
ExpenseLineMod4239.ClassRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ExpenseLineMod4239.ClassRef.FullName.SetValue("ab")
'Set field value for ListID
ExpenseLineMod4239.SalesTaxCodeRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ExpenseLineMod4239.SalesTaxCodeRef.FullName.SetValue("ab")
'Set field value for BillableStatus
ExpenseLineMod4239.BillableStatus.SetValue(ENBillableStatus.bsBillable)
'Set field value for ListID
ExpenseLineMod4239.SalesRepRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ExpenseLineMod4239.SalesRepRef.FullName.SetValue("ab")
'Set field value for ClearItemLines
CreditCardChargeModRq.ClearItemLines.SetValue(True)
Dim ORItemLineModListElement4240 as IORItemLineMod
ORItemLineModListElement4240 =CreditCardChargeModRq.ORItemLineModList.Append()
Dim ORItemLineModListElementType4241 as String
ORItemLineModListElementType4241 = "ItemLineMod"
if (ORItemLineModListElementType4241 == "ItemLineMod") then
'Set field value for TxnLineID
ORItemLineModListElement4240.ItemLineMod.TxnLineID.SetValue("200000-1011023419")
'Set field value for ListID
ORItemLineModListElement4240.ItemLineMod.ItemRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineModListElement4240.ItemLineMod.ItemRef.FullName.SetValue("ab")
'Set field value for ListID
ORItemLineModListElement4240.ItemLineMod.InventorySiteRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineModListElement4240.ItemLineMod.InventorySiteRef.FullName.SetValue("ab")
'Set field value for ListID
ORItemLineModListElement4240.ItemLineMod.InventorySiteLocationRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineModListElement4240.ItemLineMod.InventorySiteLocationRef.FullName.SetValue("ab")
Dim ORSerialLotNumberElementType4242 as String
ORSerialLotNumberElementType4242 = "SerialNumber"
if (ORSerialLotNumberElementType4242 == "SerialNumber") then
'Set field value for SerialNumber
ORItemLineModListElement4240.ItemLineMod.ORSerialLotNumber.SerialNumber.SetValue("ab")
End If
if (ORSerialLotNumberElementType4242 == "LotNumber") then
'Set field value for LotNumber
ORItemLineModListElement4240.ItemLineMod.ORSerialLotNumber.LotNumber.SetValue("ab")
End If
'Set field value for ExpirationDateForSerialLotNumber
ORItemLineModListElement4240.ItemLineMod.ExpirationDateForSerialLotNumber.SetValue("2022-09-29")
'Set field value for Desc
ORItemLineModListElement4240.ItemLineMod.Desc.SetValue("ab")
'Set field value for Quantity
ORItemLineModListElement4240.ItemLineMod.Quantity.SetValue(2)
'Set field value for UnitOfMeasure
ORItemLineModListElement4240.ItemLineMod.UnitOfMeasure.SetValue("ab")
'Set field value for ListID
ORItemLineModListElement4240.ItemLineMod.OverrideUOMSetRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineModListElement4240.ItemLineMod.OverrideUOMSetRef.FullName.SetValue("ab")
'Set field value for Cost
ORItemLineModListElement4240.ItemLineMod.Cost.SetValue(15.65)
'Set field value for Amount
ORItemLineModListElement4240.ItemLineMod.Amount.SetValue(10.01)
'Set field value for ListID
ORItemLineModListElement4240.ItemLineMod.CustomerRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineModListElement4240.ItemLineMod.CustomerRef.FullName.SetValue("ab")
'Set field value for ListID
ORItemLineModListElement4240.ItemLineMod.ClassRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineModListElement4240.ItemLineMod.ClassRef.FullName.SetValue("ab")
'Set field value for ListID
ORItemLineModListElement4240.ItemLineMod.SalesTaxCodeRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineModListElement4240.ItemLineMod.SalesTaxCodeRef.FullName.SetValue("ab")
'Set field value for BillableStatus
ORItemLineModListElement4240.ItemLineMod.BillableStatus.SetValue(ENBillableStatus.bsBillable)
'Set field value for ListID
ORItemLineModListElement4240.ItemLineMod.OverrideItemAccountRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineModListElement4240.ItemLineMod.OverrideItemAccountRef.FullName.SetValue("ab")
'Set field value for ListID
ORItemLineModListElement4240.ItemLineMod.SalesRepRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineModListElement4240.ItemLineMod.SalesRepRef.FullName.SetValue("ab")
End If
if (ORItemLineModListElementType4241 == "ItemGroupLineMod") then
'Set field value for TxnLineID
ORItemLineModListElement4240.ItemGroupLineMod.TxnLineID.SetValue("200000-1011023419")
'Set field value for ListID
ORItemLineModListElement4240.ItemGroupLineMod.ItemGroupRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineModListElement4240.ItemGroupLineMod.ItemGroupRef.FullName.SetValue("ab")
'Set field value for Quantity
ORItemLineModListElement4240.ItemGroupLineMod.Quantity.SetValue(2)
'Set field value for UnitOfMeasure
ORItemLineModListElement4240.ItemGroupLineMod.UnitOfMeasure.SetValue("ab")
'Set field value for ListID
ORItemLineModListElement4240.ItemGroupLineMod.OverrideUOMSetRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineModListElement4240.ItemGroupLineMod.OverrideUOMSetRef.FullName.SetValue("ab")
Dim ItemLineMod4243 as IItemLineMod
ItemLineMod4243=ORItemLineModListElement4240.ItemGroupLineMod.ItemLineModList.Append()
'Set field value for TxnLineID
ItemLineMod4243.TxnLineID.SetValue("200000-1011023419")
'Set field value for ListID
ItemLineMod4243.ItemRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ItemLineMod4243.ItemRef.FullName.SetValue("ab")
'Set field value for ListID
ItemLineMod4243.InventorySiteRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ItemLineMod4243.InventorySiteRef.FullName.SetValue("ab")
'Set field value for ListID
ItemLineMod4243.InventorySiteLocationRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ItemLineMod4243.InventorySiteLocationRef.FullName.SetValue("ab")
Dim ORSerialLotNumberElementType4244 as String
ORSerialLotNumberElementType4244 = "SerialNumber"
if (ORSerialLotNumberElementType4244 == "SerialNumber") then
'Set field value for SerialNumber
ItemLineMod4243.ORSerialLotNumber.SerialNumber.SetValue("ab")
End If
if (ORSerialLotNumberElementType4244 == "LotNumber") then
'Set field value for LotNumber
ItemLineMod4243.ORSerialLotNumber.LotNumber.SetValue("ab")
End If
'Set field value for ExpirationDateForSerialLotNumber
ItemLineMod4243.ExpirationDateForSerialLotNumber.SetValue("2022-09-29")
'Set field value for Desc
ItemLineMod4243.Desc.SetValue("ab")
'Set field value for Quantity
ItemLineMod4243.Quantity.SetValue(2)
'Set field value for UnitOfMeasure
ItemLineMod4243.UnitOfMeasure.SetValue("ab")
'Set field value for ListID
ItemLineMod4243.OverrideUOMSetRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ItemLineMod4243.OverrideUOMSetRef.FullName.SetValue("ab")
'Set field value for Cost
ItemLineMod4243.Cost.SetValue(15.65)
'Set field value for Amount
ItemLineMod4243.Amount.SetValue(10.01)
'Set field value for ListID
ItemLineMod4243.CustomerRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ItemLineMod4243.CustomerRef.FullName.SetValue("ab")
'Set field value for ListID
ItemLineMod4243.ClassRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ItemLineMod4243.ClassRef.FullName.SetValue("ab")
'Set field value for ListID
ItemLineMod4243.SalesTaxCodeRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ItemLineMod4243.SalesTaxCodeRef.FullName.SetValue("ab")
'Set field value for BillableStatus
ItemLineMod4243.BillableStatus.SetValue(ENBillableStatus.bsBillable)
'Set field value for ListID
ItemLineMod4243.OverrideItemAccountRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ItemLineMod4243.OverrideItemAccountRef.FullName.SetValue("ab")
'Set field value for ListID
ItemLineMod4243.SalesRepRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ItemLineMod4243.SalesRepRef.FullName.SetValue("ab")
End If
'Set field value for IncludeRetElementList
'May create more than one of these if needed
CreditCardChargeModRq.IncludeRetElementList.Add("ab")
End Sub
Public Sub WalkCreditCardChargeModRs( 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.rtCreditCardChargeModRs) then
'upcast to more specific type here, this is safe because we checked with response.Type check above
Dim CreditCardChargeRet as ICreditCardChargeRet
CreditCardChargeRet = CType(response.Detail,ICreditCardChargeRet)
WalkCreditCardChargeRet(CreditCardChargeRet)
End If
End If
End If
Next j
End Sub
Public Sub WalkCreditCardChargeRet(CreditCardChargeRet as ICreditCardChargeRet)
if (CreditCardChargeRet is nothing) then
Exit Sub
End If
'Go through all the elements of ICreditCardChargeRet
'Get value of TxnID
Dim TxnID4245 as String
TxnID4245 = CreditCardChargeRet.TxnID.GetValue()
'Get value of TimeCreated
Dim TimeCreated4246 as DateTime
TimeCreated4246 = CreditCardChargeRet.TimeCreated.GetValue()
'Get value of TimeModified
Dim TimeModified4247 as DateTime
TimeModified4247 = CreditCardChargeRet.TimeModified.GetValue()
'Get value of EditSequence
Dim EditSequence4248 as String
EditSequence4248 = CreditCardChargeRet.EditSequence.GetValue()
'Get value of TxnNumber
if ( not CreditCardChargeRet.TxnNumber is nothing) then
Dim TxnNumber4249 as Integer
TxnNumber4249 = CreditCardChargeRet.TxnNumber.GetValue()
End If
'Get value of ListID
if ( not CreditCardChargeRet.AccountRef.ListID is nothing) then
Dim ListID4250 as String
ListID4250 = CreditCardChargeRet.AccountRef.ListID.GetValue()
End If
'Get value of FullName
if ( not CreditCardChargeRet.AccountRef.FullName is nothing) then
Dim FullName4251 as String
FullName4251 = CreditCardChargeRet.AccountRef.FullName.GetValue()
End If
if (not CreditCardChargeRet.PayeeEntityRef. is nothing) then
'Get value of ListID
if ( not CreditCardChargeRet.PayeeEntityRef.ListID is nothing) then
Dim ListID4252 as String
ListID4252 = CreditCardChargeRet.PayeeEntityRef.ListID.GetValue()
End If
'Get value of FullName
if ( not CreditCardChargeRet.PayeeEntityRef.FullName is nothing) then
Dim FullName4253 as String
FullName4253 = CreditCardChargeRet.PayeeEntityRef.FullName.GetValue()
End If
End If
'Get value of TxnDate
Dim TxnDate4254 as DateTime
TxnDate4254 = CreditCardChargeRet.TxnDate.GetValue()
'Get value of Amount
Dim Amount4255 as Double
Amount4255 = CreditCardChargeRet.Amount.GetValue()
if (not CreditCardChargeRet.CurrencyRef. is nothing) then
'Get value of ListID
if ( not CreditCardChargeRet.CurrencyRef.ListID is nothing) then
Dim ListID4256 as String
ListID4256 = CreditCardChargeRet.CurrencyRef.ListID.GetValue()
End If
'Get value of FullName
if ( not CreditCardChargeRet.CurrencyRef.FullName is nothing) then
Dim FullName4257 as String
FullName4257 = CreditCardChargeRet.CurrencyRef.FullName.GetValue()
End If
End If
'Get value of ExchangeRate
if ( not CreditCardChargeRet.ExchangeRate is nothing) then
Dim ExchangeRate4258 as IQBFloatType
ExchangeRate4258 = CreditCardChargeRet.ExchangeRate.GetValue()
End If
'Get value of AmountInHomeCurrency
if ( not CreditCardChargeRet.AmountInHomeCurrency is nothing) then
Dim AmountInHomeCurrency4259 as Double
AmountInHomeCurrency4259 = CreditCardChargeRet.AmountInHomeCurrency.GetValue()
End If
'Get value of RefNumber
if ( not CreditCardChargeRet.RefNumber is nothing) then
Dim RefNumber4260 as String
RefNumber4260 = CreditCardChargeRet.RefNumber.GetValue()
End If
'Get value of Memo
if ( not CreditCardChargeRet.Memo is nothing) then
Dim Memo4261 as String
Memo4261 = CreditCardChargeRet.Memo.GetValue()
End If
'Get value of IsTaxIncluded
if ( not CreditCardChargeRet.IsTaxIncluded is nothing) then
Dim IsTaxIncluded4262 as Boolean
IsTaxIncluded4262 = CreditCardChargeRet.IsTaxIncluded.GetValue()
End If
if (not CreditCardChargeRet.SalesTaxCodeRef. is nothing) then
'Get value of ListID
if ( not CreditCardChargeRet.SalesTaxCodeRef.ListID is nothing) then
Dim ListID4263 as String
ListID4263 = CreditCardChargeRet.SalesTaxCodeRef.ListID.GetValue()
End If
'Get value of FullName
if ( not CreditCardChargeRet.SalesTaxCodeRef.FullName is nothing) then
Dim FullName4264 as String
FullName4264 = CreditCardChargeRet.SalesTaxCodeRef.FullName.GetValue()
End If
End If
'Get value of ExternalGUID
if ( not CreditCardChargeRet.ExternalGUID is nothing) then
Dim ExternalGUID4265 as String
ExternalGUID4265 = CreditCardChargeRet.ExternalGUID.GetValue()
End If
if (not CreditCardChargeRet.ExpenseLineRetList is nothing)
Dim i4266 as Integer
for i4266 = 0 to CreditCardChargeRet.ExpenseLineRetList.Count - 1
Dim ExpenseLineRet as IExpenseLineRet
ExpenseLineRet = CreditCardChargeRet.ExpenseLineRetList.GetAt(i4266)
'Get value of TxnLineID
Dim TxnLineID4267 as String
TxnLineID4267 = ExpenseLineRetTxnLineID.GetValue()
if (not ExpenseLineRetAccountRef. is nothing) then
'Get value of ListID
if ( not ExpenseLineRetAccountRef.ListID is nothing) then
Dim ListID4268 as String
ListID4268 = ExpenseLineRetAccountRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ExpenseLineRetAccountRef.FullName is nothing) then
Dim FullName4269 as String
FullName4269 = ExpenseLineRetAccountRef.FullName.GetValue()
End If
End If
'Get value of Amount
if ( not ExpenseLineRetAmount is nothing) then
Dim Amount4270 as Double
Amount4270 = ExpenseLineRetAmount.GetValue()
End If
'Get value of Memo
if ( not ExpenseLineRetMemo is nothing) then
Dim Memo4271 as String
Memo4271 = ExpenseLineRetMemo.GetValue()
End If
if (not ExpenseLineRetCustomerRef. is nothing) then
'Get value of ListID
if ( not ExpenseLineRetCustomerRef.ListID is nothing) then
Dim ListID4272 as String
ListID4272 = ExpenseLineRetCustomerRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ExpenseLineRetCustomerRef.FullName is nothing) then
Dim FullName4273 as String
FullName4273 = ExpenseLineRetCustomerRef.FullName.GetValue()
End If
End If
if (not ExpenseLineRetClassRef. is nothing) then
'Get value of ListID
if ( not ExpenseLineRetClassRef.ListID is nothing) then
Dim ListID4274 as String
ListID4274 = ExpenseLineRetClassRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ExpenseLineRetClassRef.FullName is nothing) then
Dim FullName4275 as String
FullName4275 = ExpenseLineRetClassRef.FullName.GetValue()
End If
End If
if (not ExpenseLineRetSalesTaxCodeRef. is nothing) then
'Get value of ListID
if ( not ExpenseLineRetSalesTaxCodeRef.ListID is nothing) then
Dim ListID4276 as String
ListID4276 = ExpenseLineRetSalesTaxCodeRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ExpenseLineRetSalesTaxCodeRef.FullName is nothing) then
Dim FullName4277 as String
FullName4277 = ExpenseLineRetSalesTaxCodeRef.FullName.GetValue()
End If
End If
'Get value of BillableStatus
if ( not ExpenseLineRetBillableStatus is nothing) then
Dim BillableStatus4278 as ENBillableStatus
BillableStatus4278 = ExpenseLineRetBillableStatus.GetValue()
End If
if (not ExpenseLineRetSalesRepRef. is nothing) then
'Get value of ListID
if ( not ExpenseLineRetSalesRepRef.ListID is nothing) then
Dim ListID4279 as String
ListID4279 = ExpenseLineRetSalesRepRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ExpenseLineRetSalesRepRef.FullName is nothing) then
Dim FullName4280 as String
FullName4280 = ExpenseLineRetSalesRepRef.FullName.GetValue()
End If
End If
if (not ExpenseLineRetDataExtRetList is nothing)
Dim i4281 as Integer
for i4281 = 0 to ExpenseLineRetDataExtRetList.Count - 1
Dim DataExtRet as IDataExtRet
DataExtRet = ExpenseLineRetDataExtRetList.GetAt(i4281)
'Get value of OwnerID
if ( not DataExtRetOwnerID is nothing) then
Dim OwnerID4282 as String
OwnerID4282 = DataExtRetOwnerID.GetValue()
End If
'Get value of DataExtName
Dim DataExtName4283 as String
DataExtName4283 = DataExtRetDataExtName.GetValue()
'Get value of DataExtType
Dim DataExtType4284 as ENDataExtType
DataExtType4284 = DataExtRetDataExtType.GetValue()
'Get value of DataExtValue
Dim DataExtValue4285 as String
DataExtValue4285 = DataExtRetDataExtValue.GetValue()
Next i4281
End If
Next i4266
End If
if (not CreditCardChargeRet.ORItemLineRetList is nothing) then
Dim i4286 as Integer
for i4286 = 0 to CreditCardChargeRet.ORItemLineRetList.Count - 1
Dim ORItemLineRet4287 as IORItemLineRet
ORItemLineRet4287 = CreditCardChargeRet.ORItemLineRetList.GetAt(i4286)
if (not ORItemLineRet4287.ItemLineRet is nothing) then
if (not ORItemLineRet4287.ItemLineRet. is nothing) then
'Get value of TxnLineID
Dim TxnLineID4288 as String
TxnLineID4288 = ORItemLineRet4287.ItemLineRet.TxnLineID.GetValue()
if (not ORItemLineRet4287.ItemLineRet.ItemRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet4287.ItemLineRet.ItemRef.ListID is nothing) then
Dim ListID4289 as String
ListID4289 = ORItemLineRet4287.ItemLineRet.ItemRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet4287.ItemLineRet.ItemRef.FullName is nothing) then
Dim FullName4290 as String
FullName4290 = ORItemLineRet4287.ItemLineRet.ItemRef.FullName.GetValue()
End If
End If
if (not ORItemLineRet4287.ItemLineRet.InventorySiteRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet4287.ItemLineRet.InventorySiteRef.ListID is nothing) then
Dim ListID4291 as String
ListID4291 = ORItemLineRet4287.ItemLineRet.InventorySiteRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet4287.ItemLineRet.InventorySiteRef.FullName is nothing) then
Dim FullName4292 as String
FullName4292 = ORItemLineRet4287.ItemLineRet.InventorySiteRef.FullName.GetValue()
End If
End If
if (not ORItemLineRet4287.ItemLineRet.InventorySiteLocationRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet4287.ItemLineRet.InventorySiteLocationRef.ListID is nothing) then
Dim ListID4293 as String
ListID4293 = ORItemLineRet4287.ItemLineRet.InventorySiteLocationRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet4287.ItemLineRet.InventorySiteLocationRef.FullName is nothing) then
Dim FullName4294 as String
FullName4294 = ORItemLineRet4287.ItemLineRet.InventorySiteLocationRef.FullName.GetValue()
End If
End If
if (not ORItemLineRet4287.ItemLineRet.ORSerialLotNumber is nothing) then
if (not ORItemLineRet4287.ItemLineRet.ORSerialLotNumber.SerialNumber is nothing) then
'Get value of SerialNumber
if ( not ORItemLineRet4287.ItemLineRet.ORSerialLotNumber.SerialNumber is nothing) then
Dim SerialNumber4296 as String
SerialNumber4296 = ORItemLineRet4287.ItemLineRet.ORSerialLotNumber.SerialNumber.GetValue()
End If
End If
if (not ORItemLineRet4287.ItemLineRet.ORSerialLotNumber.LotNumber is nothing) then
'Get value of LotNumber
if ( not ORItemLineRet4287.ItemLineRet.ORSerialLotNumber.LotNumber is nothing) then
Dim LotNumber4297 as String
LotNumber4297 = ORItemLineRet4287.ItemLineRet.ORSerialLotNumber.LotNumber.GetValue()
End If
End If
End If
'Get value of ExpirationDateForSerialLotNumber
if ( not ORItemLineRet4287.ItemLineRet.ExpirationDateForSerialLotNumber is nothing) then
Dim ExpDate as String
ExpDate = ORItemLineRet4287.ItemLineRet.ExpirationDateForSerialLotNumber.GetValue()
End If
'Get value of Desc
if ( not ORItemLineRet4287.ItemLineRet.Desc is nothing) then
Dim Desc4298 as String
Desc4298 = ORItemLineRet4287.ItemLineRet.Desc.GetValue()
End If
'Get value of Quantity
if ( not ORItemLineRet4287.ItemLineRet.Quantity is nothing) then
Dim Quantity4299 as Integer
Quantity4299 = ORItemLineRet4287.ItemLineRet.Quantity.GetValue()
End If
'Get value of UnitOfMeasure
if ( not ORItemLineRet4287.ItemLineRet.UnitOfMeasure is nothing) then
Dim UnitOfMeasure4300 as String
UnitOfMeasure4300 = ORItemLineRet4287.ItemLineRet.UnitOfMeasure.GetValue()
End If
if (not ORItemLineRet4287.ItemLineRet.OverrideUOMSetRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet4287.ItemLineRet.OverrideUOMSetRef.ListID is nothing) then
Dim ListID4301 as String
ListID4301 = ORItemLineRet4287.ItemLineRet.OverrideUOMSetRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet4287.ItemLineRet.OverrideUOMSetRef.FullName is nothing) then
Dim FullName4302 as String
FullName4302 = ORItemLineRet4287.ItemLineRet.OverrideUOMSetRef.FullName.GetValue()
End If
End If
'Get value of Cost
if ( not ORItemLineRet4287.ItemLineRet.Cost is nothing) then
Dim Cost4303 as Double
Cost4303 = ORItemLineRet4287.ItemLineRet.Cost.GetValue()
End If
'Get value of Amount
if ( not ORItemLineRet4287.ItemLineRet.Amount is nothing) then
Dim Amount4304 as Double
Amount4304 = ORItemLineRet4287.ItemLineRet.Amount.GetValue()
End If
if (not ORItemLineRet4287.ItemLineRet.CustomerRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet4287.ItemLineRet.CustomerRef.ListID is nothing) then
Dim ListID4305 as String
ListID4305 = ORItemLineRet4287.ItemLineRet.CustomerRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet4287.ItemLineRet.CustomerRef.FullName is nothing) then
Dim FullName4306 as String
FullName4306 = ORItemLineRet4287.ItemLineRet.CustomerRef.FullName.GetValue()
End If
End If
if (not ORItemLineRet4287.ItemLineRet.ClassRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet4287.ItemLineRet.ClassRef.ListID is nothing) then
Dim ListID4307 as String
ListID4307 = ORItemLineRet4287.ItemLineRet.ClassRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet4287.ItemLineRet.ClassRef.FullName is nothing) then
Dim FullName4308 as String
FullName4308 = ORItemLineRet4287.ItemLineRet.ClassRef.FullName.GetValue()
End If
End If
if (not ORItemLineRet4287.ItemLineRet.SalesTaxCodeRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet4287.ItemLineRet.SalesTaxCodeRef.ListID is nothing) then
Dim ListID4309 as String
ListID4309 = ORItemLineRet4287.ItemLineRet.SalesTaxCodeRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet4287.ItemLineRet.SalesTaxCodeRef.FullName is nothing) then
Dim FullName4310 as String
FullName4310 = ORItemLineRet4287.ItemLineRet.SalesTaxCodeRef.FullName.GetValue()
End If
End If
'Get value of BillableStatus
if ( not ORItemLineRet4287.ItemLineRet.BillableStatus is nothing) then
Dim BillableStatus4311 as ENBillableStatus
BillableStatus4311 = ORItemLineRet4287.ItemLineRet.BillableStatus.GetValue()
End If
if (not ORItemLineRet4287.ItemLineRet.SalesRepRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet4287.ItemLineRet.SalesRepRef.ListID is nothing) then
Dim ListID4312 as String
ListID4312 = ORItemLineRet4287.ItemLineRet.SalesRepRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet4287.ItemLineRet.SalesRepRef.FullName is nothing) then
Dim FullName4313 as String
FullName4313 = ORItemLineRet4287.ItemLineRet.SalesRepRef.FullName.GetValue()
End If
End If
if (not ORItemLineRet4287.ItemLineRet.DataExtRetList is nothing)
Dim i4314 as Integer
for i4314 = 0 to ORItemLineRet4287.ItemLineRet.DataExtRetList.Count - 1
Dim DataExtRet as IDataExtRet
DataExtRet = ORItemLineRet4287.ItemLineRet.DataExtRetList.GetAt(i4314)
'Get value of OwnerID
if ( not DataExtRetOwnerID is nothing) then
Dim OwnerID4315 as String
OwnerID4315 = DataExtRetOwnerID.GetValue()
End If
'Get value of DataExtName
Dim DataExtName4316 as String
DataExtName4316 = DataExtRetDataExtName.GetValue()
'Get value of DataExtType
Dim DataExtType4317 as ENDataExtType
DataExtType4317 = DataExtRetDataExtType.GetValue()
'Get value of DataExtValue
Dim DataExtValue4318 as String
DataExtValue4318 = DataExtRetDataExtValue.GetValue()
Next i4314
End If
End If
End If
if (not ORItemLineRet4287.ItemGroupLineRet is nothing) then
if (not ORItemLineRet4287.ItemGroupLineRet. is nothing) then
'Get value of TxnLineID
Dim TxnLineID4319 as String
TxnLineID4319 = ORItemLineRet4287.ItemGroupLineRet.TxnLineID.GetValue()
'Get value of ListID
if ( not ORItemLineRet4287.ItemGroupLineRet.ItemGroupRef.ListID is nothing) then
Dim ListID4320 as String
ListID4320 = ORItemLineRet4287.ItemGroupLineRet.ItemGroupRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet4287.ItemGroupLineRet.ItemGroupRef.FullName is nothing) then
Dim FullName4321 as String
FullName4321 = ORItemLineRet4287.ItemGroupLineRet.ItemGroupRef.FullName.GetValue()
End If
'Get value of Desc
if ( not ORItemLineRet4287.ItemGroupLineRet.Desc is nothing) then
Dim Desc4322 as String
Desc4322 = ORItemLineRet4287.ItemGroupLineRet.Desc.GetValue()
End If
'Get value of Quantity
if ( not ORItemLineRet4287.ItemGroupLineRet.Quantity is nothing) then
Dim Quantity4323 as Integer
Quantity4323 = ORItemLineRet4287.ItemGroupLineRet.Quantity.GetValue()
End If
'Get value of UnitOfMeasure
if ( not ORItemLineRet4287.ItemGroupLineRet.UnitOfMeasure is nothing) then
Dim UnitOfMeasure4324 as String
UnitOfMeasure4324 = ORItemLineRet4287.ItemGroupLineRet.UnitOfMeasure.GetValue()
End If
if (not ORItemLineRet4287.ItemGroupLineRet.OverrideUOMSetRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet4287.ItemGroupLineRet.OverrideUOMSetRef.ListID is nothing) then
Dim ListID4325 as String
ListID4325 = ORItemLineRet4287.ItemGroupLineRet.OverrideUOMSetRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet4287.ItemGroupLineRet.OverrideUOMSetRef.FullName is nothing) then
Dim FullName4326 as String
FullName4326 = ORItemLineRet4287.ItemGroupLineRet.OverrideUOMSetRef.FullName.GetValue()
End If
End If
'Get value of TotalAmount
Dim TotalAmount4327 as Double
TotalAmount4327 = ORItemLineRet4287.ItemGroupLineRet.TotalAmount.GetValue()
if (not ORItemLineRet4287.ItemGroupLineRet.ItemLineRetList is nothing)
Dim i4328 as Integer
for i4328 = 0 to ORItemLineRet4287.ItemGroupLineRet.ItemLineRetList.Count - 1
Dim ItemLineRet as IItemLineRet
ItemLineRet = ORItemLineRet4287.ItemGroupLineRet.ItemLineRetList.GetAt(i4328)
'Get value of TxnLineID
Dim TxnLineID4329 as String
TxnLineID4329 = ItemLineRetTxnLineID.GetValue()
if (not ItemLineRetItemRef. is nothing) then
'Get value of ListID
if ( not ItemLineRetItemRef.ListID is nothing) then
Dim ListID4330 as String
ListID4330 = ItemLineRetItemRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemLineRetItemRef.FullName is nothing) then
Dim FullName4331 as String
FullName4331 = ItemLineRetItemRef.FullName.GetValue()
End If
End If
if (not ItemLineRetInventorySiteRef. is nothing) then
'Get value of ListID
if ( not ItemLineRetInventorySiteRef.ListID is nothing) then
Dim ListID4332 as String
ListID4332 = ItemLineRetInventorySiteRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemLineRetInventorySiteRef.FullName is nothing) then
Dim FullName4333 as String
FullName4333 = ItemLineRetInventorySiteRef.FullName.GetValue()
End If
End If
if (not ItemLineRetInventorySiteLocationRef. is nothing) then
'Get value of ListID
if ( not ItemLineRetInventorySiteLocationRef.ListID is nothing) then
Dim ListID4334 as String
ListID4334 = ItemLineRetInventorySiteLocationRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemLineRetInventorySiteLocationRef.FullName is nothing) then
Dim FullName4335 as String
FullName4335 = ItemLineRetInventorySiteLocationRef.FullName.GetValue()
End If
End If
if (not ItemLineRetORSerialLotNumber is nothing) then
if (not ItemLineRetORSerialLotNumber.SerialNumber is nothing) then
'Get value of SerialNumber
if ( not ItemLineRetORSerialLotNumber.SerialNumber is nothing) then
Dim SerialNumber4337 as String
SerialNumber4337 = ItemLineRetORSerialLotNumber.SerialNumber.GetValue()
End If
End If
if (not ItemLineRetORSerialLotNumber.LotNumber is nothing) then
'Get value of LotNumber
if ( not ItemLineRetORSerialLotNumber.LotNumber is nothing) then
Dim LotNumber4338 as String
LotNumber4338 = ItemLineRetORSerialLotNumber.LotNumber.GetValue()
End If
End If
End If
'Get value of ExpirationDateForSerialLotNumber
if ( not ItemLineRetExpirationDateForSerialLotNumber is nothing) then
Dim ExpDate as String
ExpDate = ItemLineRetExpirationDateForSerialLotNumber.GetValue()
End If
'Get value of Desc
if ( not ItemLineRetDesc is nothing) then
Dim Desc4339 as String
Desc4339 = ItemLineRetDesc.GetValue()
End If
'Get value of Quantity
if ( not ItemLineRetQuantity is nothing) then
Dim Quantity4340 as Integer
Quantity4340 = ItemLineRetQuantity.GetValue()
End If
'Get value of UnitOfMeasure
if ( not ItemLineRetUnitOfMeasure is nothing) then
Dim UnitOfMeasure4341 as String
UnitOfMeasure4341 = ItemLineRetUnitOfMeasure.GetValue()
End If
if (not ItemLineRetOverrideUOMSetRef. is nothing) then
'Get value of ListID
if ( not ItemLineRetOverrideUOMSetRef.ListID is nothing) then
Dim ListID4342 as String
ListID4342 = ItemLineRetOverrideUOMSetRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemLineRetOverrideUOMSetRef.FullName is nothing) then
Dim FullName4343 as String
FullName4343 = ItemLineRetOverrideUOMSetRef.FullName.GetValue()
End If
End If
'Get value of Cost
if ( not ItemLineRetCost is nothing) then
Dim Cost4344 as Double
Cost4344 = ItemLineRetCost.GetValue()
End If
'Get value of Amount
if ( not ItemLineRetAmount is nothing) then
Dim Amount4345 as Double
Amount4345 = ItemLineRetAmount.GetValue()
End If
if (not ItemLineRetCustomerRef. is nothing) then
'Get value of ListID
if ( not ItemLineRetCustomerRef.ListID is nothing) then
Dim ListID4346 as String
ListID4346 = ItemLineRetCustomerRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemLineRetCustomerRef.FullName is nothing) then
Dim FullName4347 as String
FullName4347 = ItemLineRetCustomerRef.FullName.GetValue()
End If
End If
if (not ItemLineRetClassRef. is nothing) then
'Get value of ListID
if ( not ItemLineRetClassRef.ListID is nothing) then
Dim ListID4348 as String
ListID4348 = ItemLineRetClassRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemLineRetClassRef.FullName is nothing) then
Dim FullName4349 as String
FullName4349 = ItemLineRetClassRef.FullName.GetValue()
End If
End If
if (not ItemLineRetSalesTaxCodeRef. is nothing) then
'Get value of ListID
if ( not ItemLineRetSalesTaxCodeRef.ListID is nothing) then
Dim ListID4350 as String
ListID4350 = ItemLineRetSalesTaxCodeRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemLineRetSalesTaxCodeRef.FullName is nothing) then
Dim FullName4351 as String
FullName4351 = ItemLineRetSalesTaxCodeRef.FullName.GetValue()
End If
End If
'Get value of BillableStatus
if ( not ItemLineRetBillableStatus is nothing) then
Dim BillableStatus4352 as ENBillableStatus
BillableStatus4352 = ItemLineRetBillableStatus.GetValue()
End If
if (not ItemLineRetSalesRepRef. is nothing) then
'Get value of ListID
if ( not ItemLineRetSalesRepRef.ListID is nothing) then
Dim ListID4353 as String
ListID4353 = ItemLineRetSalesRepRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemLineRetSalesRepRef.FullName is nothing) then
Dim FullName4354 as String
FullName4354 = ItemLineRetSalesRepRef.FullName.GetValue()
End If
End If
if (not ItemLineRetDataExtRetList is nothing)
Dim i4355 as Integer
for i4355 = 0 to ItemLineRetDataExtRetList.Count - 1
Dim DataExtRet as IDataExtRet
DataExtRet = ItemLineRetDataExtRetList.GetAt(i4355)
'Get value of OwnerID
if ( not DataExtRetOwnerID is nothing) then
Dim OwnerID4356 as String
OwnerID4356 = DataExtRetOwnerID.GetValue()
End If
'Get value of DataExtName
Dim DataExtName4357 as String
DataExtName4357 = DataExtRetDataExtName.GetValue()
'Get value of DataExtType
Dim DataExtType4358 as ENDataExtType
DataExtType4358 = DataExtRetDataExtType.GetValue()
'Get value of DataExtValue
Dim DataExtValue4359 as String
DataExtValue4359 = DataExtRetDataExtValue.GetValue()
Next i4355
End If
Next i4328
End If
if (not ORItemLineRet4287.ItemGroupLineRet.DataExtList is nothing)
Dim i4360 as Integer
for i4360 = 0 to ORItemLineRet4287.ItemGroupLineRet.DataExtList.Count - 1
Dim DataExt as IDataExt
DataExt = ORItemLineRet4287.ItemGroupLineRet.DataExtList.GetAt(i4360)
'Get value of OwnerID
Dim OwnerID4361 as String
OwnerID4361 = DataExtOwnerID.GetValue()
'Get value of DataExtName
Dim DataExtName4362 as String
DataExtName4362 = DataExtDataExtName.GetValue()
'Get value of DataExtValue
Dim DataExtValue4363 as String
DataExtValue4363 = DataExtDataExtValue.GetValue()
Next i4360
End If
End If
End If
Next i4286
End If
if (not CreditCardChargeRet.DataExtRetList is nothing)
Dim i4364 as Integer
for i4364 = 0 to CreditCardChargeRet.DataExtRetList.Count - 1
Dim DataExtRet as IDataExtRet
DataExtRet = CreditCardChargeRet.DataExtRetList.GetAt(i4364)
'Get value of OwnerID
if ( not DataExtRetOwnerID is nothing) then
Dim OwnerID4365 as String
OwnerID4365 = DataExtRetOwnerID.GetValue()
End If
'Get value of DataExtName
Dim DataExtName4366 as String
DataExtName4366 = DataExtRetDataExtName.GetValue()
'Get value of DataExtType
Dim DataExtType4367 as ENDataExtType
DataExtType4367 = DataExtRetDataExtType.GetValue()
'Get value of DataExtValue
Dim DataExtValue4368 as String
DataExtValue4368 = DataExtRetDataExtValue.GetValue()
Next i4364
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 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886 887 888 889 890 891 892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 981 982 983 984 985 | //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 DoCreditCardChargeMod() { 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; BuildCreditCardChargeModRq(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; WalkCreditCardChargeModRs(responseMsgSet); } catch (Exception e) { MessageBox.Show(e.Message, "Error"); if (sessionBegun) { sessionManager.EndSession(); } if (connectionOpen) { sessionManager.CloseConnection(); } } } void BuildCreditCardChargeModRq(IMsgSetRequest requestMsgSet) { ICreditCardChargeMod CreditCardChargeModRq= requestMsgSet.AppendCreditCardChargeModRq(); //Set field value for TxnID CreditCardChargeModRq.TxnID.SetValue("200000-1011023419"); //Set field value for EditSequence CreditCardChargeModRq.EditSequence.SetValue("ab"); //Set field value for ListID CreditCardChargeModRq.AccountRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName CreditCardChargeModRq.AccountRef.FullName.SetValue("ab"); //Set field value for ListID CreditCardChargeModRq.PayeeEntityRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName CreditCardChargeModRq.PayeeEntityRef.FullName.SetValue("ab"); //Set field value for TxnDate CreditCardChargeModRq.TxnDate.SetValue(DateTime.Parse("12/15/2007")); //Set field value for RefNumber CreditCardChargeModRq.RefNumber.SetValue("ab"); //Set field value for Memo CreditCardChargeModRq.Memo.SetValue("ab"); //Set field value for IsTaxIncluded CreditCardChargeModRq.IsTaxIncluded.SetValue(true); //Set field value for ListID CreditCardChargeModRq.SalesTaxCodeRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName CreditCardChargeModRq.SalesTaxCodeRef.FullName.SetValue("ab"); //Set field value for ExchangeRate CreditCardChargeModRq.ExchangeRate.SetValue("IQBFloatType"); //Set field value for ClearExpenseLines CreditCardChargeModRq.ClearExpenseLines.SetValue(true); IExpenseLineMod ExpenseLineMod4109=CreditCardChargeModRq.ExpenseLineModList.Append(); //Set field value for TxnLineID ExpenseLineMod4109.TxnLineID.SetValue("200000-1011023419"); //Set field value for ListID ExpenseLineMod4109.AccountRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ExpenseLineMod4109.AccountRef.FullName.SetValue("ab"); //Set field value for Amount ExpenseLineMod4109.Amount.SetValue(10.01); //Set field value for Memo ExpenseLineMod4109.Memo.SetValue("ab"); //Set field value for ListID ExpenseLineMod4109.CustomerRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ExpenseLineMod4109.CustomerRef.FullName.SetValue("ab"); //Set field value for ListID ExpenseLineMod4109.ClassRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ExpenseLineMod4109.ClassRef.FullName.SetValue("ab"); //Set field value for ListID ExpenseLineMod4109.SalesTaxCodeRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ExpenseLineMod4109.SalesTaxCodeRef.FullName.SetValue("ab"); //Set field value for BillableStatus ExpenseLineMod4109.BillableStatus.SetValue(ENBillableStatus.bsBillable); //Set field value for ListID ExpenseLineMod4109.SalesRepRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ExpenseLineMod4109.SalesRepRef.FullName.SetValue("ab"); //Set field value for ClearItemLines CreditCardChargeModRq.ClearItemLines.SetValue(true); IORItemLineMod ORItemLineModListElement4110 =CreditCardChargeModRq.ORItemLineModList.Append(); string ORItemLineModListElementType4111 = "ItemLineMod"; if (ORItemLineModListElementType4111 == "ItemLineMod") { //Set field value for TxnLineID ORItemLineModListElement4110.ItemLineMod.TxnLineID.SetValue("200000-1011023419"); //Set field value for ListID ORItemLineModListElement4110.ItemLineMod.ItemRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineModListElement4110.ItemLineMod.ItemRef.FullName.SetValue("ab"); //Set field value for ListID ORItemLineModListElement4110.ItemLineMod.InventorySiteRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineModListElement4110.ItemLineMod.InventorySiteRef.FullName.SetValue("ab"); //Set field value for ListID ORItemLineModListElement4110.ItemLineMod.InventorySiteLocationRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineModListElement4110.ItemLineMod.InventorySiteLocationRef.FullName.SetValue("ab"); string ORSerialLotNumberElementType4112 = "SerialNumber"; if (ORSerialLotNumberElementType4112 == "SerialNumber") { //Set field value for SerialNumber ORItemLineModListElement4110.ItemLineMod.ORSerialLotNumber.SerialNumber.SetValue("ab"); } if (ORSerialLotNumberElementType4112 == "LotNumber") { //Set field value for LotNumber ORItemLineModListElement4110.ItemLineMod.ORSerialLotNumber.LotNumber.SetValue("ab"); } //Set field value for ExpirationDateForSerialLotNumber ORItemLineModListElement4110.ItemLineMod.ExpirationDateForSerialLotNumber.SetValue("2022-09-29"); //Set field value for Desc ORItemLineModListElement4110.ItemLineMod.Desc.SetValue("ab"); //Set field value for Quantity ORItemLineModListElement4110.ItemLineMod.Quantity.SetValue(2); //Set field value for UnitOfMeasure ORItemLineModListElement4110.ItemLineMod.UnitOfMeasure.SetValue("ab"); //Set field value for ListID ORItemLineModListElement4110.ItemLineMod.OverrideUOMSetRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineModListElement4110.ItemLineMod.OverrideUOMSetRef.FullName.SetValue("ab"); //Set field value for Cost ORItemLineModListElement4110.ItemLineMod.Cost.SetValue(15.65); //Set field value for Amount ORItemLineModListElement4110.ItemLineMod.Amount.SetValue(10.01); //Set field value for ListID ORItemLineModListElement4110.ItemLineMod.CustomerRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineModListElement4110.ItemLineMod.CustomerRef.FullName.SetValue("ab"); //Set field value for ListID ORItemLineModListElement4110.ItemLineMod.ClassRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineModListElement4110.ItemLineMod.ClassRef.FullName.SetValue("ab"); //Set field value for ListID ORItemLineModListElement4110.ItemLineMod.SalesTaxCodeRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineModListElement4110.ItemLineMod.SalesTaxCodeRef.FullName.SetValue("ab"); //Set field value for BillableStatus ORItemLineModListElement4110.ItemLineMod.BillableStatus.SetValue(ENBillableStatus.bsBillable); //Set field value for ListID ORItemLineModListElement4110.ItemLineMod.OverrideItemAccountRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineModListElement4110.ItemLineMod.OverrideItemAccountRef.FullName.SetValue("ab"); //Set field value for ListID ORItemLineModListElement4110.ItemLineMod.SalesRepRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineModListElement4110.ItemLineMod.SalesRepRef.FullName.SetValue("ab"); } if (ORItemLineModListElementType4111 == "ItemGroupLineMod") { //Set field value for TxnLineID ORItemLineModListElement4110.ItemGroupLineMod.TxnLineID.SetValue("200000-1011023419"); //Set field value for ListID ORItemLineModListElement4110.ItemGroupLineMod.ItemGroupRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineModListElement4110.ItemGroupLineMod.ItemGroupRef.FullName.SetValue("ab"); //Set field value for Quantity ORItemLineModListElement4110.ItemGroupLineMod.Quantity.SetValue(2); //Set field value for UnitOfMeasure ORItemLineModListElement4110.ItemGroupLineMod.UnitOfMeasure.SetValue("ab"); //Set field value for ListID ORItemLineModListElement4110.ItemGroupLineMod.OverrideUOMSetRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineModListElement4110.ItemGroupLineMod.OverrideUOMSetRef.FullName.SetValue("ab"); IItemLineMod ItemLineMod4113=ORItemLineModListElement4110.ItemGroupLineMod.ItemLineModList.Append(); //Set field value for TxnLineID ItemLineMod4113.TxnLineID.SetValue("200000-1011023419"); //Set field value for ListID ItemLineMod4113.ItemRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ItemLineMod4113.ItemRef.FullName.SetValue("ab"); //Set field value for ListID ItemLineMod4113.InventorySiteRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ItemLineMod4113.InventorySiteRef.FullName.SetValue("ab"); //Set field value for ListID ItemLineMod4113.InventorySiteLocationRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ItemLineMod4113.InventorySiteLocationRef.FullName.SetValue("ab"); string ORSerialLotNumberElementType4114 = "SerialNumber"; if (ORSerialLotNumberElementType4114 == "SerialNumber") { //Set field value for SerialNumber ItemLineMod4113.ORSerialLotNumber.SerialNumber.SetValue("ab"); } if (ORSerialLotNumberElementType4114 == "LotNumber") { //Set field value for LotNumber ItemLineMod4113.ORSerialLotNumber.LotNumber.SetValue("ab"); } //Set field value for ExpirationDateForSerialLotNumber ItemLineMod4113.ExpirationDateForSerialLotNumber.SetValue("2022-09-29"); //Set field value for Desc ItemLineMod4113.Desc.SetValue("ab"); //Set field value for Quantity ItemLineMod4113.Quantity.SetValue(2); //Set field value for UnitOfMeasure ItemLineMod4113.UnitOfMeasure.SetValue("ab"); //Set field value for ListID ItemLineMod4113.OverrideUOMSetRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ItemLineMod4113.OverrideUOMSetRef.FullName.SetValue("ab"); //Set field value for Cost ItemLineMod4113.Cost.SetValue(15.65); //Set field value for Amount ItemLineMod4113.Amount.SetValue(10.01); //Set field value for ListID ItemLineMod4113.CustomerRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ItemLineMod4113.CustomerRef.FullName.SetValue("ab"); //Set field value for ListID ItemLineMod4113.ClassRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ItemLineMod4113.ClassRef.FullName.SetValue("ab"); //Set field value for ListID ItemLineMod4113.SalesTaxCodeRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ItemLineMod4113.SalesTaxCodeRef.FullName.SetValue("ab"); //Set field value for BillableStatus ItemLineMod4113.BillableStatus.SetValue(ENBillableStatus.bsBillable); //Set field value for ListID ItemLineMod4113.OverrideItemAccountRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ItemLineMod4113.OverrideItemAccountRef.FullName.SetValue("ab"); //Set field value for ListID ItemLineMod4113.SalesRepRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ItemLineMod4113.SalesRepRef.FullName.SetValue("ab"); } //Set field value for IncludeRetElementList //May create more than one of these if needed CreditCardChargeModRq.IncludeRetElementList.Add("ab"); } void WalkCreditCardChargeModRs(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.rtCreditCardChargeModRs) { //upcast to more specific type here, this is safe because we checked with response.Type check above ICreditCardChargeRet CreditCardChargeRet = (ICreditCardChargeRet)response.Detail; WalkCreditCardChargeRet(CreditCardChargeRet); } } } } } void WalkCreditCardChargeRet(ICreditCardChargeRet CreditCardChargeRet) { if (CreditCardChargeRet == null) return; //Go through all the elements of ICreditCardChargeRet //Get value of TxnID string TxnID4115 = (string)CreditCardChargeRet.TxnID.GetValue(); //Get value of TimeCreated DateTime TimeCreated4116 = (DateTime)CreditCardChargeRet.TimeCreated.GetValue(); //Get value of TimeModified DateTime TimeModified4117 = (DateTime)CreditCardChargeRet.TimeModified.GetValue(); //Get value of EditSequence string EditSequence4118 = (string)CreditCardChargeRet.EditSequence.GetValue(); //Get value of TxnNumber if (CreditCardChargeRet.TxnNumber != null) { int TxnNumber4119 = (int)CreditCardChargeRet.TxnNumber.GetValue(); } //Get value of ListID if (CreditCardChargeRet.AccountRef.ListID != null) { string ListID4120 = (string)CreditCardChargeRet.AccountRef.ListID.GetValue(); } //Get value of FullName if (CreditCardChargeRet.AccountRef.FullName != null) { string FullName4121 = (string)CreditCardChargeRet.AccountRef.FullName.GetValue(); } if (CreditCardChargeRet.PayeeEntityRef != null) { //Get value of ListID if (CreditCardChargeRet.PayeeEntityRef.ListID != null) { string ListID4122 = (string)CreditCardChargeRet.PayeeEntityRef.ListID.GetValue(); } //Get value of FullName if (CreditCardChargeRet.PayeeEntityRef.FullName != null) { string FullName4123 = (string)CreditCardChargeRet.PayeeEntityRef.FullName.GetValue(); } } //Get value of TxnDate DateTime TxnDate4124 = (DateTime)CreditCardChargeRet.TxnDate.GetValue(); //Get value of Amount double Amount4125 = (double)CreditCardChargeRet.Amount.GetValue(); if (CreditCardChargeRet.CurrencyRef != null) { //Get value of ListID if (CreditCardChargeRet.CurrencyRef.ListID != null) { string ListID4126 = (string)CreditCardChargeRet.CurrencyRef.ListID.GetValue(); } //Get value of FullName if (CreditCardChargeRet.CurrencyRef.FullName != null) { string FullName4127 = (string)CreditCardChargeRet.CurrencyRef.FullName.GetValue(); } } //Get value of ExchangeRate if (CreditCardChargeRet.ExchangeRate != null) { IQBFloatType ExchangeRate4128 = (IQBFloatType)CreditCardChargeRet.ExchangeRate.GetValue(); } //Get value of AmountInHomeCurrency if (CreditCardChargeRet.AmountInHomeCurrency != null) { double AmountInHomeCurrency4129 = (double)CreditCardChargeRet.AmountInHomeCurrency.GetValue(); } //Get value of RefNumber if (CreditCardChargeRet.RefNumber != null) { string RefNumber4130 = (string)CreditCardChargeRet.RefNumber.GetValue(); } //Get value of Memo if (CreditCardChargeRet.Memo != null) { string Memo4131 = (string)CreditCardChargeRet.Memo.GetValue(); } //Get value of IsTaxIncluded if (CreditCardChargeRet.IsTaxIncluded != null) { bool IsTaxIncluded4132 = (bool)CreditCardChargeRet.IsTaxIncluded.GetValue(); } if (CreditCardChargeRet.SalesTaxCodeRef != null) { //Get value of ListID if (CreditCardChargeRet.SalesTaxCodeRef.ListID != null) { string ListID4133 = (string)CreditCardChargeRet.SalesTaxCodeRef.ListID.GetValue(); } //Get value of FullName if (CreditCardChargeRet.SalesTaxCodeRef.FullName != null) { string FullName4134 = (string)CreditCardChargeRet.SalesTaxCodeRef.FullName.GetValue(); } } //Get value of ExternalGUID if (CreditCardChargeRet.ExternalGUID != null) { string ExternalGUID4135 = (string)CreditCardChargeRet.ExternalGUID.GetValue(); } if (CreditCardChargeRet.ExpenseLineRetList != null) { for (int i4136 = 0; i4136 < CreditCardChargeRet.ExpenseLineRetList.Count; i4136++) { IExpenseLineRet ExpenseLineRet = CreditCardChargeRet.ExpenseLineRetList.GetAt(i4136); //Get value of TxnLineID string TxnLineID4137 = (string)ExpenseLineRet.TxnLineID.GetValue(); if (ExpenseLineRet.AccountRef != null) { //Get value of ListID if (ExpenseLineRet.AccountRef.ListID != null) { string ListID4138 = (string)ExpenseLineRet.AccountRef.ListID.GetValue(); } //Get value of FullName if (ExpenseLineRet.AccountRef.FullName != null) { string FullName4139 = (string)ExpenseLineRet.AccountRef.FullName.GetValue(); } } //Get value of Amount if (ExpenseLineRet.Amount != null) { double Amount4140 = (double)ExpenseLineRet.Amount.GetValue(); } //Get value of Memo if (ExpenseLineRet.Memo != null) { string Memo4141 = (string)ExpenseLineRet.Memo.GetValue(); } if (ExpenseLineRet.CustomerRef != null) { //Get value of ListID if (ExpenseLineRet.CustomerRef.ListID != null) { string ListID4142 = (string)ExpenseLineRet.CustomerRef.ListID.GetValue(); } //Get value of FullName if (ExpenseLineRet.CustomerRef.FullName != null) { string FullName4143 = (string)ExpenseLineRet.CustomerRef.FullName.GetValue(); } } if (ExpenseLineRet.ClassRef != null) { //Get value of ListID if (ExpenseLineRet.ClassRef.ListID != null) { string ListID4144 = (string)ExpenseLineRet.ClassRef.ListID.GetValue(); } //Get value of FullName if (ExpenseLineRet.ClassRef.FullName != null) { string FullName4145 = (string)ExpenseLineRet.ClassRef.FullName.GetValue(); } } if (ExpenseLineRet.SalesTaxCodeRef != null) { //Get value of ListID if (ExpenseLineRet.SalesTaxCodeRef.ListID != null) { string ListID4146 = (string)ExpenseLineRet.SalesTaxCodeRef.ListID.GetValue(); } //Get value of FullName if (ExpenseLineRet.SalesTaxCodeRef.FullName != null) { string FullName4147 = (string)ExpenseLineRet.SalesTaxCodeRef.FullName.GetValue(); } } //Get value of BillableStatus if (ExpenseLineRet.BillableStatus != null) { ENBillableStatus BillableStatus4148 = (ENBillableStatus)ExpenseLineRet.BillableStatus.GetValue(); } if (ExpenseLineRet.SalesRepRef != null) { //Get value of ListID if (ExpenseLineRet.SalesRepRef.ListID != null) { string ListID4149 = (string)ExpenseLineRet.SalesRepRef.ListID.GetValue(); } //Get value of FullName if (ExpenseLineRet.SalesRepRef.FullName != null) { string FullName4150 = (string)ExpenseLineRet.SalesRepRef.FullName.GetValue(); } } if (ExpenseLineRet.DataExtRetList != null) { for (int i4151 = 0; i4151 < ExpenseLineRet.DataExtRetList.Count; i4151++) { IDataExtRet DataExtRet = ExpenseLineRet.DataExtRetList.GetAt(i4151); //Get value of OwnerID if (DataExtRet.OwnerID != null) { string OwnerID4152 = (string)DataExtRet.OwnerID.GetValue(); } //Get value of DataExtName string DataExtName4153 = (string)DataExtRet.DataExtName.GetValue(); //Get value of DataExtType ENDataExtType DataExtType4154 = (ENDataExtType)DataExtRet.DataExtType.GetValue(); //Get value of DataExtValue string DataExtValue4155 = (string)DataExtRet.DataExtValue.GetValue(); } } } } if (CreditCardChargeRet.ORItemLineRetList != null) { for (int i4156 = 0; i4156 < CreditCardChargeRet.ORItemLineRetList.Count; i4156++) { IORItemLineRet ORItemLineRet4157 = CreditCardChargeRet.ORItemLineRetList.GetAt(i4156); if (ORItemLineRet4157.ItemLineRet != null) { if (ORItemLineRet4157.ItemLineRet != null) { //Get value of TxnLineID string TxnLineID4158 = (string)ORItemLineRet4157.ItemLineRet.TxnLineID.GetValue(); if (ORItemLineRet4157.ItemLineRet.ItemRef != null) { //Get value of ListID if (ORItemLineRet4157.ItemLineRet.ItemRef.ListID != null) { string ListID4159 = (string)ORItemLineRet4157.ItemLineRet.ItemRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet4157.ItemLineRet.ItemRef.FullName != null) { string FullName4160 = (string)ORItemLineRet4157.ItemLineRet.ItemRef.FullName.GetValue(); } } if (ORItemLineRet4157.ItemLineRet.InventorySiteRef != null) { //Get value of ListID if (ORItemLineRet4157.ItemLineRet.InventorySiteRef.ListID != null) { string ListID4161 = (string)ORItemLineRet4157.ItemLineRet.InventorySiteRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet4157.ItemLineRet.InventorySiteRef.FullName != null) { string FullName4162 = (string)ORItemLineRet4157.ItemLineRet.InventorySiteRef.FullName.GetValue(); } } if (ORItemLineRet4157.ItemLineRet.InventorySiteLocationRef != null) { //Get value of ListID if (ORItemLineRet4157.ItemLineRet.InventorySiteLocationRef.ListID != null) { string ListID4163 = (string)ORItemLineRet4157.ItemLineRet.InventorySiteLocationRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet4157.ItemLineRet.InventorySiteLocationRef.FullName != null) { string FullName4164 = (string)ORItemLineRet4157.ItemLineRet.InventorySiteLocationRef.FullName.GetValue(); } } if (ORItemLineRet4157.ItemLineRet.ORSerialLotNumber != null) { if (ORItemLineRet4157.ItemLineRet.ORSerialLotNumber.SerialNumber != null) { //Get value of SerialNumber if (ORItemLineRet4157.ItemLineRet.ORSerialLotNumber.SerialNumber != null) { string SerialNumber4166 = (string)ORItemLineRet4157.ItemLineRet.ORSerialLotNumber.SerialNumber.GetValue(); } } if (ORItemLineRet4157.ItemLineRet.ORSerialLotNumber.LotNumber != null) { //Get value of LotNumber if (ORItemLineRet4157.ItemLineRet.ORSerialLotNumber.LotNumber != null) { string LotNumber4167 = (string)ORItemLineRet4157.ItemLineRet.ORSerialLotNumber.LotNumber.GetValue(); } } } //Get value of ExpirationDateForSerialLotNumber if (ORItemLineRet4157.ItemLineRet.ExpirationDateForSerialLotNumber != null) { string ExpDate = (string)ORItemLineRet4157.ItemLineRet.ExpirationDateForSerialLotNumber.GetValue(); } //Get value of Desc if (ORItemLineRet4157.ItemLineRet.Desc != null) { string Desc4168 = (string)ORItemLineRet4157.ItemLineRet.Desc.GetValue(); } //Get value of Quantity if (ORItemLineRet4157.ItemLineRet.Quantity != null) { int Quantity4169 = (int)ORItemLineRet4157.ItemLineRet.Quantity.GetValue(); } //Get value of UnitOfMeasure if (ORItemLineRet4157.ItemLineRet.UnitOfMeasure != null) { string UnitOfMeasure4170 = (string)ORItemLineRet4157.ItemLineRet.UnitOfMeasure.GetValue(); } if (ORItemLineRet4157.ItemLineRet.OverrideUOMSetRef != null) { //Get value of ListID if (ORItemLineRet4157.ItemLineRet.OverrideUOMSetRef.ListID != null) { string ListID4171 = (string)ORItemLineRet4157.ItemLineRet.OverrideUOMSetRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet4157.ItemLineRet.OverrideUOMSetRef.FullName != null) { string FullName4172 = (string)ORItemLineRet4157.ItemLineRet.OverrideUOMSetRef.FullName.GetValue(); } } //Get value of Cost if (ORItemLineRet4157.ItemLineRet.Cost != null) { double Cost4173 = (double)ORItemLineRet4157.ItemLineRet.Cost.GetValue(); } //Get value of Amount if (ORItemLineRet4157.ItemLineRet.Amount != null) { double Amount4174 = (double)ORItemLineRet4157.ItemLineRet.Amount.GetValue(); } if (ORItemLineRet4157.ItemLineRet.CustomerRef != null) { //Get value of ListID if (ORItemLineRet4157.ItemLineRet.CustomerRef.ListID != null) { string ListID4175 = (string)ORItemLineRet4157.ItemLineRet.CustomerRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet4157.ItemLineRet.CustomerRef.FullName != null) { string FullName4176 = (string)ORItemLineRet4157.ItemLineRet.CustomerRef.FullName.GetValue(); } } if (ORItemLineRet4157.ItemLineRet.ClassRef != null) { //Get value of ListID if (ORItemLineRet4157.ItemLineRet.ClassRef.ListID != null) { string ListID4177 = (string)ORItemLineRet4157.ItemLineRet.ClassRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet4157.ItemLineRet.ClassRef.FullName != null) { string FullName4178 = (string)ORItemLineRet4157.ItemLineRet.ClassRef.FullName.GetValue(); } } if (ORItemLineRet4157.ItemLineRet.SalesTaxCodeRef != null) { //Get value of ListID if (ORItemLineRet4157.ItemLineRet.SalesTaxCodeRef.ListID != null) { string ListID4179 = (string)ORItemLineRet4157.ItemLineRet.SalesTaxCodeRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet4157.ItemLineRet.SalesTaxCodeRef.FullName != null) { string FullName4180 = (string)ORItemLineRet4157.ItemLineRet.SalesTaxCodeRef.FullName.GetValue(); } } //Get value of BillableStatus if (ORItemLineRet4157.ItemLineRet.BillableStatus != null) { ENBillableStatus BillableStatus4181 = (ENBillableStatus)ORItemLineRet4157.ItemLineRet.BillableStatus.GetValue(); } if (ORItemLineRet4157.ItemLineRet.SalesRepRef != null) { //Get value of ListID if (ORItemLineRet4157.ItemLineRet.SalesRepRef.ListID != null) { string ListID4182 = (string)ORItemLineRet4157.ItemLineRet.SalesRepRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet4157.ItemLineRet.SalesRepRef.FullName != null) { string FullName4183 = (string)ORItemLineRet4157.ItemLineRet.SalesRepRef.FullName.GetValue(); } } if (ORItemLineRet4157.ItemLineRet.DataExtRetList != null) { for (int i4184 = 0; i4184 < ORItemLineRet4157.ItemLineRet.DataExtRetList.Count; i4184++) { IDataExtRet DataExtRet = ORItemLineRet4157.ItemLineRet.DataExtRetList.GetAt(i4184); //Get value of OwnerID if (DataExtRet.OwnerID != null) { string OwnerID4185 = (string)DataExtRet.OwnerID.GetValue(); } //Get value of DataExtName string DataExtName4186 = (string)DataExtRet.DataExtName.GetValue(); //Get value of DataExtType ENDataExtType DataExtType4187 = (ENDataExtType)DataExtRet.DataExtType.GetValue(); //Get value of DataExtValue string DataExtValue4188 = (string)DataExtRet.DataExtValue.GetValue(); } } } } if (ORItemLineRet4157.ItemGroupLineRet != null) { if (ORItemLineRet4157.ItemGroupLineRet != null) { //Get value of TxnLineID string TxnLineID4189 = (string)ORItemLineRet4157.ItemGroupLineRet.TxnLineID.GetValue(); //Get value of ListID if (ORItemLineRet4157.ItemGroupLineRet.ItemGroupRef.ListID != null) { string ListID4190 = (string)ORItemLineRet4157.ItemGroupLineRet.ItemGroupRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet4157.ItemGroupLineRet.ItemGroupRef.FullName != null) { string FullName4191 = (string)ORItemLineRet4157.ItemGroupLineRet.ItemGroupRef.FullName.GetValue(); } //Get value of Desc if (ORItemLineRet4157.ItemGroupLineRet.Desc != null) { string Desc4192 = (string)ORItemLineRet4157.ItemGroupLineRet.Desc.GetValue(); } //Get value of Quantity if (ORItemLineRet4157.ItemGroupLineRet.Quantity != null) { int Quantity4193 = (int)ORItemLineRet4157.ItemGroupLineRet.Quantity.GetValue(); } //Get value of UnitOfMeasure if (ORItemLineRet4157.ItemGroupLineRet.UnitOfMeasure != null) { string UnitOfMeasure4194 = (string)ORItemLineRet4157.ItemGroupLineRet.UnitOfMeasure.GetValue(); } if (ORItemLineRet4157.ItemGroupLineRet.OverrideUOMSetRef != null) { //Get value of ListID if (ORItemLineRet4157.ItemGroupLineRet.OverrideUOMSetRef.ListID != null) { string ListID4195 = (string)ORItemLineRet4157.ItemGroupLineRet.OverrideUOMSetRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet4157.ItemGroupLineRet.OverrideUOMSetRef.FullName != null) { string FullName4196 = (string)ORItemLineRet4157.ItemGroupLineRet.OverrideUOMSetRef.FullName.GetValue(); } } //Get value of TotalAmount double TotalAmount4197 = (double)ORItemLineRet4157.ItemGroupLineRet.TotalAmount.GetValue(); if (ORItemLineRet4157.ItemGroupLineRet.ItemLineRetList != null) { for (int i4198 = 0; i4198 < ORItemLineRet4157.ItemGroupLineRet.ItemLineRetList.Count; i4198++) { IItemLineRet ItemLineRet = ORItemLineRet4157.ItemGroupLineRet.ItemLineRetList.GetAt(i4198); //Get value of TxnLineID string TxnLineID4199 = (string)ItemLineRet.TxnLineID.GetValue(); if (ItemLineRet.ItemRef != null) { //Get value of ListID if (ItemLineRet.ItemRef.ListID != null) { string ListID4200 = (string)ItemLineRet.ItemRef.ListID.GetValue(); } //Get value of FullName if (ItemLineRet.ItemRef.FullName != null) { string FullName4201 = (string)ItemLineRet.ItemRef.FullName.GetValue(); } } if (ItemLineRet.InventorySiteRef != null) { //Get value of ListID if (ItemLineRet.InventorySiteRef.ListID != null) { string ListID4202 = (string)ItemLineRet.InventorySiteRef.ListID.GetValue(); } //Get value of FullName if (ItemLineRet.InventorySiteRef.FullName != null) { string FullName4203 = (string)ItemLineRet.InventorySiteRef.FullName.GetValue(); } } if (ItemLineRet.InventorySiteLocationRef != null) { //Get value of ListID if (ItemLineRet.InventorySiteLocationRef.ListID != null) { string ListID4204 = (string)ItemLineRet.InventorySiteLocationRef.ListID.GetValue(); } //Get value of FullName if (ItemLineRet.InventorySiteLocationRef.FullName != null) { string FullName4205 = (string)ItemLineRet.InventorySiteLocationRef.FullName.GetValue(); } } if (ItemLineRet.ORSerialLotNumber != null) { if (ItemLineRet.ORSerialLotNumber.SerialNumber != null) { //Get value of SerialNumber if (ItemLineRet.ORSerialLotNumber.SerialNumber != null) { string SerialNumber4207 = (string)ItemLineRet.ORSerialLotNumber.SerialNumber.GetValue(); } } if (ItemLineRet.ORSerialLotNumber.LotNumber != null) { //Get value of LotNumber if (ItemLineRet.ORSerialLotNumber.LotNumber != null) { string LotNumber4208 = (string)ItemLineRet.ORSerialLotNumber.LotNumber.GetValue(); } } } //Get value of ExpirationDateForSerialLotNumber if (ItemLineRet.ExpirationDateForSerialLotNumber != null) { string ExpDate = (string)ItemLineRet.ExpirationDateForSerialLotNumber.GetValue(); } //Get value of Desc if (ItemLineRet.Desc != null) { string Desc4209 = (string)ItemLineRet.Desc.GetValue(); } //Get value of Quantity if (ItemLineRet.Quantity != null) { int Quantity4210 = (int)ItemLineRet.Quantity.GetValue(); } //Get value of UnitOfMeasure if (ItemLineRet.UnitOfMeasure != null) { string UnitOfMeasure4211 = (string)ItemLineRet.UnitOfMeasure.GetValue(); } if (ItemLineRet.OverrideUOMSetRef != null) { //Get value of ListID if (ItemLineRet.OverrideUOMSetRef.ListID != null) { string ListID4212 = (string)ItemLineRet.OverrideUOMSetRef.ListID.GetValue(); } //Get value of FullName if (ItemLineRet.OverrideUOMSetRef.FullName != null) { string FullName4213 = (string)ItemLineRet.OverrideUOMSetRef.FullName.GetValue(); } } //Get value of Cost if (ItemLineRet.Cost != null) { double Cost4214 = (double)ItemLineRet.Cost.GetValue(); } //Get value of Amount if (ItemLineRet.Amount != null) { double Amount4215 = (double)ItemLineRet.Amount.GetValue(); } if (ItemLineRet.CustomerRef != null) { //Get value of ListID if (ItemLineRet.CustomerRef.ListID != null) { string ListID4216 = (string)ItemLineRet.CustomerRef.ListID.GetValue(); } //Get value of FullName if (ItemLineRet.CustomerRef.FullName != null) { string FullName4217 = (string)ItemLineRet.CustomerRef.FullName.GetValue(); } } if (ItemLineRet.ClassRef != null) { //Get value of ListID if (ItemLineRet.ClassRef.ListID != null) { string ListID4218 = (string)ItemLineRet.ClassRef.ListID.GetValue(); } //Get value of FullName if (ItemLineRet.ClassRef.FullName != null) { string FullName4219 = (string)ItemLineRet.ClassRef.FullName.GetValue(); } } if (ItemLineRet.SalesTaxCodeRef != null) { //Get value of ListID if (ItemLineRet.SalesTaxCodeRef.ListID != null) { string ListID4220 = (string)ItemLineRet.SalesTaxCodeRef.ListID.GetValue(); } //Get value of FullName if (ItemLineRet.SalesTaxCodeRef.FullName != null) { string FullName4221 = (string)ItemLineRet.SalesTaxCodeRef.FullName.GetValue(); } } //Get value of BillableStatus if (ItemLineRet.BillableStatus != null) { ENBillableStatus BillableStatus4222 = (ENBillableStatus)ItemLineRet.BillableStatus.GetValue(); } if (ItemLineRet.SalesRepRef != null) { //Get value of ListID if (ItemLineRet.SalesRepRef.ListID != null) { string ListID4223 = (string)ItemLineRet.SalesRepRef.ListID.GetValue(); } //Get value of FullName if (ItemLineRet.SalesRepRef.FullName != null) { string FullName4224 = (string)ItemLineRet.SalesRepRef.FullName.GetValue(); } } if (ItemLineRet.DataExtRetList != null) { for (int i4225 = 0; i4225 < ItemLineRet.DataExtRetList.Count; i4225++) { IDataExtRet DataExtRet = ItemLineRet.DataExtRetList.GetAt(i4225); //Get value of OwnerID if (DataExtRet.OwnerID != null) { string OwnerID4226 = (string)DataExtRet.OwnerID.GetValue(); } //Get value of DataExtName string DataExtName4227 = (string)DataExtRet.DataExtName.GetValue(); //Get value of DataExtType ENDataExtType DataExtType4228 = (ENDataExtType)DataExtRet.DataExtType.GetValue(); //Get value of DataExtValue string DataExtValue4229 = (string)DataExtRet.DataExtValue.GetValue(); } } } } if (ORItemLineRet4157.ItemGroupLineRet.DataExtList != null) { for (int i4230 = 0; i4230 < ORItemLineRet4157.ItemGroupLineRet.DataExtList.Count; i4230++) { IDataExt DataExt = ORItemLineRet4157.ItemGroupLineRet.DataExtList.GetAt(i4230); //Get value of OwnerID string OwnerID4231 = (string)DataExt.OwnerID.GetValue(); //Get value of DataExtName string DataExtName4232 = (string)DataExt.DataExtName.GetValue(); //Get value of DataExtValue string DataExtValue4233 = (string)DataExt.DataExtValue.GetValue(); } } } } } } if (CreditCardChargeRet.DataExtRetList != null) { for (int i4234 = 0; i4234 < CreditCardChargeRet.DataExtRetList.Count; i4234++) { IDataExtRet DataExtRet = CreditCardChargeRet.DataExtRetList.GetAt(i4234); //Get value of OwnerID if (DataExtRet.OwnerID != null) { string OwnerID4235 = (string)DataExtRet.OwnerID.GetValue(); } //Get value of DataExtName string DataExtName4236 = (string)DataExtRet.DataExtName.GetValue(); //Get value of DataExtType ENDataExtType DataExtType4237 = (ENDataExtType)DataExtRet.DataExtType.GetValue(); //Get value of DataExtValue string DataExtValue4238 = (string)DataExtRet.DataExtValue.GetValue(); } } } } } |