Chilkat Online Tools

SQL Server / MongoDB Atlas / AZURE - Update One New Network Peering Connection

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

    EXEC sp_OASetProperty @http, 'DigestAuth', 1
    EXEC sp_OASetProperty @http, 'Login', 'username'
    EXEC sp_OASetProperty @http, 'Password', 'password'

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

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

    -- {
    --   "azureDirectoryId": "35039750-6ebd-4ad5-bcfe-cb4e5fc2d915",
    --   "azureSubscriptionId": "g893dec2-d92e-478d-bc50-cf99d31bgeg9",
    --   "containerId": "507f1f77bcf86cd799439011",
    --   "providerName": "AZURE",
    --   "resourceGroupName": "atlas-azure-peering",
    --   "vnetName": "azure-peer"
    -- }

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

    EXEC sp_OAMethod @json, 'UpdateString', @success OUT, 'azureDirectoryId', '35039750-6ebd-4ad5-bcfe-cb4e5fc2d915'
    EXEC sp_OAMethod @json, 'UpdateString', @success OUT, 'azureSubscriptionId', 'g893dec2-d92e-478d-bc50-cf99d31bgeg9'
    EXEC sp_OAMethod @json, 'UpdateString', @success OUT, 'containerId', '507f1f77bcf86cd799439011'
    EXEC sp_OAMethod @json, 'UpdateString', @success OUT, 'providerName', 'AZURE'
    EXEC sp_OAMethod @json, 'UpdateString', @success OUT, 'resourceGroupName', 'atlas-azure-peering'
    EXEC sp_OAMethod @json, 'UpdateString', @success OUT, 'vnetName', 'azure-peer'

    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 @json, 'EmitSb', @success OUT, @sbRequestBody

    DECLARE @resp int
    EXEC sp_OAMethod @http, 'PTextSb', @resp OUT, 'PATCH', 'https://domain.com/api/atlas/{{version}}/groups/{{ProjectID}}/peers/{{PEER-ID}}', @sbRequestBody, 'utf-8', 'application/json', 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 @json
        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 @json
    EXEC @hr = sp_OADestroy @sbRequestBody


END
GO

Curl Command

curl -X PATCH
	--digest -u 'username:password'
	-d '{
    "azureDirectoryId": "35039750-6ebd-4ad5-bcfe-cb4e5fc2d915",
    "azureSubscriptionId": "g893dec2-d92e-478d-bc50-cf99d31bgeg9",
    "containerId": "507f1f77bcf86cd799439011",
    "providerName": "AZURE",
    "resourceGroupName": "atlas-azure-peering",
    "vnetName": "azure-peer"
}'
https://domain.com/api/atlas/{{version}}/groups/{{ProjectID}}/peers/{{PEER-ID}}

Postman Collection Item JSON

{
  "name": "AZURE - Update One New Network Peering Connection",
  "request": {
    "method": "PATCH",
    "header": [
    ],
    "body": {
      "mode": "raw",
      "raw": "{\n    \"azureDirectoryId\": \"35039750-6ebd-4ad5-bcfe-cb4e5fc2d915\",\n    \"azureSubscriptionId\": \"g893dec2-d92e-478d-bc50-cf99d31bgeg9\",\n    \"containerId\": \"507f1f77bcf86cd799439011\",\n    \"providerName\": \"AZURE\",\n    \"resourceGroupName\": \"atlas-azure-peering\",\n    \"vnetName\": \"azure-peer\"\n}",
      "options": {
        "raw": {
          "language": "json"
        }
      }
    },
    "url": {
      "raw": "{{base_url}}/api/atlas/{{version}}/groups/{{ProjectID}}/peers/{{PEER-ID}}",
      "host": [
        "{{base_url}}"
      ],
      "path": [
        "api",
        "atlas",
        "{{version}}",
        "groups",
        "{{ProjectID}}",
        "peers",
        "{{PEER-ID}}"
      ]
    },
    "description": "https://docs.atlas.mongodb.com/reference/api/vpc-update-peering-connection/"
  },
  "response": [
  ]
}