0

次のコードは、販売明細を請求書にインポートするのに役立ちます。

        Dim LineItems(dtItem.Rows.Count) As taSopLineIvcInsert_ItemsTaSopLineIvcInsert
        Dim salesLine As New taSopLineIvcInsert_ItemsTaSopLineIvcInsert

        'Create Invoice Sales lines
        For Each dr In dtItem.Rows

            With salesLine
                .CUSTNMBR = dr.Item("acctno")
                .SOPNUMBE = invoiceNumber
                .SOPTYPE = 3
                .DOCID = "STD INV"
                .QUANTITY = dr.Item("Qty")
                .ITEMNMBR = dr.Item("Item")
                .ITEMDESC = dr.Item("Memo")
                .UNITPRCE = dr.Item("SalesPrice")
                .XTNDPRCE = dr.Item("Credit")
                .TAXAMNT = 0
                .UOFM = "Each" 
                .SALSTERR = "GENERAL"
                .ReqShipDate = dtHdr.Rows(0).Item("InvoiceDate").ToString()
                .FUFILDAT = dr.Item("Date1").ToString()
                .ACTLSHIP = dr.Item("Date1").ToString()
                '.NONINVEN = 0
                .DOCDATE = dtHdr.Rows(0).Item("InvoiceDate").ToString()
                .SLPRSNID = "C1" 
            End With

            LineItems(rowCtr) = salesLine
            rowCtr = rowCtr + 1
        Next

SLPRSNID と SALSTERR のフィールドは無視されます。請求書自体は、すべての項目で作成されています。この API を使用した経験のある方からのアイデアを歓迎します!

4

1 に答える 1

0

SOP手数料データを統合していないため、上記のようなコードを使用した広告申込情報へのSLPRSNIDとSALSTERRのインポートはサポートされていません。ただし、eConnectは、ビジネスロジックをカスタマイズするために、ストアドプロシージャの前後を公開します。インポートを実装するために、taSopHdrIvcInsertPostに以下が追加されました。

/ **カスタムビジネスロジック* /

if((@I_vSLPRSNID <>'')and(@I_vSALSTERR <>''))begin update SOP10200 set SLPRSNID = @I_vSLPRSNID、SALSTERR = @I_vSALSTERR where SOPNUMBE = @I_vSOPNUMBE and SOPTYPE = @I_vSOPTYPE end

/ **カスタムビジネスロジック* /

注:この実装では、特定のSLPRSNIDとSALSTERRをラインアイテムに提供する必要があり、ヘッダーデータやGPの顧客設定データから自動的に転記されることはありません。統合では値を渡す必要があります。

于 2013-01-09T23:09:19.440 に答える