Ansicht
Dokumentation

OHIGBPBS010102 - Interface File Layout Amendments

BAL_S_LOG - Application Log: Log header data PERFORM Short Reference
This documentation is copyright by SAP AG.

In this step you can change the order and layout of the standard interface file.

The CLASS system uses a standard interface file format, but the actual content is client specific. (i.e. the record is 1024 bytes long. The NI Number and Contribution Amount fields are in FIXED positions in the record, but the rest of the fields can be move around to each client's specific requirements). The structure P08P1_CLSA is the SAP standard layout. ANY other layout is NOT supported by the standard SAP interface program. The standard layout can be changed using the Customer Exit provided, EXIT_RPUCLSG0_002.

The address history is NOT needed. The address fields MUST be cleared out.

CLEAR P_EXTRACT-CADD1.

CLEAR P_EXTRACT-CADD2.

CLEAR P_EXTRACT-CADD3.

CLEAR P_EXTRACT-CADD4.

CLEAR P_EXTRACT-CADD5.

CLEAR P_EXTRACT-CPTCD.

P_PREV, P_CURR & P_EXTRACT will ALREADY have been filled using SAP standard derivation. The P_CREATE_INTERFACE switch is already set to 'X'.

CALL CUSTOMER-FUNCTION '002'

EXPORTING

p_prev = p_comp_prev

p_curr = p_comp_curr

CHANGING

p_extract = p_extract

p_create_interface = p_create_interface.

* if sy-subrc <> 0.

* It is not forseen that there will be any plausible

* errors. No time dependant Master Data or Payroll

* data should be derived here. This exit is simply to

* "Blank Out Unrequired Fields".

* endif.

Enter the code in the include ZXP08P1U02 that will satify your specific needs.

Below is some code that could be included if required;

* This User/Customer Exit is design to allow further flexibility *

* in the CLASS Interface. At this point in the main program the *

* complete snapshot has been created for all employees that were *

* selected and whom had no errors. *

* *

* The actual snapshot has already been compared in its entirity *

* to the previous snapshot, if one existed. The record type has *

* therefore already been defined. *

* *

* The previous (which should be tested to see if it is 'initial' *

* before a comparison) can be compared to the current snapshot. *

* The record to be interfaced, p_interface, can be amended and *

* passed back. It is even possible to stop the record from being *

* interfaced by clearing the parameter p_create_interface. *

* *

* In the example below the amount of Address History stored in the *

* CLASS system can be reduced by only interfacing a true change in *

* the employees Address. Otherwise the Address fields are blanked *

* out on an amendment record. *

*----------------------------------------------------------------------*

* check this is an 'A'mendment record

IF P_EXTRACT-RECTP = 'A'.

* check all the address fields on the previous record are the same

* as the current record

IF P_PREV-CADD1 = P_CURR-CADD1 AND

P_PREV-CADD2 = P_CURR-CADD2 AND

P_PREV-CADD3 = P_CURR-CADD3 AND

P_PREV-CADD4 = P_CURR-CADD4 AND

P_PREV-CADD5 = P_CURR-CADD5 AND

P_PREV-CPTCD = P_CURR-CPTCD.

* the address fields are all the same so the don't interface this detail