Prikazi cijelu temu 22.10.2011 17:24
Amelasar Van mreze
Clan
Registrovan od:07.04.2011
Lokacija:SARAJEVO


Predmet:Re: Fiskalizacija u FBiH
Napisala sam da je za TRING fiskalne uredjaje: TringFavoritePlus i Partner.
Procedure rade fantasticno.

Procedure sam dodala u modul.

Nakon koda za printanje racuna saljem slijedeće:

PreuzmiIzvorni kôd (Text):
  1. Zaustavi (4)
  2. Dim Odgovor As String
  3. Odgovor = Vrsta_Ugovora("c:\tring\xml\odgovori\stampatifiskalniracun." & zah & ".xml")
  4. If Odgovor = "Greska" Then
  5. MsgBox "Ra
  6. un nije fiskalizovan!", vbCritical
  7. Else
  8. Dim Brrac As String
  9. Brrac = Broj_Racuna("c:\tring\xml\odgovori\stampatifiskalniracun." & zah & ".xml")
  10. [Forms]![racun].BRF = Brrac
  11. [Forms]![racun].Fiskalizovan.Value = -1
  12. End If

Jel OK ovaj nacin?
Sve radi super. Nisam jos probala na uredjaju ali sam simulirala i sve je ok.
Kako bi u funkciju Zaustavi dodala neki prozor na kojem ce pisati "SAČEKAJTE" i da se skloni sam kad vrijeme prođe?

Hvala ti puno zxz na pomoci.
Pozdrav, Amela