Adds a sales rep. The sales representative must be on the Employee, Vendor, or Other Names list within QuickBooks. Sales representative’s names and initials appear on the Rep drop-down list on QuickBooks sales forms. A SalesRepRef refers to a person on the SalesRep list. In a request, if a SalesRepRef aggregate includes both FullName and ListID, FullName will be ignored.
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 | <?xml version="1.0" encoding="utf-8"?> <?qbxml version="17.0"?> <QBXML> <QBXMLMsgsRq onError="stopOnError"> <SalesRepAddRq> <SalesRepAdd> <!-- required --> <Initial >STRTYPE</Initial> <!-- required --> <IsActive >BOOLTYPE</IsActive> <!-- optional --> <SalesRepEntityRef> <!-- required --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesRepEntityRef> </SalesRepAdd> <IncludeRetElement >STRTYPE</IncludeRetElement> <!-- optional, may repeat --> </SalesRepAddRq> <SalesRepAddRs statusCode="INTTYPE" statusSeverity="STRTYPE" statusMessage="STRTYPE"> <SalesRepRet> <!-- optional --> <ListID >IDTYPE</ListID> <!-- required --> <TimeCreated >DATETIMETYPE</TimeCreated> <!-- required --> <TimeModified >DATETIMETYPE</TimeModified> <!-- required --> <EditSequence >STRTYPE</EditSequence> <!-- required --> <Initial >STRTYPE</Initial> <!-- required --> <IsActive >BOOLTYPE</IsActive> <!-- optional --> <SalesRepEntityRef> <!-- required --> <ListID >IDTYPE</ListID> <!-- optional --> <FullName >STRTYPE</FullName> <!-- optional --> </SalesRepEntityRef> </SalesRepRet> <ErrorRecovery> <!-- optional --> <!-- BEGIN OR --> <ListID >IDTYPE</ListID> <!-- optional --> <!-- OR --> <OwnerID >GUIDTYPE</OwnerID> <!-- optional --> <!-- OR --> <TxnID >IDTYPE</TxnID> <!-- optional --> <!-- END OR --> <TxnNumber >INTTYPE</TxnNumber> <!-- optional --> <EditSequence >STRTYPE</EditSequence> <!-- optional --> <ExternalGUID >GUIDTYPE</ExternalGUID> <!-- optional --> </ErrorRecovery> </SalesRepAddRs> </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 | '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 DoSalesRepAdd()
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
BuildSalesRepAddRq(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
WalkSalesRepAddRs(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 BuildSalesRepAddRq(requestMsgSet as IMsgSetRequest)
Dim SalesRepAddRq as ISalesRepAdd
SalesRepAddRq= requestMsgSet.AppendSalesRepAddRq()
'Set field value for Initial
SalesRepAddRq.Initial.SetValue("ab")
'Set field value for IsActive
SalesRepAddRq.IsActive.SetValue(True)
'Set field value for ListID
SalesRepAddRq.SalesRepEntityRef.ListID.SetValue("200000-1011023419")
'Set field value for FullName
SalesRepAddRq.SalesRepEntityRef.FullName.SetValue("ab")
'Set field value for IncludeRetElementList
'May create more than one of these if needed
SalesRepAddRq.IncludeRetElementList.Add("ab")
End Sub
Public Sub WalkSalesRepAddRs( 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.rtSalesRepAddRs) then
'upcast to more specific type here, this is safe because we checked with response.Type check above
Dim SalesRepRet as ISalesRepRet
SalesRepRet = CType(response.Detail,ISalesRepRet)
WalkSalesRepRet(SalesRepRet)
End If
End If
End If
Next j
End Sub
Public Sub WalkSalesRepRet(SalesRepRet as ISalesRepRet)
if (SalesRepRet is nothing) then
Exit Sub
End If
'Go through all the elements of ISalesRepRet
'Get value of ListID
Dim ListID21497 as String
ListID21497 = SalesRepRet.ListID.GetValue()
'Get value of TimeCreated
Dim TimeCreated21498 as DateTime
TimeCreated21498 = SalesRepRet.TimeCreated.GetValue()
'Get value of TimeModified
Dim TimeModified21499 as DateTime
TimeModified21499 = SalesRepRet.TimeModified.GetValue()
'Get value of EditSequence
Dim EditSequence216.0 as String
EditSequence216.0 = SalesRepRet.EditSequence.GetValue()
'Get value of Initial
Dim Initial21501 as String
Initial21501 = SalesRepRet.Initial.GetValue()
'Get value of IsActive
if ( not SalesRepRet.IsActive is nothing) then
Dim IsActive21502 as Boolean
IsActive21502 = SalesRepRet.IsActive.GetValue()
End If
'Get value of ListID
if ( not SalesRepRet.SalesRepEntityRef.ListID is nothing) then
Dim ListID21503 as String
ListID21503 = SalesRepRet.SalesRepEntityRef.ListID.GetValue()
End If
'Get value of FullName
if ( not SalesRepRet.SalesRepEntityRef.FullName is nothing) then
Dim FullName21504 as String
FullName21504 = SalesRepRet.SalesRepEntityRef.FullName.GetValue()
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 | //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 DoSalesRepAdd() { 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; BuildSalesRepAddRq(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; WalkSalesRepAddRs(responseMsgSet); } catch (Exception e) { MessageBox.Show(e.Message, "Error"); if (sessionBegun) { sessionManager.EndSession(); } if (connectionOpen) { sessionManager.CloseConnection(); } } } void BuildSalesRepAddRq(IMsgSetRequest requestMsgSet) { ISalesRepAdd SalesRepAddRq= requestMsgSet.AppendSalesRepAddRq(); //Set field value for Initial SalesRepAddRq.Initial.SetValue("ab"); //Set field value for IsActive SalesRepAddRq.IsActive.SetValue(true); //Set field value for ListID SalesRepAddRq.SalesRepEntityRef.ListID.SetValue("200000-1011023419"); //Set field value for FullName SalesRepAddRq.SalesRepEntityRef.FullName.SetValue("ab"); //Set field value for IncludeRetElementList //May create more than one of these if needed SalesRepAddRq.IncludeRetElementList.Add("ab"); } void WalkSalesRepAddRs(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.rtSalesRepAddRs) { //upcast to more specific type here, this is safe because we checked with response.Type check above ISalesRepRet SalesRepRet = (ISalesRepRet)response.Detail; WalkSalesRepRet(SalesRepRet); } } } } } void WalkSalesRepRet(ISalesRepRet SalesRepRet) { if (SalesRepRet == null) return; //Go through all the elements of ISalesRepRet //Get value of ListID string ListID21489 = (string)SalesRepRet.ListID.GetValue(); //Get value of TimeCreated DateTime TimeCreated21490 = (DateTime)SalesRepRet.TimeCreated.GetValue(); //Get value of TimeModified DateTime TimeModified21491 = (DateTime)SalesRepRet.TimeModified.GetValue(); //Get value of EditSequence string EditSequence21492 = (string)SalesRepRet.EditSequence.GetValue(); //Get value of Initial string Initial21493 = (string)SalesRepRet.Initial.GetValue(); //Get value of IsActive if (SalesRepRet.IsActive != null) { bool IsActive21494 = (bool)SalesRepRet.IsActive.GetValue(); } //Get value of ListID if (SalesRepRet.SalesRepEntityRef.ListID != null) { string ListID21495 = (string)SalesRepRet.SalesRepEntityRef.ListID.GetValue(); } //Get value of FullName if (SalesRepRet.SalesRepEntityRef.FullName != null) { string FullName21496 = (string)SalesRepRet.SalesRepEntityRef.FullName.GetValue(); } } } } |