Chilkat Online Tools

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

Back to Collection Items

LOCAL loHttp
LOCAL lnSuccess
LOCAL loSbResponseBody
LOCAL loJResp
LOCAL lnRespStatusCode
LOCAL lcValstsParstavis
LOCAL lcValstsDala
LOCAL lcValstsKods
LOCAL lcNosaukums
LOCAL lcValue
LOCAL lcKomentars
LOCAL lcTalrunis
LOCAL lcSapulceGadaParskats
LOCAL lcSapulceIzmaksa
LOCAL lcPamatkapitals
LOCAL lcPelna
LOCAL lcIemaksajamaSumma
LOCAL lcIemaksasDatums
LOCAL lnTaksGads
LOCAL lcPelnaMeitu
LOCAL lcIenakumuIemaksa
LOCAL lnId
LOCAL lcUID
LOCAL lcNmrKods
LOCAL lnPrecizejums
LOCAL lnPrecizejamaisDokuments
LOCAL lcPrecizejumaPamatojums
LOCAL i
LOCAL lnCount_i

* This example assumes the Chilkat API to have been previously unlocked.
* See Global Unlock Sample for sample code.

loHttp = CreateObject('Chilkat_9_5_0.Http')

loHttp.SetRequestHeader("Accept","application/json")

loSbResponseBody = CreateObject('Chilkat_9_5_0.StringBuilder')
lnSuccess = loHttp.QuickGetSb("https://eds.vid.gov.lv/api/doc/kvkiv1/:id",loSbResponseBody)
IF (lnSuccess = 0) THEN
    ? loHttp.LastErrorText
    RELEASE loHttp
    RELEASE loSbResponseBody
    CANCEL
ENDIF

loJResp = CreateObject('Chilkat_9_5_0.JsonObject')
loJResp.LoadSb(loSbResponseBody)
loJResp.EmitCompact = 0

? "Response Body:"
? loJResp.Emit()

lnRespStatusCode = loHttp.LastStatus
? "Response Status Code = " + STR(lnRespStatusCode)
IF (lnRespStatusCode >= 400) THEN
    ? "Response Header:"
    ? loHttp.LastHeader
    ? "Failed."
    RELEASE loHttp
    RELEASE loSbResponseBody
    RELEASE loJResp
    CANCEL
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

lcTalrunis = loJResp.StringOf("Talrunis")
lcSapulceGadaParskats = loJResp.StringOf("SapulceGadaParskats")
lcSapulceIzmaksa = loJResp.StringOf("SapulceIzmaksa")
lcPamatkapitals = loJResp.StringOf("Pamatkapitals")
lcPelna = loJResp.StringOf("Pelna")
lcIemaksajamaSumma = loJResp.StringOf("IemaksajamaSumma")
lcIemaksasDatums = loJResp.StringOf("IemaksasDatums")
lnTaksGads = loJResp.IntOf("TaksGads")
lcPelnaMeitu = loJResp.StringOf("PelnaMeitu")
lcIenakumuIemaksa = loJResp.StringOf("IenakumuIemaksa")
lnId = loJResp.IntOf("Id")
lcUID = loJResp.StringOf("UID")
lcNmrKods = loJResp.StringOf("NmrKods")
lnPrecizejums = loJResp.BoolOf("Precizejums")
lnPrecizejamaisDokuments = loJResp.IntOf("PrecizejamaisDokuments")
lcPrecizejumaPamatojums = loJResp.StringOf("PrecizejumaPamatojums")
i = 0
lnCount_i = loJResp.SizeOfArray("ValstsParstavji")
DO WHILE i < lnCount_i
    loJResp.I = i
    lcValstsParstavis = loJResp.StringOf("ValstsParstavji[i].ValstsParstavis")
    lcValstsDala = loJResp.StringOf("ValstsParstavji[i].ValstsDala")
    i = i + 1
ENDDO
i = 0
lnCount_i = loJResp.SizeOfArray("MeituSabiedribas")
DO WHILE i < lnCount_i
    loJResp.I = i
    lcValstsKods = loJResp.StringOf("MeituSabiedribas[i].ValstsKods")
    lcNmrKods = loJResp.StringOf("MeituSabiedribas[i].NmrKods")
    lcNosaukums = loJResp.StringOf("MeituSabiedribas[i].Nosaukums")
    i = i + 1
ENDDO
i = 0
lnCount_i = loJResp.SizeOfArray("Pielikumi")
DO WHILE i < lnCount_i
    loJResp.I = i
    lcValue = loJResp.StringOf("Pielikumi[i].Fails.value")
    lcKomentars = loJResp.StringOf("Pielikumi[i].Komentars")
    i = i + 1
ENDDO

RELEASE loHttp
RELEASE loSbResponseBody
RELEASE loJResp

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": ""
    }
  ]
}