Chilkat Online Tools

delphiDll / EDS API / Dokuments "Paziņojums par kapitālsabiedrības valsts kapitāla izmantošanu".

Back to Collection Items

var
http: HCkHttp;
success: Boolean;
sbResponseBody: HCkStringBuilder;
jResp: HCkJsonObject;
respStatusCode: Integer;
ValstsParstavis: PWideChar;
ValstsDala: PWideChar;
ValstsKods: PWideChar;
Nosaukums: PWideChar;
Value: PWideChar;
Komentars: PWideChar;
Talrunis: PWideChar;
SapulceGadaParskats: PWideChar;
SapulceIzmaksa: PWideChar;
Pamatkapitals: PWideChar;
Pelna: PWideChar;
IemaksajamaSumma: PWideChar;
IemaksasDatums: PWideChar;
TaksGads: Integer;
PelnaMeitu: PWideChar;
IenakumuIemaksa: 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/kvkiv1/: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)

// {
//   "Talrunis": "Duis s",
//   "SapulceGadaParskats": "2000-01-31T00:00:00",
//   "SapulceIzmaksa": "2000-01-31T00:00:00",
//   "Pamatkapitals": 90212148.52912736,
//   "Pelna": -72905987.0307577,
//   "IemaksajamaSumma": 27706721.681724608,
//   "IemaksasDatums": "2000-01-31T00:00:00",
//   "TaksGads": -52696560,
//   "ValstsParstavji": [
//     {
//       "ValstsParstavis": "magna in nostrud",
//       "ValstsDala": 3.865663881687098
//     },
//     {
//       "ValstsParstavis": "adipisicing amet",
//       "ValstsDala": 13.633319635530782
//     }
//   ],
//   "MeituSabiedribas": [
//     {
//       "ValstsKods": "mo",
//       "NmrKods": "elit",
//       "Nosaukums": "ipsum consequat deserunt in exercitation"
//     },
//     {
//       "ValstsKods": "d",
//       "NmrKods": "exercitatio",
//       "Nosaukums": "cillum minim dolor"
//     }
//   ],
//   "PelnaMeitu": -78146907.7543265,
//   "IenakumuIemaksa": -94222836.58243935,
//   "Pielikumi": [
//     {
//       "Fails": {
//         "value": "<Error: Too many levels of nesting to fake this schema>"
//       },
//       "Komentars": "sit nulla tempor"
//     },
//     {
//       "Fails": {
//         "value": "<Error: Too many levels of nesting to fake this schema>"
//       },
//       "Komentars": "aute et cillum mollit"
//     }
//   ],
//   "Id": 62935092,
//   "UID": "non ut",
//   "NmrKods": "nostrud q",
//   "Precizejums": true,
//   "PrecizejamaisDokuments": 7244971,
//   "PrecizejumaPamatojums": "fugiat officia aliqua ullamco"
// }

// Sample code for parsing the JSON response...
// Use this online tool to generate parsing code from sample JSON: Generate JSON Parsing Code

Talrunis := CkJsonObject__stringOf(jResp,'Talrunis');
SapulceGadaParskats := CkJsonObject__stringOf(jResp,'SapulceGadaParskats');
SapulceIzmaksa := CkJsonObject__stringOf(jResp,'SapulceIzmaksa');
Pamatkapitals := CkJsonObject__stringOf(jResp,'Pamatkapitals');
Pelna := CkJsonObject__stringOf(jResp,'Pelna');
IemaksajamaSumma := CkJsonObject__stringOf(jResp,'IemaksajamaSumma');
IemaksasDatums := CkJsonObject__stringOf(jResp,'IemaksasDatums');
TaksGads := CkJsonObject_IntOf(jResp,'TaksGads');
PelnaMeitu := CkJsonObject__stringOf(jResp,'PelnaMeitu');
IenakumuIemaksa := CkJsonObject__stringOf(jResp,'IenakumuIemaksa');
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,'ValstsParstavji');
while i < count_i do
  begin
    CkJsonObject_putI(jResp,i);
    ValstsParstavis := CkJsonObject__stringOf(jResp,'ValstsParstavji[i].ValstsParstavis');
    ValstsDala := CkJsonObject__stringOf(jResp,'ValstsParstavji[i].ValstsDala');
    i := i + 1;
  end;

