home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1998 February
/
CHIP_2_98.iso
/
software
/
testsoft
/
vatman
/
vatman.lzh
/
INDEKS_D.DOK
< prev
next >
Wrap
Text File
|
1996-12-12
|
506b
|
18 lines
#DEFINICJE
Naz=len10(substr(INDEKS->NAZ_TOWARU,1,25),25)
Cn =transform(if(_MPODAT,INDEKS->CENA/(1+INDEKS->PODAT/100),INDEKS->CENA),"@E 999,999.99")
V =if(INDEKS->ZWOL,"Zw ",str(INDEKS->PODAT,2)+"%")
Czv=transform(if(_MPODAT,INDEKS->CENA,INDEKS->CENA*(1+INDEKS->PODAT/100)),"@E 999,999.99")
#NAGLOWEK
#POZYCJE
┌[KOD_TOWARU ]────────────┐
│[Naz ]│
├Cena netto┬Vat┬Cena z VAT┤
│[Cn ]│[V]│[Czv ]│
└──────────┴───┴──────────┘
#SUMY
[M->ADR]
[M->NIP ]
#KONIEC