Solved: Purchase Order Coding

Former Member · ‎06-24-2008

Hi All,

iam developing a webservice using DI-server in my asp.net application to access my sap company DB.now i have to create a purchase order...can anybody give me some web service coding about how to create a purchase order.....(like creating new customers & updating them...)

Regads,

Shangai.

Former Member · ‎07-02-2008

Hi Shangai

Please ensure that you use the same Patch Level for the SBO client,

DI Server and the DI API.

First, to ensure you are not using cached versions of the DI Server and

the DI API, please do the following:

1. Locate the Temp folder by going to Start -> Run and type %temp%.

2. Locate the SM_OBS_DLL folder and delete it.

Then,retry the action.

Also,please check the Patch Level versions:

1. SBO Client

2. DI Server

- Start -> Run and type %temp%

- Go to that path, and in the directory SM_OBS_DLL\680320\.

- Right click on the OBSServerDLL.dll file and select Properties >

Version > Special Build Description.

3. DI API

-Go to DI API install directory. Default location:

"C:\Program Files\SAP\SAP Business One DI API\DI API 2005"

- Right click on the SAPbobsCOM2005.dll file select Properties > Version> Special Build Description.

Regards,

Syn Qin

SAP Business One Forums Team

Edited by: Syn Qin on Jul 2, 2008 3:32 AM

Former Member · ‎07-01-2008

Hi Shangai

I believe the error here is due to the account No of your default bank is not defined.

Administration->System Initialization->Company Details->Basic Initailization Tab.

Regards,

Syn Qin

SAP Business One Forums Team

Former Member · ‎06-24-2008

Hi Shangai

Below is my sample code about how to add a jornal voucher via DIServer.

You can add a purchase order in the similar way,the only thing need to be changed is

the SOAP message format.

    ' add journal voucher
    '<WebMethod()> Public Function AddJV(ByVal SessionID As String, _
    '                                    ByVal xmlJVObject As String) As Xml.XmlDocument

    <WebMethod()> Public Function AddJV(ByVal SessionID As String) As Xml.XmlDocument

        Dim n As SBODI_Server.Node
        Dim s, sCmd As String
        Dim d As Xml.XmlDocument

        d = New Xml.XmlDocument
        n = New SBODI_Server.Node


        sCmd = "<?xml version=""1.0"" encoding=""UTF-16""?> "
        sCmd += "<env:Envelope xmlns:env=""http://schemas.xmlsoap.org/soap/envelope/""> "
        sCmd += " <env:Header> "
        sCmd += "<SessionID>" & CStr(SessionID) & "</SessionID>"
        sCmd += " </env:Header> "
        sCmd += " <env:Body> "
        sCmd += "<dis:AddObject xmlns:dis=""http://www.sap.com/SBO/DIS"" > "
        sCmd += "<BOM>"
        sCmd += "<BO>"
        sCmd += "<AdmInfo>"
        sCmd += "<Object>oJournalVouchers</Object> "
        sCmd += "</AdmInfo> "
        sCmd += "<JournalEntries>"
        sCmd += "<Row>"
        sCmd += "<ReferenceDate></ReferenceDate>"
        sCmd += "<Memo>TEST</Memo>"
        sCmd += "<DueDate>20080325</DueDate>"
        sCmd += "</Row>"
        sCmd += "</JournalEntries> "
        sCmd += "<JournalEntries_Lines> "
        sCmd += "<Row>"
        sCmd += "<AccountCode>111101</AccountCode> "
        sCmd += "<Debit>100</Debit>"
        sCmd += "</Row>"
        sCmd += "<Row>"
        sCmd += "<AccountCode>111101</AccountCode>"
        sCmd += "<Credit>100</Credit>"
        sCmd += "</Row>"
        sCmd += "</JournalEntries_Lines>"
        sCmd += "</BO> "
        sCmd += "</BOM> "
        sCmd += "</dis:AddObject> "
        sCmd += " </env:Body> "
        sCmd += "</env:Envelope> "


        s = n.Interact(sCmd)
        d.LoadXml(s)
        Return (RemoveEnv(d))

    End Function

