home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / testsoft / vatman / vatman.lzh / FDH_PRZE.DOK < prev    next >
Text File  |  1997-06-23  |  8KB  |  79 lines
  1. *SYSTEM=Nxxx
  2. #DEFINICJE
  3. Np1=substr(slownik('KONTRAH',FDH->KONTRAHENT),1,28)
  4. Np2=substr(KONTRAH->NAZWA_PLAT,29)
  5. Ad1=substr(KONTRAH->ADRES_PLAT,1,28)
  6. Ad2=substr(KONTRAH->ADRES_PLAT,29)
  7. Bn1=substr(KONTRAH->BANK,1,17)
  8. Bn2=len10(substr(KONTRAH->BANK,18,28),28)
  9. Kn1=substr(KONTRAH->KONTO_PLAT,1,19)
  10. Kn2=len10(substr(KONTRAH->KONTO_PLAT,20,28),28)
  11. Nk1=substr(_S1,1,19)
  12. Nk2=len10(substr(_S1,20,28),28)
  13. Nb1=substr(_S0,1,17)
  14. Nb2=len10(substr(_S0,18,28),28)
  15. Doz=transform(FDH->KWOTA,"@E 999,999,999.99")
  16. dat=dtoc(DATA)
  17. Txt=len10(FDH->INFO,34)
  18. #NAGLOWEK
  19. ┌──┐                                                         ┌──┐                                                       
  20. │2 │(POLECENIE PRZELEWU/POBRANIA/PRZELEW TELEGRAFICZNY*)  A  │2 │(POLECENIE PRZELEWU/POBRANIA/PRZELEW TELEGRAFICZNY*)  B
  21. ├──┴─────────────────────────┬────────────────────────────┐  ├──┴─────────────────────────┬────────────────────────────┐
  22. │W ci⌐╛ar rachunku           │Na dobro rachunku           │  │W ci⌐╛ar rachunku           │Na dobro rachunku           │
  23. ├────────────────────────────┼────────────────────────────┤  ├────────────────────────────┼────────────────────────────┤
  24. │Nazwa dêu╛nika:             │Nazwa wierzyciela:          │  │Nazwa dêu╛nika:             │Nazwa wierzyciela:          │
  25. │[substr(M->ADR,1,28)       ]│[Np1                       ]│  │[substr(M->ADR,1,28)       ]│[Np1                       ]│
  26. │[len10(substr(M->ADR,29,28),28)]│[Ad1                       ]│  │[len10(substr(M->ADR,29,28),28)]│[Ad1                       ]│
  27. │[len10(substr(M->ADR,57),28)]│[Ad2       ]                │  │[len10(substr(M->ADR,57),28)]│[Ad2       ]                │
  28. ├────────────────────────────┼────────────────────────────┤  ├────────────────────────────┼────────────────────────────┤
  29. │w (Banku): [Nb1            ]│w (Banku): [Bn1            ]│  │w (Banku): [Nb1            ]│w (Banku): [Bn1            ]│
  30. │[Nb2                       ]│[Bn2                       ]│  │[Nb2                       ]│[Bn2                       ]│
  31. ├────────────────────────────┼────────────────────────────┤  ├────────────────────────────┼────────────────────────────┤
  32. │Nr r-ku: [Nk1              ]│Nr r-ku: [Kn1              ]│  │Nr r-ku: [Nk1              ]│Nr r-ku: [Kn1              ]│
  33. │[Nk2                       ]│[Kn2                       ]│  │[Nk2                       ]│[Kn2                       ]│
  34. ├──────────────┬─────────────┴────────────────────────────┤  ├──────────────┬─────────────┴────────────────────────────┤
  35. │Pê.Kas:       │Kwota zê:[Doz         ]                   │  │Pê.Kas:       │Kwota zê:[Doz         ]                   │
  36. ├──────────────┼──────────────────────────────────────────┤  ├──────────────┼──────────────────────────────────────────┤
  37. │Data:[dat   ] │Tytuêem:[Txt                             ]│  │Data:[dat   ] │Tytuêem:[Txt                             ]│
  38. ├──────────────┴────────────────────────┬─────────────────┤  ├──────────────┴────────────────────────┬─────────────────┤
  39. │                                       │  Stempel Banku  │  │                                       │  Stempel Banku  │
  40. │                                       │                 │  │                                       │                 │
  41. │                                       │                 │  │                                       │                 │
  42. │                                       │                 │  │                                       │                 │
  43. │                                       │                 │  │                                       │                 │
  44. │piecz⌐å zleceniodawcy i podpisy        │                 │  │piecz⌐å zleceniodawcy i podpisy        │                 │
  45. └───────────────────────────────────────┴─────────────────┘  └───────────────────────────────────────┴─────────────────┘
  46. [M->Nip     ] SporzÑdzono w systemie PC VATMAN (C)ZTK BITAM  [M->Nip     ] SporzÑdzono w systemie PC VATMAN (C)ZTK BITAM
  47. ------------------------------------*)niepotrzebne skreÿliå-------------------------------------------------------------
  48. ┌──┐                                                         ┌──┐                                                       
  49. │2 │(POLECENIE PRZELEWU/POBRANIA/PRZELEW TELEGRAFICZNY*)  C  │2 │(POLECENIE PRZELEWU/POBRANIA/PRZELEW TELEGRAFICZNY*)  D
  50. ├──┴─────────────────────────┬────────────────────────────┐  ├──┴─────────────────────────┬────────────────────────────┐
  51. │W ci⌐╛ar rachunku           │Na dobro rachunku           │  │W ci⌐╛ar rachunku           │Na dobro rachunku           │
  52. ├────────────────────────────┼────────────────────────────┤  ├────────────────────────────┼────────────────────────────┤
  53. │Nazwa dêu╛nika:             │Nazwa wierzyciela:          │  │Nazwa dêu╛nika:             │Nazwa wierzyciela:          │
  54. │[substr(M->ADR,1,28)       ]│[Np1                       ]│  │[substr(M->ADR,1,28)       ]│[Np1                       ]│
  55. │[len10(substr(M->ADR,29,28),28)]│[Ad1                       ]│  │[len10(substr(M->ADR,29,28),28)]│[Ad1                       ]│
  56. │[len10(substr(M->ADR,57),28)]│[Ad2       ]                │  │[len10(substr(M->ADR,57),28)]│[Ad2       ]                │
  57. ├────────────────────────────┼────────────────────────────┤  ├────────────────────────────┼────────────────────────────┤
  58. │w (Banku): [Nb1            ]│w (Banku): [Bn1            ]│  │w (Banku): [Nb1            ]│w (Banku): [Bn1            ]│
  59. │[Nb2                       ]│[Bn2                       ]│  │[Nb2                       ]│[Bn2                       ]│
  60. ├────────────────────────────┼────────────────────────────┤  ├────────────────────────────┼────────────────────────────┤
  61. │Nr r-ku: [Nk1              ]│Nr r-ku: [Kn1              ]│  │Nr r-ku: [Nk1              ]│Nr r-ku: [Kn1              ]│
  62. │[Nk2                       ]│[Kn2                       ]│  │[Nk2                       ]│[Kn2                       ]│
  63. ├──────────────┬─────────────┴────────────────────────────┤  ├──────────────┬─────────────┴────────────────────────────┤
  64. │Pê.Kas:       │Kwota zê:[Doz         ]                   │  │Pê.Kas:       │Kwota zê:[Doz         ]                   │
  65. ├──────────────┼──────────────────────────────────────────┤  ├──────────────┼──────────────────────────────────────────┤
  66. │Data:[dat   ] │Tytuêem:[Txt                             ]│  │Data:[dat   ] │Tytuêem:[Txt                             ]│
  67. ├──────────────┴────────────────────────┬─────────────────┤  ├──────────────┴────────────────────────┬─────────────────┤
  68. │                                       │  Stempel Banku  │  │                                       │  Stempel Banku  │
  69. │                                       │                 │  │                                       │                 │
  70. │                                       │                 │  │                                       │                 │
  71. │                                       │                 │  │                                       │                 │
  72. │                                       │                 │  │                                       │                 │
  73. │piecz⌐å zleceniodawcy i podpisy        │                 │  │piecz⌐å zleceniodawcy i podpisy        │                 │
  74. └───────────────────────────────────────┴─────────────────┘  └───────────────────────────────────────┴─────────────────┘
  75. #POZYCJE
  76. #SUMY
  77. [M->Nip     ] SporzÑdzono w systemie PC VATMAN (C)ZTK BITAM  [M->Nip     ] SporzÑdzono w systemie PC VATMAN (C)ZTK BITAM
  78. #KONIEC
  79.