SAP Basis, Functional and ABAP Programming Reference Books
ABAP function to convert Current Date to Current Period
*
* Written by : SAP Basis, ABAP Programming and Other IMG Stuff
*              http://www-sap-img.com
*
* Find current period of your Company based on current date
*
REPORT ZPERIOD.

DATA: X_PERIOD LIKE T009B-POPER,
      X_YEAR   LIKE CSSL-GJAHR.

CALL FUNCTION 'DATE_TO_PERIOD_CONVERT'
     EXPORTING
          I_DATE         = SY-DATUM
*         I_MONMIT       = 00
          I_PERIV        = 'K4'
     IMPORTING
          E_BUPER        = X_PERIOD
          E_GJAHR        = X_YEAR
     EXCEPTIONS
          INPUT_FALSE    = 1
          T009_NOTFOUND  = 2
          T009B_NOTFOUND = 3
          OTHERS         = 4.

WRITE: / 'Your Company Current Period', X_PERIOD, X_YEAR.

*-- End of Program