PureBasic / EDS API / Dokuments "Sezonas laukstrādnieku ienākuma nodokļa maksātāju ziņojums".
Back to Collection Items
IncludeFile "CkJsonObject.pb"
IncludeFile "CkStringBuilder.pb"
IncludeFile "CkHttp.pb"
Procedure ChilkatExample()
; This example assumes the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.
http.i = CkHttp::ckCreate()
If http.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
success.i
CkHttp::ckSetRequestHeader(http,"Accept","application/json")
sbResponseBody.i = CkStringBuilder::ckCreate()
If sbResponseBody.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
success = CkHttp::ckQuickGetSb(http,"https://eds.vid.gov.lv/api/doc/zslv1/:id",sbResponseBody)
If success = 0
Debug CkHttp::ckLastErrorText(http)
CkHttp::ckDispose(http)
CkStringBuilder::ckDispose(sbResponseBody)
ProcedureReturn
EndIf
jResp.i = CkJsonObject::ckCreate()
If jResp.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkJsonObject::ckLoadSb(jResp,sbResponseBody)
CkJsonObject::setCkEmitCompact(jResp, 0)
Debug "Response Body:"
Debug CkJsonObject::ckEmit(jResp)
respStatusCode.i = CkHttp::ckLastStatus(http)
Debug "Response Status Code = " + Str(respStatusCode)
If respStatusCode >= 400
Debug "Response Header:"
Debug CkHttp::ckLastHeader(http)
Debug "Failed."
CkHttp::ckDispose(http)
CkStringBuilder::ckDispose(sbResponseBody)
CkJsonObject::ckDispose(jResp)
ProcedureReturn
EndIf
; 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
NsKods.s
NsVardsUzvards.s
NsDarbIenakumi.s
NsAprDarbIenNod.s
NsAprDarbIenNodVsaa.s
NsAprDarbIenNodIin.s
NsNodPerSakums.s
NsNodPerBeigas.s
Epasts.s = CkJsonObject::ckStringOf(jResp,"Epasts")
ParskGads.i = CkJsonObject::ckIntOf(jResp,"ParskGads")
Talrunis.s = CkJsonObject::ckStringOf(jResp,"Talrunis")
Sagatavotajs.s = CkJsonObject::ckStringOf(jResp,"Sagatavotajs")
ParskMen.s = CkJsonObject::ckStringOf(jResp,"ParskMen")
Id.i = CkJsonObject::ckIntOf(jResp,"Id")
UID.s = CkJsonObject::ckStringOf(jResp,"UID")
NmrKods.s = CkJsonObject::ckStringOf(jResp,"NmrKods")
Precizejums.i = CkJsonObject::ckBoolOf(jResp,"Precizejums")
PrecizejamaisDokuments.i = CkJsonObject::ckIntOf(jResp,"PrecizejamaisDokuments")
PrecizejumaPamatojums.s = CkJsonObject::ckStringOf(jResp,"PrecizejumaPamatojums")
i.i = 0
count_i.i = CkJsonObject::ckSizeOfArray(jResp,"Rows")
While i < count_i
CkJsonObject::setCkI(jResp, i)
NsKods = CkJsonObject::ckStringOf(jResp,"Rows[i].NsKods")
NsVardsUzvards = CkJsonObject::ckStringOf(jResp,"Rows[i].NsVardsUzvards")
NsDarbIenakumi = CkJsonObject::ckStringOf(jResp,"Rows[i].NsDarbIenakumi")
NsAprDarbIenNod = CkJsonObject::ckStringOf(jResp,"Rows[i].NsAprDarbIenNod")
NsAprDarbIenNodVsaa = CkJsonObject::ckStringOf(jResp,"Rows[i].NsAprDarbIenNodVsaa")
NsAprDarbIenNodIin = CkJsonObject::ckStringOf(jResp,"Rows[i].NsAprDarbIenNodIin")
NsNodPerSakums = CkJsonObject::ckStringOf(jResp,"Rows[i].NsNodPerSakums")
NsNodPerBeigas = CkJsonObject::ckStringOf(jResp,"Rows[i].NsNodPerBeigas")
i = i + 1
Wend
CkHttp::ckDispose(http)
CkStringBuilder::ckDispose(sbResponseBody)
CkJsonObject::ckDispose(jResp)
ProcedureReturn
EndProcedure
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": ""
}
]
}
