PriceAdjustmentMod


Request

Response

XMLOPS

VB.NET

C#

Tag Type Max length Implementation Required

IPriceAdjustmentMod

     2.5  

TxnID

QuickBooks generates a unique TxnID for each transaction that is added to QuickBooks. A TxnID returned from a request can be used to refer to the transaction in subsequent requests. Notice that you cannot supply the TxnID of a TimeTracking transaction to TransactionQueryRq requests. If you do, you get an error stating that no such record could be found, even though the transaction is in QuickBooks. This behavior reflects the behavior in the QuicKBooks UI in the Find window.
 IQBIDType     Y

useMacro

You use a macro in a request message set if you need to create some object in one request, then refer to it in a subsequent request within that same message set. For example, you could create an inventory item and then include that item as a line item in a sales order all in one request message set, rather than create the item, query for it, then include it in a separate SalesOrderAdd request. In this latter case, you are accessing QBPOS three times, versus only once, using macros. The item to be referenced is specified via the defmacro. The actual reference to that item in the succeeding request is done via the use macro, as follows: ItemInventoryAdd defMacro=”ListID:Inv1” In the above line, you simply replace Inv1 with the name you want to give the macro. When you reference this macro in another request (one that requires that object’s listID) in the same message set, you use this syntax: ListID useMacro=”ListID:Inv1” This is covered in more detail in the Programming Guide.
 IQBStringType   2.0  

PriceAdjustmentName

Name of the price adjustment.
 IQBStringType 32 chars    

Comments

The Comment field contains a description of the transaction, for example, why a memo was issued, or why cash was paid out (receipt).
 IQBStringType 300 chars    

Associate

The employee making the adjustment transaction.
 IQBStringType 40 chars    

PriceLevelNumber

If you are giving a price level discount to this customer, rather than discount percent, you need to specify which of the four supported levels you want to apply.
 IQBENPriceLevelNumberType      

PriceAdjustmentItemModList

List of items the will be adjusted for the named price adjustment object.
 IPriceAdjustmentItemModList      

(List of IPriceAdjustmentItemMod Objects)

        

ListID

The unique ID returned by QBPOS for this object. If supplied in a request, the ListID is a reference to an object required in the request. For example, in a SalesOrder or PurchaseOrder line item, the ListID that is required is an Item list ID.
 IQBIDType      

useMacro

You use a macro in a request message set if you need to create some object in one request, then refer to it in a subsequent request within that same message set. For example, you could create an inventory item and then include that item as a line item in a sales order all in one request message set, rather than create the item, query for it, then include it in a separate SalesOrderAdd request. In this latter case, you are accessing QBPOS three times, versus only once, using macros. The item to be referenced is specified via the defmacro. The actual reference to that item in the succeeding request is done via the use macro, as follows: ItemInventoryAdd defMacro=”ListID:Inv1” In the above line, you simply replace Inv1 with the name you want to give the macro. When you reference this macro in another request (one that requires that object’s listID) in the same message set, you use this syntax: ListID useMacro=”ListID:Inv1” This is covered in more detail in the Programming Guide.
 IQBStringType   2.0  

TxnLineID

Identification number of the transaction line. (TxnLineID is supported as of v2.0 of the SDK. With qbXML v1.0 and v1.1, TxnLineID is always returned as zero.) If you need to add a new transaction line in a transaction Mod request, you can do so by setting the TxnLineID to -1.
 IQBIntType     Y

NewPrice

You must specify a new price for each inventory item being adjusted.
 IQBAmountType      

IncludeRetElementList

You can use the IncludeRetElement feature to restrict the data returned in the response to the specified qbposXML field here. If you do this, only those elements specified will be returned. To use this feature, you simply add the qbposXML element name to the IncludeRetElementList. The following example shows how to do this, specifying that only the CreatedBy and ClockOutTime elements are to be returned in the TimeEntryAdd response: Dim MyTimeEntry As ITimeEntryAdd Set MyTimeEntry = requestMsgSet.AppendTimeEntryAddRq MyTimeEntry.IncludeRetElementList.Add “CreatedBy” MyTimeEntry.IncludeRetElementList.Add “ClockOutTime” ‘ set the other properties as desired…
 IBSTRList 50 chars 2.5  
Tag Type Max length Implementation Required

IResponse

     2.5  

StatusCode

