Y!Arial Narrow CEE-winspoolHP DeskJet 930C/932C/935CUSB001ôHP DeskJet 930C/932C/935CœXCÿ€ š 4d,,A4DINU"4$ô †Ñ$˜$$˜$ÐDRIVER=winspool DEVICE=HP DeskJet 930C/932C/935C OUTPUT=USB001 ORIENTATION=0 PAPERSIZE=9 ASCII=9 COPIES=1 DEFAULTSOURCE=15 PRINTQUALITY=300 COLOR=2 DUPLEX=1 YRESOLUTION=300 TTOPTION=2 COLLATE=1  MATERIAL.DBFMATERIAL sifra_tozArial Narrow CE"ŠIFRA"material.sifra Arial Narrow CE,VRNI('sifrant',1,'"EME"+material.em','opis') Arial Narrow CEArial Narrow CE"E.M."material.naziv Arial Narrow CEArial Narrow CE"OPIS"Arial Narrow CE" ";vrni('cenik',2,'ccentozd+material.sifra+cglskl+"A"','cena') Arial Narrow CE "999,999.99"Arial Narrow CE&"INVENTURNI POPIS ZALOG ZA SKLADIŠÈE:"Arial Narrow CE"N.CENA B. DDV"Arial Narrow CE"Izvor"material.izvorArial Narrow CEmaterial.b_kodaArial Narrow CEArial Narrow CE "ERTNA KODA"cFirma1 Arial Narrow CErtrim(cNaslov)+', '+cMesto Arial Narrow CEArial Narrow CE"ID št." cpdavstev Arial Narrow CEArial Narrow CE"Tel"cptel Arial Narrow CEcFirma2 Arial Narrow CEArial Narrow CE"ZALOGA/KOMENTAR"Arial Narrow CE "mesec.org"Arial Narrow CE "NA DAN:"Arial Narrow CE"ZALOGE POPISAL:"Arial Narrow CE "PREVERIL:"Arial Narrow CEArial Narrow CEArial Narrow CEArial Narrow CEArial Narrow CEdataenvironmentœLeft = 136 Top = 151 Width = 520 Height = 200 AutoOpenTables = .T. AutoCloseTables = .T. InitialSelectedAlias = "MATERIAL" Name = "dataenvironment" fPROCEDURE Destroy *- [CONVERTER] Reset tables for compatibility THIS.OpenTables THIS.Init ENDPROC Úþòÿ ÁÁdÒ%_xp7U ™ô÷þ ™ô÷þUTHIS OPENTABLESINITDestroy,ÿÿ1¢¡2[)ÁÐDRIVER=winspool DEVICE=HP DeskJet 930C/932C/935C OUTPUT=USB001 ORIENTATION=0 PAPERSIZE=9 ASCII=9 COPIES=1 DEFAULTSOURCE=15 PRINTQUALITY=300 COLOR=2 DUPLEX=1 YRESOLUTION=300 TTOPTION=2 COLLATE=1 E-winspoolGHP DeskJet 930C/932C/935CLUSB001ôHP DeskJet 930C/932C/935CœXCÿ€ š 4d,,A4DINU"4$ô †Ñ$˜$$˜$Arial Narrow CE MATERIAL.DBFMATERIAL sifra_toz"ŠIFRA"Arial Narrow CEmaterial.sifra Arial Narrow CE,VRNI('sifrant',1,'"EME"+material.em','opis') Arial Narrow CE"E.M."Arial Narrow CEmaterial.naziv Arial Narrow CE"OPIS"Arial Narrow CE" "Arial Narrow CE;vrni('cenik',2,'ccentozd+material.sifra+cglskl+"A"','cena') "999,999.99" Arial Narrow CE&"INVENTURNI POPIS ZALOG ZA SKLADIŠÈE:"Arial Narrow CE"N.CENA B. DDV"Arial Narrow CE"Izvor"Arial Narrow CEmaterial.izvorArial Narrow CEmaterial.b_kodaArial Narrow CE "ERTNA KODA"Arial Narrow CEcFirma1 Arial Narrow CErtrim(cNaslov)+', '+cMesto Arial Narrow CE"ID št."Arial Narrow CE cpdavstev Arial Narrow CE"Tel"Arial Narrow CEcptel Arial Narrow CEcFirma2 Arial Narrow CE"ZALOGA/KOMENTAR"Arial Narrow CE "mesec.org"Arial Narrow CE "NA DAN:"Arial Narrow CEArial Narrow CEArial Narrow CEArial Narrow CEArial Narrow CEArial Narrow CEdataenvironmentœLeft = 136 Top = 151 Width = 520 Height = 200 AutoOpenTables = .T. AutoCloseTables = .T. InitialSelectedAlias = "MATERIAL" Name = "dataenvironment" fPROCEDURE Destroy *- [CONVERTER] Reset tables for compatibility THIS.OpenTables THIS.Init ENDPROC Úþòÿ ÁÁdÒ%_xp7U ™ô÷þ ™ô÷þUTHIS OPENTABLESINITDestroy,ÿÿ1¢¡2[)ÁEPSON_A4  MATERIAL.DBFMATERIALsifra_toz+skladisce"[IFRA" zaloga.sifra,vrni('sifrant',1,'"EME"+material.em','opis')"STRAN"trans(_pageno,'9999')J "SKLADI[^E :"m.skladisce+' '+m.SklOpis@iif(lInv,replicate('_',13),TRANS(zaloga.zaloga,'99,999,999.99'))Bold1+cFirma1+Bold2Cond2+Bold1+cFirma2+Bold2Bold1+cNaslov+Bold2Bold1+cMesto+Bold21trans(zaloga.knj_cena*zaloga.zaloga,'999,999.99')"E.M."material.nazivnSumVred"999,999,999.99" tarife.davek"999.9"Cond1"OPIS" "KOLI^INA"" "ZALOGA.KNJ_CENA "999,999.99""DDV%" ccenaopisdate10(ddatum)"ZALOGE MATERIALA NA DAN" ccenaopis "SE[TEVEK:"zaloga.vrednost"999,999,999.99"n"------------------------------------------------------------------------------------------------------------"n"------------------------------------------------------------------------------------------------------------" nsumvred1"999,999,999.99"9"-------------------------------------------------------" "ZAL*CENA" "KONTR.VRED."NSUMVREDzaloga.zaloga*zaloga.knj_cena0 NSUMVRED1zaloga.vrednost0 NSUMNVREDzaloga.zaloga*zaloga.nabcena0NDAVEK(zaloga.zaloga*nNetoCena*tarife.davek/1000NBREZDAVzaloga.zaloga*nNetoCena0 NNETOCENASiif(cTipCene $ cPTipCDav , zaloga.knj_cena/(1+tarife.davek/100) , zaloga.knj_cena )0