Año incorrecto

[brujop]

Buen dia expertos, acudo a uds. para que me ayuden con este caso, tengo el siguiente codigo

FORM obtener_nomb_mes USING pu_date TYPE fkdat
CHANGING po_textfecha.

DATA: monat LIKE t247-ltx.

CLEAR monat.

CALL FUNCTION 'ISP_GET_MONTH_NAME'
EXPORTING
date = pu_date
language = sy-langu
IMPORTING
longtext = monat
EXCEPTIONS
calendar_id = 1
date_error = 2
not_found = 3
wrong_input = 4
OTHERS = 5.

CONCATENATE pu_date+6(2) monat pu_date+2(4) INTO po_textfecha SEPARATED BY space.

Surge un inconveniente, al mostrar el resultado de la fecha, es decir deberia mostrar Lunes 12 de agosto del 2013, pero por alguna razón que desconozco muestra Lunes 12 de agosto del 1302, alguna ayuda porfavor. El resultado lo muestra en po_text_fecha, y en pu_date+2(4) trae el año aca no me devuelve el año correcto.

Muchas gracias por su tiempo.

[joau_fedipe]

Brujop,
cambiar:
CONCATENATE pu_date+6(2) monat pu_date+2(4) INTO po_textfecha SEPARATED BY space.
por

CONCATENATE pu_date+6(2) monat pu_date+0(4) INTO po_textfecha SEPARATED BY space.

Saludos.:)

[brujop]

Brujop,
cambiar:
CONCATENATE pu_date+6(2) monat pu_date+2(4) INTO po_textfecha SEPARATED BY space.
por

CONCATENATE pu_date+6(2) monat pu_date+0(4) INTO po_textfecha SEPARATED BY space.

Saludos.:)


MUCHAS GRACIAS ES LO CORRECTO.....