i := 0;
count_i := CkJsonObject_SizeOfArray(jResp,'MeituSabiedribas');
while i < count_i do
  begin
    CkJsonObject_putI(jResp,i);
    ValstsKods := CkJsonObject__stringOf(jResp,'MeituSabiedribas[i].ValstsKods');
    NmrKods := CkJsonObject__stringOf(jResp,'MeituSabiedribas[i].NmrKods');
    Nosaukums := CkJsonObject__stringOf(jResp,'MeituSabiedribas[i].Nosaukums');
    i := i + 1;
  end;

i := 0;
count_i := CkJsonObject_SizeOfArray(jResp,'Pielikumi');
while i < count_i do
  begin
    CkJsonObject_putI(jResp,i);
    Value := CkJsonObject__stringOf(jResp,'Pielikumi[i].Fails.value');
    Komentars := CkJsonObject__stringOf(jResp,'Pielikumi[i].Komentars');
    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/kvkiv1/:id

Postman Collection Item JSON

{
  "name": "Dokuments \"Paziņojums par kapitālsabiedrības valsts kapitāla izmantošanu\".",
  "request": {
    "method": "GET",
    "header": [
      {
        "key": "Accept",
        "value": "application/json"
      }
    ],
    "url": {
      "raw": "{{baseUrl}}/api/doc/kvkiv1/:id",
      "host": [
        "{{baseUrl}}"
      ],
      "path": [
        "api",
        "doc",
        "kvkiv1",
        ":id"
      ],
      "variable": [
        {
          "key": "id",
          "value": "25210683",
          "description": "(Required) Dokumenta id."
        }
      ]
    }
  },
  "response": [
    {
      "name": "OK",
      "originalRequest": {
        "method": "GET",
        "header": [
        ],
        "url": {
          "raw": "{{baseUrl}}/api/doc/kvkiv1/:id",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "api",
            "doc",
            "kvkiv1",
            ":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  \"Talrunis\": \"Duis s\",\n  \"SapulceGadaParskats\": \"2000-01-31T00:00:00\",\n  \"SapulceIzmaksa\": \"2000-01-31T00:00:00\",\n  \"Pamatkapitals\": 90212148.52912736,\n  \"Pelna\": -72905987.0307577,\n  \"IemaksajamaSumma\": 27706721.681724608,\n  \"IemaksasDatums\": \"2000-01-31T00:00:00\",\n  \"TaksGads\": -52696560,\n  \"ValstsParstavji\": [\n    {\n      \"ValstsParstavis\": \"magna in nostrud\",\n      \"ValstsDala\": 3.865663881687098\n    },\n    {\n      \"ValstsParstavis\": \"adipisicing amet\",\n      \"ValstsDala\": 13.633319635530782\n    }\n  ],\n  \"MeituSabiedribas\": [\n    {\n      \"ValstsKods\": \"mo\",\n      \"NmrKods\": \"elit\",\n      \"Nosaukums\": \"ipsum consequat deserunt in exercitation\"\n    },\n    {\n      \"ValstsKods\": \"d\",\n      \"NmrKods\": \"exercitatio\",\n      \"Nosaukums\": \"cillum minim dolor\"\n    }\n  ],\n  \"PelnaMeitu\": -78146907.7543265,\n  \"IenakumuIemaksa\": -94222836.58243935,\n  \"Pielikumi\": [\n    {\n      \"Fails\": {\n        \"value\": \"<Error: Too many levels of nesting to fake this schema>\"\n      },\n      \"Komentars\": \"sit nulla tempor\"\n    },\n    {\n      \"Fails\": {\n        \"value\": \"<Error: Too many levels of nesting to fake this schema>\"\n      },\n      \"Komentars\": \"aute et cillum mollit\"\n    }\n  ],\n  \"Id\": 62935092,\n  \"UID\": \"non ut\",\n  \"NmrKods\": \"nostrud q\",\n  \"Precizejums\": true,\n  \"PrecizejamaisDokuments\": 7244971,\n  \"PrecizejumaPamatojums\": \"fugiat officia aliqua ullamco\"\n}"
    },
    {
      "name": "Lietotājs nav autentificēts.",
      "originalRequest": {
        "method": "GET",
        "header": [
        ],
        "url": {
          "raw": "{{baseUrl}}/api/doc/kvkiv1/:id",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "api",
            "doc",
            "kvkiv1",
            ":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/kvkiv1/:id",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "api",
            "doc",
            "kvkiv1",
            ":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/kvkiv1/:id",
          "host": [
            "{{baseUrl}}"
          ],
          "path": [
            "api",
            "doc",
            "kvkiv1",
            ":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": ""
    }
  ]
}