Centar za edukaciju-BiH

iCentar → Racunari i oprema → Programirannje i baze podataka → Access


Prosiri i skupi Opcije teme
Stranice (7):1,2,3,4,5,6,7
 Prikazi prvu neprocitanu poruku

#1 22.04.2024 16:58
Amelasar Van mreze
Clan
Registrovan od:07.04.2011
Postovi:295


Predmet:Fiskalizacija u RS-u
Ima li neko vise informacija o novoj fiskalizaciji u RS-u?
Pozdrav, Amela
↑  ↓

#2 16.05.2024 09:48
Branestan Van mreze
Clan
Registrovan od:07.05.2012
Postovi:115


Predmet:Re:Fiskalizacija u RS-u
Ovdje mozete pronaci detalje: https://ofs.ba/
↑  ↓

#3 16.06.2024 22:39
Amelasar Van mreze
Clan
Registrovan od:07.04.2011
Postovi:295


Predmet:Re:Fiskalizacija u RS-u
Da li je neko vec prilagodio softver? Jeli ima negdje da se testira slanje?
Pozdrav, Amela
↑  ↓

#4 24.08.2024 10:09
Amelasar Van mreze
Clan
Registrovan od:07.04.2011
Postovi:295


Predmet:Re:Fiskalizacija u RS-u
Mikroelektronika je razvila X-link (nekad F-link) i sluzi kao i prijasnji drajver sada komunicirajuci izmedju pos programa i servera poreske uprave putem api poziva.
Za svoje korisnike isto je drajver razvio Digit - http://www.digit-rs.com/fiskkase.html

Svaki programer (nisam to znala) moze sam da razvije svoj ESIR tj. da napravi da se direktno putem api poziva komunicira sa poreskom upravom.

Uputstvo kako to uraditi dato je na stranici https://api.ofs.ba/

Vidim preko 70 hiljada pregleda, tematika je zanimljiva.
Zamolila bih sve koji mogu pomoci jer isto nas ceka u Federaciji, a i da malo ozivimo ovaj forum.
Pozdrav, Amela
Ovaj post je ureden 1 puta. Posljednja izmjena 24.08.2024 10:19 od strane Amelasar. ↑  ↓

#5 28.08.2024 23:04
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,628


Predmet:Re:Fiskalizacija u RS-u
Posto si nasla sve linkove ostalo je samo da se uradi.
Ovo je HTTP REST JSON API interfejs.
Date su pristupne tacke i treba samo integrisati podatke iz baze.
U referencama treba ukljuciti MSXML2.XMLHTTP odnosno Microsoft xml v 6.0 (u msaccess 2007).
Ostalo je sve sljakanje.
Nisam vidio dali postoji negdje testni kljuc na api,ofs.ba, vjerovatno ima.
Evo ja cu postaviti na icentar za provjeru.
adresa je:
https://icentar.ba/api/invoices/index.php
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#6 28.08.2024 23:18
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,628


Predmet:Re:Fiskalizacija u RS-u
evo jedan primjer sa statickim podacima.
Uzeto je sa api.ofs.ba znaci tako treba da izgleda json samo sa dinamickim podacima iz baze.
PreuzmiIzvorni kôd (Visual Basic):
  1. Function test_api()
  2. Dim objHTTP As Object
  3. Dim URL As String
  4. Dim requestData As String
  5.  
  6. URL = "https://icentar.ba/api/invoices/index.php"
  7. Set objHTTP = CreateObject("MSXML2.XMLHTTP")
  8. requestData = "{""invoiceRequest"": {""invoiceType"": ""Normal"", ""transactionType"": ""Sale"", ""buyerId"": ""111758195"", ""payment"": [{""amount"": 100.00, ""paymentType"": ""Cash""}], ""items"": [{""name"": ""Artikl 1"", ""labels"": [""F""], ""totalAmount"": 100.00, ""unitPrice"": 50.00, ""quantity"": 2.000}], ""cashier"": ""Radnik 1""}}"
  9.     With objHTTP
  10.         .Open "POST", URL, False
  11.         '.setRequestHeader "Authorization", "Bearer " & token
  12.        '.setRequestHeader "RequestId", "12345"
  13.        .setRequestHeader "Content-Type", "application/json"
  14.         .Send requestData
  15.         Text = .responseText
  16.     End With
  17. MsgBox Text
  18. End Function
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#7 29.08.2024 10:40
Amelasar Van mreze
Clan
Registrovan od:07.04.2011
Postovi:295