A number that corresponds to a statusSeverity and statusMessage. Five status codes relate directly to signon messages: 2000, 2010, 2020, 2030, and 2040. For details about these and other statusCode values that can be returned, see the statusCode table on the Error Codes page.
 IQBIntType     Y

StatusSeverity

One of the following values: INFO The request was completed, and the results are consistent with what your application expected. WARNING The request was completed, but the results might not be consistent with what you expected. ERROR The request was not completed. No data will appear in the server’s response after the statusMessage.
 IQBStringType     Y

StatusMessage

A user-readable explanation of the success or error condition that is indicated by the statusCode. For details about the statusMessage values that can be returned, see the “Explanation” column of the statusCode table on the Error Codes page.
 IQBStringType     Y

Detail

 IPriceAdjustmentRet      

TxnID

QuickBooks generates a unique TxnID for each transaction that is added to QuickBooks. A TxnID returned from a request can be used to refer to the transaction in subsequent requests. Notice that you cannot supply the TxnID of a TimeTracking transaction to TransactionQueryRq requests. If you do, you get an error stating that no such record could be found, even though the transaction is in QuickBooks. This behavior reflects the behavior in the QuicKBooks UI in the Find window.
 IQBIDType      

TimeCreated

The timestamp indicating the time when this object was created in QBPOS.
 IQBDateTimeType      

TimeModified

The time when the object was modified by QBPOS.
 IQBDateTimeType      

DateApplied

Date price adjustment was applied.
 IQBDateType      

DateRestored

Date price adjustment was restored to normal price.
 IQBDateType      

PriceAdjustmentName

Name of the price adjustment.
 IQBStringType 32 chars    

Comments

The Comment field contains a description of the transaction, for example, why a memo was issued, or why cash was paid out (receipt).
 IQBStringType 300 chars    

Associate

The employee making the adjustment transaction.
 IQBStringType 40 chars    

AppliedBy

The employee that applied the price adjustment.
 IQBStringType 40 chars    

RestoredBy

The employee that restored the price adjustment.
 IQBStringType 40 chars    

ItemsCount

The number of line items in the adjustment add request that added the adjustment to QBPOS.
 IQBIntType      

PriceAdjustmentStatus

PriceAdjustmentStatus may have one of the following values: Pending, Applied, Restored
 IQBENPriceAdjustmentStatusType      

PriceLevelNumber

If you are giving a price level discount to this customer, rather than discount percent, you need to specify which of the four supported levels you want to apply.
 IQBENPriceLevelNumberType      

StoreExchangeStatus

In multi store configurations, if the customer’s information has changed, this information is updated at the headquarters store. This response field indicates whether the information was successfully updated or not.
 IQBENStoreExchangeStatusType      

PriceAdjustmentItemRetList

List of items the will be adjusted for the named price adjustment object.
 IPriceAdjustmentItemRetList      

(List of IPriceAdjustmentItemRet Objects)

        

ListID

The unique ID returned by QBPOS for this object. If supplied in a request, the ListID is a reference to an object required in the request. For example, in a SalesOrder or PurchaseOrder line item, the ListID that is required is an Item list ID.
 IQBIDType      

TxnLineID

Identification number of the transaction line. (TxnLineID is supported as of v2.0 of the SDK. With qbXML v1.0 and v1.1, TxnLineID is always returned as zero.) If you need to add a new transaction line in a transaction Mod request, you can do so by setting the TxnLineID to -1.
 IQBIntType      

NewPrice

You must specify a new price for each inventory item being adjusted.
 IQBAmountType      

OldPrice

Inventory price for this item before updating this memo.
 IQBAmountType      

OldCost

Inventory cost for this item before updating this memo.
 IQBAmountType      

DataExtRetList

If you specify any custom fields/private data extensions to be returned in the query request (in the OwnerIDList), then this Ret List will contain all of the data extensions that belong to each specified OwnerID. For example, if you specify an OwnerID value of 0 (custom fields), then the query will return all custom data for the returned records.
 IDataExtRetList      

(List of IDataExtRet Objects)

        

OwnerID

