Ver Mensaje Individual
  #4  
Viejo 24/02/10, 15:16:09
Avatar de Alfredosite
Alfredosite Alfredosite is offline
Senior Member
 
Fecha de Ingreso: jul 2007
Localización: Lima-Perú
Mensajes: 135
Smile Re:

Lo que debes hacer es esto:
*Tabla que guarda las descripciones de los meses
DATA: gt_t247 LIKE t247 OCCURS 0 WITH HEADER LINE.
*Variables que guarda el mes y la descripción
DATA: v_mes type T247-MNR,
v_mes_txt type T247-LTX,
v_fecha_txt(50) type c,
v_dia type d.

* Obtienes la descripción de todos los nombres de los meses
CALL FUNCTION 'MONTH_NAMES_GET'
EXPORTING
language = sy-langu
TABLES
month_names = gt_t247
EXCEPTIONS
month_names_not_found = 1
OTHERS = 2.
*Tomas el mes de un fecha por lo general es 5 y 6to caracter de la cadena de fechas ejemplo si hoy es 24/02/2010 dentro de abap la fecha se muestra asi: 20100224 entonces debes tomar solo los caracteres que muestran el mes.

v_dia = sy-datum.
v_mes = v_dia+4(2). "Obtienes el mes

*Obtienes la descripción del mes seleccionado
Loop at gt_t247 WHERE LTX eq v_mes.
v_mes_txt = gt_t247-ltx.
endloop.

*Si quieres mostrar la fecha en texto EJEM: 24 de Febrero del 2010
CONCATENATE v_dia+6(2) 'de' v_mes_txt 'del' v_dia(4) INTO v_fecha_txt.
Responder Con Cita