k!Courier New IE CEE.winspoolGGeneric PostScript PrinterPLPT1:eGeneric PostScript PrinterœÄSď š 4d,,A4PRIVB0''''ÄP4(ˆ0‘§}˙ÓDRIVER=winspool DEVICE=Generic PostScript Printer OUTPUT=LPT1: ORIENTATION=1 PAPERSIZE=9 SCALE=100 ASCII=100 COPIES=1 DEFAULTSOURCE=15 PRINTQUALITY=300 COLOR=1 YRESOLUTION=300 TTOPTION=3 COLLATE=0 tmp.peArial"DATUM"Arial"SKUPAJ" tmp.dat_dok Arial"@D" tmp.racun Arial tmp.Skupaj Arial "9999,999.99"Jround(nSSkupaj,2) Arial"99999,999.99"JArial"S E Š T E V E K S K U P A J"dDatArial"@D"Arial"PRODAJA PO RAČUNIH OD"Arial"DO:"dDat2Arial"@D"Arial"RAČUN":vrni('klienti',1,'cklitozd+ckupdobk+blag1.klient','naziv') ArialM'Prodajec/Natakar: '+m.natakar+' '+vrni('SIFRANT',1,'"SOF"+m.natakar','opis') Arial.not. empty(m.natakar)D'Plačilo: '+m.placilo+' '+vrni('SIFRANT',1,'"PLA"+m.placilo','opis') Arial.not. empty(m.placilo)S'Kupec: '+m.klient+' '+vrni('KLIENTI','sifra','cKliTozd+cKupDobK+m.klient','naziv') Arial.not. empty(m.klient)tmp.cas ArialArial"URA" tmp.sofer ArialArial"NAT" tmp.davek Arial "999,999.99"J tmp.neto1 Arial "9999,999.99"JArial "DDV SKUPAJ" tmp.neto2 Arial "9999,999.99"JArial"KUPEC"'NETO '+TRANS(nP_DDV1,'99.9') Arial'NETO '+TRANS(nP_DDV2,'99.9') Arialround(nsdavek,2) Arial"99999,999.99"Jround(nsneto1,2) Arial"99999,999.99"Jround(nsneto2,2) Arial"99999,999.99"J round(nsneto1+nsneto2+nsneto3,2) Arial"99999,999.99"JArial"SEŠTEVEK NETO OSNOV:"'Stran: '+trans(_PAGENO,'999') ArialArial"Datum izpisa:"date() Arial"@D"cnat  Courier NewJtmp.neto1*nP_DDV1/100 Arial "9999,999.99"J'DDV'+TRANS(nP_DDV1,'99.9') Arialtmp.neto2*nP_DDV2/100 Arial "9999,999.99"J'DDV '+TRANS(nP_DDV2,'99.9') Arialround(nsneto1*nP_DDV1/100,2) Arial"99999,999.99"Jround(nsneto2*nP_DDV2/100,2) Arial"99999,999.99"Jcplac  Courier NewJ tmp.placilo ArialArial"PLA"cFirma1 ArialBcNaslov ArialBcMesto ArialBArial"ID številka:" cPDavStev ArialBcFirma2 ArialBArial "Tel.št.:"cPTel ArialBArial"Fax:"cPFax ArialBArial "E.pošta:" cPe_posta ArialBcFirma3 ArialBNSSKUPAJ tmp.skupaj0NBSKUPAJ tmp.skupaj0nsneto1 tmp.neto10nsneto2 tmp.neto20nsneto3 tmp.neto30nsdavek tmp.davek0Courier New IE CEArialArialArialArialArial Courier NewArialdataenvironmentName = "Dataenvironment" ÓDRIVER=winspool DEVICE=Generic PostScript Printer OUTPUT=LPT1: ORIENTATION=1 PAPERSIZE=9 SCALE=100 ASCII=100 COPIES=1 DEFAULTSOURCE=15 PRINTQUALITY=300 COLOR=1 YRESOLUTION=300 TTOPTION=3 COLLATE=0 E.winspoolGGeneric PostScript PrinterPLPT1:eGeneric PostScript PrinterœÄSď š 4d,,A4PRIVB0''''ÄP4(ˆ0‘§}˙Courier New IE CEtmp.pe"DATUM"Arial"SKUPAJ"Arial tmp.dat_dok"@D" Arial tmp.racun Arial tmp.SkupajJ "9999,999.99" Arialround(nSSkupaj,2)J"99999,999.99" Arial"S E Š T E V E K S K U P A J"ArialdDat"@D"Arial"PRODAJA PO RAČUNIH OD"Arial"DO:"ArialdDat2"@D"Arial"RAČUN"Arial(rtrim(klienti.naziv)+' '+klienti.objekt ArialM'Prodajec/Natakar: '+m.natakar+' '+vrni('SIFRANT',1,'"SOF"+m.natakar','opis') Arial.not. empty(m.natakar)D'Plačilo: '+m.placilo+' '+vrni('SIFRANT',1,'"PLA"+m.placilo','opis') Arial.not. empty(m.placilo)S'Kupec: '+m.klient+' '+vrni('KLIENTI','sifra','cKliTozd+cKupDobK+m.klient','naziv') Arial.not. empty(m.klient)tmp.cas Arial"URA"Arial tmp.sofer Arial"NAT"Arial tmp.davekJ "999,999.99" Arial tmp.neto1J "9999,999.99" Arial "DDV SKUPAJ"Arial tmp.neto2J "9999,999.99" Arial"KUPEC"Arial'NETO '+TRANS(nP_DDV1,'99.9') Arial'NETO '+TRANS(nP_DDV2,'99.9') Arialround(nsdavek,2)J"99999,999.99" Arialround(nsneto1,2)J"99999,999.99" Arialround(nsneto2,2)J"99999,999.99" Arial round(nsneto1+nsneto2+nsneto3,2)J"99999,999.99" Arial"SEŠTEVEK NETO OSNOV:"Arial'Stran: '+trans(_PAGENO,'999') Arial"Datum izpisa:"Arialdate()"@D" ArialcnatJ  Courier Newtmp.neto1*nP_DDV1/100J "9999,999.99" Arial'DDV'+TRANS(nP_DDV1,'99.9') Arialtmp.neto2*nP_DDV2/100J "9999,999.99" Arial'DDV '+TRANS(nP_DDV2,'99.9') Arialround(nsneto1*nP_DDV1/100,2)J"99999,999.99" Arialround(nsneto2*nP_DDV2/100,2)J"99999,999.99" ArialcplacJ  Courier New tmp.placilo Arial"PLA"ArialcFirma1B ArialcNaslovB ArialcMestoB Arial"ID številka:"Arial cPDavStevB ArialcFirma2B Arial "Tel.št.:"ArialcPTelB Arial"Fax:"ArialcPFaxB Arial "E.pošta:"Arial cPe_postaB ArialcFirma3B ArialNSSKUPAJ tmp.skupaj0NBSKUPAJ tmp.skupaj0nsneto1 tmp.neto10nsneto2 tmp.neto20nsneto3 tmp.neto30nsdavek tmp.davek0Courier New IE CEArialArialArialArialArial Courier NewArialdataenvironmentName = "Dataenvironment" cFirma1"BLAGO" "KOLI^INA""E.M.""CENA" "VREDNOST"cNaslovcMesto%"-----------------------------------"%"-----------------------------------" tmp.materialmaterial.naziv tmp.KolicinaJ "99,999.99" tmp.SkupajJ"99,999,999.99",vrni('sifrant',1,'"EME"+material.em','opis')nSSkupajJ"99,999,999.99""S E [ T E V E K""----------------------------"dDat"@D""PO BLAGU OD:""DO:"dDat2"@D"NSSKUPAJ tmp.skupaj0