Adds a tax category to the QBPOS company. In the QBPOS UI, you specify sales tax behavior by creating sales tax locations and tax codes. (What the QBPOS UI calls a “tax location” is what the SDK calls a “tax category”.) The tax code and its name is shared between all tax categories (locations): that is, all tax categories will have the same set of tax codes. However, the actual tax rate(s) that are used in a given tax code can vary from one tax category to the next. The tax code rates that are actually applied at transaction time are those that are in the tax category that is currently specified as the default tax category (location) in sales tax preferences. You create and modify tax categories and tax codes using the TaxCategoryAdd/Mod and TaxCodeAdd/Mod requests respectively. You assign tax code rates to a tax code within a tax category using the TaxRecordMod request. You query for the tax preference information (tax rate information for each tax code under each tax category) using the CompanyQuery. However, currently the default tax category (location) can be specified only within the QBPOS UI. When you create or modify an inventory item in QBPOS, you apply a tax code to it, but not a tax category. At sales transaction time, the actual sales tax is calculated for each item, based on the tax code assigned to that item and the tax code rate(s) for that tax code under the tax category currently specified as the default tax category (location).
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 | <?xml version="1.0" encoding="utf-8"?> <?qbposxml version="4.0"?> <QBPOSXML> <QBPOSXMLMsgsRq onError="stopOnError"> <TaxCategoryAddRq> <TaxCategoryAdd> <!-- required --> <TaxCategory >STRTYPE</TaxCategory> <!-- required --> <ShippingTaxCode >STRTYPE</ShippingTaxCode> <!-- optional --> </TaxCategoryAdd> </TaxCategoryAddRq> <TaxCategoryAddRs statusCode="INTTYPE" statusSeverity="STRTYPE" statusMessage="STRTYPE"> <TaxCategoryRet> <!-- optional --> <TaxCategoryListID >IDTYPE</TaxCategoryListID> <!-- required --> <TaxCategory >STRTYPE</TaxCategory> <!-- optional --> <ShippingTaxCode >STRTYPE</ShippingTaxCode> <!-- optional --> </TaxCategoryRet> </TaxCategoryAddRs> </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 | '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 SampleTaxCategoryAdd
Public Sub DoTaxCategoryAdd()
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
BuildTaxCategoryAddRq(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
WalkTaxCategoryAddRs(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 BuildTaxCategoryAddRq(requestMsgSet as IMsgSetRequest)
Dim TaxCategoryAddRq as ITaxCategoryAdd
TaxCategoryAddRq= requestMsgSet.AppendTaxCategoryAddRq()
'Set field value for TaxCategory
TaxCategoryAddRq.TaxCategory.SetValue("ab")
'Set field value for ShippingTaxCode
TaxCategoryAddRq.ShippingTaxCode.SetValue("ab")
End Sub
Public Sub WalkTaxCategoryAddRs( 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.rtTaxCategoryAddRs) then
'upcast to more specific type here, this is safe because we checked with response.Type check above
Dim TaxCategoryRet as ITaxCategoryRet
TaxCategoryRet = CType(response.Detail,ITaxCategoryRet)
WalkTaxCategoryRet(TaxCategoryRet)
End If
End If
End If
Next j
End Sub
Public Sub WalkTaxCategoryRet(TaxCategoryRet as ITaxCategoryRet)
if (TaxCategoryRet is nothing) then
Exit Sub
End If
'Go through all the elements of ITaxCategoryRet
'Get value of TaxCategoryListID
Dim TaxCategoryListID4177 as String
TaxCategoryListID4177 = TaxCategoryRet.TaxCategoryListID.GetValue()
'Get value of TaxCategory
if ( not TaxCategoryRet.TaxCategory is nothing) then
Dim TaxCategory4178 as String
TaxCategory4178 = TaxCategoryRet.TaxCategory.GetValue()
End If
'Get value of ShippingTaxCode
if ( not TaxCategoryRet.ShippingTaxCode is nothing) then
Dim ShippingTaxCode4179 as String
ShippingTaxCode4179 = TaxCategoryRet.ShippingTaxCode.GetValue()
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 | //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 SampleTaxCategoryAdd { public void DoTaxCategoryAdd() { 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; BuildTaxCategoryAddRq(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; WalkTaxCategoryAddRs(responseMsgSet); } catch (Exception e) { MessageBox.Show(e.Message, "Error"); if (sessionBegun) { sessionManager.EndSession(); } if (connectionOpen) { sessionManager.CloseConnection(); } } } void BuildTaxCategoryAddRq(IMsgSetRequest requestMsgSet) { ITaxCategoryAdd TaxCategoryAddRq= requestMsgSet.AppendTaxCategoryAddRq(); //Set field value for TaxCategory TaxCategoryAddRq.TaxCategory.SetValue("ab"); //Set field value for ShippingTaxCode TaxCategoryAddRq.ShippingTaxCode.SetValue("ab"); } void WalkTaxCategoryAddRs(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.rtTaxCategoryAddRs) { //upcast to more specific type here, this is safe because we checked with response.Type check above ITaxCategoryRet TaxCategoryRet = (ITaxCategoryRet)response.Detail; WalkTaxCategoryRet(TaxCategoryRet); } } } } } void WalkTaxCategoryRet(ITaxCategoryRet TaxCategoryRet) { if (TaxCategoryRet == null) return; //Go through all the elements of ITaxCategoryRet //Get value of TaxCategoryListID string TaxCategoryListID4180 = (string)TaxCategoryRet.TaxCategoryListID.GetValue(); //Get value of TaxCategory if (TaxCategoryRet.TaxCategory != null) { string TaxCategory4181 = (string)TaxCategoryRet.TaxCategory.GetValue(); } //Get value of ShippingTaxCode if (TaxCategoryRet.ShippingTaxCode != null) { string ShippingTaxCode4182 = (string)TaxCategoryRet.ShippingTaxCode.GetValue(); } } } } |