Chilkat Online Tools

SQL Server / Coupa Postman Collection - OAuth - Master / Update PO COA and Segments

Back to Collection Items

-- Important: See this note about string length limitations for strings returned by sp_OAMethod calls.
--
CREATE PROCEDURE ChilkatSample
AS
BEGIN
    DECLARE @hr int
    DECLARE @iTmp0 int
    -- Important: Do not use nvarchar(max).  See the warning about using nvarchar(max).
    DECLARE @sTmp0 nvarchar(4000)
    -- This example assumes the Chilkat API to have been previously unlocked.
    -- See Global Unlock Sample for sample code.

    DECLARE @http int
    -- Use "Chilkat_9_5_0.Http" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.Http', @http OUT
    IF @hr <> 0
    BEGIN
        PRINT 'Failed to create ActiveX component'
        RETURN
    END

    DECLARE @success int

    -- Use this online tool to generate code from sample XML: Generate Code to Create XML

    -- The following XML is sent in the request body.

    -- <?xml version="1.0" encoding="utf-8"?>
    -- <order-header>
    --     <order-lines type="array">
    --         <order-line>
    --             <id type="integer">4019</id>
    --             <account>
    --                 <code>101-A-Operations-Indirect</code>
    --                 <segment-1>101</segment-1>
    --                 <segment-2>A</segment-2>
    --                 <segment-3>Sales</segment-3>
    --                 <segment-4>Indirect</segment-4>
    --                 <account-type>
    --                     <name>GPO1</name>
    --                     <currency>
    --                         <code>USD</code>
    --                     </currency>
    --                 </account-type>
    --             </account>
    --         </order-line>
    --     </order-lines>
    -- </order-header>
    -- 

    DECLARE @xml int
    -- Use "Chilkat_9_5_0.Xml" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.Xml', @xml OUT

    EXEC sp_OASetProperty @xml, 'Tag', 'order-header'
    EXEC sp_OAMethod @xml, 'UpdateAttrAt', @success OUT, 'order-lines', 1, 'type', 'array'
    EXEC sp_OAMethod @xml, 'UpdateAttrAt', @success OUT, 'order-lines|order-line|id', 1, 'type', 'integer'
    EXEC sp_OAMethod @xml, 'UpdateChildContentInt', NULL, 'order-lines|order-line|id', 4019
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'order-lines|order-line|account|code', '101-A-Operations-Indirect'
    EXEC sp_OAMethod @xml, 'UpdateChildContentInt', NULL, 'order-lines|order-line|account|segment-1', 101
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'order-lines|order-line|account|segment-2', 'A'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'order-lines|order-line|account|segment-3', 'Sales'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'order-lines|order-line|account|segment-4', 'Indirect'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'order-lines|order-line|account|account-type|name', 'GPO1'
    EXEC sp_OAMethod @xml, 'UpdateChildContent', NULL, 'order-lines|order-line|account|account-type|currency|code', 'USD'

    -- Adds the "Authorization: Bearer <access_token>" header.
    EXEC sp_OASetProperty @http, 'AuthToken', '<access_token>'

    DECLARE @sbRequestBody int
    -- Use "Chilkat_9_5_0.StringBuilder" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.StringBuilder', @sbRequestBody OUT

    EXEC sp_OAMethod @xml, 'GetXmlSb', @success OUT, @sbRequestBody

    DECLARE @resp int
    EXEC sp_OAMethod @http, 'PTextSb', @resp OUT, 'PUT', 'https://domain.com/purchase_orders/:id?fields=["id"]', @sbRequestBody, 'utf-8', 'application/xml', 0, 0
    EXEC sp_OAGetProperty @http, 'LastMethodSuccess', @iTmp0 OUT
    IF @iTmp0 = 0
      BEGIN
        EXEC sp_OAGetProperty @http, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @http
        EXEC @hr = sp_OADestroy @xml
        EXEC @hr = sp_OADestroy @sbRequestBody
        RETURN
      END

    EXEC sp_OAGetProperty @resp, 'StatusCode', @iTmp0 OUT
    PRINT @iTmp0
    EXEC sp_OAGetProperty @resp, 'BodyStr', @sTmp0 OUT
    PRINT @sTmp0
    EXEC @hr = sp_OADestroy @resp


    EXEC @hr = sp_OADestroy @http
    EXEC @hr = sp_OADestroy @xml
    EXEC @hr = sp_OADestroy @sbRequestBody


END
GO

Curl Command

curl -X PUT
	-H "Authorization: Bearer <access_token>"
	-d '<order-header>
    <order-lines type="array">
        <order-line>
            <id type="integer">4019</id>
            <account>
                <code>101-A-Operations-Indirect</code>
                <segment-1>101</segment-1>
                <segment-2>A</segment-2>
                <segment-3>Sales</segment-3>
                <segment-4>Indirect</segment-4>
                <account-type>
                    <name>GPO1</name>
                    <currency>
                        <code>USD</code>
                    </currency>
                </account-type>
            </account>
        </order-line>
    </order-lines>
</order-header>'
https://domain.com/purchase_orders/:id?fields=["id"]

Postman Collection Item JSON

{
  "name": "Update PO COA and Segments",
  "request": {
    "method": "PUT",
    "header": [
    ],
    "body": {
      "mode": "raw",
      "raw": "<order-header>\n    <order-lines type=\"array\">\n        <order-line>\n            <id type=\"integer\">4019</id>\n            <account>\n                <code>101-A-Operations-Indirect</code>\n                <segment-1>101</segment-1>\n                <segment-2>A</segment-2>\n                <segment-3>Sales</segment-3>\n                <segment-4>Indirect</segment-4>\n                <account-type>\n                    <name>GPO1</name>\n                    <currency>\n                        <code>USD</code>\n                    </currency>\n                </account-type>\n            </account>\n        </order-line>\n    </order-lines>\n</order-header>",
      "options": {
        "raw": {
          "language": "xml"
        }
      }
    },
    "url": {
      "raw": "{{URL}}/purchase_orders/:id?fields=[\"id\"]",
      "host": [
        "{{URL}}"
      ],
      "path": [
        "purchase_orders",
        ":id"
      ],
      "query": [
        {
          "key": "fields",
          "value": "[\"id\"]"
        }
      ],
      "variable": [
        {
          "key": "id",
          "value": "2864"
        }
      ]
    }
  },
  "response": [
  ]
}