I posted the xml template format of purchase order here.


  <?xml version="1.0" encoding="utf-8" ?> 
- <BOM>
- <BO>
- <AdmInfo>
  <Object>oDocuments</Object> 
  </AdmInfo>
- <QueryParams>
  <DocEntry /> 
  </QueryParams>
- <Documents>
- <row>
  <DocNum /> 
  <DocType /> 
  <HandWritten /> 
  <Printed /> 
  <DocDate /> 
  <DocDueDate /> 
  <CardCode /> 
  <CardName /> 
  <Address /> 
  <NumAtCard /> 
  <DocCurrency /> 
  <DocRate /> 
  <DocTotal /> 
  <Reference1 /> 
  <Reference2 /> 
  <Comments /> 
  <JournalMemo /> 
  <PaymentGroupCode /> 
  <DocTime /> 
  <SalesPersonCode /> 
  <TransportationCode /> 
  <Confirmed /> 
  <ImportFileNum /> 
  <SummeryType /> 
  <ContactPersonCode /> 
  <ShowSCN /> 
  <Series /> 
  <TaxDate /> 
  <PartialSupply /> 
  <DocObjectCode /> 
  <ShipToCode /> 
  <Indicator /> 
  <FederalTaxID /> 
  <DiscountPercent /> 
  <PaymentReference /> 
  <Form1099 /> 
  <Box1099 /> 
  <RevisionPo /> 
  <RequriedDate /> 
  <CancelDate /> 
  <BlockDunning /> 
  <Pick /> 
  <PaymentMethod /> 
  <PaymentBlock /> 
  <PaymentBlockEntry /> 
  <CentralBankIndicator /> 
  <MaximumCashDiscount /> 
  <Project /> 
  <ExemptionValidityDateFrom /> 
  <ExemptionValidityDateTo /> 
  <WareHouseUpdateType /> 
  <Rounding /> 
  <ExternalCorrectedDocNum /> 
  <InternalCorrectedDocNum /> 
  <DeferredTax /> 
  <TaxExemptionLetterNum /> 
  <AgentCode /> 
  <NumberOfInstallments /> 
  <ApplyTaxOnFirstInstallment /> 
  <VatDate /> 
  <DocumentsOwner /> 
  <FolioPrefixString /> 
  <FolioNumber /> 
  <DocumentSubType /> 
  <BPChannelCode /> 
  <BPChannelContact /> 
  <Address2 /> 
  <PayToCode /> 
  <ManualNumber /> 
  <UseShpdGoodsAct /> 
  <IsPayToBank /> 
  <PayToBankCountry /> 
  <PayToBankCode /> 
  <PayToBankAccountNo /> 
  <PayToBankBranch /> 
  <BPL_IDAssignedToInvoice /> 
  <DownPayment /> 
  <LanguageCode /> 
  <TrackingNumber /> 
  <PickRemark /> 
  <ClosingDate /> 
  <SequenceCode /> 
  <SequenceSerial /> 
  <SeriesString /> 
  <SubSeriesString /> 
  <SequenceModel /> 
  <UseCorrectionVATGroup /> 
  <VatPercent /> 
  </row>
  </Documents>
