VBScript / EDS API / Dokuments "Paziņojums par PVN samaksu".
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/pvnsv2/: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": "officia Duis amet",
' "Talrunis": "laboris culp",
' "IesniegsanasIemesls": "culpa aliquip",
' "Sagatavotajs": "ea",
' "IzslegsanasDatums": "2000-01-31T00:00:00",
' "Tabula": [
' {
' "DarVeids": "mollit nisi esse sint consectetur",
' "VertibaDar": -84618198.21095231,
' "PvnVertiba": -53554230.92054164,
' "SamDatums": "2000-01-31T00:00:00",
' "DpValsts": "sint do laborum",
' "DpNumurs": "eiu",
' "DpNosaukums": "est qui id",
' "MiNumurs": "dolore ",
' "DokVeids": "Duis",
' "DokNumurs": "Excepteur ",
' "DokDatums": "2000-01-31T00:00:00",
' "Piezimes": "est aliqua sint cupidatat"
' },
' {
' "DarVeids": "sed labore e",
' "VertibaDar": 53038399.66671875,
' "PvnVertiba": 61205092.037992835,
' "SamDatums": "2000-01-31T00:00:00",
' "DpValsts": "enim qui",
' "DpNumurs": "voluptate a",
' "DpNosaukums": "in eiusmod",
' "MiNumurs": "",
' "DokVeids": "mollit cupidatat",
' "DokNumurs": "ut anim labore sed",
' "DokDatums": "2000-01-31T00:00:00",
' "Piezimes": "adipisicing incididunt aute commodo in"
' }
' ],
' "Id": -95903418,
' "UID": "aliqua dolore officia sint",
' "NmrKods": "mini",
' "Precizejums": true,
' "PrecizejamaisDokuments": 36766067,
' "PrecizejumaPamatojums": "dolore in cupidatat"
' }
' 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")
IesniegsanasIemesls = jResp.StringOf("IesniegsanasIemesls")
Sagatavotajs = jResp.StringOf("Sagatavotajs")
IzslegsanasDatums = jResp.StringOf("IzslegsanasDatums")
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
DarVeids = jResp.StringOf("Tabula[i].DarVeids")
VertibaDar = jResp.StringOf("Tabula[i].VertibaDar")
PvnVertiba = jResp.StringOf("Tabula[i].PvnVertiba")
SamDatums = jResp.StringOf("Tabula[i].SamDatums")
DpValsts = jResp.StringOf("Tabula[i].DpValsts")
DpNumurs = jResp.StringOf("Tabula[i].DpNumurs")
DpNosaukums = jResp.StringOf("Tabula[i].DpNosaukums")
MiNumurs = jResp.StringOf("Tabula[i].MiNumurs")
DokVeids = jResp.StringOf("Tabula[i].DokVeids")
DokNumurs = jResp.StringOf("Tabula[i].DokNumurs")
DokDatums = jResp.StringOf("Tabula[i].DokDatums")
Piezimes = jResp.StringOf("Tabula[i].Piezimes")
i = i + 1
Loop
outFile.Close
Curl Command
curl -X GET
-H "Accept: application/json"
https://eds.vid.gov.lv/api/doc/pvnsv2/:id
Postman Collection Item JSON
{
"name": "Dokuments \"Paziņojums par PVN samaksu\".",
"request": {
"method": "GET",
"header": [
{
"key": "Accept",
"value": "application/json"
}
],
"url": {
"raw": "{{baseUrl}}/api/doc/pvnsv2/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"pvnsv2",
":id"
],
"variable": [
{
"key": "id",
"value": "25210683",
"description": "(Required) Dokumenta id."
}
]
}
},
"response": [
{
"name": "OK",
"originalRequest": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{baseUrl}}/api/doc/pvnsv2/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"pvnsv2",
":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\": \"officia Duis amet\",\n \"Talrunis\": \"laboris culp\",\n \"IesniegsanasIemesls\": \"culpa aliquip\",\n \"Sagatavotajs\": \"ea\",\n \"IzslegsanasDatums\": \"2000-01-31T00:00:00\",\n \"Tabula\": [\n {\n \"DarVeids\": \"mollit nisi esse sint consectetur\",\n \"VertibaDar\": -84618198.21095231,\n \"PvnVertiba\": -53554230.92054164,\n \"SamDatums\": \"2000-01-31T00:00:00\",\n \"DpValsts\": \"sint do laborum\",\n \"DpNumurs\": \"eiu\",\n \"DpNosaukums\": \"est qui id\",\n \"MiNumurs\": \"dolore \",\n \"DokVeids\": \"Duis\",\n \"DokNumurs\": \"Excepteur \",\n \"DokDatums\": \"2000-01-31T00:00:00\",\n \"Piezimes\": \"est aliqua sint cupidatat\"\n },\n {\n \"DarVeids\": \"sed labore e\",\n \"VertibaDar\": 53038399.66671875,\n \"PvnVertiba\": 61205092.037992835,\n \"SamDatums\": \"2000-01-31T00:00:00\",\n \"DpValsts\": \"enim qui\",\n \"DpNumurs\": \"voluptate a\",\n \"DpNosaukums\": \"in eiusmod\",\n \"MiNumurs\": \"\",\n \"DokVeids\": \"mollit cupidatat\",\n \"DokNumurs\": \"ut anim labore sed\",\n \"DokDatums\": \"2000-01-31T00:00:00\",\n \"Piezimes\": \"adipisicing incididunt aute commodo in\"\n }\n ],\n \"Id\": -95903418,\n \"UID\": \"aliqua dolore officia sint\",\n \"NmrKods\": \"mini\",\n \"Precizejums\": true,\n \"PrecizejamaisDokuments\": 36766067,\n \"PrecizejumaPamatojums\": \"dolore in cupidatat\"\n}"
},
{
"name": "Lietotājs nav autentificēts.",
"originalRequest": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{baseUrl}}/api/doc/pvnsv2/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"pvnsv2",
":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/pvnsv2/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"pvnsv2",
":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/pvnsv2/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"pvnsv2",
":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": ""
}
]
}
