- End With
- Kraj:
- Exit Function
- Izlaz:
- MsgBox "Ra
- un nije ispisan,greška u komunikaciji sa ureajem!", vbExclamation, "Obavijest"
- DoCmd.SetWarnings False
- DoCmd.RunSQL "UPDATE GLSTAVKEMP1 SET Nefiskaliziran='" & "-1" & "' WHERE BROULIZ='" & Forms.frmIZLAZMP.BROIZD & "'"
- DoCmd.SetWarnings True
- Kill "C:\HCP\TO_FP\Footer.xml"
- Kill "C:\HCP\TO_FP\RCP_" & Me.BROIZD & ".XML"
- Kill "C:\HCP\TO_FP\CMD.OK"
- GoTo Kraj
- End Function
Prikazi cijelu temu
15.03.2011 09:50
15.03.2011 09:50
Predmet:Re: Ideje i rjesenja iz teme fiskalizacija
Ovo je sad trenutno kraj funkcije:
Jer možda si primjetio da prvo Å¡aljem footer pa tek onda račun.Znači svaki put prije slanja računa Å¡aljem footer,to je nefiskalni tekst u kojem piÅ¡e moj broj lokalnog računa sa moje baze podataka formata 000000 znači Å¡est karaktera.Zato je ovo kill footer.
Zašto treba isprazniti mapu?
Jer kad dođe do greÅ¡ke ako je neki ostao fajl unutra, npr footer ili račun stari neki,onda kad se uređaj osposobi kad ja Å¡aljem sljedeći račun i fajl cmd.OK da ga izvrÅ¡i onda se izvrÅ¡i onaj stari račun ili footer kao u mom primjeru i potroÅ¡i se taj cmd.ok i onda dalje stoji taj novi račun.Itd itd...
Ovo je sad trenutno kraj funkcije:
PreuzmiIzvorni kôd (Text):
Ovo mi sad treba Kill da provjeri ako postoje ovi fajlovi u mapi da ih onda briÅ¡e.To kad javi ovu poruku greÅ¡ka u komunikaciji itd..Jer možda si primjetio da prvo Å¡aljem footer pa tek onda račun.Znači svaki put prije slanja računa Å¡aljem footer,to je nefiskalni tekst u kojem piÅ¡e moj broj lokalnog računa sa moje baze podataka formata 000000 znači Å¡est karaktera.Zato je ovo kill footer.
Zašto treba isprazniti mapu?
Jer kad dođe do greÅ¡ke ako je neki ostao fajl unutra, npr footer ili račun stari neki,onda kad se uređaj osposobi kad ja Å¡aljem sljedeći račun i fajl cmd.OK da ga izvrÅ¡i onda se izvrÅ¡i onaj stari račun ili footer kao u mom primjeru i potroÅ¡i se taj cmd.ok i onda dalje stoji taj novi račun.Itd itd...
Miro