- <Document_Lines>
- <row>
  <LineNum /> 
  <ItemCode /> 
  <ItemDescription /> 
  <Quantity /> 
  <ShipDate /> 
  <Price /> 
  <PriceAfterVAT /> 
  <Currency /> 
  <Rate /> 
  <DiscountPercent /> 
  <VendorNum /> 
  <SerialNum /> 
  <WarehouseCode /> 
  <SalesPersonCode /> 
  <CommisionPercent /> 
  <TreeType /> 
  <AccountCode /> 
  <UseBaseUnits /> 
  <SupplierCatNum /> 
  <CostingCode /> 
  <ProjectCode /> 
  <BarCode /> 
  <VatGroup /> 
  <Height1 /> 
  <Hight1Unit /> 
  <Height2 /> 
  <Height2Unit /> 
  <Lengh1 /> 
  <Lengh1Unit /> 
  <Lengh2 /> 
  <Lengh2Unit /> 
  <Weight1 /> 
  <Weight1Unit /> 
  <Weight2 /> 
  <Weight2Unit /> 
  <Factor1 /> 
  <Factor2 /> 
  <Factor3 /> 
  <Factor4 /> 
  <BaseType /> 
  <BaseEntry /> 
  <BaseLine /> 
  <Volume /> 
  <VolumeUnit /> 
  <Width1 /> 
  <Width1Unit /> 
  <Width2 /> 
  <Width2Unit /> 
  <Address /> 
  <TaxCode /> 
  <TaxType /> 
  <TaxLiable /> 
  <BackOrder /> 
  <FreeText /> 
  <ShippingMethod /> 
  <CorrectionInvoiceItem /> 
  <CorrInvAmountToStock /> 
  <CorrInvAmountToDiffAcct /> 
  <WTLiable /> 
  <DeferredTax /> 
  <NetTaxAmount /> 
  <NetTaxAmountFC /> 
  <LineTotal /> 
  <TaxPercentagePerRow /> 
  <ConsumerSalesForecast /> 
  <ExciseAmount /> 
  <CountryOrg /> 
  <SWW /> 
  <TransactionType /> 
  <DistributeExpense /> 
  <ShipToCode /> 
  <RowTotalFC /> 
  <CFOPCode /> 
  <CSTCode /> 
  <Usage /> 
  <TaxOnly /> 
  <UnitPrice /> 
  <LineStatus /> 
  <LineType /> 
  <COGSCostingCode /> 
  <COGSAccountCode /> 
  <ChangeAssemlyBoMWarehouse /> 
  <U_BLD_LyID /> 
  <U_BLD_NCps /> 
  </row>
  </Document_Lines>
- <Document_LinesAdditionalExpenses>
- <row>
  <LineNumber /> 
  <GroupCode /> 
  <ExpenseCode /> 
  <LineTotal /> 
  <TaxLiable /> 
  <VatGroup /> 
  <TaxPercent /> 
  <TaxSum /> 
  <DeductibleTaxSum /> 
  <TaxCode /> 
  <TaxType /> 
  <EqualizationTaxPercent /> 
  <EqualizationTaxSum /> 
  <WTLiable /> 
  <BaseGroup /> 
  </row>
  </Document_LinesAdditionalExpenses>
- <WithholdingTaxLines>
- <row>
  <WTCode /> 
  <WTAmountSys /> 
  <WTAmountFC /> 
  <WTAmount /> 
  <TaxableAmountinSys /> 
  <TaxableAmountFC /> 
  <TaxableAmount /> 
  <AppliedWTAmountSys /> 
  <AppliedWTAmountFC /> 
  <AppliedWTAmount /> 
  <BaseDocEntry /> 
  <BaseDocLine /> 
  <BaseDocType /> 
  </row>
  </WithholdingTaxLines>
- <SerialNumbers>
- <row>
  <ManufacturerSerialNumber /> 
  <InternalSerialNumber /> 
  <ExpiryDate /> 
  <ManufactureDate /> 
  <ReceptionDate /> 
  <WarrantyStart /> 
  <WarrantyEnd /> 
  <Location /> 
  <Notes /> 
  <BatchID /> 
  <SystemSerialNumber /> 
  <BaseLineNumber /> 
  </row>
  </SerialNumbers>
- <BatchNumbers>
- <row>
  <BatchNumber /> 
  <ManufacturerSerialNumber /> 
  <InternalSerialNumber /> 
  <ExpiryDate /> 
  <ManufacturingDate /> 
  <AddmisionDate /> 
  <Location /> 
  <Notes /> 
  <Quantity /> 
  <BaseLineNumber /> 
  </row>
  </BatchNumbers>
