------------------------------------------------------------------------ DEFINE &T042B-AFORN& = 'F110_D_AVIS' DEFINE &T042E-WFORN& = 'F110_ZA_DTA_ACB' DEFINE &T042E-ZFORN& = ' ' DEFINE &T042E-ANZPO& = ' ' DEFINE &T042E-XFOSP& = ' ' DEFINE &T042Z-PROGN& = 'RFFOZA_A' DEFINE &T042Z-ZLSTN& = ' ' DEFINE &T042Z-TXTSL& = ' ' DEFINE &T042Z-XSCHK& = ' ' DEFINE &T042Z-XSWEC& = ' ' ------------------------------------------------------------------------Description This program generates a data medium exchange in the ACB formatrequired in the Republic of South Africa. One file is issued in aseparate run for each user (company code). This program only supportspayment transactions, i.e. payment transfers of transaction record type20. Transfers from several banks can be made in a single file; in thiscase a contra record is created for each house bank. When you run the program, you can print not only the payment media butalso the related payment advice notes, data medium accompanying sheetsand payment summaries. Precondition INCLUDE 'FI_RFFO_CUSTOMIZING_F110 ' OBJECT DOKU ID TX PARAGRAPH U2 INCLUDE 'FI_RFFO_CUSTOMIZING_T042B ' OBJECT DOKU ID TX PARAGRAPH N1 INCLUDE 'FI_RFFO_CUSTOMIZING_T042Z ' OBJECT DOKU ID TX PARAGRAPH N1 INCLUDE 'FI_RFFO_CUSTOMIZING_T042E ' OBJECT DOKU ID TX PARAGRAPH N1 INCLUDE 'FI_RFFO_SAPSCRIPT_LAYOUT_SET' OBJECT DOKU ID TX PARAGRAPH U2 INCLUDE 'FI_RFFO_SAPSCRIPT_SYMBOLS ' OBJECT DOKU ID TX PARAGRAPH N1 INCLUDE 'FI_RFFO_SAPSCRIPT_ADVICE ' OBJECT DOKU ID TX PARAGRAPH N1 Structure of data medium accompanying sheet> (standardT042e-wforn) Pages TDA >Tape Delivery Advice DCL >Data Control Voucher Window and elements DELADV 500 >Tape Delivery Advice DATACV 505 >Data Control Voucher The texts> in REGUD are used as follows in the data data mediumaccompanying sheet: TEXT1,,Tape serial number and generation number TEXT2,,Installation ID code / user number TEXT3,,First action date TEXT4,,Hash total of amounts INCLUDE 'FI_RFFO_SAPSCRIPT_MAINTAIN ' OBJECT DOKU ID TX PARAGRAPH AS RESET N1Master record In addition to the usual maintenance required for subledger accounts,you must also maintain the bank control key> in the bankdetails. This key determines the account type that will be usedforpayment. If you do not make an entry in this field, the system usesthe value 1 for 'current (checking) account'. INCLUDE 'FI_RFFO_PAYMENT_RUN ' OBJECT DOKU ID TX PARAGRAPH U2Output INCLUDE 'FI_RFFO_OUTPUT_SPOOL ' OBJECT DOKU ID TX PARAGRAPH U2 INCLUDE 'FI_RFFO_OUTPUT_DME ' OBJECT DOKU ID TX PARAGRAPH U2 INCLUDE 'FI_RFFO_OUTPUT_DME_FILE ' OBJECT DOKU ID TX PARAGRAPH U3 Test run The program can be run in test mode. The file thus created is checkedby the ACB, but the payments are not actually made. After the test runyou must not forget to delete the DME administration data to avoidgenerating an incorrect serial number during future production runs. INCLUDE 'FI_RFFO_OUTPUT_ERRORMESSAGES' OBJECT DOKU ID TX PARAGRAPH U2 |