Extraer año y periodo de una fecha

0
En ocaciones, se necesita extraer el año, el periodo (mes) y el dia de una fecha especifica. Para ello, utilizaremos el uso de una funcion el cuál nos permite obtener dicho resultado.

DATA: X_PERIODO 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_PERIODO
          E_GJAHR        = X_YEAR
     EXCEPTIONS
          INPUT_FALSE    = 1
          T009_NOTFOUND  = 2
          T009B_NOTFOUND = 3
          OTHERS         = 4.

WRITE: / 'El periodo actual de la compañia es:', X_PERIODO, X_YEAR.

Además, del uso de esta función podemos usar variables en la cual separamos el dia, mes y año de una fecha que para algunos les puede resultar mas comodo 
l_anio = LV_FECHA(4)
l_mes  = LV_FECHA+4(2)
l_dia  = LV_FECHA+6(2)
Tags

Publicar un comentario

0Comentarios
Publicar un comentario (0)