home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / testsoft / vatman / vatman.lzh / FDH_KP.DOK < prev    next >
Text File  |  1997-06-23  |  2KB  |  49 lines
  1. *SYSTEM=Nxxx
  2. #DEFINICJE
  3. X  =if(KONTO_WN='10','KP ','KW ')
  4. Ww =if(KONTO_WN='10','WP¥ATY ','WYP¥ATY')
  5. Nrd=str(FDH->NR_DOK,5)
  6. dat=dtoc(DATA)
  7. Od =if(KONTO_WN='10',' Od ','Dla ')
  8. Np =substr(slownik('KONTRAH',KONTRAHENT),1,40)
  9. Ap =substr(KONTRAH->ADRES_PLAT,1,40)
  10. WnM=if(KONTO_WN='10','Winien','  Ma  ')
  11. MaW=if(KONTO_WN='10','  Ma  ','Winien')
  12. Za1=FDH->NRS
  13. Za2=len10(substr(FDH->INFO,1,34),34)
  14. Kwo=transform(KWOTA,"@E 9999,999,999.99")
  15. Sl1=substr(slownie(KWOTA),1 ,69)
  16. Sl2=substr(slownie(KWOTA),70,69)
  17. Odg=if(KONTO_WN='10','Kasjera ','Odbiorcy')
  18. L  =str(REJ_LP,3)
  19. P  =str(REJ_LZ,3)
  20. #NAGLOWEK
  21. [M->ADR]
  22. [M->NIP]
  23.                          DOWαD   ┌───┐
  24.                          [Ww   ] │[X]│ Nr:[Nrd     ] Data :[dat   ]
  25.                                  └───┘
  26. ┌[Od]kogo:───────────────────────────────┬─────────────────┬─────────┐
  27. │[Np                                    ]│         [WnM ]  │ [MaW ]  │
  28. │[Ap                                    ]│           Kasa  │ Konto   │
  29. ├────────────────────────────────────────┼─────────────────┼─────────┤
  30. │za co                                   │             zê  │ Numer   │
  31. ├────────────────────────────────────────┼─────────────────┼─────────┤
  32. │[Za1    ]                               │[Kwo          ]  │         │
  33. │[Za2                             ]      │                 │         │
  34. ├────────────────────────────────────────┼─────────────────┼─────────┘
  35. │                                  Razem:│[Kwo          ]  │
  36. │                                        └─────────────────┘
  37. │[Sl1                                                                ]
  38. │[Sl2                                                                ]
  39. ├────────┬─────────┬───────────┬───────────┬─────────────────────────┐
  40. │Wystawiê│Sprawdziê│Zatwierdziê│Rap.kasowy │ Kwot⌐ powy╛. otrzymaêem │
  41. │        │         │           │Nr  [L]    │ ......................  │
  42. │        │         │           │poz [P]    │ podpis [Odg   ]         │
  43. └────────┴─────────┴───────────┴───────────┴─────────────────────────┘
  44. SporzÑdzono w systemie PC VATMAN (C) ZTK BITAM
  45. #POZYCJE
  46. #SUMY
  47. [M->NIP     ]
  48. #KONIEC
  49.