- <DocumentsAdditionalExpenses>
- <row>
  <ExpenseCode /> 
  <LineTotal /> 
  <Remarks /> 
  <DistributionMethod /> 
  <TaxLiable /> 
  <VatGroup /> 
  <TaxPercent /> 
  <TaxSum /> 
  <DeductibleTaxSum /> 
  <TaxCode /> 
  <TaxType /> 
  <EqualizationTaxPercent /> 
  <EqualizationTaxSum /> 
  <BaseDocEntry /> 
  <BaseDocLine /> 
  <BaseDocType /> 
  <LastPurchasePrice /> 
  <Stock /> 
  <WTLiable /> 
  </row>
  </DocumentsAdditionalExpenses>
- <WithholdingTaxData>
- <row>
  <WTCode /> 
  <WTAmountSys /> 
  <WTAmountFC /> 
  <WTAmount /> 
  <TaxableAmountinSys /> 
  <TaxableAmountFC /> 
  <TaxableAmount /> 
  <AppliedWTAmountSys /> 
  <AppliedWTAmountFC /> 
  <AppliedWTAmount /> 
  <BaseDocEntry /> 
  <BaseDocLine /> 
  <BaseDocType /> 
  </row>
  </WithholdingTaxData>
- <TaxExtension>
- <row>
  <TaxId0 /> 
  <TaxId1 /> 
  <TaxId2 /> 
  <TaxId3 /> 
  <TaxId4 /> 
  <TaxId5 /> 
  <TaxId6 /> 
  <TaxId7 /> 
  <TaxId8 /> 
  <TaxId9 /> 
  <State /> 
  <County /> 
  <Incoterms /> 
  <Vehicle /> 
  <VehicleState /> 
  <NFRef /> 
  <Carrier /> 
  <PackQuantity /> 
  <PackDescription /> 
  <Brand /> 
  <ShipUnitNo /> 
  <NetWeight /> 
  <GrossWeight /> 
  <StreetS /> 
  <BlockS /> 
  <BuildingS /> 
  <CityS /> 
  <ZipCodeS /> 
  <CountyS /> 
  <StateS /> 
  <CountryS /> 
  <StreetB /> 
  <BlockB /> 
  <BuildingB /> 
  <CityB /> 
  <ZipCodeB /> 
  <CountyB /> 
  <StateB /> 
  <CountryB /> 
  </row>
  </TaxExtension>
  </BO>
  </BOM>

You can also get the template by GetBusinessObjectTemplate method.(oPurchaseOrders)

 <WebMethod()> Public Function GetTemplate(ByVal SessionID As String, ByVal ObjectType As String) As Xml.XmlDocument
        Dim n As SBODI_Server.Node
        Dim s, strXML As String
        Dim d As Xml.XmlDocument

        d = New Xml.XmlDocument
        n = New SBODI_Server.Node

        strXML = "<?xml version=""1.0"" encoding=""UTF-16""?>" & _
        "<env:Envelope xmlns:env=""http://schemas.xmlsoap.org/soap/envelope/"">" & _
        "<env:Header>" & _
        "<SessionID>" & CStr(SessionID) & "</SessionID>" & _
        "</env:Header>" & _
        "<env:Body>" & _
        "<dis:GetBusinessObjectTemplate xmlns:dis=""http://www.sap.com/SBO/DIS"">" & _
        "<Object>" & CStr(ObjectType) & "</Object>" & _
        "</dis:GetBusinessObjectTemplate>" & _
         "</env:Body></env:Envelope>"

        s = n.Interact(strXML)
        d.LoadXml(s)
        Return (RemoveEnv(d))
    End Function

Purchase Order Coding

Accepted Solutions (1)

Accepted Solutions (1)

Answers (2)

Answers (2)

Re: RV开票转账的时候，发出商品科目怎么可以对应到客户

Re: Error copy from delivery to A/R invoice update...

Append text in LSMWM

Problem with 2023 year-end in fixed asset accounti...

Re: How to keep PDF file created by output control...