Foxpro / EDS API / Dokuments "Akcīzes nodokļa aprēķins (likmju maiņas gadījumā)".
Back to Collection Items
LOCAL loHttp
LOCAL lnSuccess
LOCAL loSbResponseBody
LOCAL loJResp
LOCAL lnRespStatusCode
LOCAL lnLikmeId
LOCAL lcKods
LOCAL lcK3
LOCAL lcK4
LOCAL lcDokuments
LOCAL lcValue
LOCAL lcKomentars
LOCAL lcTalrunis
LOCAL lcEpasts
LOCAL lcNmVeids
LOCAL lcSagatavotajs
LOCAL lcLikmesDatums
LOCAL lcPrecuGrupas
LOCAL lcInvDatums
LOCAL lcMaksTermins
LOCAL lcNmAkcNumuri
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/aniav3/: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": "velit f",
* "Epasts": "voluptate in",
* "NmVeids": "enim ipsum et",
* "Sagatavotajs": "incididunt pariatur",
* "LikmesDatums": "2000-01-31T00:00:00",
* "PrecuGrupas": "mollit cillum sunt velit eiusmod",
* "InvDatums": "2000-01-31T00:00:00",
* "MaksTermins": "2000-01-31T00:00:00",
* "NmAkcNumuri": "consequat cupidatat magna fugiat",
* "Tabula": [
* {
* "LikmeId": -70310886,
* "Kods": "sunt exercitation esse irure",
* "K3": 9325482.159040317,
* "K4": 46466485.181491464
* },
* {
* "LikmeId": 61440397,
* "Kods": "officia sit dolore",
* "K3": 34522730.61346921,
* "K4": 51331912.60301468
* }
* ],
* "Pielikumi": [
* {
* "Dokuments": "in consequat incididunt",
* "Fails": {
* "value": "<Error: Too many levels of nesting to fake this schema>"
* },
* "Komentars": "quis in ad"
* },
* {
* "Dokuments": "conse",
* "Fails": {
* "value": "<Error: Too many levels of nesting to fake this schema>"
* },
* "Komentars": "Ut dolore magna do"
* }
* ],
* "Id": 8468076,
* "UID": "enim eiusmod",
* "NmrKods": "in ",
* "Precizejums": false,
* "PrecizejamaisDokuments": -23123385,
* "PrecizejumaPamatojums": "nisi magna deserunt reprehenderit"
* }
* 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")
lcEpasts = loJResp.StringOf("Epasts")
lcNmVeids = loJResp.StringOf("NmVeids")
lcSagatavotajs = loJResp.StringOf("Sagatavotajs")
lcLikmesDatums = loJResp.StringOf("LikmesDatums")
lcPrecuGrupas = loJResp.StringOf("PrecuGrupas")
lcInvDatums = loJResp.StringOf("InvDatums")
lcMaksTermins = loJResp.StringOf("MaksTermins")
lcNmAkcNumuri = loJResp.StringOf("NmAkcNumuri")
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("Tabula")
DO WHILE i < lnCount_i
loJResp.I = i
lnLikmeId = loJResp.IntOf("Tabula[i].LikmeId")
lcKods = loJResp.StringOf("Tabula[i].Kods")
lcK3 = loJResp.StringOf("Tabula[i].K3")
lcK4 = loJResp.StringOf("Tabula[i].K4")
i = i + 1
ENDDO
i = 0
lnCount_i = loJResp.SizeOfArray("Pielikumi")
DO WHILE i < lnCount_i
loJResp.I = i
lcDokuments = loJResp.StringOf("Pielikumi[i].Dokuments")
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/aniav3/:id
Postman Collection Item JSON
{
"name": "Dokuments \"Akcīzes nodokļa aprēķins (likmju maiņas gadījumā)\".",
"request": {
"method": "GET",
"header": [
{
"key": "Accept",
"value": "application/json"
}
],
"url": {
"raw": "{{baseUrl}}/api/doc/aniav3/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"aniav3",
":id"
],
"variable": [
{
"key": "id",
"value": "25210683",
"description": "(Required) Dokumenta id."
}
]
}
},
"response": [
{
"name": "OK",
"originalRequest": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{baseUrl}}/api/doc/aniav3/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"aniav3",
":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\": \"velit f\",\n \"Epasts\": \"voluptate in\",\n \"NmVeids\": \"enim ipsum et\",\n \"Sagatavotajs\": \"incididunt pariatur\",\n \"LikmesDatums\": \"2000-01-31T00:00:00\",\n \"PrecuGrupas\": \"mollit cillum sunt velit eiusmod\",\n \"InvDatums\": \"2000-01-31T00:00:00\",\n \"MaksTermins\": \"2000-01-31T00:00:00\",\n \"NmAkcNumuri\": \"consequat cupidatat magna fugiat\",\n \"Tabula\": [\n {\n \"LikmeId\": -70310886,\n \"Kods\": \"sunt exercitation esse irure\",\n \"K3\": 9325482.159040317,\n \"K4\": 46466485.181491464\n },\n {\n \"LikmeId\": 61440397,\n \"Kods\": \"officia sit dolore\",\n \"K3\": 34522730.61346921,\n \"K4\": 51331912.60301468\n }\n ],\n \"Pielikumi\": [\n {\n \"Dokuments\": \"in consequat incididunt\",\n \"Fails\": {\n \"value\": \"<Error: Too many levels of nesting to fake this schema>\"\n },\n \"Komentars\": \"quis in ad\"\n },\n {\n \"Dokuments\": \"conse\",\n \"Fails\": {\n \"value\": \"<Error: Too many levels of nesting to fake this schema>\"\n },\n \"Komentars\": \"Ut dolore magna do\"\n }\n ],\n \"Id\": 8468076,\n \"UID\": \"enim eiusmod\",\n \"NmrKods\": \"in \",\n \"Precizejums\": false,\n \"PrecizejamaisDokuments\": -23123385,\n \"PrecizejumaPamatojums\": \"nisi magna deserunt reprehenderit\"\n}"
},
{
"name": "Lietotājs nav autentificēts.",
"originalRequest": {
"method": "GET",
"header": [
],
"url": {
"raw": "{{baseUrl}}/api/doc/aniav3/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"aniav3",
":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/aniav3/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"aniav3",
":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/aniav3/:id",
"host": [
"{{baseUrl}}"
],
"path": [
"api",
"doc",
"aniav3",
":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": ""
}
]
}
