This request can only be invoked if a data extension definition has already been added to the target object (for example, the customer John Henry) by a DataExtDefAdd or by the user specifying a custom field value for that object via the QuickBooks UI. If you want to clear the data extension value (to make the custom field or private extension blank), you must use DataExtDel. The DataExtMod request cannot be used to clear the field. Both DataExtAdd and DataExtMod cause a Modify event to be generated for the parent object. For example invoking one of these on a Customer causes a Customer Modify event. The Time Modified value for that parent object is also updated. Notice that the Mod operation does not support macros like DataExtAdd does.
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 | <?xml version="1.0" encoding="utf-8"?> <?qbposxml version="4.0"?> <QBPOSXML> <QBPOSXMLMsgsRq onError="stopOnError"> <DataExtModRq> <DataExtMod> <!-- required --> <OwnerID >GUIDTYPE</OwnerID> <!-- required --> <DataExtName >STRTYPE</DataExtName> <!-- required --> <!-- BEGIN OR --> <!-- ListDataExtType may have one of the following values: Department, Customer, Vendor, Employee, ItemInventory, SalesReceipt, Voucher, InventoryQtyAdjustment, InventoryCostAdjustment, TransferSlip, SalesOrder, PurchaseOrder, TimeEntry --> <ListDataExtType >ENUMTYPE</ListDataExtType> <!-- required --> <ListObjRef> <!-- required --> <ListID >IDTYPE</ListID> <!-- required --> </ListObjRef> <!-- OR --> <!-- OtherDataExtType may have one of the following values: Company --> <OtherDataExtType >ENUMTYPE</OtherDataExtType> <!-- optional --> <!-- END OR --> <DataExtValue >STRTYPE</DataExtValue> <!-- required --> </DataExtMod> </DataExtModRq> <DataExtModRs statusCode="INTTYPE" statusSeverity="STRTYPE" statusMessage="STRTYPE"> <DataExtRet> <!-- optional --> <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> </DataExtModRs> </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 | '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 SampleDataExtMod
Public Sub DoDataExtMod()
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
BuildDataExtModRq(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
WalkDataExtModRs(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 BuildDataExtModRq(requestMsgSet as IMsgSetRequest)
Dim DataExtModRq as IDataExtMod
DataExtModRq= requestMsgSet.AppendDataExtModRq()
'Set field value for OwnerID
DataExtModRq.OwnerID.SetValue(System.Guid.NewGuid().ToString())
'Set field value for DataExtName
DataExtModRq.DataExtName.SetValue("ab")
Dim ORDataExtOwnerElementType593 as String
ORDataExtOwnerElementType593 = "ListDataExt"
if (ORDataExtOwnerElementType593 = "ListDataExt") then
'Set field value for ListDataExtType
DataExtModRq.ORDataExtOwner.ListDataExt.ListDataExtType.SetValue(ENListDataExtType.ldetDepartment)
'Set field value for ListID
DataExtModRq.ORDataExtOwner.ListDataExt.ListObjRef.ListID.SetValue("200000-1011023419")
End If
if (ORDataExtOwnerElementType593 = "OtherDataExtType") then
'Set field value for OtherDataExtType
DataExtModRq.ORDataExtOwner.OtherDataExtType.SetValue(ENOtherDataExtType.odetCompany)
End If
'Set field value for DataExtValue
DataExtModRq.DataExtValue.SetValue("ab")
End Sub
Public Sub WalkDataExtModRs( 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.rtDataExtModRs) then
'upcast to more specific type here, this is safe because we checked with response.Type check above
Dim DataExtRet as IDataExtRet
DataExtRet = CType(response.Detail,IDataExtRet)
WalkDataExtRet(DataExtRet)
End If
End If
End If
Next j
End Sub
Public Sub WalkDataExtRet(DataExtRet as IDataExtRet)
if (DataExtRet is nothing) then
Exit Sub
End If
'Go through all the elements of IDataExtRet
'Get value of OwnerID
Dim OwnerID594 as String
OwnerID594 = DataExtRet.OwnerID.GetValue()
'Get value of DataExtName
Dim DataExtName595 as String
DataExtName595 = DataExtRet.DataExtName.GetValue()
'Get value of DataExtType
Dim DataExtType596 as ENDataExtType
DataExtType596 = DataExtRet.DataExtType.GetValue()
'Get value of DataExtValue
Dim DataExtValue597 as String
DataExtValue597 = DataExtRet.DataExtValue.GetValue()
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 | //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 SampleDataExtMod { public void DoDataExtMod() { 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; BuildDataExtModRq(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; WalkDataExtModRs(responseMsgSet); } catch (Exception e) { MessageBox.Show(e.Message, "Error"); if (sessionBegun) { sessionManager.EndSession(); } if (connectionOpen) { sessionManager.CloseConnection(); } } } void BuildDataExtModRq(IMsgSetRequest requestMsgSet) { IDataExtMod DataExtModRq= requestMsgSet.AppendDataExtModRq(); //Set field value for OwnerID DataExtModRq.OwnerID.SetValue(Guid.NewGuid().ToString()); //Set field value for DataExtName DataExtModRq.DataExtName.SetValue("ab"); string ORDataExtOwnerElementType598 = "ListDataExt"; if (ORDataExtOwnerElementType598 == "ListDataExt") { //Set field value for ListDataExtType DataExtModRq.ORDataExtOwner.ListDataExt.ListDataExtType.SetValue(ENListDataExtType.ldetDepartment); //Set field value for ListID DataExtModRq.ORDataExtOwner.ListDataExt.ListObjRef.ListID.SetValue("200000-1011023419"); } if (ORDataExtOwnerElementType598 == "OtherDataExtType") { //Set field value for OtherDataExtType DataExtModRq.ORDataExtOwner.OtherDataExtType.SetValue(ENOtherDataExtType.odetCompany); } //Set field value for DataExtValue DataExtModRq.DataExtValue.SetValue("ab"); } void WalkDataExtModRs(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.rtDataExtModRs) { //upcast to more specific type here, this is safe because we checked with response.Type check above IDataExtRet DataExtRet = (IDataExtRet)response.Detail; WalkDataExtRet(DataExtRet); } } } } } void WalkDataExtRet(IDataExtRet DataExtRet) { if (DataExtRet == null) return; //Go through all the elements of IDataExtRet //Get value of OwnerID string OwnerID599 = (string)DataExtRet.OwnerID.GetValue(); //Get value of DataExtName string DataExtName600 = (string)DataExtRet.DataExtName.GetValue(); //Get value of DataExtType ENDataExtType DataExtType601 = (ENDataExtType)DataExtRet.DataExtType.GetValue(); //Get value of DataExtValue string DataExtValue602 = (string)DataExtRet.DataExtValue.GetValue(); } } } |