home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / testsoft / vatman / vatman.lzh / RA_PRZEL.DOK < prev    next >
Text File  |  1996-12-12  |  8KB  |  80 lines

  1. #DEFINICJE
  2. Np1=substr(slownik('KONTRAH',OBRGL->KONTRAHENT),1,28)
  3. Np2=len10(substr(KONTRAH->NAZWA_PLAT,29,28),28)
  4. Ad1=substr(KONTRAH->ADRES_PLAT,1,28)
  5. Ad2=substr(KONTRAH->ADRES_PLAT,29)
  6. Bn1=substr(KONTRAH->BANK,1,17)
  7. Bn2=len10(substr(KONTRAH->BANK,18,28),28)
  8. Kn1=substr(KONTRAH->KONTO_PLAT,1,19)
  9. Kn2=len10(substr(KONTRAH->KONTO_PLAT,20,28),28)
  10. Nk1=substr(_S1,1,19)
  11. Nk2=len10(substr(_S1,20,28),28)
  12. Nb1=substr(_S0,1,17)
  13. Nb2=len10(substr(_S0,18,28),28)
  14. Doz=transform(OBRGL->KWOTA_DO_Z,"@E 999,999,999.99")
  15. dat=dtoc(OBRGL->TERM_PLAT)
  16. Txt=len10(M->kod_magaz+"/"+ltrim(str(M->nr_dok,5)),34)
  17. #NAGLOWEK
  18. +--+                                                         +--+                                                       
  19. |2 | POLECENIE PRZELEWU/POBRANIA                          A  |2 | POLECENIE PRZELEWU/POBRANIA                          B
  20. |--+------------------------------------------------------+  +--+------------------------------------------------------+
  21. |W ciezar rachunku           |Na dobro rachunku           |  |W ciezar rachunku           |Na dobro rachunku           |
  22. |----------------------------+----------------------------|  |----------------------------+----------------------------|
  23. |Nazwa dluznika:             |Nazwa wierzyciela:          |  |Nazwa dluznika:             |Nazwa wierzyciela:          |
  24. |[Np1                       ]|[substr(M->ADR,1,28)       ]|  |[Np1                       ]|[substr(M->ADR,1,28)       ]|
  25. |[Np2                       ]|[len10(substr(M->ADR,29,28),28)]|  |[Np2                       ]|[len10(substr(M->ADR,29,28),28)]|
  26. |[Ad1                       ]|[len10(substr(M->ADR,57),28)]|  |[Ad1                       ]|[len10(substr(M->ADR,57),28)]|
  27. |[Ad2       ]                |[len10(substr(M->ADR1,1,28),28)]|  |[Ad2       ]                |[len10(substr(M->ADR1,1,28),28)]|
  28. |----------------------------+----------------------------|  |----------------------------+----------------------------|
  29. |w (Banku): [Bn1            ]|w (Banku): [Nb1            ]|  |w (Banku): [Bn1            ]|w (Banku): [Nb1            ]|
  30. |[Bn2                       ]|[Nb2                       ]|  |[Bn2                       ]|[Nb2                       ]|
  31. |----------------------------+----------------------------|  |----------------------------+----------------------------|
  32. |Nr r-ku: [Kn1              ]|Nr r-ku: [Nk1              ]|  |Nr r-ku: [Kn1              ]|Nr r-ku: [Nk1              ]|
  33. |[Kn2                       ]|[Nk2                       ]|  |[Kn2                       ]|[Nk2                       ]|
  34. |---------------------------------------------------------|  |---------------------------------------------------------|
  35. |Pl.Kas:       |Kwota zl:[Doz         ]                   |  |Pl.Kas:       |Kwota zl:[Doz         ]                   |
  36. |--------------+------------------------------------------|  |--------------+------------------------------------------|
  37. |Data:[dat   ] |Tytulem:[Txt                             ]|  |Data:[dat   ] |Tytulem:[Txt                             ]|
  38. |---------------------------------------------------------|  |---------------------------------------------------------|
  39. |                                       |  Stempel Banku  |  |                                       |  Stempel Banku  |
  40. |                                       |                 |  |                                       |                 |
  41. |                                       |                 |  |                                       |                 |
  42. |                                       |                 |  |                                       |                 |
  43. |                                       |                 |  |                                       |                 |
  44. |pieczec zelceniodawcy i podpisy        |                 |  |pieczec zelceniodawcy i podpisy        |                 |
  45. +---------------------------------------------------------+  +---------------------------------------------------------+
  46. [M->Nip     ] Sporzadzono w systemie PC VATMAN (C)ZTK BITAM  [M->Nip     ] Sporzadzono w systemie PC VATMAN (C)ZTK BITAM
  47. ------------------------------------*)niepotrzebne skreslic-------------------------------------------------------------
  48. +--+                                                         +--+                                                       
  49. |2 | POLECENIE PRZELEWU/POBRANIA                          C  |2 | POLECENIE PRZELEWU/POBRANIA                          D
  50. |---------------------------------------------------------+  |---------------------------------------------------------+
  51. |W ciezar rachunku           |Na dobro rachunku           |  |W ciezar rachunku           |Na dobro rachunku           |
  52. |----------------------------+----------------------------|  |----------------------------+----------------------------|
  53. |Nazwa dluznika:             |Nazwa wierzyciela:          |  |Nazwa dluznika:             |Nazwa wierzyciela:          |
  54. |[Np1                       ]|[substr(M->ADR,1,28)       ]|  |[Np1                       ]|[substr(M->ADR,1,28)       ]|
  55. |[Np2                       ]|[len10(substr(M->ADR,29,28),28)]|  |[Np2                       ]|[len10(substr(M->ADR,29,28),28)]|
  56. |[Ad1                       ]|[len10(substr(M->ADR,57),28)]|  |[Ad1                       ]|[len10(substr(M->ADR,57),28)]|
  57. |[Ad2       ]                |[len10(substr(M->ADR1,1,28),28)]|  |[Ad2       ]                |[len10(substr(M->ADR1,1,28),28)]|
  58. |----------------------------+----------------------------|  |----------------------------+----------------------------|
  59. |w (Banku): [Bn1            ]|w (Banku): [Nb1            ]|  |w (Banku): [Bn1            ]|w (Banku): [Nb1            ]|
  60. |[Bn2                       ]|[Nb2                       ]|  |[Bn2                       ]|[Nb2                       ]|
  61. |----------------------------+----------------------------|  |----------------------------+----------------------------|
  62. |Nr r-ku: [Kn1              ]|Nr r-ku: [Nk1              ]|  |Nr r-ku: [Kn1              ]|Nr r-ku: [Nk1              ]|
  63. |[Kn2                       ]|[Nk2                       ]|  |[Kn2                       ]|[Nk2                       ]|
  64. |---------------------------------------------------------|  |---------------------------------------------------------|
  65. |Pl.Kas:       |Kwota zl:[Doz         ]                   |  |Pl.Kas:       |Kwota zl:[Doz         ]                   |
  66. |--------------+------------------------------------------|  |--------------+------------------------------------------|
  67. |Data:[dat   ] |Tytulem:[Txt                             ]|  |Data:[dat   ] |Tytulem:[Txt                             ]|
  68. |---------------------------------------------------------|  |---------------------------------------------------------|
  69. |                                       |  Stempel Banku  |  |                                       |  Stempel Banku  |
  70. |                                       |                 |  |                                       |                 |
  71. |                                       |                 |  |                                       |                 |
  72. |                                       |                 |  |                                       |                 |
  73. |                                       |                 |  |                                       |                 |
  74. |pieczec zelceniodawcy i podpisy        |                 |  |pieczec zelceniodawcy i podpisy        |                 |
  75. +---------------------------------------------------------+  +---------------------------------------------------------+
  76. #POZYCJE
  77. #SUMY
  78. [M->Nip     ] Sporzadzono w systemie PC VATMAN (C)ZTK BITAM  [M->Nip     ] Sporzadzono w systemie PC VATMAN (C)ZTK BITAM
  79. #KONIEC
  80.