Predmet:Re:Fiskalizacija u RS-u
Nema testnog kljuca (bar ja nisam nasla). Kasa se preko wifi (ili doc station) poveze na internet. Android sistem je. Dodjeli joj se fixna ip adresa i URL izgleda:
URL = "http://192.168.1.21:3566/api/invoices"

Javi mi gresku: {"message":"Bad Request","modelState":[{"errors":["2310"],"property":"items[0].labels[0]"}]}
Pozdrav, Amela
Ovaj post je ureden 1 puta. Posljednja izmjena 29.08.2024 10:43 od strane Amelasar. ↑  ↓

#8 29.08.2024 11:56
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,628


Predmet:Re:Fiskalizacija u RS-u
Da to je ok, Ali obicno ima testna baza dok se radi da se moze isprobati. Na to sam mislio.
Ja nisam sve procitao pa pretpostavljam da negdje ima, jer obicno ima.
Nema veze moze se napraviti na icentar da glumi poresku pa da testiramo.
Za sad sam stavio samo da provjerava dali je json dobar koji napravimo i o je ssvim dovoljno jer urnek za json ma na njihovoj stranici samo treba implementirati podatke iz baze i to je to.
Posto msacesanema funkcije jsdonEncode i decode imam link gdje se to moze skinuti.
Imaju gotove funkcije, samo se importuju u vasu aplikaciju ali nisam stavio misleci da se necete snaci.
Naravno moze i bez toga mogu se variable postaviti i u json odnosno string.
E sad gdje ti javi gresku.
Postavi kod koji pokreces.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#9 29.08.2024 11:59
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,628


Predmet:Re:Fiskalizacija u RS-u
evo link za json.
VBA-JSON
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#10 29.08.2024 12:00
Amelasar Van mreze
Clan
Registrovan od:07.04.2011
Postovi:295


Predmet:Re:Fiskalizacija u RS-u
PreuzmiIzvorni kôd (Text):
  1. Private Sub Command1_Click()
  2. Dim objHTTP As Object
  3. Dim URL As String
  4. Dim requestData As String
  5.  
  6. URL = "http://192.168.1.21:3566/api/invoices"
  7. Set objHTTP = CreateObject("MSXML2.XMLHTTP")
  8.  
  9. requestData = "{""invoiceRequest"": {""invoiceType"": ""Normal"", ""transactionType"": ""Sale"", ""buyerId"": ""111758195"", ""payment"": [{""amount"": 2.00, ""paymentType"": ""Cash""}], ""items"": [{""name"": ""Artikl 1"", ""labels"": [""F""], ""totalAmount"": 2.00, ""unitPrice"": 2.00, ""quantity"": 1.000}], ""cashier"": ""Radnik 1""}}"
  10.     With objHTTP
  11.         .Open "POST", URL, False
  12.         .setRequestHeader "Authorization", "Bearer 0497e0bd2c7cf29820f46c19eb5842a3"
  13.         .setRequestHeader "RequestId", "12345"
  14.         .setRequestHeader "Content-Type", "application/json"
  15.         .Send requestData
  16.         Text = .responseText
  17.     End With
  18.     Debug.Print Text
  19. MsgBox Text
  20. End Sub

To je kod. Nigdje nemam referencu MSXML2.XMLHTTP. Koristim access 2003.
Pozdrav, Amela
↑  ↓

Stranice (7):1,2,3,4,5,6,7

Srodne teme

Ko je online?

Aktivni clanovi:
nema clanova


Kontakt
Sva vremena su GMT +02:00. Trenutno vrijeme: 2: 34 am.