delphiAx / EDS API / Dokuments "Dzīvības apdrošināšanas līgumu maksājumi".
Back to Collection Items
var
http: TChilkatHttp;
success: Integer;
sbResponseBody: TChilkatStringBuilder;
jResp: TChilkatJsonObject;
respStatusCode: Integer;
PKods: WideString;
VU: WideString;
Polise: WideString;
Sak: WideString;
Beig: WideString;
Partr: WideString;
Premija: WideString;
Anul: Integer;
j: Integer;
count_j: Integer;
value: WideString;
Epasts: WideString;
Talrunis: WideString;
TaksGads: Integer;
Sagatavotajs: WideString;
NmrKods: WideString;
Id: Integer;
UID: WideString;
Precizejums: Integer;
PrecizejamaisDokuments: Integer;
PrecizejumaPamatojums: WideString;
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 := TChilkatHttp.Create(Self);
http.SetRequestHeader('Accept','application/json');
sbResponseBody := TChilkatStringBuilder.Create(Self);
success := http.QuickGetSb('https://eds.vid.gov.lv/api/doc/dzav2/:id',sbResponseBody.ControlInterface);
if (success = 0) then
begin
Memo1.Lines.Add(http.LastErrorText);
Exit;
end;
jResp := TChilkatJsonObject.Create(Self);
jResp.LoadSb(sbResponseBody.ControlInterface);
jResp.EmitCompact := 0;
Memo1.Lines.Add('Response Body:');
Memo1.Lines.Add(jResp.Emit());
respStatusCode := http.LastStatus;
Memo1.Lines.Add('Response Status Code = ' + IntToStr(respStatusCode));
if (respStatusCode >= 400) then
begin
Memo1.Lines.Add('Response Header:');
Memo1.Lines.Add(http.LastHeader);
Memo1.Lines.Add('Failed.');
Exit;
end;
// Sample JSON response:
// (Sample code for parsing the JSON response is shown below)
// {
// "Epasts": "xkEqtx-xVm#.3`G0WyC.W~#~X_i@g0S.8ndIBuO.P3H86MFCy.š-LxKwRT.Xzcf15Jo.r8uNF.FžCE\\$FoHJD0$.62I",
// "Talrunis": "1 \n",
// "TaksGads": 76787615,
// "Sagatavotajs": "eu labore ut",
// "NmrKods": "dolore in sunt",
// "Table": [
// {
// "PKods": "pariatur d",
// "VU": "culpa ea Lorem",
// "Polise": "est ut",
// "Sak": "2000-01-31T00:00:00",
// "Beig": "2000-01-31T00:00:00",
// "Partr": "2000-01-31T00:00:00",
// "Premija": 24157187.466928273,
// "Anul": true,
// "Scale": [
// {
// "value": "<Error: Too many levels of nesting to fake this schema>"
// },
// {
// "value": "<Error: Too many levels of nesting to fake this schema>"
// }
// ]
// },
// {
// "PKods": "pari",
// "VU": "non",
// "Polise": "mollit tempor exercitation",
// "Sak": "2000-01-31T00:00:00",
// "Beig": "2000-01-31T00:00:00",
// "Partr": "2000-01-31T00:00:00",
// "Premija": 77802494.55366072,
// "Anul": false,
// "Scale": [
// {
// "value": "<Error: Too many levels of nesting to fake this schema>"
// },
// {
// "value": "<Error: Too many levels of nesting to fake this schema>"
// }
// ]
// }
// ],
// "Id": 58302053,
// "UID": "dolor aliqua labore",
// "Precizejums": true,
// "PrecizejamaisDokuments": -6268267,
// "PrecizejumaPamatojums": "Excepteur est et occaecat"
// }
// 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');
TaksGads := jResp.IntOf('TaksGads');
Sagatavotajs := jResp.StringOf('Sagatavotajs');
NmrKods := jResp.StringOf('NmrKods');
Id := jResp.IntOf('Id');
UID := jResp.StringOf('UID');
Precizejums := jResp.BoolOf('Precizejums');
PrecizejamaisDokuments := jResp.IntOf('PrecizejamaisDokuments');
PrecizejumaPamatojums := jResp.StringOf('PrecizejumaPamatojums');
i := 0;
count_i := jResp.SizeOfArray('Table');
while i < count_i do
begin
jResp.I := i;
PKods := jResp.StringOf('Table[i].PKods');
VU := jResp.StringOf('Table[i].VU');
Polise := jResp.StringOf('Table[i].Polise');
Sak := jResp.StringOf('Table[i].Sak');
Beig := jResp.StringOf('Table[i].Beig');
Partr := jResp.StringOf('Table[i].Partr');
Premija := jResp.StringOf('Table[i].Premija');
Anul := jResp.BoolOf('Table[i].Anul');
j := 0;
count_j := jResp.SizeOfArray('Table[i].Scale');
while j < count_j do
begin
jResp.J := j;
value := jResp.StringOf('Table[i].Scale[j].value');
j := j + 1;
end;
i := i + 1;
end;
Curl Command
curl -X GET
-H "Accept: application/json"
https://eds.vid.gov.lv/api/doc/dzav2/:id
Postman Collection Item JSON
{
"name": "Dokuments \"Dzīvības apdrošināšanas līgumu maksājumi\".",
"request": {
"method": "GET",
"header": [
{
"key": "Accept",
"value": "application/json"
}
],
"url": {
"raw": "{{baseUrl}}/api/doc/dzav2/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"dzav2",
":id"
],
"variable": [
{
"key": "id",
"value": "25210683",
"description": "(Required) Dokumenta id."
}
]
}
},
"response": [
{
"name": "OK",
"originalRequest": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{baseUrl}}/api/doc/dzav2/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"dzav2",
":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\": \"xkEqtx-xVm#.3`G0WyC.W~#~X_i@g0S.8ndIBuO.ēP3H86ēMFCy.ļš-LxKwRT.Xzīcf1ļ5Jāo.r8uNļāF.FžēCE\\\\$FoHJD0$.62I\",\n \"Talrunis\": \"1 \\n
\",\n \"TaksGads\": 76787615,\n \"Sagatavotajs\": \"eu labore ut\",\n \"NmrKods\": \"dolore in sunt\",\n \"Table\": [\n {\n \"PKods\": \"pariatur d\",\n \"VU\": \"culpa ea Lorem\",\n \"Polise\": \"est ut\",\n \"Sak\": \"2000-01-31T00:00:00\",\n \"Beig\": \"2000-01-31T00:00:00\",\n \"Partr\": \"2000-01-31T00:00:00\",\n \"Premija\": 24157187.466928273,\n \"Anul\": true,\n \"Scale\": [\n {\n \"value\": \"<Error: Too many levels of nesting to fake this schema>\"\n },\n {\n \"value\": \"<Error: Too many levels of nesting to fake this schema>\"\n }\n ]\n },\n {\n \"PKods\": \"pari\",\n \"VU\": \"non\",\n \"Polise\": \"mollit tempor exercitation\",\n \"Sak\": \"2000-01-31T00:00:00\",\n \"Beig\": \"2000-01-31T00:00:00\",\n \"Partr\": \"2000-01-31T00:00:00\",\n \"Premija\": 77802494.55366072,\n \"Anul\": false,\n \"Scale\": [\n {\n \"value\": \"<Error: Too many levels of nesting to fake this schema>\"\n },\n {\n \"value\": \"<Error: Too many levels of nesting to fake this schema>\"\n }\n ]\n }\n ],\n \"Id\": 58302053,\n \"UID\": \"dolor aliqua labore\",\n \"Precizejums\": true,\n \"PrecizejamaisDokuments\": -6268267,\n \"PrecizejumaPamatojums\": \"Excepteur est et occaecat\"\n}"
},
{
"name": "Lietotājs nav autentificēts.",
"originalRequest": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{baseUrl}}/api/doc/dzav2/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"dzav2",
":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/dzav2/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"dzav2",
":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/dzav2/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"dzav2",
":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": ""
}
]
}
