------------------------------------------------------------------------ DEFINE &T042B-AFORN& = ' ' DEFINE &T042E-WFORN& = ' ' DEFINE &T042E-ZFORN& = ' ' DEFINE &T042E-ANZPO& = ' ' DEFINE &T042E-XFOSP& = ' ' DEFINE &T042Z-PROGN& = 'RFFOSE_P' DEFINE &T042Z-ZLSTN& = 'LIST3S' DEFINE &T042Z-TXTSL& = ' ' DEFINE &T042Z-XSCHK& = ' ' DEFINE &T042Z-XSWEC& = ' ' ------------------------------------------------------------------------Description This program creates a data medium for domestic payment transactionsaccording to the requirements of the PostGirot format in Sweden. If a bank transfer cannot be carried out, the bank is instructed tomake a cash payment. In addition to the payment media, you can also print the respectivepayment advices and payment summaries in the same program run. 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 Note: you must fill out the issuer details as follows: Line 1,,Issuer name 1 Line 2,,Issuer name 2 Line 3,,"PGI" followed by your 5 character customer number at thePostGirot Line 4,,Issuer city Transferring the reference number When entering an invoice, you can define an OCR number>in the payment reference field. The report program &T042Z-PROGN& checksthat the OCR number is correct and, if necessary, transfers it to thedata medium. If the payment reference contains an OCR number with an incorrect checkdigit, this is recorded in the report program error list. Check to seeif an error has been recorded. If there is an error, or if the paymentreference field is blank, the reference document number>- provided it has been filled out - is transferred to the paymentmedium. RESET N1 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 INCLUDE 'FI_RFFO_OUTPUT_DME_TEMSE ' OBJECT DOKU ID TX PARAGRAPH U3 INCLUDE 'FI_RFFO_OUTPUT_ERRORMESSAGES' OBJECT DOKU ID TX PARAGRAPH U2 |