home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / testsoft / vatman / vatman.lzh / FDH_PK.DOK < prev    next >
Text File  |  1997-06-23  |  1KB  |  33 lines

  1. *SYSTEM=Nxxx
  2. #DEFINICJE
  3. Nrd=str(FDH->NR_DOK,5)
  4. dat=dtoc(DATA)
  5. Za1=FDH->NRS
  6. Za2=substr(FDH->INFO,1,25)
  7. Za3=len10(substr(FDH->INFO,26),25)
  8. Kwo=transform(KWOTA,"@E 9999,999,999.99")
  9. Nrr=substr(slownik('S_K','REJESTR   '+REJESTR),1,27)
  10. L  =str(REJ_LP,3)
  11. P  =str(REJ_LZ,3)
  12. #NAGLOWEK
  13. [M->ADR                                                                        ]
  14.          POLECENIE KSI¿GOWANIA Nr:[Nrd]         Data :[dat   ] 
  15.                                         Zaksi⌐g. dnia:
  16.  
  17. ------------------------------------------------------------------------------
  18. Lp|Dowód    |Treÿå                    |Konto Wn |          Kwota   |Konto Ma |
  19. --------------------------------------+---------+------------------+----------
  20. 1. [Za1    ] [Za2                    ]|[KONTO_WN]|[Kwo          ]   |[KONTO_MA]|
  21.              [Za3                    ]----------------------------------------
  22.                                            Razem:[Kwo          ]  
  23. ------------------------------------------------------------------------------
  24. |Il.|Wystawiê|Sprawdziê|Zatwierdziê|Zaksi⌐gowano w:            |             |
  25. |Zal|        |         |           |[Nrr                      ]|.........    |
  26. |   |        |         |           |Nr:[L] poz:[P]             | podpis      |
  27. ------------------------------------------------------------------------------
  28. SporzÑdzono w systemie PC VATMAN (C) ZTK BITAM
  29. #POZYCJE
  30. #SUMY
  31. [M->NIP     ]
  32. #KONIEC
  33.