Queries for the specified other charge item or set of items.
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 | <?xml version="1.0" encoding="utf-8"?> <?qbxml version="17.0"?> <QBXML> <QBXMLMsgsRq onError="stopOnError"> <ItemOtherChargeQueryRq metaData="ENUMTYPE" iterator="ENUMTYPE" iteratorID="UUIDTYPE"> <!-- BEGIN OR --> <ListID >IDTYPE</ListID> <!-- optional, may repeat --> <!-- OR --> <FullName >STRTYPE</FullName> <!-- optional, may repeat --> <!-- OR --> <MaxReturned >INTTYPE</MaxReturned> <!-- optional --> <!-- ActiveStatus may have one of the following values: ActiveOnly [DEFAULT], InactiveOnly, All --> <ActiveStatus >ENUMTYPE</ActiveStatus> <!-- optional --> <FromModifiedDate >DATETIMETYPE</FromModifiedDate> <!-- optional --> <ToModifiedDate >DATETIMETYPE</ToModifiedDate> <!-- optional --> <!-- BEGIN OR --> <NameFilter> <!-- optional --> <!-- MatchCriterion may have one of the following values: StartsWith, Contains, EndsWith --> <MatchCriterion >ENUMTYPE</MatchCriterion> <!-- required --> <Name >STRTYPE</Name> <!-- required --> </NameFilter> <!-- OR --> <NameRangeFilter> <!-- optional --> <FromName >STRTYPE</FromName> <!-- optional --> <ToName >STRTYPE</ToName> <!-- optional --> </NameRangeFilter> <!-- END OR --> <ClassFilter> <!-- optional --> <!-- BEGIN OR --> <ListID >IDTYPE</ListID> <!-- optional, may repeat --> <!-- OR --> <FullName >STRTYPE</FullName> <!-- optional, may repeat --> <!-- OR --> <ListIDWithChildren >IDTYPE</ListIDWithChildren> <!-- optional --> <!-- OR --> <FullNameWithChildren >STRTYPE</FullNameWithChildren> <!-- optional --> <!-- END OR --> </ClassFilter> <!-- END OR --> <IncludeRetElement >STRTYPE</IncludeRetElement> <!-- optional, may repeat --> <OwnerID >GUIDTYPE</OwnerID> <!-- optional, may repeat --> </ItemOtherChargeQueryRq> <ItemOtherChargeQueryRs statusCode="INTTYPE" statusSeverity="STRTYPE" statusMessage="STRTYPE" retCount="INTTYPE" iteratorRemainingCount="INTTYPE" iteratorID="UUIDTYPE"> <ItemOtherChargeRet> <!-- optional, may repeat --> <ListID >IDTYPE</ListID> <!-- required --> <TimeCreated >DATETIMETYPE</TimeCreated> <!-- required --> <TimeModified >DATETIMETYPE</TimeModified> <!-- required --> <EditSequence >STRTYPE</EditSequence> <!-- required --> <Name >STRTYPE</Name> <!-- required --> <FullName >STRTYPE</FullName> <!-- required --> <BarCodeValue >STRTYPE</BarCodeValue> <!-- optional --> <IsActive >BOOLTYPE</IsActive> <!-- optional --> <ClassRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ClassRef> <ParentRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ParentRef> <Sublevel >INTTYPE</Sublevel> <!-- required --> <IsTaxIncluded >BOOLTYPE</IsTaxIncluded> <!-- optional --> <SalesTaxCodeRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesTaxCodeRef> <!-- BEGIN OR --> <SalesOrPurchase> <!-- optional --> <Desc >STRTYPE</Desc> <!-- optional --> <!-- BEGIN OR --> <Price >PRICETYPE</Price> <!-- optional --> <!-- OR --> <PricePercent >PERCENTTYPE</PricePercent> <!-- optional --> <!-- END OR --> <AccountRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </AccountRef> </SalesOrPurchase> <!-- OR --> <SalesAndPurchase> <!-- optional --> <SalesDesc >STRTYPE</SalesDesc> <!-- optional --> <SalesPrice >PRICETYPE</SalesPrice> <!-- optional --> <IncomeAccountRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </IncomeAccountRef> <PurchaseDesc >STRTYPE</PurchaseDesc> <!-- optional --> <PurchaseCost >PRICETYPE</PurchaseCost> <!-- optional --> <PurchaseTaxCodeRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </PurchaseTaxCodeRef> <ExpenseAccountRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </ExpenseAccountRef> <PrefVendorRef> <!-- optional --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </PrefVendorRef> </SalesAndPurchase> <!-- END OR --> <!-- SpecialItemType may have one of the following values: FinanceCharge, ReimbursableExpenseGroup, ReimbursableExpenseSubtotal --> <SpecialItemType >ENUMTYPE</SpecialItemType> <!-- optional --> <ExternalGUID >GUIDTYPE</ExternalGUID> <!-- 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> </ItemOtherChargeRet> </ItemOtherChargeQueryRs> </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 | '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 DoItemOtherChargeQuery()
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
BuildItemOtherChargeQueryRq(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
WalkItemOtherChargeQueryRs(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 BuildItemOtherChargeQueryRq(requestMsgSet as IMsgSetRequest)
Dim ItemOtherChargeQueryRq as IItemOtherChargeQuery
ItemOtherChargeQueryRq= requestMsgSet.AppendItemOtherChargeQueryRq()
Dim ORListQueryWithOwnerIDAndClassElementType13868 as String
ORListQueryWithOwnerIDAndClassElementType13868 = "ListIDList"
if (ORListQueryWithOwnerIDAndClassElementType13868 == "ListIDList") then
'Set field value for ListIDList
'May create more than one of these if needed
ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListIDList.Add("200000-1011023419")
End If
if (ORListQueryWithOwnerIDAndClassElementType13868 == "FullNameList") then
'Set field value for FullNameList
'May create more than one of these if needed
ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.FullNameList.Add("ab")
End If
if (ORListQueryWithOwnerIDAndClassElementType13868 == "ListWithClassFilter") then
'Set field value for MaxReturned
ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.MaxReturned.SetValue(6)
'Set field value for ActiveStatus
ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ActiveStatus.SetValue(ENActiveStatus.asActiveOnly [DEFAULT])
'Set field value for FromModifiedDate
ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.FromModifiedDate.SetValue(DateTime.Parse("12/15/2007 12:15:12"),false)
'Set field value for ToModifiedDate
ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ToModifiedDate.SetValue(DateTime.Parse("12/15/2007 12:15:12"),false)
Dim ORNameFilterElementType13869 as String
ORNameFilterElementType13869 = "NameFilter"
if (ORNameFilterElementType13869 == "NameFilter") then
'Set field value for MatchCriterion
ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ORNameFilter.NameFilter.MatchCriterion.SetValue(ENMatchCriterion.mcStartsWith)
'Set field value for Name
ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ORNameFilter.NameFilter.Name.SetValue("ab")
End If
if (ORNameFilterElementType13869 == "NameRangeFilter") then
'Set field value for FromName
ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ORNameFilter.NameRangeFilter.FromName.SetValue("ab")
'Set field value for ToName
ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ORNameFilter.NameRangeFilter.ToName.SetValue("ab")
End If
Dim ORClassFilterElementType13870 as String
ORClassFilterElementType13870 = "ListIDList"
if (ORClassFilterElementType13870 == "ListIDList") then
'Set field value for ListIDList
'May create more than one of these if needed
ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ClassFilter.ORClassFilter.ListIDList.Add("200000-1011023419")
End If
if (ORClassFilterElementType13870 == "FullNameList") then
'Set field value for FullNameList
'May create more than one of these if needed
ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ClassFilter.ORClassFilter.FullNameList.Add("ab")
End If
if (ORClassFilterElementType13870 == "ListIDWithChildren") then
'Set field value for ListIDWithChildren
ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ClassFilter.ORClassFilter.ListIDWithChildren.SetValue("200000-1011023419")
End If
if (ORClassFilterElementType13870 == "FullNameWithChildren") then
'Set field value for FullNameWithChildren
ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ClassFilter.ORClassFilter.FullNameWithChildren.SetValue("ab")
End If
End If
'Set field value for IncludeRetElementList
'May create more than one of these if needed
ItemOtherChargeQueryRq.IncludeRetElementList.Add("ab")
'Set field value for OwnerIDList
'May create more than one of these if needed
ItemOtherChargeQueryRq.OwnerIDList.Add(System.Guid.NewGuid().ToString())
End Sub
Public Sub WalkItemOtherChargeQueryRs( 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.rtItemOtherChargeQueryRs) then
'upcast to more specific type here, this is safe because we checked with response.Type check above
Dim ItemOtherChargeRet as IItemOtherChargeRetList
ItemOtherChargeRet = CType(response.Detail,IItemOtherChargeRetList)
WalkItemOtherChargeRet(ItemOtherChargeRet)
End If
End If
End If
Next j
End Sub
Public Sub WalkItemOtherChargeRet(ItemOtherChargeRet as IItemOtherChargeRetList)
if (ItemOtherChargeRet is nothing) then
Exit Sub
End If
'Go through all the elements of IItemOtherChargeRetList
'Get value of ListID
Dim ListID13871 as String
ListID13871 = ItemOtherChargeRet.ListID.GetValue()
'Get value of TimeCreated
Dim TimeCreated13872 as DateTime
TimeCreated13872 = ItemOtherChargeRet.TimeCreated.GetValue()
'Get value of TimeModified
Dim TimeModified13873 as DateTime
TimeModified13873 = ItemOtherChargeRet.TimeModified.GetValue()
'Get value of EditSequence
Dim EditSequence13874 as String
EditSequence13874 = ItemOtherChargeRet.EditSequence.GetValue()
'Get value of Name
Dim Name13875 as String
Name13875 = ItemOtherChargeRet.Name.GetValue()
'Get value of FullName
Dim FullName13876 as String
FullName13876 = ItemOtherChargeRet.FullName.GetValue()
'Get value of BarCodeValue
if ( not ItemOtherChargeRet.BarCodeValue is nothing) then
Dim BarCodeValue13877 as String
BarCodeValue13877 = ItemOtherChargeRet.BarCodeValue.GetValue()
End If
'Get value of IsActive
if ( not ItemOtherChargeRet.IsActive is nothing) then
Dim IsActive13878 as Boolean
IsActive13878 = ItemOtherChargeRet.IsActive.GetValue()
End If
if (not ItemOtherChargeRet.ClassRef. is nothing) then
'Get value of ListID
if ( not ItemOtherChargeRet.ClassRef.ListID is nothing) then
Dim ListID13879 as String
ListID13879 = ItemOtherChargeRet.ClassRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemOtherChargeRet.ClassRef.FullName is nothing) then
Dim FullName13880 as String
FullName13880 = ItemOtherChargeRet.ClassRef.FullName.GetValue()
End If
End If
if (not ItemOtherChargeRet.ParentRef. is nothing) then
'Get value of ListID
if ( not ItemOtherChargeRet.ParentRef.ListID is nothing) then
Dim ListID13881 as String
ListID13881 = ItemOtherChargeRet.ParentRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemOtherChargeRet.ParentRef.FullName is nothing) then
Dim FullName13882 as String
FullName13882 = ItemOtherChargeRet.ParentRef.FullName.GetValue()
End If
End If
'Get value of Sublevel
Dim Sublevel13883 as Integer
Sublevel13883 = ItemOtherChargeRet.Sublevel.GetValue()
'Get value of IsTaxIncluded
if ( not ItemOtherChargeRet.IsTaxIncluded is nothing) then
Dim IsTaxIncluded13884 as Boolean
IsTaxIncluded13884 = ItemOtherChargeRet.IsTaxIncluded.GetValue()
End If
if (not ItemOtherChargeRet.SalesTaxCodeRef. is nothing) then
'Get value of ListID
if ( not ItemOtherChargeRet.SalesTaxCodeRef.ListID is nothing) then
Dim ListID13885 as String
ListID13885 = ItemOtherChargeRet.SalesTaxCodeRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemOtherChargeRet.SalesTaxCodeRef.FullName is nothing) then
Dim FullName13886 as String
FullName13886 = ItemOtherChargeRet.SalesTaxCodeRef.FullName.GetValue()
End If
End If
if (not ItemOtherChargeRet.ORSalesPurchase is nothing) then
if (not ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase is nothing) then
if (not ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase. is nothing) then
'Get value of Desc
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.Desc is nothing) then
Dim Desc13888 as String
Desc13888 = ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.Desc.GetValue()
End If
if (not ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.ORPrice is nothing) then
if (not ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.ORPrice.Price is nothing) then
'Get value of Price
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.ORPrice.Price is nothing) then
Dim Price13890 as Double
Price13890 = ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.ORPrice.Price.GetValue()
End If
End If
if (not ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.ORPrice.PricePercent is nothing) then
'Get value of PricePercent
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.ORPrice.PricePercent is nothing) then
Dim PricePercent13891 as Double
PricePercent13891 = ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.ORPrice.PricePercent.GetValue()
End If
End If
End If
if (not ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.AccountRef. is nothing) then
'Get value of ListID
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.AccountRef.ListID is nothing) then
Dim ListID13892 as String
ListID13892 = ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.AccountRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.AccountRef.FullName is nothing) then
Dim FullName13893 as String
FullName13893 = ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.AccountRef.FullName.GetValue()
End If
End If
End If
End If
if (not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase is nothing) then
if (not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase. is nothing) then
'Get value of SalesDesc
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.SalesDesc is nothing) then
Dim SalesDesc13894 as String
SalesDesc13894 = ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.SalesDesc.GetValue()
End If
'Get value of SalesPrice
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.SalesPrice is nothing) then
Dim SalesPrice13895 as Double
SalesPrice13895 = ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.SalesPrice.GetValue()
End If
if (not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.IncomeAccountRef. is nothing) then
'Get value of ListID
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.IncomeAccountRef.ListID is nothing) then
Dim ListID13896 as String
ListID13896 = ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.IncomeAccountRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.IncomeAccountRef.FullName is nothing) then
Dim FullName13897 as String
FullName13897 = ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.IncomeAccountRef.FullName.GetValue()
End If
End If
'Get value of PurchaseDesc
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseDesc is nothing) then
Dim PurchaseDesc13898 as String
PurchaseDesc13898 = ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseDesc.GetValue()
End If
'Get value of PurchaseCost
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseCost is nothing) then
Dim PurchaseCost13899 as Double
PurchaseCost13899 = ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseCost.GetValue()
End If
if (not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseTaxCodeRef. is nothing) then
'Get value of ListID
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseTaxCodeRef.ListID is nothing) then
Dim ListID13900 as String
ListID13900 = ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseTaxCodeRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseTaxCodeRef.FullName is nothing) then
Dim FullName13901 as String
FullName13901 = ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseTaxCodeRef.FullName.GetValue()
End If
End If
if (not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.ExpenseAccountRef. is nothing) then
'Get value of ListID
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.ExpenseAccountRef.ListID is nothing) then
Dim ListID13902 as String
ListID13902 = ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.ExpenseAccountRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.ExpenseAccountRef.FullName is nothing) then
Dim FullName13903 as String
FullName13903 = ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.ExpenseAccountRef.FullName.GetValue()
End If
End If
if (not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PrefVendorRef. is nothing) then
'Get value of ListID
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PrefVendorRef.ListID is nothing) then
Dim ListID13904 as String
ListID13904 = ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PrefVendorRef.ListID.GetValue()
End If
'Get value of FullName
if ( not ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PrefVendorRef.FullName is nothing) then
Dim FullName13905 as String
FullName13905 = ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PrefVendorRef.FullName.GetValue()
End If
End If
End If
End If
End If
'Get value of SpecialItemType
if ( not ItemOtherChargeRet.SpecialItemType is nothing) then
Dim SpecialItemType13906 as ENSpecialItemType
SpecialItemType13906 = ItemOtherChargeRet.SpecialItemType.GetValue()
End If
'Get value of ExternalGUID
if ( not ItemOtherChargeRet.ExternalGUID is nothing) then
Dim ExternalGUID13907 as String
ExternalGUID13907 = ItemOtherChargeRet.ExternalGUID.GetValue()
End If
if (not ItemOtherChargeRet.DataExtRetList is nothing)
Dim i13908 as Integer
for i13908 = 0 to ItemOtherChargeRet.DataExtRetList.Count - 1
Dim DataExtRet as IDataExtRet
DataExtRet = ItemOtherChargeRet.DataExtRetList.GetAt(i13908)
'Get value of OwnerID
if ( not DataExtRetOwnerID is nothing) then
Dim OwnerID13909 as String
OwnerID13909 = DataExtRetOwnerID.GetValue()
End If
'Get value of DataExtName
Dim DataExtName13910 as String
DataExtName13910 = DataExtRetDataExtName.GetValue()
'Get value of DataExtType
Dim DataExtType13911 as ENDataExtType
DataExtType13911 = DataExtRetDataExtType.GetValue()
'Get value of DataExtValue
Dim DataExtValue13912 as String
DataExtValue13912 = DataExtRetDataExtValue.GetValue()
Next i13908
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 | //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 DoItemOtherChargeQuery() { 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; BuildItemOtherChargeQueryRq(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; WalkItemOtherChargeQueryRs(responseMsgSet); } catch (Exception e) { MessageBox.Show(e.Message, "Error"); if (sessionBegun) { sessionManager.EndSession(); } if (connectionOpen) { sessionManager.CloseConnection(); } } } void BuildItemOtherChargeQueryRq(IMsgSetRequest requestMsgSet) { IItemOtherChargeQuery ItemOtherChargeQueryRq= requestMsgSet.AppendItemOtherChargeQueryRq(); //Set attributes //Set field value for metaData ItemOtherChargeQueryRq.metaData.SetValue("IQBENmetaDataType"); //Set field value for iterator ItemOtherChargeQueryRq.iterator.SetValue("IQBENiteratorType"); //Set field value for iteratorID ItemOtherChargeQueryRq.iteratorID.SetValue("IQBUUIDType"); string ORListQueryWithOwnerIDAndClassElementType13823 = "ListIDList"; if (ORListQueryWithOwnerIDAndClassElementType13823 == "ListIDList") { //Set field value for ListIDList //May create more than one of these if needed ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListIDList.Add("200000-1011023419"); } if (ORListQueryWithOwnerIDAndClassElementType13823 == "FullNameList") { //Set field value for FullNameList //May create more than one of these if needed ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.FullNameList.Add("ab"); } if (ORListQueryWithOwnerIDAndClassElementType13823 == "ListWithClassFilter") { //Set field value for MaxReturned ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.MaxReturned.SetValue(6); //Set field value for ActiveStatus ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ActiveStatus.SetValue(ENActiveStatus.asActiveOnly [DEFAULT]); //Set field value for FromModifiedDate ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.FromModifiedDate.SetValue(DateTime.Parse("12/15/2007 12:15:12"),false); //Set field value for ToModifiedDate ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ToModifiedDate.SetValue(DateTime.Parse("12/15/2007 12:15:12"),false); string ORNameFilterElementType13824 = "NameFilter"; if (ORNameFilterElementType13824 == "NameFilter") { //Set field value for MatchCriterion ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ORNameFilter.NameFilter.MatchCriterion.SetValue(ENMatchCriterion.mcStartsWith); //Set field value for Name ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ORNameFilter.NameFilter.Name.SetValue("ab"); } if (ORNameFilterElementType13824 == "NameRangeFilter") { //Set field value for FromName ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ORNameFilter.NameRangeFilter.FromName.SetValue("ab"); //Set field value for ToName ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ORNameFilter.NameRangeFilter.ToName.SetValue("ab"); } string ORClassFilterElementType13825 = "ListIDList"; if (ORClassFilterElementType13825 == "ListIDList") { //Set field value for ListIDList //May create more than one of these if needed ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ClassFilter.ORClassFilter.ListIDList.Add("200000-1011023419"); } if (ORClassFilterElementType13825 == "FullNameList") { //Set field value for FullNameList //May create more than one of these if needed ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ClassFilter.ORClassFilter.FullNameList.Add("ab"); } if (ORClassFilterElementType13825 == "ListIDWithChildren") { //Set field value for ListIDWithChildren ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ClassFilter.ORClassFilter.ListIDWithChildren.SetValue("200000-1011023419"); } if (ORClassFilterElementType13825 == "FullNameWithChildren") { //Set field value for FullNameWithChildren ItemOtherChargeQueryRq.ORListQueryWithOwnerIDAndClass.ListWithClassFilter.ClassFilter.ORClassFilter.FullNameWithChildren.SetValue("ab"); } } //Set field value for IncludeRetElementList //May create more than one of these if needed ItemOtherChargeQueryRq.IncludeRetElementList.Add("ab"); //Set field value for OwnerIDList //May create more than one of these if needed ItemOtherChargeQueryRq.OwnerIDList.Add(Guid.NewGuid().ToString()); } void WalkItemOtherChargeQueryRs(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.rtItemOtherChargeQueryRs) { //upcast to more specific type here, this is safe because we checked with response.Type check above IItemOtherChargeRetList ItemOtherChargeRet = (IItemOtherChargeRetList)response.Detail; WalkItemOtherChargeRet(ItemOtherChargeRet); } } } } } void WalkItemOtherChargeRet(IItemOtherChargeRetList ItemOtherChargeRet) { if (ItemOtherChargeRet == null) return; //Go through all the elements of IItemOtherChargeRetList //Get value of ListID string ListID13826 = (string)ItemOtherChargeRet.ListID.GetValue(); //Get value of TimeCreated DateTime TimeCreated13827 = (DateTime)ItemOtherChargeRet.TimeCreated.GetValue(); //Get value of TimeModified DateTime TimeModified13828 = (DateTime)ItemOtherChargeRet.TimeModified.GetValue(); //Get value of EditSequence string EditSequence13829 = (string)ItemOtherChargeRet.EditSequence.GetValue(); //Get value of Name string Name13830 = (string)ItemOtherChargeRet.Name.GetValue(); //Get value of FullName string FullName13831 = (string)ItemOtherChargeRet.FullName.GetValue(); //Get value of BarCodeValue if (ItemOtherChargeRet.BarCodeValue != null) { string BarCodeValue13832 = (string)ItemOtherChargeRet.BarCodeValue.GetValue(); } //Get value of IsActive if (ItemOtherChargeRet.IsActive != null) { bool IsActive13833 = (bool)ItemOtherChargeRet.IsActive.GetValue(); } if (ItemOtherChargeRet.ClassRef != null) { //Get value of ListID if (ItemOtherChargeRet.ClassRef.ListID != null) { string ListID13834 = (string)ItemOtherChargeRet.ClassRef.ListID.GetValue(); } //Get value of FullName if (ItemOtherChargeRet.ClassRef.FullName != null) { string FullName13835 = (string)ItemOtherChargeRet.ClassRef.FullName.GetValue(); } } if (ItemOtherChargeRet.ParentRef != null) { //Get value of ListID if (ItemOtherChargeRet.ParentRef.ListID != null) { string ListID13836 = (string)ItemOtherChargeRet.ParentRef.ListID.GetValue(); } //Get value of FullName if (ItemOtherChargeRet.ParentRef.FullName != null) { string FullName13837 = (string)ItemOtherChargeRet.ParentRef.FullName.GetValue(); } } //Get value of Sublevel int Sublevel13838 = (int)ItemOtherChargeRet.Sublevel.GetValue(); //Get value of IsTaxIncluded if (ItemOtherChargeRet.IsTaxIncluded != null) { bool IsTaxIncluded13839 = (bool)ItemOtherChargeRet.IsTaxIncluded.GetValue(); } if (ItemOtherChargeRet.SalesTaxCodeRef != null) { //Get value of ListID if (ItemOtherChargeRet.SalesTaxCodeRef.ListID != null) { string ListID13840 = (string)ItemOtherChargeRet.SalesTaxCodeRef.ListID.GetValue(); } //Get value of FullName if (ItemOtherChargeRet.SalesTaxCodeRef.FullName != null) { string FullName13841 = (string)ItemOtherChargeRet.SalesTaxCodeRef.FullName.GetValue(); } } if (ItemOtherChargeRet.ORSalesPurchase != null) { if (ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase != null) { if (ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase != null) { //Get value of Desc if (ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.Desc != null) { string Desc13843 = (string)ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.Desc.GetValue(); } if (ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.ORPrice != null) { if (ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.ORPrice.Price != null) { //Get value of Price if (ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.ORPrice.Price != null) { double Price13845 = (double)ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.ORPrice.Price.GetValue(); } } if (ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.ORPrice.PricePercent != null) { //Get value of PricePercent if (ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.ORPrice.PricePercent != null) { double PricePercent13846 = (double)ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.ORPrice.PricePercent.GetValue(); } } } if (ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.AccountRef != null) { //Get value of ListID if (ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.AccountRef.ListID != null) { string ListID13847 = (string)ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.AccountRef.ListID.GetValue(); } //Get value of FullName if (ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.AccountRef.FullName != null) { string FullName13848 = (string)ItemOtherChargeRet.ORSalesPurchase.SalesOrPurchase.AccountRef.FullName.GetValue(); } } } } if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase != null) { if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase != null) { //Get value of SalesDesc if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.SalesDesc != null) { string SalesDesc13849 = (string)ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.SalesDesc.GetValue(); } //Get value of SalesPrice if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.SalesPrice != null) { double SalesPrice13850 = (double)ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.SalesPrice.GetValue(); } if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.IncomeAccountRef != null) { //Get value of ListID if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.IncomeAccountRef.ListID != null) { string ListID13851 = (string)ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.IncomeAccountRef.ListID.GetValue(); } //Get value of FullName if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.IncomeAccountRef.FullName != null) { string FullName13852 = (string)ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.IncomeAccountRef.FullName.GetValue(); } } //Get value of PurchaseDesc if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseDesc != null) { string PurchaseDesc13853 = (string)ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseDesc.GetValue(); } //Get value of PurchaseCost if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseCost != null) { double PurchaseCost13854 = (double)ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseCost.GetValue(); } if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseTaxCodeRef != null) { //Get value of ListID if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseTaxCodeRef.ListID != null) { string ListID13855 = (string)ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseTaxCodeRef.ListID.GetValue(); } //Get value of FullName if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseTaxCodeRef.FullName != null) { string FullName13856 = (string)ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PurchaseTaxCodeRef.FullName.GetValue(); } } if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.ExpenseAccountRef != null) { //Get value of ListID if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.ExpenseAccountRef.ListID != null) { string ListID13857 = (string)ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.ExpenseAccountRef.ListID.GetValue(); } //Get value of FullName if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.ExpenseAccountRef.FullName != null) { string FullName13858 = (string)ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.ExpenseAccountRef.FullName.GetValue(); } } if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PrefVendorRef != null) { //Get value of ListID if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PrefVendorRef.ListID != null) { string ListID13859 = (string)ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PrefVendorRef.ListID.GetValue(); } //Get value of FullName if (ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PrefVendorRef.FullName != null) { string FullName13860 = (string)ItemOtherChargeRet.ORSalesPurchase.SalesAndPurchase.PrefVendorRef.FullName.GetValue(); } } } } } //Get value of SpecialItemType if (ItemOtherChargeRet.SpecialItemType != null) { ENSpecialItemType SpecialItemType13861 = (ENSpecialItemType)ItemOtherChargeRet.SpecialItemType.GetValue(); } //Get value of ExternalGUID if (ItemOtherChargeRet.ExternalGUID != null) { string ExternalGUID13862 = (string)ItemOtherChargeRet.ExternalGUID.GetValue(); } if (ItemOtherChargeRet.DataExtRetList != null) { for (int i13863 = 0; i13863 < ItemOtherChargeRet.DataExtRetList.Count; i13863++) { IDataExtRet DataExtRet = ItemOtherChargeRet.DataExtRetList.GetAt(i13863); //Get value of OwnerID if (DataExtRet.OwnerID != null) { string OwnerID13864 = (string)DataExtRet.OwnerID.GetValue(); } //Get value of DataExtName string DataExtName13865 = (string)DataExtRet.DataExtName.GetValue(); //Get value of DataExtType ENDataExtType DataExtType13866 = (ENDataExtType)DataExtRet.DataExtType.GetValue(); //Get value of DataExtValue string DataExtValue13867 = (string)DataExtRet.DataExtValue.GetValue(); } } } } } |