Chilkat Online Tools

VBScript / EDS API / Dokuments "Informācija par izmaksātajām mācību maksas kompensācijām".

Back to Collection Items

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)

' 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")
set http = CreateObject("Chilkat.Http")

http.SetRequestHeader "Accept","application/json"

' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.StringBuilder")
set sbResponseBody = CreateObject("Chilkat.StringBuilder")
success = http.QuickGetSb("https://eds.vid.gov.lv/api/doc/mmkv1/:id",sbResponseBody)
If (success = 0) Then
    outFile.WriteLine(http.LastErrorText)
    WScript.Quit
End If

' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonObject")
set jResp = CreateObject("Chilkat.JsonObject")
success = jResp.LoadSb(sbResponseBody)
jResp.EmitCompact = 0

outFile.WriteLine("Response Body:")
outFile.WriteLine(jResp.Emit())

respStatusCode = http.LastStatus
outFile.WriteLine("Response Status Code = " & respStatusCode)
If (respStatusCode >= 400) Then
    outFile.WriteLine("Response Header:")
    outFile.WriteLine(http.LastHeader)
    outFile.WriteLine("Failed.")
    WScript.Quit
End If

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

' {
'   "Epasts": "eu ullamco tempor Lorem",
'   "Talrunis": "officia",
'   "Sagatavotajs": "in Duis Ut deserunt",
'   "TaksGads": 60230675,
'   "Tabula": [
'     {
'       "PersonasKods": "proident",
'       "VardsUzvards": "aute do ex",
'       "IzmaksataSumma": 42442965.83049789,
'       "IzmaksasDatums": "2000-01-31T00:00:00",
'       "KalendaraGads": "commodo"
'     },
'     {
'       "PersonasKods": "",
'       "VardsUzvards": "consequat sunt exercitation",
'       "IzmaksataSumma": -45672749.45368695,
'       "IzmaksasDatums": "2000-01-31T00:00:00",
'       "KalendaraGads": "cupidatat in"
'     }
'   ],
'   "Id": -55722484,
'   "UID": "minim laborum",
'   "NmrKods": "occaecat u",
'   "Precizejums": true,
'   "PrecizejamaisDokuments": -97716760,
'   "PrecizejumaPamatojums": "non et"
' }

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

Epasts = jResp.StringOf("Epasts")
Talrunis = jResp.StringOf("Talrunis")
Sagatavotajs = jResp.StringOf("Sagatavotajs")
TaksGads = jResp.IntOf("TaksGads")
Id = jResp.IntOf("Id")
UID = jResp.StringOf("UID")
NmrKods = jResp.StringOf("NmrKods")
Precizejums = jResp.BoolOf("Precizejums")
PrecizejamaisDokuments = jResp.IntOf("PrecizejamaisDokuments")
PrecizejumaPamatojums = jResp.StringOf("PrecizejumaPamatojums")
i = 0
count_i = jResp.SizeOfArray("Tabula")
Do While i < count_i
    jResp.I = i
    PersonasKods = jResp.StringOf("Tabula[i].PersonasKods")
    VardsUzvards = jResp.StringOf("Tabula[i].VardsUzvards")
    IzmaksataSumma = jResp.StringOf("Tabula[i].IzmaksataSumma")
    IzmaksasDatums = jResp.StringOf("Tabula[i].IzmaksasDatums")
    KalendaraGads = jResp.StringOf("Tabula[i].KalendaraGads")
    i = i + 1
Loop

outFile.Close

Curl Command

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

Postman Collection Item JSON

{
  "name": "Dokuments \"Informācija par izmaksātajām mācību maksas kompensācijām\".",
  "request": {
    "method": "GET",
    "header": [
      {
        "key": "Accept",
        "value": "application/json"
      }
    ],
    "url": {
      "raw": "{{baseUrl}}/api/doc/mmkv1/:id",
      "host": [
        "{{baseUrl}}"
      ],
      "path": [
        "api",
        "doc",
        "mmkv1",
        ":id"
      ],
      "variable": [
        {
          "key": "id",
          "value": "25210683",
          "description": "(Required) Dokumenta id."
        }
      ]
    }
  },
  "response": [
    {
      "name": "OK",
      "originalRequest": {
        "method": "GET",
        "header": [
        ],
        "url": {
          "raw": "{{baseUrl}}/api/doc/mmkv1/:id",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "api",
            "doc",
            "mmkv1",
            ":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  \"Epasts\": \"eu ullamco tempor Lorem\",\n  \"Talrunis\": \"officia\",\n  \"Sagatavotajs\": \"in Duis Ut deserunt\",\n  \"TaksGads\": 60230675,\n  \"Tabula\": [\n    {\n      \"PersonasKods\": \"proident\",\n      \"VardsUzvards\": \"aute do ex\",\n      \"IzmaksataSumma\": 42442965.83049789,\n      \"IzmaksasDatums\": \"2000-01-31T00:00:00\",\n      \"KalendaraGads\": \"commodo\"\n    },\n    {\n      \"PersonasKods\": \"\",\n      \"VardsUzvards\": \"consequat sunt exercitation\",\n      \"IzmaksataSumma\": -45672749.45368695,\n      \"IzmaksasDatums\": \"2000-01-31T00:00:00\",\n      \"KalendaraGads\": \"cupidatat in\"\n    }\n  ],\n  \"Id\": -55722484,\n  \"UID\": \"minim laborum\",\n  \"NmrKods\": \"occaecat u\",\n  \"Precizejums\": true,\n  \"PrecizejamaisDokuments\": -97716760,\n  \"PrecizejumaPamatojums\": \"non et\"\n}"
    },
    {
      "name": "Lietotājs nav autentificēts.",
      "originalRequest": {
        "method": "GET",
        "header": [
        ],
        "url": {
          "raw": "{{baseUrl}}/api/doc/mmkv1/:id",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "api",
            "doc",
            "mmkv1",
            ":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/mmkv1/:id",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "api",
            "doc",
            "mmkv1",
            ":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/mmkv1/:id",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "api",
            "doc",
            "mmkv1",
            ":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": ""
    }
  ]
}