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