SQL Server

IntakeQ: Query Intake Forms

See more IntakeQ Examples

Use this method to query client intake form summaries. The result set does not contain all the contents of the intake forms, but only their basic information (id, status, client info). SQL Server

-- Important: See this note about string length limitations for strings returned by sp_OAMethod calls.
--
CREATE PROCEDURE ChilkatSample
AS
BEGIN
    DECLARE @hr int
    -- Important: Do not use nvarchar(max).  See the warning about using nvarchar(max).
    DECLARE @sTmp0 nvarchar(4000)
    DECLARE @success int
    SELECT @success = 0

    -- This example assumes the Chilkat API to have been previously unlocked.
    -- See Global Unlock Sample for sample code.

    DECLARE @http int
    EXEC @hr = sp_OACreate 'Chilkat.Http', @http OUT
    IF @hr <> 0
    BEGIN
        PRINT 'Failed to create ActiveX component'
        RETURN
    END

    -- Implements the following CURL command:

    -- curl -X GET \
    --   https://intakeq.com/api/v1/intakes/summary?client=[searchString]&startDate=[yyyy-MM-dd]&endDate=[yyyy-MM-dd]&page=[pageNumber]&all=[bool] \
    --   -H 'X-Auth-Key: xxxxxxxxxxxxxxxxxxxxxxxxx'

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

    EXEC sp_OAMethod @http, 'SetRequestHeader', NULL, 'X-Auth-Key', 'xxxxxxxxxxxxxxxxxxxxxxxxx'

    DECLARE @sbResponseBody int
    EXEC @hr = sp_OACreate 'Chilkat.StringBuilder', @sbResponseBody OUT

    EXEC sp_OAMethod @http, 'QuickGetSb', @success OUT, 'https://intakeq.com/api/v1/intakes/summary?client=[searchString]&startDate=[yyyy-MM-dd]&endDate=[yyyy-MM-dd]&page=[pageNumber]&all=[bool]', @sbResponseBody
    IF @success = 0
      BEGIN
        EXEC sp_OAGetProperty @http, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @http
        EXEC @hr = sp_OADestroy @sbResponseBody
        RETURN
      END

    DECLARE @jarrResp int
    EXEC @hr = sp_OACreate 'Chilkat.JsonArray', @jarrResp OUT

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


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

    DECLARE @respStatusCode int
    EXEC sp_OAGetProperty @http, 'LastStatus', @respStatusCode OUT

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

        PRINT 'Response Header:'
        EXEC sp_OAGetProperty @http, 'LastHeader', @sTmp0 OUT
        PRINT @sTmp0

        PRINT 'Failed.'
        EXEC @hr = sp_OADestroy @http
        EXEC @hr = sp_OADestroy @sbResponseBody
        EXEC @hr = sp_OADestroy @jarrResp
        RETURN
      END

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

    -- [
    --   {
    --     "Id": "00000000-0000-0000-0000-000000000000",
    --     "ClientName": "test",
    --     "ClientEmail": "test@email.com",
    --     "ClientId": 9999,
    --     "Status": "Completed",
    --     "DateCreated": 1458526480368,
    --     "DateSubmitted": 1458526532654,
    --     "QuestionnaireName": "test",
    --     "QuestionnaireId": "1234acbd",
    --     "Practitioner": "test@email.com",
    --     "PractitionerName": "FirstName LastName"
    --   },
    --   {
    --     "Id": "00000000-0000-0000-0000-000000000000",
    --     "ClientName": "test",
    --     "ClientEmail": "test@email.com",
    --     "ClientId": 9999,
    --     "Status": "Completed",
    --     "DateCreated": 1458526480368,
    --     "DateSubmitted": 1458526532654,
    --     "QuestionnaireName": "test",
    --     "QuestionnaireId": "1234acbd",
    --     "Practitioner": "test@email.com",
    --     "PractitionerName": "FirstName LastName"
    --   }
    -- ]

    -- 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 @json int

    DECLARE @Id nvarchar(4000)

    DECLARE @ClientName nvarchar(4000)

    DECLARE @ClientEmail nvarchar(4000)

    DECLARE @ClientId int

    DECLARE @Status nvarchar(4000)

    DECLARE @DateCreated int

    DECLARE @DateSubmitted int

    DECLARE @QuestionnaireName nvarchar(4000)

    DECLARE @QuestionnaireId nvarchar(4000)

    DECLARE @Practitioner nvarchar(4000)

    DECLARE @PractitionerName nvarchar(4000)

    DECLARE @i int
    SELECT @i = 0
    DECLARE @count_i int
    EXEC sp_OAGetProperty @jarrResp, 'Size', @count_i OUT
    WHILE @i < @count_i
      BEGIN
        EXEC sp_OAMethod @jarrResp, 'ObjectAt', @json OUT, @i
        EXEC sp_OAMethod @json, 'StringOf', @Id OUT, 'Id'
        EXEC sp_OAMethod @json, 'StringOf', @ClientName OUT, 'ClientName'
        EXEC sp_OAMethod @json, 'StringOf', @ClientEmail OUT, 'ClientEmail'
        EXEC sp_OAMethod @json, 'IntOf', @ClientId OUT, 'ClientId'
        EXEC sp_OAMethod @json, 'StringOf', @Status OUT, 'Status'
        EXEC sp_OAMethod @json, 'IntOf', @DateCreated OUT, 'DateCreated'
        EXEC sp_OAMethod @json, 'IntOf', @DateSubmitted OUT, 'DateSubmitted'
        EXEC sp_OAMethod @json, 'StringOf', @QuestionnaireName OUT, 'QuestionnaireName'
        EXEC sp_OAMethod @json, 'StringOf', @QuestionnaireId OUT, 'QuestionnaireId'
        EXEC sp_OAMethod @json, 'StringOf', @Practitioner OUT, 'Practitioner'
        EXEC sp_OAMethod @json, 'StringOf', @PractitionerName OUT, 'PractitionerName'
        EXEC @hr = sp_OADestroy @json

        SELECT @i = @i + 1
      END

    EXEC @hr = sp_OADestroy @http
    EXEC @hr = sp_OADestroy @sbResponseBody
    EXEC @hr = sp_OADestroy @jarrResp


END
GO