PureBasic / EDS API / Dokuments "Paziņojums par kapitālsabiedrības valsts kapitāla izmantošanu".
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/kvkiv1/: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)
; {
; "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
ValstsParstavis.s
ValstsDala.s
ValstsKods.s
Nosaukums.s
Value.s
Komentars.s
Talrunis.s = CkJsonObject::ckStringOf(jResp,"Talrunis")
SapulceGadaParskats.s = CkJsonObject::ckStringOf(jResp,"SapulceGadaParskats")
SapulceIzmaksa.s = CkJsonObject::ckStringOf(jResp,"SapulceIzmaksa")
Pamatkapitals.s = CkJsonObject::ckStringOf(jResp,"Pamatkapitals")
Pelna.s = CkJsonObject::ckStringOf(jResp,"Pelna")
IemaksajamaSumma.s = CkJsonObject::ckStringOf(jResp,"IemaksajamaSumma")
IemaksasDatums.s = CkJsonObject::ckStringOf(jResp,"IemaksasDatums")
TaksGads.i = CkJsonObject::ckIntOf(jResp,"TaksGads")
PelnaMeitu.s = CkJsonObject::ckStringOf(jResp,"PelnaMeitu")
IenakumuIemaksa.s = CkJsonObject::ckStringOf(jResp,"IenakumuIemaksa")
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,"ValstsParstavji")
While i < count_i
CkJsonObject::setCkI(jResp, i)
ValstsParstavis = CkJsonObject::ckStringOf(jResp,"ValstsParstavji[i].ValstsParstavis")
ValstsDala = CkJsonObject::ckStringOf(jResp,"ValstsParstavji[i].ValstsDala")
i = i + 1
Wend
i = 0
count_i = CkJsonObject::ckSizeOfArray(jResp,"MeituSabiedribas")
While i < count_i
CkJsonObject::setCkI(jResp, i)
ValstsKods = CkJsonObject::ckStringOf(jResp,"MeituSabiedribas[i].ValstsKods")
NmrKods = CkJsonObject::ckStringOf(jResp,"MeituSabiedribas[i].NmrKods")
Nosaukums = CkJsonObject::ckStringOf(jResp,"MeituSabiedribas[i].Nosaukums")
i = i + 1
Wend
i = 0
count_i = CkJsonObject::ckSizeOfArray(jResp,"Pielikumi")
While i < count_i
CkJsonObject::setCkI(jResp, i)
Value = CkJsonObject::ckStringOf(jResp,"Pielikumi[i].Fails.value")
Komentars = CkJsonObject::ckStringOf(jResp,"Pielikumi[i].Komentars")
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/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": ""
}
]
}