Chilkat Online Tools

Foxpro / EDS API / Dokuments "Akcīzes nodokļa aprēķins (likmju maiņas gadījumā)".

Back to Collection Items

LOCAL loHttp
LOCAL lnSuccess
LOCAL loSbResponseBody
LOCAL loJResp
LOCAL lnRespStatusCode
LOCAL lnLikmeId
LOCAL lcKods
LOCAL lcK3
LOCAL lcK4
LOCAL lcDokuments
LOCAL lcValue
LOCAL lcKomentars
LOCAL lcTalrunis
LOCAL lcEpasts
LOCAL lcNmVeids
LOCAL lcSagatavotajs
LOCAL lcLikmesDatums
LOCAL lcPrecuGrupas
LOCAL lcInvDatums
LOCAL lcMaksTermins
LOCAL lcNmAkcNumuri
LOCAL lnId
LOCAL lcUID
LOCAL lcNmrKods
LOCAL lnPrecizejums
LOCAL lnPrecizejamaisDokuments
LOCAL lcPrecizejumaPamatojums
LOCAL i
LOCAL lnCount_i

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

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Http')
loHttp = CreateObject('Chilkat.Http')

loHttp.SetRequestHeader("Accept","application/json")

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.StringBuilder')
loSbResponseBody = CreateObject('Chilkat.StringBuilder')
lnSuccess = loHttp.QuickGetSb("https://eds.vid.gov.lv/api/doc/aniav3/:id",loSbResponseBody)
IF (lnSuccess = 0) THEN
    ? loHttp.LastErrorText
    RELEASE loHttp
    RELEASE loSbResponseBody
    CANCEL
ENDIF

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.JsonObject')
loJResp = CreateObject('Chilkat.JsonObject')
loJResp.LoadSb(loSbResponseBody)
loJResp.EmitCompact = 0

? "Response Body:"
? loJResp.Emit()

lnRespStatusCode = loHttp.LastStatus
? "Response Status Code = " + STR(lnRespStatusCode)
IF (lnRespStatusCode >= 400) THEN
    ? "Response Header:"
    ? loHttp.LastHeader
    ? "Failed."
    RELEASE loHttp
    RELEASE loSbResponseBody
    RELEASE loJResp
    CANCEL
ENDIF

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

* {
*   "Talrunis": "velit f",
*   "Epasts": "voluptate in",
*   "NmVeids": "enim ipsum et",
*   "Sagatavotajs": "incididunt pariatur",
*   "LikmesDatums": "2000-01-31T00:00:00",
*   "PrecuGrupas": "mollit cillum sunt velit eiusmod",
*   "InvDatums": "2000-01-31T00:00:00",
*   "MaksTermins": "2000-01-31T00:00:00",
*   "NmAkcNumuri": "consequat cupidatat magna fugiat",
*   "Tabula": [
*     {
*       "LikmeId": -70310886,
*       "Kods": "sunt exercitation esse irure",
*       "K3": 9325482.159040317,
*       "K4": 46466485.181491464
*     },
*     {
*       "LikmeId": 61440397,
*       "Kods": "officia sit dolore",
*       "K3": 34522730.61346921,
*       "K4": 51331912.60301468
*     }
*   ],
*   "Pielikumi": [
*     {
*       "Dokuments": "in consequat incididunt",
*       "Fails": {
*         "value": "<Error: Too many levels of nesting to fake this schema>"
*       },
*       "Komentars": "quis in ad"
*     },
*     {
*       "Dokuments": "conse",
*       "Fails": {
*         "value": "<Error: Too many levels of nesting to fake this schema>"
*       },
*       "Komentars": "Ut dolore magna do"
*     }
*   ],
*   "Id": 8468076,
*   "UID": "enim eiusmod",
*   "NmrKods": "in ",
*   "Precizejums": false,
*   "PrecizejamaisDokuments": -23123385,
*   "PrecizejumaPamatojums": "nisi magna deserunt reprehenderit"
* }

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

lcTalrunis = loJResp.StringOf("Talrunis")
lcEpasts = loJResp.StringOf("Epasts")
lcNmVeids = loJResp.StringOf("NmVeids")
lcSagatavotajs = loJResp.StringOf("Sagatavotajs")
lcLikmesDatums = loJResp.StringOf("LikmesDatums")
lcPrecuGrupas = loJResp.StringOf("PrecuGrupas")
lcInvDatums = loJResp.StringOf("InvDatums")
lcMaksTermins = loJResp.StringOf("MaksTermins")
lcNmAkcNumuri = loJResp.StringOf("NmAkcNumuri")
lnId = loJResp.IntOf("Id")
lcUID = loJResp.StringOf("UID")
lcNmrKods = loJResp.StringOf("NmrKods")
lnPrecizejums = loJResp.BoolOf("Precizejums")
lnPrecizejamaisDokuments = loJResp.IntOf("PrecizejamaisDokuments")
lcPrecizejumaPamatojums = loJResp.StringOf("PrecizejumaPamatojums")
i = 0
lnCount_i = loJResp.SizeOfArray("Tabula")
DO WHILE i < lnCount_i
    loJResp.I = i
    lnLikmeId = loJResp.IntOf("Tabula[i].LikmeId")
    lcKods = loJResp.StringOf("Tabula[i].Kods")
    lcK3 = loJResp.StringOf("Tabula[i].K3")
    lcK4 = loJResp.StringOf("Tabula[i].K4")
    i = i + 1
ENDDO
i = 0
lnCount_i = loJResp.SizeOfArray("Pielikumi")
DO WHILE i < lnCount_i
    loJResp.I = i
    lcDokuments = loJResp.StringOf("Pielikumi[i].Dokuments")
    lcValue = loJResp.StringOf("Pielikumi[i].Fails.value")
    lcKomentars = loJResp.StringOf("Pielikumi[i].Komentars")
    i = i + 1
