Centar za edukaciju-BiH



#61 22.03.2011 13:46
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: Ideje i rjesenja iz teme fiskalizacija
Ma neka ostane taj dio koda i to bar na 1.
Sve zavisi i od compa a pogotovo od brzine diska.
Imam negdje proceduru koja prati shel ali je nisam smio staviti jer nemogu isprobati.
Procedura provjerava i ceka da se shell izvrsi.

E sad po meni dobro bi bilo sve dobre stvari od fiskalizacije izdvojiti u jednu temu.
Mogla bi se zvati napr. Konacna rjesenja na temu fiskalizacija ili nesto slicno.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#62 22.03.2011 14:11
miro35 Van mreze
Clan
Registrovan od:05.01.2009
Postovi:608


Predmet:Re: Ideje i rjesenja iz teme fiskalizacija
Odlično bi to bilo.Jer ovo je provjereno na uređaju.Znači ova funkcija radi s tim da trebamo naglasiti djelove funkcije koji se moraju prilagoditi na svoje kolone u formama i tabelama.Npr. "Gotova rješenja za fiskalne uređaje"
Miro
Ovaj post je ureden 1 puta. Posljednja izmjena 22.03.2011 14:15 od strane miro35. ↑  ↓

#63 22.03.2011 14:13
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: Ideje i rjesenja iz teme fiskalizacija
Hehe posto se ti najbolje razumijes u ovo to pada na tebe.
Ima tu jos par stvari koje bi trebalo izdvojiti ali ti to najbolje znas.
Ako ima jos sta napraviti u kodu tu sam.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#64 22.03.2011 14:16
miro35 Van mreze
Clan
Registrovan od:05.01.2009
Postovi:608


Predmet:Re: Ideje i rjesenja iz teme fiskalizacija
Ok samo da razmislim kako da to napravim
Miro
↑  ↓

#65 25.03.2011 10:48
miro35 Van mreze
Clan
Registrovan od:05.01.2009
Postovi:608


Predmet:Re: Ideje i rjesenja iz teme fiskalizacija
Još nešto što bi moglo biti zanimljivo:
Kako dobiti broj fiskalnog računa iz uređaja HCP ako hoćeš redovno „uvezivati“ brojeve fiskalnih računa sa svojim internim brojevima:
Prvo treba normalno poslati račun. Nakon toga je potrebno poslati CMD fajl (sa cmd.ok fajlom, naravno) sa ovim sadržajem:

<?xml version="1.0" encoding="UTF-8" standalone="yes" ?>

<COMMAND>

<DATA CMD="RECEIPT_STATE" />

</COMMAND>

U izlaznom folderu će se kreirati bill_state.xml koji ima otprilike ovu strukturu:

<?xml version='1.0' encoding='UTF-8' standalone='yes'?>

<RECEIPT_STATE AMOUNT='-1' DIFFERENCE='-1' RECEIPT_NUMBER='19' REFOUND_RECEIPT_NUMBER='6' RECEIPT_TO_REFUND='0' NUM_PAY='6' NUM_PLU='0' CLIENT='0' CASHIER='255' FISCAL_DAY_STARTED='false' FISCAL_RECEIPT_STARTED='false' REFOUND_MODE='false' >
<PAY AMOUNT='0' />
<PAY AMOUNT='0' />
<PAY AMOUNT='0' />
<PAY AMOUNT='0' />
<PAY AMOUNT='0' />
<PAY AMOUNT='0' />
</RECEIPT_STATE>
E ovaj RECEIPT_NUMBER je broj računa.kako to dobiti iz ovog xml fajla na access formu?
Miro
↑  ↓

#66 25.03.2011 12:54
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: Ideje i rjesenja iz teme fiskalizacija
RECEIPT_NUMBER='19'-Pretpostavljam da je to ovo.
sad jos par pitanja:
Kako se zove ovaj file?
Jeli uvijek isto ime?
jeli se kontrolise ima iz koda odnosno jel pri slanju ovog racuna generises ime ili neznas koje ce ime biti?
Putanja gdje se smijesta?
Jeli u tom folderu ima jos fajlova ili se brisu?
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#67 25.03.2011 15:02
miro35 Van mreze
Clan
Registrovan od:05.01.2009
Postovi:608


Predmet:Re: Ideje i rjesenja iz teme fiskalizacija
Taj fajl se zove bill_state.xml.Nisam siguran ali mislim da se uvjek isto zove.
Putanja je C:\HCP\FROM_FP\bill_state.xml
Na ovoj putanji ima još fajlova
Ovaj naziv bill_state.xml generiše uređaj.To je kao stanje računa.
Znači iza računa šaljem jedan fajl a uređaj vraća ovo gore bill_state.xml u kojem piše ovo npr:
<RECEIPT_STATE AMOUNT='-1' DIFFERENCE='-1' RECEIPT_NUMBER='19' REFOUND_RECEIPT_NUMBER='6' RECEIPT_TO_REFUND='0' NUM_PAY='6' NUM_PLU='0' CLIENT='0' CASHIER='255' FISCAL_DAY_STARTED='false' FISCAL_RECEIPT_STARTED='false' REFOUND_MODE='false' >
<PAY AMOUNT='0' />
<PAY AMOUNT='0' />
<PAY AMOUNT='0' />
<PAY AMOUNT='0' />
<PAY AMOUNT='0' />
<PAY AMOUNT='0' />
</RECEIPT_STATE>
Miro
↑  ↓

#68 29.03.2011 07:28
mci_r Van mreze
Clan
Registrovan od:17.03.2011
Postovi:34


Predmet:Re: Ideje i rjesenja iz teme fiskalizacija
Da li se moze iscitati taj RECEIPT_NUMBER='19' i upisati ga u neko polje
↑  ↓

#69 29.03.2011 12:12
miro35 Van mreze
Clan
Registrovan od:05.01.2009
Postovi:608


Predmet:Re: Ideje i rjesenja iz teme fiskalizacija
U stvari treba nam ovo "19".
Miro
↑  ↓

#70 29.03.2011 13:28
mci_r Van mreze
Clan
Registrovan od:17.03.2011
Postovi:34


Predmet:Re: Ideje i rjesenja iz teme fiskalizacija
Evo koda pa probajte

'---------------------------------------------
---------------
' Citaj
'
'---------------------------------------------
---------------
Function Citaj()

On Error GoTo Citaj_Err
Dim temp As String
Dim Jedan_red As String
Dim Poz As String
Dim Poz1 As String
Dim RukaPo As String
Close #1
Open ("" & DLookup("[Putanja]", "[Put]") & "\Rac" & [Forms]![Osnovna tabela Q VP1]![Datum] & " " & [Forms]![Osnovna tabela Q VP1]![Index] & ".inp") For Input As 1

While Not EOF(1)
Line Input #1, Jedan_red
temp = temp & Jedan_red & vbCrLf
Poz = InStr(1, temp, " RECEIPT_NUMBER=")
Poz1 = InStr(1, temp, "REFOUND_RECEIPT_NUMBER")
RukaPo = Mid(temp, Poz + 17, [Poz1] - [Poz] - 19)
Wend
Close #1
If Poz > 0 Then

MsgBox "Fiskalni broj racuna je: " & [RukaPo], vbCritical, "UPOZORENJE"
Else
MsgBox "UPSSS"
End If
Citaj_Exit:

Exit Function
Citaj_Err:
MsgBox Error$
Resume Citaj_Exit
End Function
↑  ↓

Stranice (11):1,2 ... 5,6,7,8,9,10,11


Sva vremena su GMT +01:00. Trenutno vrijeme: 6: 45 pm.