home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / testsoft / vatman / vatman.lzh / INDEKS.DOK < prev    next >
Text File  |  1996-12-12  |  1KB  |  27 lines
  1. #DEFINICJE
  2. dn =dtoc(date())
  3. Cn =transform(if(_MPODAT,INDEKS->CENA/(1+INDEKS->PODAT/100),INDEKS->CENA),"@E 9999,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 9999,999.99")
  6. Jm =substr(slownik("S_K","JM        "+INDEKS->JM),1,5)
  7. Opn=if(M->_OPAK,"Iloÿå w opakowaniu ","───────────────────")
  8. Op1=if(M->_OPAK.and.INDEKS->PRZEL2>0,str(INDEKS->PRZEL2,5,1),"     ")
  9. * ew. [INDEKS->OPIS_TOWAR]
  10.  
  11. #NAGLOWEK
  12. [M->ADR]
  13. NIP: [M->NIP]
  14. [repl("─",77)]
  15. Wydruk kartoteki towarów  Z dnia: [dn    ]
  16. [repl("─",77)]
  17. #POZYCJE
  18. ┌[KOD_TOWARU ]───────────────────────────────────────────────────────────────┐
  19. │[len10(INDEKS->NAZ_TOWARU,76)                                              ]│
  20. ├Cena netto────Vat──Cena brutto──┬───Sww──────────[Opn              ]────────┤
  21. │[Cn      ]    [V]% [Czv      ]  │  [INDEKS->SWW] [Op1]                      │
  22. └────────────────────────────────┴───────────────────────────────────────────┘
  23. SporzÑdzono w systemie PC VATMAN (C) ZTK BITAM 
  24. #SUMY
  25. SporzÑdziê: [M->man]
  26. #KONIEC
  27.