(SQL Server) Google People API - Update an Existing Contact

To update an existing contact, you must include the person.metadata.sources.etag field in the person for the contact to be updated to make sure the contact has not changed since your last read.

For more information, see https://developers.google.com/people/v1/contacts#update-an-existing-contact

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

-- 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.

    -- It is assumed we previously obtained an OAuth2 access token.
    -- This example loads the JSON access token file 

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

    DECLARE @success int
    EXEC sp_OAMethod @jsonToken, 'LoadFile', @success OUT, 'qa_data/tokens/googlePeople.json'
    IF @success <> 1
      BEGIN

        PRINT 'Failed to load googleContacts.json'
        EXEC @hr = sp_OADestroy @jsonToken
        RETURN
      END

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

    EXEC sp_OAMethod @jsonToken, 'StringOf', @sTmp0 OUT, 'access_token'
    EXEC sp_OASetProperty @http, 'AuthToken', @sTmp0

    -- Implements the following CURL command:

    -- curl -X PATCH https://people.googleapis.com/v1/resource_name:updateContact?updatePersonFields=emailAddresses \
    --   -H "Content-Type: application/json" \
    --   -d '{
    --     "resourceName": "resource_name",
    --     "etag": "#eyZ0Gu5HVas=",
    --     "emailAddresses": [{ "value": "john.doe@gmail.com" }],
    -- }'

    -- Use the following online tool to generate HTTP code from a CURL command
    -- Convert a cURL Command to HTTP Source Code

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

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

    -- {
    --   "resourceName": "resource_name",
    --   "etag": "#eyZ0Gu5HVas=",
    --   "emailAddresses": [
    --     {
    --       "value": "john.doe@gmail.com"
    --     }
    --   ]
    -- }

    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, 'resourceName', 'people/c172365763025317520'
    EXEC sp_OAMethod @json, 'UpdateString', @success OUT, 'etag', '%EigBAj0DBAUGBwgJPgoLPwwNDg8QQBESExQVFhc1GTQ3HyEiIyQlJicuGgQBAgUHIgxleVowR3U1SFZhcz0='
    EXEC sp_OAMethod @json, 'UpdateString', @success OUT, 'emailAddresses[0].value', 'john.doe@gmail.com'

    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

    -- Notice that the resource name is part of the URL...
    DECLARE @resp int
    EXEC sp_OAMethod @http, 'PTextSb', @resp OUT, 'PATCH', 'https://people.googleapis.com/v1/people/c172365763025317520:updateContact?updatePersonFields=emailAddresses', @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 @jsonToken
        EXEC @hr = sp_OADestroy @http
        EXEC @hr = sp_OADestroy @json
        EXEC @hr = sp_OADestroy @sbRequestBody
        RETURN
      END

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

    EXEC sp_OAMethod @resp, 'GetBodySb', @success OUT, @sbResponseBody
    DECLARE @jResp int
    -- Use "Chilkat_9_5_0.JsonObject" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.JsonObject', @jResp OUT

    EXEC sp_OAMethod @jResp, 'LoadSb', @success OUT, @sbResponseBody
    EXEC sp_OASetProperty @jResp, 'EmitCompact', 0


    PRINT 'Response Body:'
    EXEC sp_OAMethod @jResp, 'Emit', @sTmp0 OUT
    PRINT @sTmp0

    DECLARE @respStatusCode int
    EXEC sp_OAGetProperty @resp, 'StatusCode', @respStatusCode OUT

    PRINT 'Response Status Code = ' + @respStatusCode
    IF @respStatusCode >= 400
      BEGIN

        PRINT 'Response Header:'
        EXEC sp_OAGetProperty @resp, 'Header', @sTmp0 OUT
        PRINT @sTmp0

        PRINT 'Failed.'
        EXEC @hr = sp_OADestroy @resp

        EXEC @hr = sp_OADestroy @jsonToken
        EXEC @hr = sp_OADestroy @http
        EXEC @hr = sp_OADestroy @json
        EXEC @hr = sp_OADestroy @sbRequestBody
        EXEC @hr = sp_OADestroy @sbResponseBody
        EXEC @hr = sp_OADestroy @jResp
        RETURN
      END
    EXEC @hr = sp_OADestroy @resp

    -- Sample JSON response:
    -- (Sample code for parsing the JSON response is shown below)

    -- {
    --   "resourceName": "people/c172365763025317520",
    --   "etag": "%EigBAj0DBAUGBwgJPgoLPwwNDg8QQBESExQVFhc1GTQ3HyEiIyQlJicuGgQBAgUHIgxtQnhyR2MzMGU4Yz0=",
    --   "metadata": {
    --     "sources": [
    --       {
    --         "type": "CONTACT",
    --         "id": "2645dbf8c902e90",
    --         "etag": "#mBxrGc30e8c=",
    --         "updateTime": "2020-08-03T23:01:23.539Z"
    --       }
    --     ],
    --     "objectType": "PERSON"
    --   },
    --   "names": [
    --     {
    --       "metadata": {
    --         "primary": true,
    --         "source": {
    --           "type": "CONTACT",
    --           "id": "2645dbf8c902e90"
    --         }
    --       },
    --       "displayName": "John Doe",
    --       "familyName": "Doe",
    --       "givenName": "John",
    --       "displayNameLastFirst": "Doe, John",
    --       "unstructuredName": "John Doe"
    --     }
    --   ],
    --   "photos": [
    --     {
    --       "metadata": {
    --         "primary": true,
    --         "source": {
    --           "type": "CONTACT",
    --           "id": "2645dbf8c902e90"
    --         }
    --       },
    --       "url": "https://lh3.googleusercontent.com/-XdUIqeMkCWA/AAAAAAAAAAI/AAAAAAAAAAA/V8BNOaftJmYG2hHugNzYued7G9QFdeZOACLcDEAEiGQoBShD___________8BGNvwiP7______wE/s100/photo.jpg",
    --       "default": true
    --     }
    --   ],
    --   "emailAddresses": [
    --     {
    --       "metadata": {
    --         "primary": true,
    --         "source": {
    --           "type": "CONTACT",
    --           "id": "2645def8c902e90"
    --         }
    --       },
    --       "value": "john.doe@gmail.com"
    --     }
    --   ],
    --   "memberships": [
    --     {
    --       "metadata": {
    --         "source": {
    --           "type": "CONTACT",
    --           "id": "2645dbf8c902e90"
    --         }
    --       },
    --       "contactGroupMembership": {
    --         "contactGroupId": "myContacts",
    --         "contactGroupResourceName": "contactGroups/myContacts"
    --       }
    --     }
    --   ]
    -- }

    -- Sample code for parsing the JSON response...
    -- Use the following online tool to generate parsing code from sample JSON:
    -- Generate Parsing Code from JSON

    DECLARE @v_type nvarchar(4000)

    DECLARE @id nvarchar(4000)

    DECLARE @updateTime nvarchar(4000)

    DECLARE @metadataPrimary int

    DECLARE @metadataSourceType nvarchar(4000)

    DECLARE @metadataSourceId nvarchar(4000)

    DECLARE @displayName nvarchar(4000)

    DECLARE @familyName nvarchar(4000)

    DECLARE @givenName nvarchar(4000)

    DECLARE @displayNameLastFirst nvarchar(4000)

    DECLARE @unstructuredName nvarchar(4000)

    DECLARE @url nvarchar(4000)

    DECLARE @default int

    DECLARE @value nvarchar(4000)

    DECLARE @contactGroupMembershipContactGroupId nvarchar(4000)

    DECLARE @contactGroupMembershipContactGroupResourceName nvarchar(4000)

    DECLARE @resourceName nvarchar(4000)
    EXEC sp_OAMethod @jResp, 'StringOf', @resourceName OUT, 'resourceName'
    DECLARE @etag nvarchar(4000)
    EXEC sp_OAMethod @jResp, 'StringOf', @etag OUT, 'etag'
    DECLARE @metadataObjectType nvarchar(4000)
    EXEC sp_OAMethod @jResp, 'StringOf', @metadataObjectType OUT, 'metadata.objectType'
    DECLARE @i int
    SELECT @i = 0
    DECLARE @count_i int
    EXEC sp_OAMethod @jResp, 'SizeOfArray', @count_i OUT, 'metadata.sources'
    WHILE @i < @count_i
      BEGIN
        EXEC sp_OASetProperty @jResp, 'I', @i
        EXEC sp_OAMethod @jResp, 'StringOf', @v_type OUT, 'metadata.sources[i].type'
        EXEC sp_OAMethod @jResp, 'StringOf', @id OUT, 'metadata.sources[i].id'
        EXEC sp_OAMethod @jResp, 'StringOf', @etag OUT, 'metadata.sources[i].etag'
        EXEC sp_OAMethod @jResp, 'StringOf', @updateTime OUT, 'metadata.sources[i].updateTime'
        SELECT @i = @i + 1
      END
    SELECT @i = 0
    EXEC sp_OAMethod @jResp, 'SizeOfArray', @count_i OUT, 'names'
    WHILE @i < @count_i
      BEGIN
        EXEC sp_OASetProperty @jResp, 'I', @i
        EXEC sp_OAMethod @jResp, 'BoolOf', @metadataPrimary OUT, 'names[i].metadata.primary'
        EXEC sp_OAMethod @jResp, 'StringOf', @metadataSourceType OUT, 'names[i].metadata.source.type'
        EXEC sp_OAMethod @jResp, 'StringOf', @metadataSourceId OUT, 'names[i].metadata.source.id'
        EXEC sp_OAMethod @jResp, 'StringOf', @displayName OUT, 'names[i].displayName'
        EXEC sp_OAMethod @jResp, 'StringOf', @familyName OUT, 'names[i].familyName'
        EXEC sp_OAMethod @jResp, 'StringOf', @givenName OUT, 'names[i].givenName'
        EXEC sp_OAMethod @jResp, 'StringOf', @displayNameLastFirst OUT, 'names[i].displayNameLastFirst'
        EXEC sp_OAMethod @jResp, 'StringOf', @unstructuredName OUT, 'names[i].unstructuredName'
        SELECT @i = @i + 1
      END
    SELECT @i = 0
    EXEC sp_OAMethod @jResp, 'SizeOfArray', @count_i OUT, 'photos'
    WHILE @i < @count_i
      BEGIN
        EXEC sp_OASetProperty @jResp, 'I', @i
        EXEC sp_OAMethod @jResp, 'BoolOf', @metadataPrimary OUT, 'photos[i].metadata.primary'
        EXEC sp_OAMethod @jResp, 'StringOf', @metadataSourceType OUT, 'photos[i].metadata.source.type'
        EXEC sp_OAMethod @jResp, 'StringOf', @metadataSourceId OUT, 'photos[i].metadata.source.id'
        EXEC sp_OAMethod @jResp, 'StringOf', @url OUT, 'photos[i].url'
        EXEC sp_OAMethod @jResp, 'BoolOf', @default OUT, 'photos[i].default'
        SELECT @i = @i + 1
      END
    SELECT @i = 0
    EXEC sp_OAMethod @jResp, 'SizeOfArray', @count_i OUT, 'emailAddresses'
    WHILE @i < @count_i
      BEGIN
        EXEC sp_OASetProperty @jResp, 'I', @i
        EXEC sp_OAMethod @jResp, 'BoolOf', @metadataPrimary OUT, 'emailAddresses[i].metadata.primary'
        EXEC sp_OAMethod @jResp, 'StringOf', @metadataSourceType OUT, 'emailAddresses[i].metadata.source.type'
        EXEC sp_OAMethod @jResp, 'StringOf', @metadataSourceId OUT, 'emailAddresses[i].metadata.source.id'
        EXEC sp_OAMethod @jResp, 'StringOf', @value OUT, 'emailAddresses[i].value'
        SELECT @i = @i + 1
      END
    SELECT @i = 0
    EXEC sp_OAMethod @jResp, 'SizeOfArray', @count_i OUT, 'memberships'
    WHILE @i < @count_i
      BEGIN
        EXEC sp_OASetProperty @jResp, 'I', @i
        EXEC sp_OAMethod @jResp, 'StringOf', @metadataSourceType OUT, 'memberships[i].metadata.source.type'
        EXEC sp_OAMethod @jResp, 'StringOf', @metadataSourceId OUT, 'memberships[i].metadata.source.id'
        EXEC sp_OAMethod @jResp, 'StringOf', @contactGroupMembershipContactGroupId OUT, 'memberships[i].contactGroupMembership.contactGroupId'
        EXEC sp_OAMethod @jResp, 'StringOf', @contactGroupMembershipContactGroupResourceName OUT, 'memberships[i].contactGroupMembership.contactGroupResourceName'
        SELECT @i = @i + 1
      END

    EXEC @hr = sp_OADestroy @jsonToken
    EXEC @hr = sp_OADestroy @http
    EXEC @hr = sp_OADestroy @json
    EXEC @hr = sp_OADestroy @sbRequestBody
    EXEC @hr = sp_OADestroy @sbResponseBody
    EXEC @hr = sp_OADestroy @jResp


END
GO