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]

posición correcta

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.....