OwnerID refers to the owner of a data extension, and must be 0 or a valid GUID. (Custom fields, which are visible in the QuickBooks UI, always have an OwnerID of 0. ) Usually you would keep your application’s GUID confidential to prevent other applications from accessing your data extensions. But if you want to share data extensions with another application, the applications need to use the same GUID. In this case, each application could use two GUIDs, one for shared data extensions and one for confidential data extensions. (An application can have any number of GUIDs.) When you share a data extension with another application, the other application must know both the OwnerID and the DataExtName, as these together form a data extension’s unique name.
 IQBGUIDType     Y

DataExtName

The name of the data extension. If this is a custom field, DataExtName will be visible as a label in the QuickBooks user interface. Also because OwnerID and DataExtName together make the data extension unique, and because custom fields all have the same OwnerID of zero, the DataExtName must be a unique value among existing custom fields. In contrast, the DataExtName for private data extensions must be unique only for the specified OwnerID GUID.
 IQBStringType     Y

DataExtType

b>DataExtType The type of the data extension.
 IQBENDataExtTypeType     Y

DataExtValue

The data in this field. The maximum length of DataExtValue will depend on the DataExtType of this data extension. For example, if DataExtType is STR255TYPE, the maximum length of DataExtValue is 255 characters. If DataExtType is STR1024TYPE, the maximum size of DataExtValue is 1KB.
 IQBStringType     Y 

 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
<?xml version="1.0" encoding="utf-8"?>
<?qbposxml version="4.0"?>
<QBPOSXML>
        <QBPOSXMLMsgsRq onError="stopOnError">
                <PriceAdjustmentModRq>
                        <PriceAdjustmentMod> <!-- required -->
                                <TxnID  useMacro="MACROTYPE">IDTYPE</TxnID> <!-- required -->
                                <PriceAdjustmentName >STRTYPE</PriceAdjustmentName> <!-- optional -->
                                <Comments >STRTYPE</Comments> <!-- optional -->
                                <Associate >STRTYPE</Associate> <!-- optional -->
                                <!-- PriceLevelNumber may have one of the following values: 1, 2, 3, 4, 5 -->
                                <PriceLevelNumber >ENUMTYPE</PriceLevelNumber> <!-- optional -->
                                <PriceAdjustmentItemMod> <!-- optional, may repeat -->
                                        <ListID  useMacro="MACROTYPE">IDTYPE</ListID> <!-- optional -->
                                        <TxnLineID >INTTYPE</TxnLineID> <!-- required -->
                                        <NewPrice >AMTTYPE</NewPrice> <!-- optional -->
                                </PriceAdjustmentItemMod>
                        </PriceAdjustmentMod>
                        <IncludeRetElement >STRTYPE</IncludeRetElement> <!-- optional, may repeat -->
                </PriceAdjustmentModRq>

                <PriceAdjustmentModRs statusCode="INTTYPE" statusSeverity="STRTYPE" statusMessage="STRTYPE">
                        <PriceAdjustmentRet> <!-- optional -->
                                <TxnID >IDTYPE</TxnID> <!-- optional -->
                                <TimeCreated >DATETIMETYPE</TimeCreated> <!-- optional -->
                                <TimeModified >DATETIMETYPE</TimeModified> <!-- optional -->
                                <DateApplied >DATETYPE</DateApplied> <!-- optional -->
                                <DateRestored >DATETYPE</DateRestored> <!-- optional -->
                                <PriceAdjustmentName >STRTYPE</PriceAdjustmentName> <!-- optional -->
                                <Comments >STRTYPE</Comments> <!-- optional -->
                                <Associate >STRTYPE</Associate> <!-- optional -->
                                <AppliedBy >STRTYPE</AppliedBy> <!-- optional -->
                                <RestoredBy >STRTYPE</RestoredBy> <!-- optional -->
                                <ItemsCount >INTTYPE</ItemsCount> <!-- optional -->
                                <!-- PriceAdjustmentStatus may have one of the following values: Pending, Applied, Restored -->
                                <PriceAdjustmentStatus >ENUMTYPE</PriceAdjustmentStatus> <!-- optional -->
                                <!-- PriceLevelNumber may have one of the following values: 1, 2, 3, 4, 5 -->
                                <PriceLevelNumber >ENUMTYPE</PriceLevelNumber> <!-- optional -->
                                <!-- StoreExchangeStatus may have one of the following values: Modified, Sent, Acknowledged -->
                                <StoreExchangeStatus >ENUMTYPE</StoreExchangeStatus> <!-- optional -->
                                <PriceAdjustmentItemRet> <!-- optional, may repeat -->
                                        <ListID >IDTYPE</ListID> <!-- optional -->
                                        <TxnLineID >INTTYPE</TxnLineID> <!-- optional -->
                                        <NewPrice >AMTTYPE</NewPrice> <!-- optional -->
                                        <OldPrice >AMTTYPE</OldPrice> <!-- optional -->
                                        <OldCost >AMTTYPE</OldCost> <!-- optional -->
                                </PriceAdjustmentItemRet>
                                <DataExtRet> <!-- optional, may repeat -->
                                        <OwnerID >GUIDTYPE</OwnerID> <!-- required -->
                                        <DataExtName >STRTYPE</DataExtName> <!-- required -->
                                        <!-- DataExtType may have one of the following values: INTTYPE, AMTTYPE, PRICETYPE, QUANTYPE, PERCENTTYPE, DATETIMETYPE, STR255TYPE, STR1024TYPE -->
                                        <DataExtType >ENUMTYPE</DataExtType> <!-- required -->
                                        <DataExtValue >STRTYPE</DataExtValue> <!-- required -->
                                </DataExtRet>
                        </PriceAdjustmentRet>
                </PriceAdjustmentModRs>
        </QBPOSXMLMsgsRq>
