delphiDll / EDS API / Dokuments "Sezonas laukstrādnieku ienākuma nodokļa maksātāju ziņojums".
Back to Collection Items
var
http: HCkHttp;
success: Boolean;
sbResponseBody: HCkStringBuilder;
jResp: HCkJsonObject;
respStatusCode: Integer;
NsKods: PWideChar;
NsVardsUzvards: PWideChar;
NsDarbIenakumi: PWideChar;
NsAprDarbIenNod: PWideChar;
NsAprDarbIenNodVsaa: PWideChar;
NsAprDarbIenNodIin: PWideChar;
NsNodPerSakums: PWideChar;
NsNodPerBeigas: PWideChar;
Epasts: PWideChar;
ParskGads: Integer;
Talrunis: PWideChar;
Sagatavotajs: PWideChar;
ParskMen: PWideChar;
Id: Integer;
UID: PWideChar;
NmrKods: PWideChar;
Precizejums: Boolean;
PrecizejamaisDokuments: Integer;
PrecizejumaPamatojums: PWideChar;
i: Integer;
count_i: Integer;
begin
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
http := CkHttp_Create();
CkHttp_SetRequestHeader(http,'Accept','application/json');
sbResponseBody := CkStringBuilder_Create();
success := CkHttp_QuickGetSb(http,'https://eds.vid.gov.lv/api/doc/zslv1/:id',sbResponseBody);
if (success = False) then
begin
Memo1.Lines.Add(CkHttp__lastErrorText(http));
Exit;
end;
jResp := CkJsonObject_Create();
CkJsonObject_LoadSb(jResp,sbResponseBody);
CkJsonObject_putEmitCompact(jResp,False);
Memo1.Lines.Add('Response Body:');
Memo1.Lines.Add(CkJsonObject__emit(jResp));
respStatusCode := CkHttp_getLastStatus(http);
Memo1.Lines.Add('Response Status Code = ' + IntToStr(respStatusCode));
if (respStatusCode >= 400) then
begin
Memo1.Lines.Add('Response Header:');
Memo1.Lines.Add(CkHttp__lastHeader(http));
Memo1.Lines.Add('Failed.');
Exit;
end;
// 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 := CkJsonObject__stringOf(jResp,'Epasts');
ParskGads := CkJsonObject_IntOf(jResp,'ParskGads');
Talrunis := CkJsonObject__stringOf(jResp,'Talrunis');
Sagatavotajs := CkJsonObject__stringOf(jResp,'Sagatavotajs');
ParskMen := CkJsonObject__stringOf(jResp,'ParskMen');
Id := CkJsonObject_IntOf(jResp,'Id');
UID := CkJsonObject__stringOf(jResp,'UID');
NmrKods := CkJsonObject__stringOf(jResp,'NmrKods');
Precizejums := CkJsonObject_BoolOf(jResp,'Precizejums');
PrecizejamaisDokuments := CkJsonObject_IntOf(jResp,'PrecizejamaisDokuments');
PrecizejumaPamatojums := CkJsonObject__stringOf(jResp,'PrecizejumaPamatojums');
i := 0;
count_i := CkJsonObject_SizeOfArray(jResp,'Rows');
while i < count_i do
begin
CkJsonObject_putI(jResp,i);
NsKods := CkJsonObject__stringOf(jResp,'Rows[i].NsKods');
NsVardsUzvards := CkJsonObject__stringOf(jResp,'Rows[i].NsVardsUzvards');
NsDarbIenakumi := CkJsonObject__stringOf(jResp,'Rows[i].NsDarbIenakumi');
NsAprDarbIenNod := CkJsonObject__stringOf(jResp,'Rows[i].NsAprDarbIenNod');
NsAprDarbIenNodVsaa := CkJsonObject__stringOf(jResp,'Rows[i].NsAprDarbIenNodVsaa');
NsAprDarbIenNodIin := CkJsonObject__stringOf(jResp,'Rows[i].NsAprDarbIenNodIin');
NsNodPerSakums := CkJsonObject__stringOf(jResp,'Rows[i].NsNodPerSakums');
NsNodPerBeigas := CkJsonObject__stringOf(jResp,'Rows[i].NsNodPerBeigas');
i := i + 1;
end;
CkHttp_Dispose(http);
CkStringBuilder_Dispose(sbResponseBody);
CkJsonObject_Dispose(jResp);
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": ""
}
]
}