ENDDO

RELEASE loHttp
RELEASE loSbResponseBody
RELEASE loJResp

Curl Command

curl -X GET
	-H "Accept: application/json"
https://eds.vid.gov.lv/api/doc/aniav3/:id

Postman Collection Item JSON

{
  "name": "Dokuments \"Akcīzes nodokļa aprēķins (likmju maiņas gadījumā)\".",
  "request": {
    "method": "GET",
    "header": [
      {
        "key": "Accept",
        "value": "application/json"
      }
    ],
    "url": {
      "raw": "{{baseUrl}}/api/doc/aniav3/:id",
      "host": [
        "{{baseUrl}}"
      ],
      "path": [
        "api",
        "doc",
        "aniav3",
        ":id"
      ],
      "variable": [
        {
          "key": "id",
          "value": "25210683",
          "description": "(Required) Dokumenta id."
        }
      ]
    }
  },
  "response": [
    {
      "name": "OK",
      "originalRequest": {
        "method": "GET",
        "header": [
        ],
        "url": {
          "raw": "{{baseUrl}}/api/doc/aniav3/:id",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "api",
            "doc",
            "aniav3",
            ":id"
          ],
          "variable": [
            {
              "key": "id",
              "value": "25210683",
              "description": "(Required) Dokumenta id."
            }
          ]
        }
      },
      "status": "OK",
      "code": 200,
      "_postman_previewlanguage": "json",
      "header": [
        {
          "key": "Content-Type",
          "value": "application/json"
        }
      ],
      "cookie": [
      ],
      "body": "{\n  \"Talrunis\": \"velit f\",\n  \"Epasts\": \"voluptate in\",\n  \"NmVeids\": \"enim ipsum et\",\n  \"Sagatavotajs\": \"incididunt pariatur\",\n  \"LikmesDatums\": \"2000-01-31T00:00:00\",\n  \"PrecuGrupas\": \"mollit cillum sunt velit eiusmod\",\n  \"InvDatums\": \"2000-01-31T00:00:00\",\n  \"MaksTermins\": \"2000-01-31T00:00:00\",\n  \"NmAkcNumuri\": \"consequat cupidatat magna fugiat\",\n  \"Tabula\": [\n    {\n      \"LikmeId\": -70310886,\n      \"Kods\": \"sunt exercitation esse irure\",\n      \"K3\": 9325482.159040317,\n      \"K4\": 46466485.181491464\n    },\n    {\n      \"LikmeId\": 61440397,\n      \"Kods\": \"officia sit dolore\",\n      \"K3\": 34522730.61346921,\n      \"K4\": 51331912.60301468\n    }\n  ],\n  \"Pielikumi\": [\n    {\n      \"Dokuments\": \"in consequat incididunt\",\n      \"Fails\": {\n        \"value\": \"<Error: Too many levels of nesting to fake this schema>\"\n      },\n      \"Komentars\": \"quis in ad\"\n    },\n    {\n      \"Dokuments\": \"conse\",\n      \"Fails\": {\n        \"value\": \"<Error: Too many levels of nesting to fake this schema>\"\n      },\n      \"Komentars\": \"Ut dolore magna do\"\n    }\n  ],\n  \"Id\": 8468076,\n  \"UID\": \"enim eiusmod\",\n  \"NmrKods\": \"in \",\n  \"Precizejums\": false,\n  \"PrecizejamaisDokuments\": -23123385,\n  \"PrecizejumaPamatojums\": \"nisi magna deserunt reprehenderit\"\n}"
    },
    {
      "name": "Lietotājs nav autentificēts.",
      "originalRequest": {
        "method": "GET",
        "header": [
        ],
        "url": {
          "raw": "{{baseUrl}}/api/doc/aniav3/:id",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "api",
            "doc",
            "aniav3",
            ":id"
          ],
          "variable": [
            {
              "key": "id",
              "value": "25210683",
              "description": "(Required) Dokumenta id."
            }
          ]
        }
      },
      "status": "Unauthorized",
      "code": 401,
      "_postman_previewlanguage": "text",
      "header": [
        {
          "key": "Content-Type",
          "value": "text/plain"
        }
      ],
      "cookie": [
      ],
      "body": ""
    },
    {
      "name": "Dokuments neeksistē vai lietotājam nav tiesību.",
      "originalRequest": {
        "method": "GET",
        "header": [
        ],
        "url": {
          "raw": "{{baseUrl}}/api/doc/aniav3/:id",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "api",
            "doc",
            "aniav3",
            ":id"
          ],
          "variable": [
            {
              "key": "id",
              "value": "25210683",
              "description": "(Required) Dokumenta id."
            }
          ]
        }
      },
      "status": "Forbidden",
      "code": 403,
      "_postman_previewlanguage": "text",
      "header": [
        {
          "key": "Content-Type",
          "value": "text/plain"
        }
      ],
      "cookie": [
      ],
      "body": ""
    },
    {
      "name": "Pārsniegts izsaukumu skaita ierobežojums.",
      "originalRequest": {
        "method": "GET",
        "header": [
        ],
        "url": {
          "raw": "{{baseUrl}}/api/doc/aniav3/:id",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "api",
            "doc",
            "aniav3",
            ":id"
          ],
          "variable": [
            {
              "key": "id",
              "value": "25210683",
              "description": "(Required) Dokumenta id."
            }
          ]
        }
      },
      "status": "Too Many Requests",
      "code": 429,
      "_postman_previewlanguage": "text",
      "header": [
        {
          "key": "Content-Type",
          "value": "text/plain"
        }
      ],
      "cookie": [
      ],
      "body": ""
    }
  ]
}