</QBPOSXML>


  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
'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.qbposfc4

        Public Class SamplePriceAdjustmentMod
                Public Sub  DoPriceAdjustmentMod()
                        Dim sessionBegun as Boolean
                        sessionBegun = False
                        Dim connectionOpen as Boolean
                        connectionOpen = False
                        Dim sessionManager as QBPOSSessionManager
                        sessionManager = nothing

                        Try
                                'Create the session Manager object
                                sessionManager = new QBPOSSessionManager

                                'Create the message set request object to hold our request
                                Dim requestMsgSet as IMsgSetRequest
                                requestMsgSet = sessionManager.CreateMsgSetRequest(4,0)
                                requestMsgSet.Attributes.OnError = ENRqOnError.roeContinue

                                BuildPriceAdjustmentModRq(requestMsgSet)

                                'Connect to QuickBooks and begin a session
                                sessionManager.OpenConnection("","Sample Code from OSR")
                                connectionOpen = True
                                sessionManager.BeginSession("")
                                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

                                WalkPriceAdjustmentModRs(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 BuildPriceAdjustmentModRq(requestMsgSet as IMsgSetRequest)
                        Dim PriceAdjustmentModRq as IPriceAdjustmentMod
                        PriceAdjustmentModRq= requestMsgSet.AppendPriceAdjustmentModRq()
                        'Set field value for TxnID
                        PriceAdjustmentModRq.TxnID.SetValue("200000-1011023419")
                        'Set attributes
                        'Set field value for TxnID to use Macro
                        PriceAdjustmentModRq.TxnID.SetValueUseMacro("200000-1011023419")
                        'Set field value for PriceAdjustmentName
                        PriceAdjustmentModRq.PriceAdjustmentName.SetValue("ab")
                        'Set field value for Comments
                        PriceAdjustmentModRq.Comments.SetValue("ab")
                        'Set field value for Associate
                        PriceAdjustmentModRq.Associate.SetValue("ab")
                        'Set field value for PriceLevelNumber
                        PriceAdjustmentModRq.PriceLevelNumber.SetValue(ENPriceLevelNumber.pln1)
                        Dim PriceAdjustmentItemMod2337 as IPriceAdjustmentItemMod
                        PriceAdjustmentItemMod2337=PriceAdjustmentModRq.PriceAdjustmentItemModList.Append()
                        'Set field value for ListID
                        PriceAdjustmentItemMod2337.ListID.SetValue("200000-1011023419")
                        'Set attributes
                        'Set field value for ListID to use Macro
                        PriceAdjustmentItemMod2337.ListID.SetValueUseMacro("200000-1011023419")
                        'Set field value for TxnLineID
                        PriceAdjustmentItemMod2337.TxnLineID.SetValue(6)
                        'Set field value for NewPrice
                        PriceAdjustmentItemMod2337.NewPrice.SetValue(10.01)
                        'Set field value for IncludeRetElementList
                        'May create more than one of these if needed
                        PriceAdjustmentModRq.IncludeRetElementList.Add("ab")
                End Sub




                Public Sub WalkPriceAdjustmentModRs( 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.rtPriceAdjustmentModRs) then
                                                        'upcast to more specific type here, this is safe because we checked with response.Type check above
                                                        Dim PriceAdjustmentRet as IPriceAdjustmentRet
                                                        PriceAdjustmentRet = CType(response.Detail,IPriceAdjustmentRet)
                                                                WalkPriceAdjustmentRet(PriceAdjustmentRet)
                                                End If
                                        End If
                                End If
                        Next j
                End Sub




                Public Sub WalkPriceAdjustmentRet(PriceAdjustmentRet as IPriceAdjustmentRet)
                        if (PriceAdjustmentRet is nothing) then
                                Exit Sub
                        End If

                        'Go through all the elements of IPriceAdjustmentRet
                        'Get value of TxnID
                        if ( not PriceAdjustmentRet.TxnID is nothing) then
                                Dim TxnID2338 as String
                                TxnID2338 = PriceAdjustmentRet.TxnID.GetValue()
                        End If
                        'Get value of TimeCreated
                        if ( not PriceAdjustmentRet.TimeCreated is nothing) then
                                Dim TimeCreated2339 as DateTime
                                TimeCreated2339 = PriceAdjustmentRet.TimeCreated.GetValue()
                        End If
                        'Get value of TimeModified
                        if ( not PriceAdjustmentRet.TimeModified is nothing) then
                                Dim TimeModified2340 as DateTime
                                TimeModified2340 = PriceAdjustmentRet.TimeModified.GetValue()
                        End If
                        'Get value of DateApplied
                        if ( not PriceAdjustmentRet.DateApplied is nothing) then
                                Dim DateApplied2341 as DateTime
                                DateApplied2341 = PriceAdjustmentRet.DateApplied.GetValue()
                        End If
                        'Get value of DateRestored
                        if ( not PriceAdjustmentRet.DateRestored is nothing) then
                                Dim DateRestored2342 as DateTime
                                DateRestored2342 = PriceAdjustmentRet.DateRestored.GetValue()
                        End If
                        'Get value of PriceAdjustmentName
                        if ( not PriceAdjustmentRet.PriceAdjustmentName is nothing) then
                                Dim PriceAdjustmentName2343 as String
                                PriceAdjustmentName2343 = PriceAdjustmentRet.PriceAdjustmentName.GetValue()
                        End If
                        'Get value of Comments
                        if ( not PriceAdjustmentRet.Comments is nothing) then
                                Dim Comments2344 as String
                                Comments2344 = PriceAdjustmentRet.Comments.GetValue()
                        End If
                        'Get value of Associate
                        if ( not PriceAdjustmentRet.Associate is nothing) then
                                Dim Associate2345 as String
                                Associate2345 = PriceAdjustmentRet.Associate.GetValue()
                        End If
                        'Get value of AppliedBy
                        if ( not PriceAdjustmentRet.AppliedBy is nothing) then
                                Dim AppliedBy2346 as String
                                AppliedBy2346 = PriceAdjustmentRet.AppliedBy.GetValue()
                        End If
                        'Get value of RestoredBy
                        if ( not PriceAdjustmentRet.RestoredBy is nothing) then
                                Dim RestoredBy2347 as String
                                RestoredBy2347 = PriceAdjustmentRet.RestoredBy.GetValue()
                        End If
                        'Get value of ItemsCount
                        if ( not PriceAdjustmentRet.ItemsCount is nothing) then
                                Dim ItemsCount2348 as Integer
                                ItemsCount2348 = PriceAdjustmentRet.ItemsCount.GetValue()
                        End If
                        'Get value of PriceAdjustmentStatus
                        if ( not PriceAdjustmentRet.PriceAdjustmentStatus is nothing) then
                                Dim PriceAdjustmentStatus2349 as ENPriceAdjustmentStatus
                                PriceAdjustmentStatus2349 = PriceAdjustmentRet.PriceAdjustmentStatus.GetValue()
                        End If
                        'Get value of PriceLevelNumber
                        if ( not PriceAdjustmentRet.PriceLevelNumber is nothing) then
                                Dim PriceLevelNumber2350 as ENPriceLevelNumber
                                PriceLevelNumber2350 = PriceAdjustmentRet.PriceLevelNumber.GetValue()
                        End If
                        'Get value of StoreExchangeStatus
                        if ( not PriceAdjustmentRet.StoreExchangeStatus is nothing) then
                                Dim StoreExchangeStatus2351 as ENStoreExchangeStatus
                                StoreExchangeStatus2351 = PriceAdjustmentRet.StoreExchangeStatus.GetValue()
                        End If
                        if (not PriceAdjustmentRet.PriceAdjustmentItemRetList is nothing)
                                Dim i2352 as Integer
                                for i2352 = 0  to PriceAdjustmentRet.PriceAdjustmentItemRetList.Count - 1
                                        Dim PriceAdjustmentItemRet as IPriceAdjustmentItemRet
                                        PriceAdjustmentItemRet = PriceAdjustmentRet.PriceAdjustmentItemRetList.GetAt(i2352)
                                        'Get value of ListID
                                        if ( not PriceAdjustmentItemRet.ListID is nothing) then
                                                Dim ListID2353 as String
                                                ListID2353 = PriceAdjustmentItemRet.ListID.GetValue()
                                        End If
                                        'Get value of TxnLineID
                                        if ( not PriceAdjustmentItemRet.TxnLineID is nothing) then
                                                Dim TxnLineID2354 as Integer
                                                TxnLineID2354 = PriceAdjustmentItemRet.TxnLineID.GetValue()
                                        End If
                                        'Get value of NewPrice
                                        if ( not PriceAdjustmentItemRet.NewPrice is nothing) then
                                                Dim NewPrice2355 as Double
                                                NewPrice2355 = PriceAdjustmentItemRet.NewPrice.GetValue()
                                        End If
                                        'Get value of OldPrice
                                        if ( not PriceAdjustmentItemRet.OldPrice is nothing) then
                                                Dim OldPrice2356 as Double
                                                OldPrice2356 = PriceAdjustmentItemRet.OldPrice.GetValue()
                                        End If
                                        'Get value of OldCost
                                        if ( not PriceAdjustmentItemRet.OldCost is nothing) then
                                                Dim OldCost2357 as Double
                                                OldCost2357 = PriceAdjustmentItemRet.OldCost.GetValue()
                                        End If
                                Next i2352
                        End If
                        if (not PriceAdjustmentRet.DataExtRetList is nothing)
                                Dim i2358 as Integer
                                for i2358 = 0  to PriceAdjustmentRet.DataExtRetList.Count - 1
                                        Dim DataExtRet as IDataExtRet
                                        DataExtRet = PriceAdjustmentRet.DataExtRetList.GetAt(i2358)
                                        'Get value of OwnerID
                                        Dim OwnerID2359 as String
                                        OwnerID2359 = DataExtRet.OwnerID.GetValue()
                                        'Get value of DataExtName
                                        Dim DataExtName2360 as String
                                        DataExtName2360 = DataExtRet.DataExtName.GetValue()
                                        'Get value of DataExtType
                                        Dim DataExtType2361 as ENDataExtType
                                        DataExtType2361 = DataExtRet.DataExtType.GetValue()
                                        'Get value of DataExtValue
                                        Dim DataExtValue2362 as String
                                        DataExtValue2362 = DataExtRet.DataExtValue.GetValue()
                                Next i2358
                        End If
                End Sub




        End Class


  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
//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.qbposfc4;

namespace com.intuit.idn.samples
{
        public class SamplePriceAdjustmentMod
        {
                public void  DoPriceAdjustmentMod()
                {
                        bool sessionBegun = false;
                        bool connectionOpen = false;
                        QBPOSSessionManager sessionManager = null;

                        try
                        {
                                //Create the session Manager object
                                sessionManager = new QBPOSSessionManager();

                                //Create the message set request object to hold our request
                                IMsgSetRequest requestMsgSet = sessionManager.CreateMsgSetRequest(4,0);
                                requestMsgSet.Attributes.OnError = ENRqOnError.roeContinue;

                                BuildPriceAdjustmentModRq(requestMsgSet);

                                //Connect to QuickBooks and begin a session
                                sessionManager.OpenConnection("","Sample Code from OSR");
                                connectionOpen = true;
                                sessionManager.BeginSession("");
                                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;

                                WalkPriceAdjustmentModRs(responseMsgSet);
                        }
                        catch (Exception e)
                        {
                                MessageBox.Show(e.Message, "Error");
                                if (sessionBegun)
                                {
                                        sessionManager.EndSession();
                                }
                                if (connectionOpen)
                                {
                                        sessionManager.CloseConnection();
                                }
                        }
                }
                void BuildPriceAdjustmentModRq(IMsgSetRequest requestMsgSet)
                {
                        IPriceAdjustmentMod PriceAdjustmentModRq= requestMsgSet.AppendPriceAdjustmentModRq();
                        //Set field value for TxnID
                        PriceAdjustmentModRq.TxnID.SetValue("200000-1011023419");
                        //Set attributes
                        //Set field value for TxnID to use Macro
                        PriceAdjustmentModRq.TxnID.SetValueUseMacro("200000-1011023419");
                        //Set field value for PriceAdjustmentName
                        PriceAdjustmentModRq.PriceAdjustmentName.SetValue("ab");
                        //Set field value for Comments
                        PriceAdjustmentModRq.Comments.SetValue("ab");
                        //Set field value for Associate
                        PriceAdjustmentModRq.Associate.SetValue("ab");
                        //Set field value for PriceLevelNumber
                        PriceAdjustmentModRq.PriceLevelNumber.SetValue(ENPriceLevelNumber.pln1);
                        IPriceAdjustmentItemMod PriceAdjustmentItemMod2363=PriceAdjustmentModRq.PriceAdjustmentItemModList.Append();
                        //Set field value for ListID
                        PriceAdjustmentItemMod2363.ListID.SetValue("200000-1011023419");
                        //Set attributes
                        //Set field value for ListID to use Macro
                        PriceAdjustmentItemMod2363.ListID.SetValueUseMacro("200000-1011023419");
                        //Set field value for TxnLineID
                        PriceAdjustmentItemMod2363.TxnLineID.SetValue(6);
                        //Set field value for NewPrice
                        PriceAdjustmentItemMod2363.NewPrice.SetValue(10.01);
                        //Set field value for IncludeRetElementList
                        //May create more than one of these if needed
                        PriceAdjustmentModRq.IncludeRetElementList.Add("ab");
                }




                void WalkPriceAdjustmentModRs(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.rtPriceAdjustmentModRs)
                                                {
                                                        //upcast to more specific type here, this is safe because we checked with response.Type check above
                                                        IPriceAdjustmentRet PriceAdjustmentRet = (IPriceAdjustmentRet)response.Detail;
                                                                WalkPriceAdjustmentRet(PriceAdjustmentRet);
                                                }
                                        }
                                }
                        }
                }




                void WalkPriceAdjustmentRet(IPriceAdjustmentRet PriceAdjustmentRet)
                {
                        if (PriceAdjustmentRet == null) return;
                        //Go through all the elements of IPriceAdjustmentRet
                        //Get value of TxnID
                        if (PriceAdjustmentRet.TxnID != null)
                        {
                                string TxnID2364 = (string)PriceAdjustmentRet.TxnID.GetValue();
                        }
                        //Get value of TimeCreated
                        if (PriceAdjustmentRet.TimeCreated != null)
                        {
                                DateTime TimeCreated2365 = (DateTime)PriceAdjustmentRet.TimeCreated.GetValue();
                        }
                        //Get value of TimeModified
                        if (PriceAdjustmentRet.TimeModified != null)
                        {
                                DateTime TimeModified2366 = (DateTime)PriceAdjustmentRet.TimeModified.GetValue();
                        }
                        //Get value of DateApplied
                        if (PriceAdjustmentRet.DateApplied != null)
                        {
                                DateTime DateApplied2367 = (DateTime)PriceAdjustmentRet.DateApplied.GetValue();
                        }
                        //Get value of DateRestored
                        if (PriceAdjustmentRet.DateRestored != null)
                        {
                                DateTime DateRestored2368 = (DateTime)PriceAdjustmentRet.DateRestored.GetValue();
                        }
                        //Get value of PriceAdjustmentName
                        if (PriceAdjustmentRet.PriceAdjustmentName != null)
                        {
                                string PriceAdjustmentName2369 = (string)PriceAdjustmentRet.PriceAdjustmentName.GetValue();
                        }
                        //Get value of Comments
                        if (PriceAdjustmentRet.Comments != null)
                        {
                                string Comments2370 = (string)PriceAdjustmentRet.Comments.GetValue();
                        }
                        //Get value of Associate
                        if (PriceAdjustmentRet.Associate != null)
                        {
                                string Associate2371 = (string)PriceAdjustmentRet.Associate.GetValue();
                        }
                        //Get value of AppliedBy
                        if (PriceAdjustmentRet.AppliedBy != null)
                        {
                                string AppliedBy2372 = (string)PriceAdjustmentRet.AppliedBy.GetValue();
                        }
                        //Get value of RestoredBy
                        if (PriceAdjustmentRet.RestoredBy != null)
                        {
                                string RestoredBy2373 = (string)PriceAdjustmentRet.RestoredBy.GetValue();
                        }
                        //Get value of ItemsCount
                        if (PriceAdjustmentRet.ItemsCount != null)
                        {
                                int ItemsCount2374 = (int)PriceAdjustmentRet.ItemsCount.GetValue();
                        }
                        //Get value of PriceAdjustmentStatus
                        if (PriceAdjustmentRet.PriceAdjustmentStatus != null)
                        {
                                ENPriceAdjustmentStatus PriceAdjustmentStatus2375 = (ENPriceAdjustmentStatus)PriceAdjustmentRet.PriceAdjustmentStatus.GetValue();
                        }
                        //Get value of PriceLevelNumber
                        if (PriceAdjustmentRet.PriceLevelNumber != null)
                        {
                                ENPriceLevelNumber PriceLevelNumber2376 = (ENPriceLevelNumber)PriceAdjustmentRet.PriceLevelNumber.GetValue();
                        }
                        //Get value of StoreExchangeStatus
                        if (PriceAdjustmentRet.StoreExchangeStatus != null)
                        {
                                ENStoreExchangeStatus StoreExchangeStatus2377 = (ENStoreExchangeStatus)PriceAdjustmentRet.StoreExchangeStatus.GetValue();
                        }
                        if (PriceAdjustmentRet.PriceAdjustmentItemRetList != null)
                        {
                                for (int i2378 = 0; i2378 < PriceAdjustmentRet.PriceAdjustmentItemRetList.Count; i2378++)
                                {
                                        IPriceAdjustmentItemRet PriceAdjustmentItemRet = PriceAdjustmentRet.PriceAdjustmentItemRetList.GetAt(i2378);
                                        //Get value of ListID
                                        if (PriceAdjustmentItemRet.ListID != null)
                                        {
                                                string ListID2379 = (string)PriceAdjustmentItemRet.ListID.GetValue();
                                        }
                                        //Get value of TxnLineID
                                        if (PriceAdjustmentItemRet.TxnLineID != null)
                                        {
                                                int TxnLineID2380 = (int)PriceAdjustmentItemRet.TxnLineID.GetValue();
                                        }
                                        //Get value of NewPrice
                                        if (PriceAdjustmentItemRet.NewPrice != null)
                                        {
                                                double NewPrice2381 = (double)PriceAdjustmentItemRet.NewPrice.GetValue();
                                        }
                                        //Get value of OldPrice
                                        if (PriceAdjustmentItemRet.OldPrice != null)
                                        {
                                                double OldPrice2382 = (double)PriceAdjustmentItemRet.OldPrice.GetValue();
                                        }
                                        //Get value of OldCost
                                        if (PriceAdjustmentItemRet.OldCost != null)
                                        {
                                                double OldCost2383 = (double)PriceAdjustmentItemRet.OldCost.GetValue();
                                        }
                                }
                        }
                        if (PriceAdjustmentRet.DataExtRetList != null)
                        {
                                for (int i2384 = 0; i2384 < PriceAdjustmentRet.DataExtRetList.Count; i2384++)
                                {
                                        IDataExtRet DataExtRet = PriceAdjustmentRet.DataExtRetList.GetAt(i2384);
                                        //Get value of OwnerID
                                        string OwnerID2385 = (string)DataExtRet.OwnerID.GetValue();
                                        //Get value of DataExtName
                                        string DataExtName2386 = (string)DataExtRet.DataExtName.GetValue();
                                        //Get value of DataExtType
                                        ENDataExtType DataExtType2387 = (ENDataExtType)DataExtRet.DataExtType.GetValue();
                                        //Get value of DataExtValue
                                        string DataExtValue2388 = (string)DataExtRet.DataExtValue.GetValue();
                                }
                        }
                }




        }
}