Adds a vendor credit. A vendor credit is also known as a “bill credit”. That is, it is a credit that a vendor owes you because you overpaid your bill, returned merchandise, or for some other reason. The VendorCredit is referenced in a BilPayment transaction, inside the SetCredit aggregate. A VendorCredit should not be confused with a Credit Memo, which is something you owe your customer and which is referenced in a ReceivePayment 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 | <?xml version="1.0" encoding="utf-8"?> <?qbxml version="17.0"?> <QBXML> <QBXMLMsgsRq onError="stopOnError"> <VendorCreditAddRq> <VendorCreditAdd defMacro="MACROTYPE"> <!-- required --> <VendorRef> <!-- required --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </VendorRef> <APAccountRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </APAccountRef> <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 --> <ExternalGUID >GUIDTYPE</ExternalGUID> <!-- optional --> <ExpenseLineAdd defMacro="MACROTYPE"> <!-- optional, may repeat --> <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> <DataExt> <!-- optional, may repeat --> <OwnerID >GUIDTYPE</OwnerID> <!-- required --> <DataExtName >STRTYPE</DataExtName> <!-- required --> <DataExtValue >STRTYPE</DataExtValue> <!-- required --> </DataExt> </ExpenseLineAdd> <!-- BEGIN OR --> <ItemLineAdd> <!-- optional --> <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 --> <Desc >STRTYPE</Desc> <!-- optional --> <Quantity >QUANTYPE</Quantity> <!-- optional --> <UnitOfMeasure >STRTYPE</UnitOfMeasure> <!-- optional --> <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> <DataExt> <!-- optional, may repeat --> <OwnerID >GUIDTYPE</OwnerID> <!-- required --> <DataExtName >STRTYPE</DataExtName> <!-- required --> <DataExtValue >STRTYPE</DataExtValue> <!-- required --> </DataExt> </ItemLineAdd> <!-- OR --> <ItemGroupLineAdd> <!-- optional --> <ItemGroupRef> <!-- required --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ItemGroupRef> <Quantity >QUANTYPE</Quantity> <!-- optional --> <UnitOfMeasure >STRTYPE</UnitOfMeasure> <!-- optional --> <InventorySiteRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </InventorySiteRef> <InventorySiteLocationRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </InventorySiteLocationRef> <DataExt> <!-- optional, may repeat --> <OwnerID >GUIDTYPE</OwnerID> <!-- required --> <DataExtName >STRTYPE</DataExtName> <!-- required --> <DataExtValue >STRTYPE</DataExtValue> <!-- required --> </DataExt> </ItemGroupLineAdd> <!-- END OR --> </VendorCreditAdd> <IncludeRetElement >STRTYPE</IncludeRetElement> <!-- optional, may repeat --> </VendorCreditAddRq> <VendorCreditAddRs statusCode="INTTYPE" statusSeverity="STRTYPE" statusMessage="STRTYPE"> <VendorCreditRet> <!-- optional --> <TxnID >IDTYPE</TxnID> <!-- required --> <TimeCreated >DATETIMETYPE</TimeCreated> <!-- required --> <TimeModified >DATETIMETYPE</TimeModified> <!-- required --> <EditSequence >STRTYPE</EditSequence> <!-- required --> <TxnNumber >INTTYPE</TxnNumber> <!-- optional --> <VendorRef> <!-- required --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </VendorRef> <APAccountRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </APAccountRef> <TxnDate >DATETYPE</TxnDate> <!-- required --> <CreditAmount >AMTTYPE</CreditAmount> <!-- required --> <CurrencyRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </CurrencyRef> <ExchangeRate >FLOATTYPE</ExchangeRate> <!-- optional --> <CreditAmountInHomeCurrency >AMTTYPE</CreditAmountInHomeCurrency> <!-- 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 --> <LinkedTxn> <!-- optional, may repeat --> <TxnID >IDTYPE</TxnID> <!-- required --> <!-- TxnType may have one of the following values: ARRefundCreditCard, Bill, BillPaymentCheck, BillPaymentCreditCard, BuildAssembly, Charge, Check, CreditCardCharge, CreditCardCredit, CreditMemo, Deposit, Estimate, InventoryAdjustment, Invoice, ItemReceipt, JournalEntry, LiabilityAdjustment, Paycheck, PayrollLiabilityCheck, PurchaseOrder, ReceivePayment, SalesOrder, SalesReceipt, SalesTaxPaymentCheck, Transfer, VendorCredit, YTDAdjustment --> <TxnType >ENUMTYPE</TxnType> <!-- required --> <TxnDate >DATETYPE</TxnDate> <!-- required --> <RefNumber >STRTYPE</RefNumber> <!-- optional --> <!-- LinkType may have one of the following values: AMTTYPE, QUANTYPE --> <LinkType >ENUMTYPE</LinkType> <!-- optional --> <Amount >AMTTYPE</Amount> <!-- required --> </LinkedTxn> <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> <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> <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 --> <OpenAmount >AMTTYPE</OpenAmount> <!-- optional --> <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> </VendorCreditRet> <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> </VendorCreditAddRs> </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 | '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 DoVendorCreditAdd()
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
BuildVendorCreditAddRq(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
WalkVendorCreditAddRs(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 BuildVendorCreditAddRq(requestMsgSet as IMsgSetRequest)
Dim VendorCreditAddRq as IVendorCreditAdd
VendorCreditAddRq= requestMsgSet.AppendVendorCreditAddRq()
'Set field value for ListID
VendorCreditAddRq.VendorRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
VendorCreditAddRq.VendorRef.FullName.SetValue("ab")
'Set field value for ListID
VendorCreditAddRq.APAccountRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
VendorCreditAddRq.APAccountRef.FullName.SetValue("ab")
'Set field value for TxnDate
VendorCreditAddRq.TxnDate.SetValue(DateTime.Parse("12/15/2007"))
'Set field value for RefNumber
VendorCreditAddRq.RefNumber.SetValue("ab")
'Set field value for Memo
VendorCreditAddRq.Memo.SetValue("ab")
'Set field value for IsTaxIncluded
VendorCreditAddRq.IsTaxIncluded.SetValue(True)
'Set field value for ListID
VendorCreditAddRq.SalesTaxCodeRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
VendorCreditAddRq.SalesTaxCodeRef.FullName.SetValue("ab")
'Set field value for ExchangeRate
VendorCreditAddRq.ExchangeRate.SetValue("IQBFloatType")
'Set field value for ExternalGUID
VendorCreditAddRq.ExternalGUID.SetValue(System.Guid.NewGuid().ToString())
Dim ExpenseLineAdd23470 as IExpenseLineAdd
ExpenseLineAdd23470=VendorCreditAddRq.ExpenseLineAddList.Append()
'Set field value for ListID
ExpenseLineAdd23470.AccountRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ExpenseLineAdd23470.AccountRef.FullName.SetValue("ab")
'Set field value for Amount
ExpenseLineAdd23470.Amount.SetValue(10.01)
'Set field value for Memo
ExpenseLineAdd23470.Memo.SetValue("ab")
'Set field value for ListID
ExpenseLineAdd23470.CustomerRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ExpenseLineAdd23470.CustomerRef.FullName.SetValue("ab")
'Set field value for ListID
ExpenseLineAdd23470.ClassRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ExpenseLineAdd23470.ClassRef.FullName.SetValue("ab")
'Set field value for ListID
ExpenseLineAdd23470.SalesTaxCodeRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ExpenseLineAdd23470.SalesTaxCodeRef.FullName.SetValue("ab")
'Set field value for BillableStatus
ExpenseLineAdd23470.BillableStatus.SetValue(ENBillableStatus.bsBillable)
'Set field value for ListID
ExpenseLineAdd23470.SalesRepRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ExpenseLineAdd23470.SalesRepRef.FullName.SetValue("ab")
Dim DataExt23471 as IDataExt
DataExt23471=ExpenseLineAdd23470.DataExtList.Append()
'Set field value for OwnerID
DataExt23471.OwnerID.SetValue(System.Guid.NewGuid().ToString())
'Set field value for DataExtName
DataExt23471.DataExtName.SetValue("ab")
'Set field value for DataExtValue
DataExt23471.DataExtValue.SetValue("ab")
Dim ORItemLineAddListElement23472 as IORItemLineAdd
ORItemLineAddListElement23472 =VendorCreditAddRq.ORItemLineAddList.Append()
Dim ORItemLineAddListElementType23473 as String
ORItemLineAddListElementType23473 = "ItemLineAdd"
if (ORItemLineAddListElementType23473 == "ItemLineAdd") then
'Set field value for ListID
ORItemLineAddListElement23472.ItemLineAdd.ItemRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineAddListElement23472.ItemLineAdd.ItemRef.FullName.SetValue("ab")
'Set field value for ListID
ORItemLineAddListElement23472.ItemLineAdd.InventorySiteRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineAddListElement23472.ItemLineAdd.InventorySiteRef.FullName.SetValue("ab")
'Set field value for ListID
ORItemLineAddListElement23472.ItemLineAdd.InventorySiteLocationRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineAddListElement23472.ItemLineAdd.InventorySiteLocationRef.FullName.SetValue("ab")
Dim ORSerialLotNumberElementType23474 as String
ORSerialLotNumberElementType23474 = "SerialNumber"
if (ORSerialLotNumberElementType23474 == "SerialNumber") then
'Set field value for SerialNumber
ORItemLineAddListElement23472.ItemLineAdd.ORSerialLotNumber.SerialNumber.SetValue("ab")
End If
if (ORSerialLotNumberElementType23474 == "LotNumber") then
'Set field value for LotNumber
ORItemLineAddListElement23472.ItemLineAdd.ORSerialLotNumber.LotNumber.SetValue("ab")
End If
'Set field value for Desc
ORItemLineAddListElement23472.ItemLineAdd.Desc.SetValue("ab")
'Set field value for Quantity
ORItemLineAddListElement23472.ItemLineAdd.Quantity.SetValue(2)
'Set field value for UnitOfMeasure
ORItemLineAddListElement23472.ItemLineAdd.UnitOfMeasure.SetValue("ab")
'Set field value for Cost
ORItemLineAddListElement23472.ItemLineAdd.Cost.SetValue(15.65)
'Set field value for Amount
ORItemLineAddListElement23472.ItemLineAdd.Amount.SetValue(10.01)
'Set field value for ListID
ORItemLineAddListElement23472.ItemLineAdd.CustomerRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineAddListElement23472.ItemLineAdd.CustomerRef.FullName.SetValue("ab")
'Set field value for ListID
ORItemLineAddListElement23472.ItemLineAdd.ClassRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineAddListElement23472.ItemLineAdd.ClassRef.FullName.SetValue("ab")
'Set field value for ListID
ORItemLineAddListElement23472.ItemLineAdd.SalesTaxCodeRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineAddListElement23472.ItemLineAdd.SalesTaxCodeRef.FullName.SetValue("ab")
'Set field value for BillableStatus
ORItemLineAddListElement23472.ItemLineAdd.BillableStatus.SetValue(ENBillableStatus.bsBillable)
'Set field value for ListID
ORItemLineAddListElement23472.ItemLineAdd.OverrideItemAccountRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineAddListElement23472.ItemLineAdd.OverrideItemAccountRef.FullName.SetValue("ab")
'Set field value for ListID
ORItemLineAddListElement23472.ItemLineAdd.SalesRepRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineAddListElement23472.ItemLineAdd.SalesRepRef.FullName.SetValue("ab")
Dim DataExt23475 as IDataExt
DataExt23475=ORItemLineAddListElement23472.ItemLineAdd.DataExtList.Append()
'Set field value for OwnerID
DataExt23475.OwnerID.SetValue(System.Guid.NewGuid().ToString())
'Set field value for DataExtName
DataExt23475.DataExtName.SetValue("ab")
'Set field value for DataExtValue
DataExt23475.DataExtValue.SetValue("ab")
End If
if (ORItemLineAddListElementType23473 == "ItemGroupLineAdd") then
'Set field value for ListID
ORItemLineAddListElement23472.ItemGroupLineAdd.ItemGroupRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineAddListElement23472.ItemGroupLineAdd.ItemGroupRef.FullName.SetValue("ab")
'Set field value for Quantity
ORItemLineAddListElement23472.ItemGroupLineAdd.Quantity.SetValue(2)
'Set field value for UnitOfMeasure
ORItemLineAddListElement23472.ItemGroupLineAdd.UnitOfMeasure.SetValue("ab")
'Set field value for ListID
ORItemLineAddListElement23472.ItemGroupLineAdd.InventorySiteRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineAddListElement23472.ItemGroupLineAdd.InventorySiteRef.FullName.SetValue("ab")
'Set field value for ListID
ORItemLineAddListElement23472.ItemGroupLineAdd.InventorySiteLocationRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
ORItemLineAddListElement23472.ItemGroupLineAdd.InventorySiteLocationRef.FullName.SetValue("ab")
Dim DataExt23476 as IDataExt
DataExt23476=ORItemLineAddListElement23472.ItemGroupLineAdd.DataExtList.Append()
'Set field value for OwnerID
DataExt23476.OwnerID.SetValue(System.Guid.NewGuid().ToString())
'Set field value for DataExtName
DataExt23476.DataExtName.SetValue("ab")
'Set field value for DataExtValue
DataExt23476.DataExtValue.SetValue("ab")
End If
'Set field value for IncludeRetElementList
'May create more than one of these if needed
VendorCreditAddRq.IncludeRetElementList.Add("ab")
End Sub
Public Sub WalkVendorCreditAddRs( 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.rtVendorCreditAddRs) then
'upcast to more specific type here, this is safe because we checked with response.Type check above
Dim VendorCreditRet as IVendorCreditRet
VendorCreditRet = CType(response.Detail,IVendorCreditRet)
WalkVendorCreditRet(VendorCreditRet)
End If
End If
End If
Next j
End Sub
Public Sub WalkVendorCreditRet(VendorCreditRet as IVendorCreditRet)
if (VendorCreditRet is nothing) then
Exit Sub
End If
'Go through all the elements of IVendorCreditRet
'Get value of TxnID
Dim TxnID23477 as String
TxnID23477 = VendorCreditRet.TxnID.GetValue()
'Get value of TimeCreated
Dim TimeCreated23478 as DateTime
TimeCreated23478 = VendorCreditRet.TimeCreated.GetValue()
'Get value of TimeModified
Dim TimeModified23479 as DateTime
TimeModified23479 = VendorCreditRet.TimeModified.GetValue()
'Get value of EditSequence
Dim EditSequence23480 as String
EditSequence23480 = VendorCreditRet.EditSequence.GetValue()
'Get value of TxnNumber
if ( not VendorCreditRet.TxnNumber is nothing) then
Dim TxnNumber23481 as Integer
TxnNumber23481 = VendorCreditRet.TxnNumber.GetValue()
End If
'Get value of ListID
if ( not VendorCreditRet.VendorRef.ListID is nothing) then
Dim ListID23482 as String
ListID23482 = VendorCreditRet.VendorRef.ListID.GetValue()
End If
'Get value of FullName
if ( not VendorCreditRet.VendorRef.FullName is nothing) then
Dim FullName23483 as String
FullName23483 = VendorCreditRet.VendorRef.FullName.GetValue()
End If
if (not VendorCreditRet.APAccountRef. is nothing) then
'Get value of ListID
if ( not VendorCreditRet.APAccountRef.ListID is nothing) then
Dim ListID23484 as String
ListID23484 = VendorCreditRet.APAccountRef.ListID.GetValue()
End If
'Get value of FullName
if ( not VendorCreditRet.APAccountRef.FullName is nothing) then
Dim FullName23485 as String
FullName23485 = VendorCreditRet.APAccountRef.FullName.GetValue()
End If
End If
'Get value of TxnDate
Dim TxnDate23486 as DateTime
TxnDate23486 = VendorCreditRet.TxnDate.GetValue()
'Get value of CreditAmount
Dim CreditAmount23487 as Double
CreditAmount23487 = VendorCreditRet.CreditAmount.GetValue()
if (not VendorCreditRet.CurrencyRef. is nothing) then
'Get value of ListID
if ( not VendorCreditRet.CurrencyRef.ListID is nothing) then
Dim ListID23488 as String
ListID23488 = VendorCreditRet.CurrencyRef.ListID.GetValue()
End If
'Get value of FullName
if ( not VendorCreditRet.CurrencyRef.FullName is nothing) then
Dim FullName23489 as String
FullName23489 = VendorCreditRet.CurrencyRef.FullName.GetValue()
End If
End If
'Get value of ExchangeRate
if ( not VendorCreditRet.ExchangeRate is nothing) then
Dim ExchangeRate23490 as IQBFloatType
ExchangeRate23490 = VendorCreditRet.ExchangeRate.GetValue()
End If
'Get value of CreditAmountInHomeCurrency
if ( not VendorCreditRet.CreditAmountInHomeCurrency is nothing) then
Dim CreditAmountInHomeCurrency23491 as Double
CreditAmountInHomeCurrency23491 = VendorCreditRet.CreditAmountInHomeCurrency.GetValue()
End If
'Get value of RefNumber
if ( not VendorCreditRet.RefNumber is nothing) then
Dim RefNumber23492 as String
RefNumber23492 = VendorCreditRet.RefNumber.GetValue()
End If
'Get value of Memo
if ( not VendorCreditRet.Memo is nothing) then
Dim Memo23493 as String
Memo23493 = VendorCreditRet.Memo.GetValue()
End If
'Get value of IsTaxIncluded
if ( not VendorCreditRet.IsTaxIncluded is nothing) then
Dim IsTaxIncluded23494 as Boolean
IsTaxIncluded23494 = VendorCreditRet.IsTaxIncluded.GetValue()
End If
if (not VendorCreditRet.SalesTaxCodeRef. is nothing) then
'Get value of ListID
if ( not VendorCreditRet.SalesTaxCodeRef.ListID is nothing) then
Dim ListID23495 as String
ListID23495 = VendorCreditRet.SalesTaxCodeRef.ListID.GetValue()
End If
'Get value of FullName
if ( not VendorCreditRet.SalesTaxCodeRef.FullName is nothing) then
Dim FullName23496 as String
FullName23496 = VendorCreditRet.SalesTaxCodeRef.FullName.GetValue()
End If
End If
'Get value of ExternalGUID
if ( not VendorCreditRet.ExternalGUID is nothing) then
Dim ExternalGUID23497 as String
ExternalGUID23497 = VendorCreditRet.ExternalGUID.GetValue()
End If
if (not VendorCreditRet.LinkedTxnList is nothing)
Dim i23498 as Integer
for i23498 = 0 to VendorCreditRet.LinkedTxnList.Count - 1
Dim LinkedTxn as ILinkedTxn
LinkedTxn = VendorCreditRet.LinkedTxnList.GetAt(i23498)
'Get value of TxnID
Dim TxnID23499 as String
TxnID23499 = LinkedTxnTxnID.GetValue()
'Get value of TxnType
Dim TxnType23500 as ENTxnType
TxnType23500 = LinkedTxnTxnType.GetValue()
'Get value of TxnDate
Dim TxnDate23501 as DateTime
TxnDate23501 = LinkedTxnTxnDate.GetValue()
'Get value of RefNumber
if ( not LinkedTxnRefNumber is nothing) then
Dim RefNumber23502 as String
RefNumber23502 = LinkedTxnRefNumber.GetValue()
End If
'Get value of LinkType
if ( not LinkedTxnLinkType is nothing) then
Dim LinkType23503 as ENLinkType
LinkType23503 = LinkedTxnLinkType.GetValue()
End If
'Get value of Amount
Dim Amount23504 as Double
Amount23504 = LinkedTxnAmount.GetValue()
Next i23498
End If
if (not VendorCreditRet.ExpenseLineRetList is nothing)
Dim i23505 as Integer
for i23505 = 0 to VendorCreditRet.ExpenseLineRetList.Count - 1
Dim ExpenseLineRet as IExpenseLineRet
ExpenseLineRet = VendorCreditRet.ExpenseLineRetList.GetAt(i23505)
'Get value of TxnLineID
Dim TxnLineID23506 as String
TxnLineID23506 = ExpenseLineRetTxnLineID.GetValue()
if (not ExpenseLineRetAccountRef. is nothing) then
'Get value of ListID
if ( not ExpenseLineRetAccountRef.ListID is nothing) then
Dim ListID23507 as String
ListID23507 = ExpenseLineRetAccountRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ExpenseLineRetAccountRef.FullName is nothing) then
Dim FullName23508 as String
FullName23508 = ExpenseLineRetAccountRef.FullName.GetValue()
End If
End If
'Get value of Amount
if ( not ExpenseLineRetAmount is nothing) then
Dim Amount23509 as Double
Amount23509 = ExpenseLineRetAmount.GetValue()
End If
'Get value of Memo
if ( not ExpenseLineRetMemo is nothing) then
Dim Memo23510 as String
Memo23510 = ExpenseLineRetMemo.GetValue()
End If
if (not ExpenseLineRetCustomerRef. is nothing) then
'Get value of ListID
if ( not ExpenseLineRetCustomerRef.ListID is nothing) then
Dim ListID23511 as String
ListID23511 = ExpenseLineRetCustomerRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ExpenseLineRetCustomerRef.FullName is nothing) then
Dim FullName23512 as String
FullName23512 = 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 ListID23513 as String
ListID23513 = ExpenseLineRetClassRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ExpenseLineRetClassRef.FullName is nothing) then
Dim FullName23514 as String
FullName23514 = 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 ListID23515 as String
ListID23515 = ExpenseLineRetSalesTaxCodeRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ExpenseLineRetSalesTaxCodeRef.FullName is nothing) then
Dim FullName23516 as String
FullName23516 = ExpenseLineRetSalesTaxCodeRef.FullName.GetValue()
End If
End If
'Get value of BillableStatus
if ( not ExpenseLineRetBillableStatus is nothing) then
Dim BillableStatus23517 as ENBillableStatus
BillableStatus23517 = ExpenseLineRetBillableStatus.GetValue()
End If
if (not ExpenseLineRetSalesRepRef. is nothing) then
'Get value of ListID
if ( not ExpenseLineRetSalesRepRef.ListID is nothing) then
Dim ListID23518 as String
ListID23518 = ExpenseLineRetSalesRepRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ExpenseLineRetSalesRepRef.FullName is nothing) then
Dim FullName23519 as String
FullName23519 = ExpenseLineRetSalesRepRef.FullName.GetValue()
End If
End If
if (not ExpenseLineRetDataExtRetList is nothing)
Dim i23520 as Integer
for i23520 = 0 to ExpenseLineRetDataExtRetList.Count - 1
Dim DataExtRet as IDataExtRet
DataExtRet = ExpenseLineRetDataExtRetList.GetAt(i23520)
'Get value of OwnerID
if ( not DataExtRetOwnerID is nothing) then
Dim OwnerID23521 as String
OwnerID23521 = DataExtRetOwnerID.GetValue()
End If
'Get value of DataExtName
Dim DataExtName23522 as String
DataExtName23522 = DataExtRetDataExtName.GetValue()
'Get value of DataExtType
Dim DataExtType23523 as ENDataExtType
DataExtType23523 = DataExtRetDataExtType.GetValue()
'Get value of DataExtValue
Dim DataExtValue23524 as String
DataExtValue23524 = DataExtRetDataExtValue.GetValue()
Next i23520
End If
Next i23505
End If
if (not VendorCreditRet.ORItemLineRetList is nothing) then
Dim i23525 as Integer
for i23525 = 0 to VendorCreditRet.ORItemLineRetList.Count - 1
Dim ORItemLineRet23526 as IORItemLineRet
ORItemLineRet23526 = VendorCreditRet.ORItemLineRetList.GetAt(i23525)
if (not ORItemLineRet23526.ItemLineRet is nothing) then
if (not ORItemLineRet23526.ItemLineRet. is nothing) then
'Get value of TxnLineID
Dim TxnLineID23527 as String
TxnLineID23527 = ORItemLineRet23526.ItemLineRet.TxnLineID.GetValue()
if (not ORItemLineRet23526.ItemLineRet.ItemRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet23526.ItemLineRet.ItemRef.ListID is nothing) then
Dim ListID23528 as String
ListID23528 = ORItemLineRet23526.ItemLineRet.ItemRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet23526.ItemLineRet.ItemRef.FullName is nothing) then
Dim FullName23529 as String
FullName23529 = ORItemLineRet23526.ItemLineRet.ItemRef.FullName.GetValue()
End If
End If
if (not ORItemLineRet23526.ItemLineRet.InventorySiteRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet23526.ItemLineRet.InventorySiteRef.ListID is nothing) then
Dim ListID23530 as String
ListID23530 = ORItemLineRet23526.ItemLineRet.InventorySiteRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet23526.ItemLineRet.InventorySiteRef.FullName is nothing) then
Dim FullName23531 as String
FullName23531 = ORItemLineRet23526.ItemLineRet.InventorySiteRef.FullName.GetValue()
End If
End If
if (not ORItemLineRet23526.ItemLineRet.InventorySiteLocationRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet23526.ItemLineRet.InventorySiteLocationRef.ListID is nothing) then
Dim ListID23532 as String
ListID23532 = ORItemLineRet23526.ItemLineRet.InventorySiteLocationRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet23526.ItemLineRet.InventorySiteLocationRef.FullName is nothing) then
Dim FullName23533 as String
FullName23533 = ORItemLineRet23526.ItemLineRet.InventorySiteLocationRef.FullName.GetValue()
End If
End If
if (not ORItemLineRet23526.ItemLineRet.ORSerialLotNumber is nothing) then
if (not ORItemLineRet23526.ItemLineRet.ORSerialLotNumber.SerialNumber is nothing) then
'Get value of SerialNumber
if ( not ORItemLineRet23526.ItemLineRet.ORSerialLotNumber.SerialNumber is nothing) then
Dim SerialNumber23535 as String
SerialNumber23535 = ORItemLineRet23526.ItemLineRet.ORSerialLotNumber.SerialNumber.GetValue()
End If
End If
if (not ORItemLineRet23526.ItemLineRet.ORSerialLotNumber.LotNumber is nothing) then
'Get value of LotNumber
if ( not ORItemLineRet23526.ItemLineRet.ORSerialLotNumber.LotNumber is nothing) then
Dim LotNumber23536 as String
LotNumber23536 = ORItemLineRet23526.ItemLineRet.ORSerialLotNumber.LotNumber.GetValue()
End If
End If
End If
'Get value of ExpirationDateForSerialLotNumber
if ( not ORItemLineRet23526.ItemLineRet.ExpirationDateForSerialLotNumber is nothing) then
Dim ExpDate as String
ExpDate = ORItemLineRet23526.ItemLineRet.ExpirationDateForSerialLotNumber.GetValue()
End If
'Get value of Desc
if ( not ORItemLineRet23526.ItemLineRet.Desc is nothing) then
Dim Desc23537 as String
Desc23537 = ORItemLineRet23526.ItemLineRet.Desc.GetValue()
End If
'Get value of Quantity
if ( not ORItemLineRet23526.ItemLineRet.Quantity is nothing) then
Dim Quantity23538 as Integer
Quantity23538 = ORItemLineRet23526.ItemLineRet.Quantity.GetValue()
End If
'Get value of UnitOfMeasure
if ( not ORItemLineRet23526.ItemLineRet.UnitOfMeasure is nothing) then
Dim UnitOfMeasure23539 as String
UnitOfMeasure23539 = ORItemLineRet23526.ItemLineRet.UnitOfMeasure.GetValue()
End If
if (not ORItemLineRet23526.ItemLineRet.OverrideUOMSetRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet23526.ItemLineRet.OverrideUOMSetRef.ListID is nothing) then
Dim ListID23540 as String
ListID23540 = ORItemLineRet23526.ItemLineRet.OverrideUOMSetRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet23526.ItemLineRet.OverrideUOMSetRef.FullName is nothing) then
Dim FullName23541 as String
FullName23541 = ORItemLineRet23526.ItemLineRet.OverrideUOMSetRef.FullName.GetValue()
End If
End If
'Get value of Cost
if ( not ORItemLineRet23526.ItemLineRet.Cost is nothing) then
Dim Cost23542 as Double
Cost23542 = ORItemLineRet23526.ItemLineRet.Cost.GetValue()
End If
'Get value of Amount
if ( not ORItemLineRet23526.ItemLineRet.Amount is nothing) then
Dim Amount23543 as Double
Amount23543 = ORItemLineRet23526.ItemLineRet.Amount.GetValue()
End If
if (not ORItemLineRet23526.ItemLineRet.CustomerRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet23526.ItemLineRet.CustomerRef.ListID is nothing) then
Dim ListID23544 as String
ListID23544 = ORItemLineRet23526.ItemLineRet.CustomerRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet23526.ItemLineRet.CustomerRef.FullName is nothing) then
Dim FullName23545 as String
FullName23545 = ORItemLineRet23526.ItemLineRet.CustomerRef.FullName.GetValue()
End If
End If
if (not ORItemLineRet23526.ItemLineRet.ClassRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet23526.ItemLineRet.ClassRef.ListID is nothing) then
Dim ListID23546 as String
ListID23546 = ORItemLineRet23526.ItemLineRet.ClassRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet23526.ItemLineRet.ClassRef.FullName is nothing) then
Dim FullName23547 as String
FullName23547 = ORItemLineRet23526.ItemLineRet.ClassRef.FullName.GetValue()
End If
End If
if (not ORItemLineRet23526.ItemLineRet.SalesTaxCodeRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet23526.ItemLineRet.SalesTaxCodeRef.ListID is nothing) then
Dim ListID23548 as String
ListID23548 = ORItemLineRet23526.ItemLineRet.SalesTaxCodeRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet23526.ItemLineRet.SalesTaxCodeRef.FullName is nothing) then
Dim FullName23549 as String
FullName23549 = ORItemLineRet23526.ItemLineRet.SalesTaxCodeRef.FullName.GetValue()
End If
End If
'Get value of BillableStatus
if ( not ORItemLineRet23526.ItemLineRet.BillableStatus is nothing) then
Dim BillableStatus23550 as ENBillableStatus
BillableStatus23550 = ORItemLineRet23526.ItemLineRet.BillableStatus.GetValue()
End If
if (not ORItemLineRet23526.ItemLineRet.SalesRepRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet23526.ItemLineRet.SalesRepRef.ListID is nothing) then
Dim ListID23551 as String
ListID23551 = ORItemLineRet23526.ItemLineRet.SalesRepRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet23526.ItemLineRet.SalesRepRef.FullName is nothing) then
Dim FullName23552 as String
FullName23552 = ORItemLineRet23526.ItemLineRet.SalesRepRef.FullName.GetValue()
End If
End If
if (not ORItemLineRet23526.ItemLineRet.DataExtRetList is nothing)
Dim i23553 as Integer
for i23553 = 0 to ORItemLineRet23526.ItemLineRet.DataExtRetList.Count - 1
Dim DataExtRet as IDataExtRet
DataExtRet = ORItemLineRet23526.ItemLineRet.DataExtRetList.GetAt(i23553)
'Get value of OwnerID
if ( not DataExtRetOwnerID is nothing) then
Dim OwnerID23554 as String
OwnerID23554 = DataExtRetOwnerID.GetValue()
End If
'Get value of DataExtName
Dim DataExtName23555 as String
DataExtName23555 = DataExtRetDataExtName.GetValue()
'Get value of DataExtType
Dim DataExtType23556 as ENDataExtType
DataExtType23556 = DataExtRetDataExtType.GetValue()
'Get value of DataExtValue
Dim DataExtValue23557 as String
DataExtValue23557 = DataExtRetDataExtValue.GetValue()
Next i23553
End If
End If
End If
if (not ORItemLineRet23526.ItemGroupLineRet is nothing) then
if (not ORItemLineRet23526.ItemGroupLineRet. is nothing) then
'Get value of TxnLineID
Dim TxnLineID23558 as String
TxnLineID23558 = ORItemLineRet23526.ItemGroupLineRet.TxnLineID.GetValue()
'Get value of ListID
if ( not ORItemLineRet23526.ItemGroupLineRet.ItemGroupRef.ListID is nothing) then
Dim ListID23559 as String
ListID23559 = ORItemLineRet23526.ItemGroupLineRet.ItemGroupRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet23526.ItemGroupLineRet.ItemGroupRef.FullName is nothing) then
Dim FullName23560 as String
FullName23560 = ORItemLineRet23526.ItemGroupLineRet.ItemGroupRef.FullName.GetValue()
End If
'Get value of Desc
if ( not ORItemLineRet23526.ItemGroupLineRet.Desc is nothing) then
Dim Desc23561 as String
Desc23561 = ORItemLineRet23526.ItemGroupLineRet.Desc.GetValue()
End If
'Get value of Quantity
if ( not ORItemLineRet23526.ItemGroupLineRet.Quantity is nothing) then
Dim Quantity23562 as Integer
Quantity23562 = ORItemLineRet23526.ItemGroupLineRet.Quantity.GetValue()
End If
'Get value of UnitOfMeasure
if ( not ORItemLineRet23526.ItemGroupLineRet.UnitOfMeasure is nothing) then
Dim UnitOfMeasure23563 as String
UnitOfMeasure23563 = ORItemLineRet23526.ItemGroupLineRet.UnitOfMeasure.GetValue()
End If
if (not ORItemLineRet23526.ItemGroupLineRet.OverrideUOMSetRef. is nothing) then
'Get value of ListID
if ( not ORItemLineRet23526.ItemGroupLineRet.OverrideUOMSetRef.ListID is nothing) then
Dim ListID23564 as String
ListID23564 = ORItemLineRet23526.ItemGroupLineRet.OverrideUOMSetRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ORItemLineRet23526.ItemGroupLineRet.OverrideUOMSetRef.FullName is nothing) then
Dim FullName23565 as String
FullName23565 = ORItemLineRet23526.ItemGroupLineRet.OverrideUOMSetRef.FullName.GetValue()
End If
End If
'Get value of TotalAmount
Dim TotalAmount23566 as Double
TotalAmount23566 = ORItemLineRet23526.ItemGroupLineRet.TotalAmount.GetValue()
if (not ORItemLineRet23526.ItemGroupLineRet.ItemLineRetList is nothing)
Dim i23567 as Integer
for i23567 = 0 to ORItemLineRet23526.ItemGroupLineRet.ItemLineRetList.Count - 1
Dim ItemLineRet as IItemLineRet
ItemLineRet = ORItemLineRet23526.ItemGroupLineRet.ItemLineRetList.GetAt(i23567)
'Get value of TxnLineID
Dim TxnLineID23568 as String
TxnLineID23568 = ItemLineRetTxnLineID.GetValue()
if (not ItemLineRetItemRef. is nothing) then
'Get value of ListID
if ( not ItemLineRetItemRef.ListID is nothing) then
Dim ListID23569 as String
ListID23569 = ItemLineRetItemRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemLineRetItemRef.FullName is nothing) then
Dim FullName23570 as String
FullName23570 = 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 ListID23571 as String
ListID23571 = ItemLineRetInventorySiteRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemLineRetInventorySiteRef.FullName is nothing) then
Dim FullName23572 as String
FullName23572 = 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 ListID23573 as String
ListID23573 = ItemLineRetInventorySiteLocationRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemLineRetInventorySiteLocationRef.FullName is nothing) then
Dim FullName23574 as String
FullName23574 = 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 SerialNumber23576 as String
SerialNumber23576 = 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 LotNumber23577 as String
LotNumber23577 = 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 Desc23578 as String
Desc23578 = ItemLineRetDesc.GetValue()
End If
'Get value of Quantity
if ( not ItemLineRetQuantity is nothing) then
Dim Quantity23579 as Integer
Quantity23579 = ItemLineRetQuantity.GetValue()
End If
'Get value of UnitOfMeasure
if ( not ItemLineRetUnitOfMeasure is nothing) then
Dim UnitOfMeasure23580 as String
UnitOfMeasure23580 = ItemLineRetUnitOfMeasure.GetValue()
End If
if (not ItemLineRetOverrideUOMSetRef. is nothing) then
'Get value of ListID
if ( not ItemLineRetOverrideUOMSetRef.ListID is nothing) then
Dim ListID23581 as String
ListID23581 = ItemLineRetOverrideUOMSetRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemLineRetOverrideUOMSetRef.FullName is nothing) then
Dim FullName23582 as String
FullName23582 = ItemLineRetOverrideUOMSetRef.FullName.GetValue()
End If
End If
'Get value of Cost
if ( not ItemLineRetCost is nothing) then
Dim Cost23583 as Double
Cost23583 = ItemLineRetCost.GetValue()
End If
'Get value of Amount
if ( not ItemLineRetAmount is nothing) then
Dim Amount23584 as Double
Amount23584 = ItemLineRetAmount.GetValue()
End If
if (not ItemLineRetCustomerRef. is nothing) then
'Get value of ListID
if ( not ItemLineRetCustomerRef.ListID is nothing) then
Dim ListID23585 as String
ListID23585 = ItemLineRetCustomerRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemLineRetCustomerRef.FullName is nothing) then
Dim FullName23586 as String
FullName23586 = 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 ListID23587 as String
ListID23587 = ItemLineRetClassRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemLineRetClassRef.FullName is nothing) then
Dim FullName23588 as String
FullName23588 = 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 ListID23589 as String
ListID23589 = ItemLineRetSalesTaxCodeRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemLineRetSalesTaxCodeRef.FullName is nothing) then
Dim FullName23590 as String
FullName23590 = ItemLineRetSalesTaxCodeRef.FullName.GetValue()
End If
End If
'Get value of BillableStatus
if ( not ItemLineRetBillableStatus is nothing) then
Dim BillableStatus23591 as ENBillableStatus
BillableStatus23591 = ItemLineRetBillableStatus.GetValue()
End If
if (not ItemLineRetSalesRepRef. is nothing) then
'Get value of ListID
if ( not ItemLineRetSalesRepRef.ListID is nothing) then
Dim ListID23592 as String
ListID23592 = ItemLineRetSalesRepRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemLineRetSalesRepRef.FullName is nothing) then
Dim FullName23593 as String
FullName23593 = ItemLineRetSalesRepRef.FullName.GetValue()
End If
End If
if (not ItemLineRetDataExtRetList is nothing)
Dim i23594 as Integer
for i23594 = 0 to ItemLineRetDataExtRetList.Count - 1
Dim DataExtRet as IDataExtRet
DataExtRet = ItemLineRetDataExtRetList.GetAt(i23594)
'Get value of OwnerID
if ( not DataExtRetOwnerID is nothing) then
Dim OwnerID23595 as String
OwnerID23595 = DataExtRetOwnerID.GetValue()
End If
'Get value of DataExtName
Dim DataExtName23596 as String
DataExtName23596 = DataExtRetDataExtName.GetValue()
'Get value of DataExtType
Dim DataExtType23597 as ENDataExtType
DataExtType23597 = DataExtRetDataExtType.GetValue()
'Get value of DataExtValue
Dim DataExtValue23598 as String
DataExtValue23598 = DataExtRetDataExtValue.GetValue()
Next i23594
End If
Next i23567
End If
if (not ORItemLineRet23526.ItemGroupLineRet.DataExtList is nothing)
Dim i23599 as Integer
for i23599 = 0 to ORItemLineRet23526.ItemGroupLineRet.DataExtList.Count - 1
Dim DataExt as IDataExt
DataExt = ORItemLineRet23526.ItemGroupLineRet.DataExtList.GetAt(i23599)
'Get value of OwnerID
Dim OwnerID23600 as String
OwnerID23600 = DataExtOwnerID.GetValue()
'Get value of DataExtName
Dim DataExtName23601 as String
DataExtName23601 = DataExtDataExtName.GetValue()
'Get value of DataExtValue
Dim DataExtValue23602 as String
DataExtValue23602 = DataExtDataExtValue.GetValue()
Next i23599
End If
End If
End If
Next i23525
End If
'Get value of OpenAmount
if ( not VendorCreditRet.OpenAmount is nothing) then
Dim OpenAmount23603 as Double
OpenAmount23603 = VendorCreditRet.OpenAmount.GetValue()
End If
if (not VendorCreditRet.DataExtRetList is nothing)
Dim i23604 as Integer
for i23604 = 0 to VendorCreditRet.DataExtRetList.Count - 1
Dim DataExtRet as IDataExtRet
DataExtRet = VendorCreditRet.DataExtRetList.GetAt(i23604)
'Get value of OwnerID
if ( not DataExtRetOwnerID is nothing) then
Dim OwnerID23605 as String
OwnerID23605 = DataExtRetOwnerID.GetValue()
End If
'Get value of DataExtName
Dim DataExtName23606 as String
DataExtName23606 = DataExtRetDataExtName.GetValue()
'Get value of DataExtType
Dim DataExtType23607 as ENDataExtType
DataExtType23607 = DataExtRetDataExtType.GetValue()
'Get value of DataExtValue
Dim DataExtValue23608 as String
DataExtValue23608 = DataExtRetDataExtValue.GetValue()
Next i23604
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 | //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 DoVendorCreditAdd() { 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; BuildVendorCreditAddRq(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; WalkVendorCreditAddRs(responseMsgSet); } catch (Exception e) { MessageBox.Show(e.Message, "Error"); if (sessionBegun) { sessionManager.EndSession(); } if (connectionOpen) { sessionManager.CloseConnection(); } } } void BuildVendorCreditAddRq(IMsgSetRequest requestMsgSet) { IVendorCreditAdd VendorCreditAddRq= requestMsgSet.AppendVendorCreditAddRq(); //Set attributes //Set field value for defMacro VendorCreditAddRq.defMacro.SetValue("IQBStringType"); //Set field value for ListID VendorCreditAddRq.VendorRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName VendorCreditAddRq.VendorRef.FullName.SetValue("ab"); //Set field value for ListID VendorCreditAddRq.APAccountRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName VendorCreditAddRq.APAccountRef.FullName.SetValue("ab"); //Set field value for TxnDate VendorCreditAddRq.TxnDate.SetValue(DateTime.Parse("12/15/2007")); //Set field value for RefNumber VendorCreditAddRq.RefNumber.SetValue("ab"); //Set field value for Memo VendorCreditAddRq.Memo.SetValue("ab"); //Set field value for IsTaxIncluded VendorCreditAddRq.IsTaxIncluded.SetValue(true); //Set field value for ListID VendorCreditAddRq.SalesTaxCodeRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName VendorCreditAddRq.SalesTaxCodeRef.FullName.SetValue("ab"); //Set field value for ExchangeRate VendorCreditAddRq.ExchangeRate.SetValue("IQBFloatType"); //Set field value for ExternalGUID VendorCreditAddRq.ExternalGUID.SetValue(Guid.NewGuid().ToString()); IExpenseLineAdd ExpenseLineAdd23331=VendorCreditAddRq.ExpenseLineAddList.Append(); //Set attributes //Set field value for defMacro ExpenseLineAdd23331.defMacro.SetValue("IQBStringType"); //Set field value for ListID ExpenseLineAdd23331.AccountRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ExpenseLineAdd23331.AccountRef.FullName.SetValue("ab"); //Set field value for Amount ExpenseLineAdd23331.Amount.SetValue(10.01); //Set field value for Memo ExpenseLineAdd23331.Memo.SetValue("ab"); //Set field value for ListID ExpenseLineAdd23331.CustomerRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ExpenseLineAdd23331.CustomerRef.FullName.SetValue("ab"); //Set field value for ListID ExpenseLineAdd23331.ClassRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ExpenseLineAdd23331.ClassRef.FullName.SetValue("ab"); //Set field value for ListID ExpenseLineAdd23331.SalesTaxCodeRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ExpenseLineAdd23331.SalesTaxCodeRef.FullName.SetValue("ab"); //Set field value for BillableStatus ExpenseLineAdd23331.BillableStatus.SetValue(ENBillableStatus.bsBillable); //Set field value for ListID ExpenseLineAdd23331.SalesRepRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ExpenseLineAdd23331.SalesRepRef.FullName.SetValue("ab"); IDataExt DataExt23332=ExpenseLineAdd23331.DataExtList.Append(); //Set field value for OwnerID DataExt23332.OwnerID.SetValue(Guid.NewGuid().ToString()); //Set field value for DataExtName DataExt23332.DataExtName.SetValue("ab"); //Set field value for DataExtValue DataExt23332.DataExtValue.SetValue("ab"); IORItemLineAdd ORItemLineAddListElement23333 =VendorCreditAddRq.ORItemLineAddList.Append(); string ORItemLineAddListElementType23334 = "ItemLineAdd"; if (ORItemLineAddListElementType23334 == "ItemLineAdd") { //Set field value for ListID ORItemLineAddListElement23333.ItemLineAdd.ItemRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineAddListElement23333.ItemLineAdd.ItemRef.FullName.SetValue("ab"); //Set field value for ListID ORItemLineAddListElement23333.ItemLineAdd.InventorySiteRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineAddListElement23333.ItemLineAdd.InventorySiteRef.FullName.SetValue("ab"); //Set field value for ListID ORItemLineAddListElement23333.ItemLineAdd.InventorySiteLocationRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineAddListElement23333.ItemLineAdd.InventorySiteLocationRef.FullName.SetValue("ab"); string ORSerialLotNumberElementType23335 = "SerialNumber"; if (ORSerialLotNumberElementType23335 == "SerialNumber") { //Set field value for SerialNumber ORItemLineAddListElement23333.ItemLineAdd.ORSerialLotNumber.SerialNumber.SetValue("ab"); } if (ORSerialLotNumberElementType23335 == "LotNumber") { //Set field value for LotNumber ORItemLineAddListElement23333.ItemLineAdd.ORSerialLotNumber.LotNumber.SetValue("ab"); } //Set field value for Desc ORItemLineAddListElement23333.ItemLineAdd.Desc.SetValue("ab"); //Set field value for Quantity ORItemLineAddListElement23333.ItemLineAdd.Quantity.SetValue(2); //Set field value for UnitOfMeasure ORItemLineAddListElement23333.ItemLineAdd.UnitOfMeasure.SetValue("ab"); //Set field value for Cost ORItemLineAddListElement23333.ItemLineAdd.Cost.SetValue(15.65); //Set field value for Amount ORItemLineAddListElement23333.ItemLineAdd.Amount.SetValue(10.01); //Set field value for ListID ORItemLineAddListElement23333.ItemLineAdd.CustomerRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineAddListElement23333.ItemLineAdd.CustomerRef.FullName.SetValue("ab"); //Set field value for ListID ORItemLineAddListElement23333.ItemLineAdd.ClassRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineAddListElement23333.ItemLineAdd.ClassRef.FullName.SetValue("ab"); //Set field value for ListID ORItemLineAddListElement23333.ItemLineAdd.SalesTaxCodeRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineAddListElement23333.ItemLineAdd.SalesTaxCodeRef.FullName.SetValue("ab"); //Set field value for BillableStatus ORItemLineAddListElement23333.ItemLineAdd.BillableStatus.SetValue(ENBillableStatus.bsBillable); //Set field value for ListID ORItemLineAddListElement23333.ItemLineAdd.OverrideItemAccountRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineAddListElement23333.ItemLineAdd.OverrideItemAccountRef.FullName.SetValue("ab"); //Set field value for ListID ORItemLineAddListElement23333.ItemLineAdd.SalesRepRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineAddListElement23333.ItemLineAdd.SalesRepRef.FullName.SetValue("ab"); IDataExt DataExt23336=ORItemLineAddListElement23333.ItemLineAdd.DataExtList.Append(); //Set field value for OwnerID DataExt23336.OwnerID.SetValue(Guid.NewGuid().ToString()); //Set field value for DataExtName DataExt23336.DataExtName.SetValue("ab"); //Set field value for DataExtValue DataExt23336.DataExtValue.SetValue("ab"); } if (ORItemLineAddListElementType23334 == "ItemGroupLineAdd") { //Set field value for ListID ORItemLineAddListElement23333.ItemGroupLineAdd.ItemGroupRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineAddListElement23333.ItemGroupLineAdd.ItemGroupRef.FullName.SetValue("ab"); //Set field value for Quantity ORItemLineAddListElement23333.ItemGroupLineAdd.Quantity.SetValue(2); //Set field value for UnitOfMeasure ORItemLineAddListElement23333.ItemGroupLineAdd.UnitOfMeasure.SetValue("ab"); //Set field value for ListID ORItemLineAddListElement23333.ItemGroupLineAdd.InventorySiteRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineAddListElement23333.ItemGroupLineAdd.InventorySiteRef.FullName.SetValue("ab"); //Set field value for ListID ORItemLineAddListElement23333.ItemGroupLineAdd.InventorySiteLocationRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName ORItemLineAddListElement23333.ItemGroupLineAdd.InventorySiteLocationRef.FullName.SetValue("ab"); IDataExt DataExt23337=ORItemLineAddListElement23333.ItemGroupLineAdd.DataExtList.Append(); //Set field value for OwnerID DataExt23337.OwnerID.SetValue(Guid.NewGuid().ToString()); //Set field value for DataExtName DataExt23337.DataExtName.SetValue("ab"); //Set field value for DataExtValue DataExt23337.DataExtValue.SetValue("ab"); } //Set field value for IncludeRetElementList //May create more than one of these if needed VendorCreditAddRq.IncludeRetElementList.Add("ab"); } void WalkVendorCreditAddRs(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.rtVendorCreditAddRs) { //upcast to more specific type here, this is safe because we checked with response.Type check above IVendorCreditRet VendorCreditRet = (IVendorCreditRet)response.Detail; WalkVendorCreditRet(VendorCreditRet); } } } } } void WalkVendorCreditRet(IVendorCreditRet VendorCreditRet) { if (VendorCreditRet == null) return; //Go through all the elements of IVendorCreditRet //Get value of TxnID string TxnID23338 = (string)VendorCreditRet.TxnID.GetValue(); //Get value of TimeCreated DateTime TimeCreated23339 = (DateTime)VendorCreditRet.TimeCreated.GetValue(); //Get value of TimeModified DateTime TimeModified23340 = (DateTime)VendorCreditRet.TimeModified.GetValue(); //Get value of EditSequence string EditSequence23341 = (string)VendorCreditRet.EditSequence.GetValue(); //Get value of TxnNumber if (VendorCreditRet.TxnNumber != null) { int TxnNumber23342 = (int)VendorCreditRet.TxnNumber.GetValue(); } //Get value of ListID if (VendorCreditRet.VendorRef.ListID != null) { string ListID23343 = (string)VendorCreditRet.VendorRef.ListID.GetValue(); } //Get value of FullName if (VendorCreditRet.VendorRef.FullName != null) { string FullName23344 = (string)VendorCreditRet.VendorRef.FullName.GetValue(); } if (VendorCreditRet.APAccountRef != null) { //Get value of ListID if (VendorCreditRet.APAccountRef.ListID != null) { string ListID23345 = (string)VendorCreditRet.APAccountRef.ListID.GetValue(); } //Get value of FullName if (VendorCreditRet.APAccountRef.FullName != null) { string FullName23346 = (string)VendorCreditRet.APAccountRef.FullName.GetValue(); } } //Get value of TxnDate DateTime TxnDate23347 = (DateTime)VendorCreditRet.TxnDate.GetValue(); //Get value of CreditAmount double CreditAmount23348 = (double)VendorCreditRet.CreditAmount.GetValue(); if (VendorCreditRet.CurrencyRef != null) { //Get value of ListID if (VendorCreditRet.CurrencyRef.ListID != null) { string ListID23349 = (string)VendorCreditRet.CurrencyRef.ListID.GetValue(); } //Get value of FullName if (VendorCreditRet.CurrencyRef.FullName != null) { string FullName23350 = (string)VendorCreditRet.CurrencyRef.FullName.GetValue(); } } //Get value of ExchangeRate if (VendorCreditRet.ExchangeRate != null) { IQBFloatType ExchangeRate23351 = (IQBFloatType)VendorCreditRet.ExchangeRate.GetValue(); } //Get value of CreditAmountInHomeCurrency if (VendorCreditRet.CreditAmountInHomeCurrency != null) { double CreditAmountInHomeCurrency23352 = (double)VendorCreditRet.CreditAmountInHomeCurrency.GetValue(); } //Get value of RefNumber if (VendorCreditRet.RefNumber != null) { string RefNumber23353 = (string)VendorCreditRet.RefNumber.GetValue(); } //Get value of Memo if (VendorCreditRet.Memo != null) { string Memo23354 = (string)VendorCreditRet.Memo.GetValue(); } //Get value of IsTaxIncluded if (VendorCreditRet.IsTaxIncluded != null) { bool IsTaxIncluded23355 = (bool)VendorCreditRet.IsTaxIncluded.GetValue(); } if (VendorCreditRet.SalesTaxCodeRef != null) { //Get value of ListID if (VendorCreditRet.SalesTaxCodeRef.ListID != null) { string ListID23356 = (string)VendorCreditRet.SalesTaxCodeRef.ListID.GetValue(); } //Get value of FullName if (VendorCreditRet.SalesTaxCodeRef.FullName != null) { string FullName23357 = (string)VendorCreditRet.SalesTaxCodeRef.FullName.GetValue(); } } //Get value of ExternalGUID if (VendorCreditRet.ExternalGUID != null) { string ExternalGUID23358 = (string)VendorCreditRet.ExternalGUID.GetValue(); } if (VendorCreditRet.LinkedTxnList != null) { for (int i23359 = 0; i23359 < VendorCreditRet.LinkedTxnList.Count; i23359++) { ILinkedTxn LinkedTxn = VendorCreditRet.LinkedTxnList.GetAt(i23359); //Get value of TxnID string TxnID23360 = (string)LinkedTxn.TxnID.GetValue(); //Get value of TxnType ENTxnType TxnType23361 = (ENTxnType)LinkedTxn.TxnType.GetValue(); //Get value of TxnDate DateTime TxnDate23362 = (DateTime)LinkedTxn.TxnDate.GetValue(); //Get value of RefNumber if (LinkedTxn.RefNumber != null) { string RefNumber23363 = (string)LinkedTxn.RefNumber.GetValue(); } //Get value of LinkType if (LinkedTxn.LinkType != null) { ENLinkType LinkType23364 = (ENLinkType)LinkedTxn.LinkType.GetValue(); } //Get value of Amount double Amount23365 = (double)LinkedTxn.Amount.GetValue(); } } if (VendorCreditRet.ExpenseLineRetList != null) { for (int i23366 = 0; i23366 < VendorCreditRet.ExpenseLineRetList.Count; i23366++) { IExpenseLineRet ExpenseLineRet = VendorCreditRet.ExpenseLineRetList.GetAt(i23366); //Get value of TxnLineID string TxnLineID23367 = (string)ExpenseLineRet.TxnLineID.GetValue(); if (ExpenseLineRet.AccountRef != null) { //Get value of ListID if (ExpenseLineRet.AccountRef.ListID != null) { string ListID23368 = (string)ExpenseLineRet.AccountRef.ListID.GetValue(); } //Get value of FullName if (ExpenseLineRet.AccountRef.FullName != null) { string FullName23369 = (string)ExpenseLineRet.AccountRef.FullName.GetValue(); } } //Get value of Amount if (ExpenseLineRet.Amount != null) { double Amount23370 = (double)ExpenseLineRet.Amount.GetValue(); } //Get value of Memo if (ExpenseLineRet.Memo != null) { string Memo23371 = (string)ExpenseLineRet.Memo.GetValue(); } if (ExpenseLineRet.CustomerRef != null) { //Get value of ListID if (ExpenseLineRet.CustomerRef.ListID != null) { string ListID23372 = (string)ExpenseLineRet.CustomerRef.ListID.GetValue(); } //Get value of FullName if (ExpenseLineRet.CustomerRef.FullName != null) { string FullName23373 = (string)ExpenseLineRet.CustomerRef.FullName.GetValue(); } } if (ExpenseLineRet.ClassRef != null) { //Get value of ListID if (ExpenseLineRet.ClassRef.ListID != null) { string ListID23374 = (string)ExpenseLineRet.ClassRef.ListID.GetValue(); } //Get value of FullName if (ExpenseLineRet.ClassRef.FullName != null) { string FullName23375 = (string)ExpenseLineRet.ClassRef.FullName.GetValue(); } } if (ExpenseLineRet.SalesTaxCodeRef != null) { //Get value of ListID if (ExpenseLineRet.SalesTaxCodeRef.ListID != null) { string ListID23376 = (string)ExpenseLineRet.SalesTaxCodeRef.ListID.GetValue(); } //Get value of FullName if (ExpenseLineRet.SalesTaxCodeRef.FullName != null) { string FullName23377 = (string)ExpenseLineRet.SalesTaxCodeRef.FullName.GetValue(); } } //Get value of BillableStatus if (ExpenseLineRet.BillableStatus != null) { ENBillableStatus BillableStatus23378 = (ENBillableStatus)ExpenseLineRet.BillableStatus.GetValue(); } if (ExpenseLineRet.SalesRepRef != null) { //Get value of ListID if (ExpenseLineRet.SalesRepRef.ListID != null) { string ListID23379 = (string)ExpenseLineRet.SalesRepRef.ListID.GetValue(); } //Get value of FullName if (ExpenseLineRet.SalesRepRef.FullName != null) { string FullName23380 = (string)ExpenseLineRet.SalesRepRef.FullName.GetValue(); } } if (ExpenseLineRet.DataExtRetList != null) { for (int i23381 = 0; i23381 < ExpenseLineRet.DataExtRetList.Count; i23381++) { IDataExtRet DataExtRet = ExpenseLineRet.DataExtRetList.GetAt(i23381); //Get value of OwnerID if (DataExtRet.OwnerID != null) { string OwnerID23382 = (string)DataExtRet.OwnerID.GetValue(); } //Get value of DataExtName string DataExtName23383 = (string)DataExtRet.DataExtName.GetValue(); //Get value of DataExtType ENDataExtType DataExtType23384 = (ENDataExtType)DataExtRet.DataExtType.GetValue(); //Get value of DataExtValue string DataExtValue23385 = (string)DataExtRet.DataExtValue.GetValue(); } } } } if (VendorCreditRet.ORItemLineRetList != null) { for (int i23386 = 0; i23386 < VendorCreditRet.ORItemLineRetList.Count; i23386++) { IORItemLineRet ORItemLineRet23387 = VendorCreditRet.ORItemLineRetList.GetAt(i23386); if (ORItemLineRet23387.ItemLineRet != null) { if (ORItemLineRet23387.ItemLineRet != null) { //Get value of TxnLineID string TxnLineID23388 = (string)ORItemLineRet23387.ItemLineRet.TxnLineID.GetValue(); if (ORItemLineRet23387.ItemLineRet.ItemRef != null) { //Get value of ListID if (ORItemLineRet23387.ItemLineRet.ItemRef.ListID != null) { string ListID23389 = (string)ORItemLineRet23387.ItemLineRet.ItemRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet23387.ItemLineRet.ItemRef.FullName != null) { string FullName23390 = (string)ORItemLineRet23387.ItemLineRet.ItemRef.FullName.GetValue(); } } if (ORItemLineRet23387.ItemLineRet.InventorySiteRef != null) { //Get value of ListID if (ORItemLineRet23387.ItemLineRet.InventorySiteRef.ListID != null) { string ListID23391 = (string)ORItemLineRet23387.ItemLineRet.InventorySiteRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet23387.ItemLineRet.InventorySiteRef.FullName != null) { string FullName23392 = (string)ORItemLineRet23387.ItemLineRet.InventorySiteRef.FullName.GetValue(); } } if (ORItemLineRet23387.ItemLineRet.InventorySiteLocationRef != null) { //Get value of ListID if (ORItemLineRet23387.ItemLineRet.InventorySiteLocationRef.ListID != null) { string ListID23393 = (string)ORItemLineRet23387.ItemLineRet.InventorySiteLocationRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet23387.ItemLineRet.InventorySiteLocationRef.FullName != null) { string FullName23394 = (string)ORItemLineRet23387.ItemLineRet.InventorySiteLocationRef.FullName.GetValue(); } } if (ORItemLineRet23387.ItemLineRet.ORSerialLotNumber != null) { if (ORItemLineRet23387.ItemLineRet.ORSerialLotNumber.SerialNumber != null) { //Get value of SerialNumber if (ORItemLineRet23387.ItemLineRet.ORSerialLotNumber.SerialNumber != null) { string SerialNumber23396 = (string)ORItemLineRet23387.ItemLineRet.ORSerialLotNumber.SerialNumber.GetValue(); } } if (ORItemLineRet23387.ItemLineRet.ORSerialLotNumber.LotNumber != null) { //Get value of LotNumber if (ORItemLineRet23387.ItemLineRet.ORSerialLotNumber.LotNumber != null) { string LotNumber23397 = (string)ORItemLineRet23387.ItemLineRet.ORSerialLotNumber.LotNumber.GetValue(); } } } //Get value of ExpirationDateForSerialLotNumber if (ORItemLineRet23387.ItemLineRet.ExpirationDateForSerialLotNumber != null) { string ExpDate = (string)ORItemLineRet23387.ItemLineRet.ExpirationDateForSerialLotNumber.GetValue(); } //Get value of Desc if (ORItemLineRet23387.ItemLineRet.Desc != null) { string Desc23398 = (string)ORItemLineRet23387.ItemLineRet.Desc.GetValue(); } //Get value of Quantity if (ORItemLineRet23387.ItemLineRet.Quantity != null) { int Quantity23399 = (int)ORItemLineRet23387.ItemLineRet.Quantity.GetValue(); } //Get value of UnitOfMeasure if (ORItemLineRet23387.ItemLineRet.UnitOfMeasure != null) { string UnitOfMeasure23400 = (string)ORItemLineRet23387.ItemLineRet.UnitOfMeasure.GetValue(); } if (ORItemLineRet23387.ItemLineRet.OverrideUOMSetRef != null) { //Get value of ListID if (ORItemLineRet23387.ItemLineRet.OverrideUOMSetRef.ListID != null) { string ListID23401 = (string)ORItemLineRet23387.ItemLineRet.OverrideUOMSetRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet23387.ItemLineRet.OverrideUOMSetRef.FullName != null) { string FullName23402 = (string)ORItemLineRet23387.ItemLineRet.OverrideUOMSetRef.FullName.GetValue(); } } //Get value of Cost if (ORItemLineRet23387.ItemLineRet.Cost != null) { double Cost23403 = (double)ORItemLineRet23387.ItemLineRet.Cost.GetValue(); } //Get value of Amount if (ORItemLineRet23387.ItemLineRet.Amount != null) { double Amount23404 = (double)ORItemLineRet23387.ItemLineRet.Amount.GetValue(); } if (ORItemLineRet23387.ItemLineRet.CustomerRef != null) { //Get value of ListID if (ORItemLineRet23387.ItemLineRet.CustomerRef.ListID != null) { string ListID23405 = (string)ORItemLineRet23387.ItemLineRet.CustomerRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet23387.ItemLineRet.CustomerRef.FullName != null) { string FullName23406 = (string)ORItemLineRet23387.ItemLineRet.CustomerRef.FullName.GetValue(); } } if (ORItemLineRet23387.ItemLineRet.ClassRef != null) { //Get value of ListID if (ORItemLineRet23387.ItemLineRet.ClassRef.ListID != null) { string ListID23407 = (string)ORItemLineRet23387.ItemLineRet.ClassRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet23387.ItemLineRet.ClassRef.FullName != null) { string FullName23408 = (string)ORItemLineRet23387.ItemLineRet.ClassRef.FullName.GetValue(); } } if (ORItemLineRet23387.ItemLineRet.SalesTaxCodeRef != null) { //Get value of ListID if (ORItemLineRet23387.ItemLineRet.SalesTaxCodeRef.ListID != null) { string ListID23409 = (string)ORItemLineRet23387.ItemLineRet.SalesTaxCodeRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet23387.ItemLineRet.SalesTaxCodeRef.FullName != null) { string FullName23410 = (string)ORItemLineRet23387.ItemLineRet.SalesTaxCodeRef.FullName.GetValue(); } } //Get value of BillableStatus if (ORItemLineRet23387.ItemLineRet.BillableStatus != null) { ENBillableStatus BillableStatus23411 = (ENBillableStatus)ORItemLineRet23387.ItemLineRet.BillableStatus.GetValue(); } if (ORItemLineRet23387.ItemLineRet.SalesRepRef != null) { //Get value of ListID if (ORItemLineRet23387.ItemLineRet.SalesRepRef.ListID != null) { string ListID23412 = (string)ORItemLineRet23387.ItemLineRet.SalesRepRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet23387.ItemLineRet.SalesRepRef.FullName != null) { string FullName23413 = (string)ORItemLineRet23387.ItemLineRet.SalesRepRef.FullName.GetValue(); } } if (ORItemLineRet23387.ItemLineRet.DataExtRetList != null) { for (int i23414 = 0; i23414 < ORItemLineRet23387.ItemLineRet.DataExtRetList.Count; i23414++) { IDataExtRet DataExtRet = ORItemLineRet23387.ItemLineRet.DataExtRetList.GetAt(i23414); //Get value of OwnerID if (DataExtRet.OwnerID != null) { string OwnerID23415 = (string)DataExtRet.OwnerID.GetValue(); } //Get value of DataExtName string DataExtName23416 = (string)DataExtRet.DataExtName.GetValue(); //Get value of DataExtType ENDataExtType DataExtType23417 = (ENDataExtType)DataExtRet.DataExtType.GetValue(); //Get value of DataExtValue string DataExtValue23418 = (string)DataExtRet.DataExtValue.GetValue(); } } } } if (ORItemLineRet23387.ItemGroupLineRet != null) { if (ORItemLineRet23387.ItemGroupLineRet != null) { //Get value of TxnLineID string TxnLineID23419 = (string)ORItemLineRet23387.ItemGroupLineRet.TxnLineID.GetValue(); //Get value of ListID if (ORItemLineRet23387.ItemGroupLineRet.ItemGroupRef.ListID != null) { string ListID23420 = (string)ORItemLineRet23387.ItemGroupLineRet.ItemGroupRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet23387.ItemGroupLineRet.ItemGroupRef.FullName != null) { string FullName23421 = (string)ORItemLineRet23387.ItemGroupLineRet.ItemGroupRef.FullName.GetValue(); } //Get value of Desc if (ORItemLineRet23387.ItemGroupLineRet.Desc != null) { string Desc23422 = (string)ORItemLineRet23387.ItemGroupLineRet.Desc.GetValue(); } //Get value of Quantity if (ORItemLineRet23387.ItemGroupLineRet.Quantity != null) { int Quantity23423 = (int)ORItemLineRet23387.ItemGroupLineRet.Quantity.GetValue(); } //Get value of UnitOfMeasure if (ORItemLineRet23387.ItemGroupLineRet.UnitOfMeasure != null) { string UnitOfMeasure23424 = (string)ORItemLineRet23387.ItemGroupLineRet.UnitOfMeasure.GetValue(); } if (ORItemLineRet23387.ItemGroupLineRet.OverrideUOMSetRef != null) { //Get value of ListID if (ORItemLineRet23387.ItemGroupLineRet.OverrideUOMSetRef.ListID != null) { string ListID23425 = (string)ORItemLineRet23387.ItemGroupLineRet.OverrideUOMSetRef.ListID.GetValue(); } //Get value of FullName if (ORItemLineRet23387.ItemGroupLineRet.OverrideUOMSetRef.FullName != null) { string FullName23426 = (string)ORItemLineRet23387.ItemGroupLineRet.OverrideUOMSetRef.FullName.GetValue(); } } //Get value of TotalAmount double TotalAmount23427 = (double)ORItemLineRet23387.ItemGroupLineRet.TotalAmount.GetValue(); if (ORItemLineRet23387.ItemGroupLineRet.ItemLineRetList != null) { for (int i23428 = 0; i23428 < ORItemLineRet23387.ItemGroupLineRet.ItemLineRetList.Count; i23428++) { IItemLineRet ItemLineRet = ORItemLineRet23387.ItemGroupLineRet.ItemLineRetList.GetAt(i23428); //Get value of TxnLineID string TxnLineID23429 = (string)ItemLineRet.TxnLineID.GetValue(); if (ItemLineRet.ItemRef != null) { //Get value of ListID if (ItemLineRet.ItemRef.ListID != null) { string ListID23430 = (string)ItemLineRet.ItemRef.ListID.GetValue(); } //Get value of FullName if (ItemLineRet.ItemRef.FullName != null) { string FullName23431 = (string)ItemLineRet.ItemRef.FullName.GetValue(); } } if (ItemLineRet.InventorySiteRef != null) { //Get value of ListID if (ItemLineRet.InventorySiteRef.ListID != null) { string ListID23432 = (string)ItemLineRet.InventorySiteRef.ListID.GetValue(); } //Get value of FullName if (ItemLineRet.InventorySiteRef.FullName != null) { string FullName23433 = (string)ItemLineRet.InventorySiteRef.FullName.GetValue(); } } if (ItemLineRet.InventorySiteLocationRef != null) { //Get value of ListID if (ItemLineRet.InventorySiteLocationRef.ListID != null) { string ListID23434 = (string)ItemLineRet.InventorySiteLocationRef.ListID.GetValue(); } //Get value of FullName if (ItemLineRet.InventorySiteLocationRef.FullName != null) { string FullName23435 = (string)ItemLineRet.InventorySiteLocationRef.FullName.GetValue(); } } if (ItemLineRet.ORSerialLotNumber != null) { if (ItemLineRet.ORSerialLotNumber.SerialNumber != null) { //Get value of SerialNumber if (ItemLineRet.ORSerialLotNumber.SerialNumber != null) { string SerialNumber23437 = (string)ItemLineRet.ORSerialLotNumber.SerialNumber.GetValue(); } } if (ItemLineRet.ORSerialLotNumber.LotNumber != null) { //Get value of LotNumber if (ItemLineRet.ORSerialLotNumber.LotNumber != null) { string LotNumber23438 = (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 Desc23439 = (string)ItemLineRet.Desc.GetValue(); } //Get value of Quantity if (ItemLineRet.Quantity != null) { int Quantity23440 = (int)ItemLineRet.Quantity.GetValue(); } //Get value of UnitOfMeasure if (ItemLineRet.UnitOfMeasure != null) { string UnitOfMeasure23441 = (string)ItemLineRet.UnitOfMeasure.GetValue(); } if (ItemLineRet.OverrideUOMSetRef != null) { //Get value of ListID if (ItemLineRet.OverrideUOMSetRef.ListID != null) { string ListID23442 = (string)ItemLineRet.OverrideUOMSetRef.ListID.GetValue(); } //Get value of FullName if (ItemLineRet.OverrideUOMSetRef.FullName != null) { string FullName23443 = (string)ItemLineRet.OverrideUOMSetRef.FullName.GetValue(); } } //Get value of Cost if (ItemLineRet.Cost != null) { double Cost23444 = (double)ItemLineRet.Cost.GetValue(); } //Get value of Amount if (ItemLineRet.Amount != null) { double Amount23445 = (double)ItemLineRet.Amount.GetValue(); } if (ItemLineRet.CustomerRef != null) { //Get value of ListID if (ItemLineRet.CustomerRef.ListID != null) { string ListID23446 = (string)ItemLineRet.CustomerRef.ListID.GetValue(); } //Get value of FullName if (ItemLineRet.CustomerRef.FullName != null) { string FullName23447 = (string)ItemLineRet.CustomerRef.FullName.GetValue(); } } if (ItemLineRet.ClassRef != null) { //Get value of ListID if (ItemLineRet.ClassRef.ListID != null) { string ListID23448 = (string)ItemLineRet.ClassRef.ListID.GetValue(); } //Get value of FullName if (ItemLineRet.ClassRef.FullName != null) { string FullName23449 = (string)ItemLineRet.ClassRef.FullName.GetValue(); } } if (ItemLineRet.SalesTaxCodeRef != null) { //Get value of ListID if (ItemLineRet.SalesTaxCodeRef.ListID != null) { string ListID23450 = (string)ItemLineRet.SalesTaxCodeRef.ListID.GetValue(); } //Get value of FullName if (ItemLineRet.SalesTaxCodeRef.FullName != null) { string FullName23451 = (string)ItemLineRet.SalesTaxCodeRef.FullName.GetValue(); } } //Get value of BillableStatus if (ItemLineRet.BillableStatus != null) { ENBillableStatus BillableStatus23452 = (ENBillableStatus)ItemLineRet.BillableStatus.GetValue(); } if (ItemLineRet.SalesRepRef != null) { //Get value of ListID if (ItemLineRet.SalesRepRef.ListID != null) { string ListID23453 = (string)ItemLineRet.SalesRepRef.ListID.GetValue(); } //Get value of FullName if (ItemLineRet.SalesRepRef.FullName != null) { string FullName23454 = (string)ItemLineRet.SalesRepRef.FullName.GetValue(); } } if (ItemLineRet.DataExtRetList != null) { for (int i23455 = 0; i23455 < ItemLineRet.DataExtRetList.Count; i23455++) { IDataExtRet DataExtRet = ItemLineRet.DataExtRetList.GetAt(i23455); //Get value of OwnerID if (DataExtRet.OwnerID != null) { string OwnerID23456 = (string)DataExtRet.OwnerID.GetValue(); } //Get value of DataExtName string DataExtName23457 = (string)DataExtRet.DataExtName.GetValue(); //Get value of DataExtType ENDataExtType DataExtType23458 = (ENDataExtType)DataExtRet.DataExtType.GetValue(); //Get value of DataExtValue string DataExtValue23459 = (string)DataExtRet.DataExtValue.GetValue(); } } } } if (ORItemLineRet23387.ItemGroupLineRet.DataExtList != null) { for (int i23460 = 0; i23460 < ORItemLineRet23387.ItemGroupLineRet.DataExtList.Count; i23460++) { IDataExt DataExt = ORItemLineRet23387.ItemGroupLineRet.DataExtList.GetAt(i23460); //Get value of OwnerID string OwnerID23461 = (string)DataExt.OwnerID.GetValue(); //Get value of DataExtName string DataExtName23462 = (string)DataExt.DataExtName.GetValue(); //Get value of DataExtValue string DataExtValue23463 = (string)DataExt.DataExtValue.GetValue(); } } } } } } //Get value of OpenAmount if (VendorCreditRet.OpenAmount != null) { double OpenAmount23464 = (double)VendorCreditRet.OpenAmount.GetValue(); } if (VendorCreditRet.DataExtRetList != null) { for (int i23465 = 0; i23465 < VendorCreditRet.DataExtRetList.Count; i23465++) { IDataExtRet DataExtRet = VendorCreditRet.DataExtRetList.GetAt(i23465); //Get value of OwnerID if (DataExtRet.OwnerID != null) { string OwnerID23466 = (string)DataExtRet.OwnerID.GetValue(); } //Get value of DataExtName string DataExtName23467 = (string)DataExtRet.DataExtName.GetValue(); //Get value of DataExtType ENDataExtType DataExtType23468 = (ENDataExtType)DataExtRet.DataExtType.GetValue(); //Get value of DataExtValue string DataExtValue23469 = (string)DataExtRet.DataExtValue.GetValue(); } } } } } |