VBScript / EDS API / Dokuments "Sezonas laukstrādnieku ienākuma nodokļa maksātāju ziņojums".
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/zslv1/: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": "proiden",
' "ParskGads": 35993643,
' "Rows": [
' {
' "NsKods": "",
' "NsVardsUzvards": "laboris Lorem sit",
' "NsDarbIenakumi": 59350597.88631284,
' "NsAprDarbIenNod": -79594800.9111087,
' "NsAprDarbIenNodVsaa": 18090204.875320956,
' "NsAprDarbIenNodIin": 99734532.28436688,
' "NsNodPerSakums": "2000-01-31T00:00:00",
' "NsNodPerBeigas": "2000-01-31T00:00:00"
' },
' {
' "NsKods": "Lor",
' "NsVardsUzvards": "ea mo",
' "NsDarbIenakumi": 65826386.003358364,
' "NsAprDarbIenNod": 73077787.6981282,
' "NsAprDarbIenNodVsaa": -95033070.46884166,
' "NsAprDarbIenNodIin": 62367378.140794486,
' "NsNodPerSakums": "2000-01-31T00:00:00",
' "NsNodPerBeigas": "2000-01-31T00:00:00"
' }
' ],
' "Talrunis": "quis ex",
' "Sagatavotajs": "adipisicing sunt ullamco ut eu",
' "ParskMen": "reprehenderit cupidatat aute id",
' "Id": -40093190,
' "UID": "Excepteur pariatur Lorem",
' "NmrKods": "ut l",
' "Precizejums": true,
' "PrecizejamaisDokuments": -70893075,
' "PrecizejumaPamatojums": "sed dolo"
' }
' 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")
ParskGads = jResp.IntOf("ParskGads")
Talrunis = jResp.StringOf("Talrunis")
Sagatavotajs = jResp.StringOf("Sagatavotajs")
ParskMen = jResp.StringOf("ParskMen")
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("Rows")
Do While i < count_i
jResp.I = i
NsKods = jResp.StringOf("Rows[i].NsKods")
NsVardsUzvards = jResp.StringOf("Rows[i].NsVardsUzvards")
NsDarbIenakumi = jResp.StringOf("Rows[i].NsDarbIenakumi")
NsAprDarbIenNod = jResp.StringOf("Rows[i].NsAprDarbIenNod")
NsAprDarbIenNodVsaa = jResp.StringOf("Rows[i].NsAprDarbIenNodVsaa")
NsAprDarbIenNodIin = jResp.StringOf("Rows[i].NsAprDarbIenNodIin")
NsNodPerSakums = jResp.StringOf("Rows[i].NsNodPerSakums")
NsNodPerBeigas = jResp.StringOf("Rows[i].NsNodPerBeigas")
i = i + 1
Loop
outFile.Close
Curl Command
curl -X GET
-H "Accept: application/json"
https://eds.vid.gov.lv/api/doc/zslv1/:id
Postman Collection Item JSON
{
"name": "Dokuments \"Sezonas laukstrādnieku ienākuma nodokļa maksātāju ziņojums\".",
"request": {
"method": "GET",
"header": [
{
"key": "Accept",
"value": "application/json"
}
],
"url": {
"raw": "{{baseUrl}}/api/doc/zslv1/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"zslv1",
":id"
],
"variable": [
{
"key": "id",
"value": "25210683",
"description": "(Required) Dokumenta id."
}
]
}
},
"response": [
{
"name": "OK",
"originalRequest": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{baseUrl}}/api/doc/zslv1/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"zslv1",
":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\": \"proiden\",\n \"ParskGads\": 35993643,\n \"Rows\": [\n {\n \"NsKods\": \"\",\n \"NsVardsUzvards\": \"laboris Lorem sit\",\n \"NsDarbIenakumi\": 59350597.88631284,\n \"NsAprDarbIenNod\": -79594800.9111087,\n \"NsAprDarbIenNodVsaa\": 18090204.875320956,\n \"NsAprDarbIenNodIin\": 99734532.28436688,\n \"NsNodPerSakums\": \"2000-01-31T00:00:00\",\n \"NsNodPerBeigas\": \"2000-01-31T00:00:00\"\n },\n {\n \"NsKods\": \"Lor\",\n \"NsVardsUzvards\": \"ea mo\",\n \"NsDarbIenakumi\": 65826386.003358364,\n \"NsAprDarbIenNod\": 73077787.6981282,\n \"NsAprDarbIenNodVsaa\": -95033070.46884166,\n \"NsAprDarbIenNodIin\": 62367378.140794486,\n \"NsNodPerSakums\": \"2000-01-31T00:00:00\",\n \"NsNodPerBeigas\": \"2000-01-31T00:00:00\"\n }\n ],\n \"Talrunis\": \"quis ex\",\n \"Sagatavotajs\": \"adipisicing sunt ullamco ut eu\",\n \"ParskMen\": \"reprehenderit cupidatat aute id\",\n \"Id\": -40093190,\n \"UID\": \"Excepteur pariatur Lorem\",\n \"NmrKods\": \"ut l\",\n \"Precizejums\": true,\n \"PrecizejamaisDokuments\": -70893075,\n \"PrecizejumaPamatojums\": \"sed dolo\"\n}"
},
{
"name": "Lietotājs nav autentificēts.",
"originalRequest": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{baseUrl}}/api/doc/zslv1/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"zslv1",
":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/zslv1/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"zslv1",
":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/zslv1/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"zslv1",
":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": ""
}
]
}
