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 lnK3
LOCAL lcK4
LOCAL lcDokuments
LOCAL lcValue
LOCAL lcKomentars
LOCAL lcTalrunis
LOCAL lcEpasts
LOCAL lnNmVeids
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.

loHttp = CreateObject('Chilkat_9_5_0.Http')

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

loSbResponseBody = CreateObject('Chilkat_9_5_0.StringBuilder')
lnSuccess = loHttp.QuickGetSb("https://eds.vid.gov.lv/api/doc/aniav2/:id",loSbResponseBody)
IF (lnSuccess = 0) THEN
    ? loHttp.LastErrorText
    RELEASE loHttp
    RELEASE loSbResponseBody
    CANCEL
ENDIF

loJResp = CreateObject('Chilkat_9_5_0.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": "anim min",
*   "Epasts": "incididunt",
*   "NmVeids": 73483303,
*   "Sagatavotajs": "nulla culpa adipisicing offi",
*   "LikmesDatums": "2000-01-31T00:00:00",
*   "PrecuGrupas": "aute laboris eu",
*   "InvDatums": "2000-01-31T00:00:00",
*   "MaksTermins": "2000-01-31T00:00:00",
*   "NmAkcNumuri": "eu exercitation",
*   "Tabula": [
*     {
*       "LikmeId": -46648068,
*       "Kods": "in dolore",
*       "K3": 80319392,
*       "K4": -11579514.970326036
*     },
*     {
*       "LikmeId": 37431806,
*       "Kods": "consectetur sit",
*       "K3": 96470892,
*       "K4": 86555560.90828362
*     }
*   ],
*   "Pielikumi": [
*     {
*       "Dokuments": "consectetur cupidatat et",
*       "Fails": {
*         "value": "<Error: Too many levels of nesting to fake this schema>"
*       },
*       "Komentars": "exercitation ei"
*     },
*     {
*       "Dokuments": "dolore ut enim culpa",
*       "Fails": {
*         "value": "<Error: Too many levels of nesting to fake this schema>"
*       },
*       "Komentars": "laboris ut"
*     }
*   ],
*   "Id": 4102027,
*   "UID": "eiusmod labore",
*   "NmrKods": "ex dol",
*   "Precizejums": true,
*   "PrecizejamaisDokuments": 96390767,
*   "PrecizejumaPamatojums": "minim pariatur"
* }

* 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")
lnNmVeids = loJResp.IntOf("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")
    lnK3 = loJResp.IntOf("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/aniav2/: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/aniav2/:id",
      "host": [
        "{{baseUrl}}"
      ],
      "path": [
        "api",
        "doc",
        "aniav2",
        ":id"
      ],
      "variable": [
        {
          "key": "id",
          "value": "25210683",
          "description": "(Required) Dokumenta id."
        }
      ]
    }
  },
  "response": [
    {
      "name": "OK",
      "originalRequest": {
        "method": "GET",
        "header": [
        ],
        "url": {
          "raw": "{{baseUrl}}/api/doc/aniav2/:id",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "api",
            "doc",
            "aniav2",
            ":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\": \"anim min\",\n  \"Epasts\": \"incididunt\",\n  \"NmVeids\": 73483303,\n  \"Sagatavotajs\": \"nulla culpa adipisicing offi\",\n  \"LikmesDatums\": \"2000-01-31T00:00:00\",\n  \"PrecuGrupas\": \"aute laboris eu\",\n  \"InvDatums\": \"2000-01-31T00:00:00\",\n  \"MaksTermins\": \"2000-01-31T00:00:00\",\n  \"NmAkcNumuri\": \"eu exercitation\",\n  \"Tabula\": [\n    {\n      \"LikmeId\": -46648068,\n      \"Kods\": \"in dolore\",\n      \"K3\": 80319392,\n      \"K4\": -11579514.970326036\n    },\n    {\n      \"LikmeId\": 37431806,\n      \"Kods\": \"consectetur sit\",\n      \"K3\": 96470892,\n      \"K4\": 86555560.90828362\n    }\n  ],\n  \"Pielikumi\": [\n    {\n      \"Dokuments\": \"consectetur cupidatat et\",\n      \"Fails\": {\n        \"value\": \"<Error: Too many levels of nesting to fake this schema>\"\n      },\n      \"Komentars\": \"exercitation ei\"\n    },\n    {\n      \"Dokuments\": \"dolore ut enim culpa\",\n      \"Fails\": {\n        \"value\": \"<Error: Too many levels of nesting to fake this schema>\"\n      },\n      \"Komentars\": \"laboris ut\"\n    }\n  ],\n  \"Id\": 4102027,\n  \"UID\": \"eiusmod labore\",\n  \"NmrKods\": \"ex dol\",\n  \"Precizejums\": true,\n  \"PrecizejamaisDokuments\": 96390767,\n  \"PrecizejumaPamatojums\": \"minim pariatur\"\n}"
    },
    {
      "name": "Lietotājs nav autentificēts.",
      "originalRequest": {
        "method": "GET",
        "header": [
        ],
        "url": {
          "raw": "{{baseUrl}}/api/doc/aniav2/:id",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "api",
            "doc",
            "aniav2",
            ":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/aniav2/:id",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "api",
            "doc",
            "aniav2",
            ":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/aniav2/:id",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "api",
            "doc",
            "aniav2",
            ":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": ""
    }
  ]
}