无心者无情sap
* be used irrespective of the table used in the callup point. *
*---------------------------------------------------------------------* FORM U101 USING COST_CENTER LIKE CSKS-KOSTL. "#EC CALLED
*!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! * PLEASE DELETE THE FIRST '*' FORM THE BEGINING OF THE FOLLOWING LINES *
* IF THE ACCOUNTING MODULE IS INSTALLED IN YOUR SYSTEM: *
* SELECT * FROM CSKS
* WHERE KOSTL EQ COST_CENTER * AND KOKRS EQ '0001'. * IF CSKS-DATBI >= SY-DATUM AND * CSKS-DATAB <= SY-DATUM. *
* MOVE CSKS-ABTEI TO COST_CENTER . *
* ENDIF. * ENDSELECT.
ENDFORM. "U101
*---------------------------------------------------------------------*
* FORM U102 *
*---------------------------------------------------------------------*
* Inserts the sum of the posting into the reference field. *
* This exit can be used in FI for the complete document. *
* The complete data is passed in one parameter. *
*---------------------------------------------------------------------*
*!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
