Prikazi cijelu temu 05.03.2013 00:36
adi Van mreze
Clan
Registrovan od:06.02.2011
Lokacija:-


Predmet:Re: Fiskalizacija u FBiH
Pozdrav ekipi,

Imam nejasnoću oko definisanju rabata u kodu koji je zadužen za generisanje maloprodajnog računa, nadam se da mi neko može dati koju smjernicu i pomoći! Ovo je glavni kod

Citat:
strSQL = "Select * from tabela_mp_fiscal"
Set rst = CurrentDb.OpenRecordset(strSQL)
Open "C:\Temp\izvrsi.txt" For Output As #1

rst.MoveFirst
Do Until rst.EOF
Print #1, "107,1,______,_,__;"; "2"; ";"; "2"; ";"; Format(rst![PLU]); ";"; Format(rst![MPC], "##0.00"); ";"; Format(rst![NazivArtikla]); ";"
Print #1, "107,1,______,_,__;"; "4"; ";"; Format(rst![PLU]); ";"; Format(rst![MPC], "##0.00"); ";"
rst.MoveNext
x = x + 1
Loop
Print #1, "48,1,______,_,__;1000000000000065;1;000000;"
rst.MoveFirst
Do Until rst.EOF
Print #1, "52,1,______,_,__;"; Format(rst![PLU]); ";"; Format(rst!Izlaz, "##0.00"); ";;"
rst.MoveNext
x = x + 1
Loop

Print #1, "51,1,______,_,__;"
Print #1, "53,1,______,_,__;"; Format([Forms]![VPPOS].[Nacin_placanja], "0"); ";"; Format([Gotovina], "####0.00"); ";"
Print #1, "56,1,______,_,__;"

rst.Close

Close #1

Close #1

i u pitanju je uređaj firme Neosoft MP55 i u kodu nije predviđen rabat. Kako i gdje da ga dodam? Trenutno pretražujem uputstva sa sajta nsc-fiscal (dot) com ali en ide..

Hvala puno unaprijed, dosta je hitno!

LP,
Adi