06-19-2006 11:49 AM
I HAVE AN ALV REPORT WHERE I AM DISPLAYING DATE AS ONE FIELD BUT I DONOT REQUIRE TO DISPLAY IT FULLY ONLY THE DAY AND MONTH SHOULD DISPLAY. CAN ANYONE PROVIDE ME SOLUTION FOR THIS.
THANKS IN ADVANCE
RAJESH.
06-19-2006 12:09 PM
Hi,
Just check this Programm..
REPORT ZTEST_ALV_CHECK message-id zz .
TYPE-POOLS: SLIS.
DATA: X_FIELDCAT TYPE SLIS_FIELDCAT_ALV,
IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
L_LAYOUT type slis_layout_alv.
DATA: BEGIN OF ITAB OCCURS 0,
VBELN LIKE VBAK-VBELN,
POSNR LIKE VBAP-POSNR,
erdat like vbap-erdat,
END OF ITAB.
SELECT VBELN
POSNR
erdat
FROM VBAP
UP TO 100 ROWS
INTO TABLE ITAB.
X_FIELDCAT-FIELDNAME = 'VBELN'.
X_FIELDCAT-SELTEXT_L = 'VBELN'.
X_FIELDCAT-TABNAME = 'ITAB'.
X_FIELDCAT-COL_POS = 1.
APPEND X_FIELDCAT TO IT_FIELDCAT.
CLEAR X_FIELDCAT.
X_FIELDCAT-FIELDNAME = 'POSNR'.
X_FIELDCAT-SELTEXT_L = 'POSNR'.
X_FIELDCAT-TABNAME = 'ITAB'.
X_FIELDCAT-COL_POS = 2.
APPEND X_FIELDCAT TO IT_FIELDCAT.
CLEAR X_FIELDCAT.
X_FIELDCAT-FIELDNAME = 'ERDAT'.
X_FIELDCAT-SELTEXT_L = 'ERDAT'.
<b>X_FIELDCAT-edit_mask = '__.__'.</b>
X_FIELDCAT-TABNAME = 'ITAB'.
X_FIELDCAT-COL_POS = 3.
APPEND X_FIELDCAT TO IT_FIELDCAT.
CLEAR X_FIELDCAT.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
I_CALLBACK_PROGRAM = SY-REPID
IS_LAYOUT = L_LAYOUT
IT_FIELDCAT = IT_FIELDCAT
TABLES
T_OUTTAB = ITAB
EXCEPTIONS
PROGRAM_ERROR = 1
OTHERS = 2.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
with the help of edit_mask you can do that...
Regards
vijay
06-19-2006 11:51 AM
concatenate date+2(2)
date+0(2)
inro v_var.
Use this v_var as the variable to be displayed.
Regards,
Ravi
06-19-2006 11:51 AM
You need to add two more fields to the field catalog and the internal table of CHAR type. Then you can get the data using the offset of the date.
DAY = date+6(2)
Month = date+4(2).
Now you can display the day and month in the ALV report.
Regards,
Ravi
Note : Please mark the helpful answers
06-19-2006 11:53 AM
Hi ,
u can use offset of date or fields like s031-spmon.
Regards
Prbahu
06-19-2006 11:57 AM
Hi,
data: date like sy-datum.
data: date1 like sy-datum.
data: date2(10) type c.
date = 050102 (as your format).
move: date to date_8.
write date1 to date2.
write: date2.
Use the conversion.
rgds,
Jothi.
Mark useful ans.
06-19-2006 12:09 PM
Hi,
Just check this Programm..
REPORT ZTEST_ALV_CHECK message-id zz .
TYPE-POOLS: SLIS.
DATA: X_FIELDCAT TYPE SLIS_FIELDCAT_ALV,
IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
L_LAYOUT type slis_layout_alv.
DATA: BEGIN OF ITAB OCCURS 0,
VBELN LIKE VBAK-VBELN,
POSNR LIKE VBAP-POSNR,
erdat like vbap-erdat,
END OF ITAB.
SELECT VBELN
POSNR
erdat
FROM VBAP
UP TO 100 ROWS
INTO TABLE ITAB.
X_FIELDCAT-FIELDNAME = 'VBELN'.
X_FIELDCAT-SELTEXT_L = 'VBELN'.
X_FIELDCAT-TABNAME = 'ITAB'.
X_FIELDCAT-COL_POS = 1.
APPEND X_FIELDCAT TO IT_FIELDCAT.
CLEAR X_FIELDCAT.
X_FIELDCAT-FIELDNAME = 'POSNR'.
X_FIELDCAT-SELTEXT_L = 'POSNR'.
X_FIELDCAT-TABNAME = 'ITAB'.
X_FIELDCAT-COL_POS = 2.
APPEND X_FIELDCAT TO IT_FIELDCAT.
CLEAR X_FIELDCAT.
X_FIELDCAT-FIELDNAME = 'ERDAT'.
X_FIELDCAT-SELTEXT_L = 'ERDAT'.
<b>X_FIELDCAT-edit_mask = '__.__'.</b>
X_FIELDCAT-TABNAME = 'ITAB'.
X_FIELDCAT-COL_POS = 3.
APPEND X_FIELDCAT TO IT_FIELDCAT.
CLEAR X_FIELDCAT.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
I_CALLBACK_PROGRAM = SY-REPID
IS_LAYOUT = L_LAYOUT
IT_FIELDCAT = IT_FIELDCAT
TABLES
T_OUTTAB = ITAB
EXCEPTIONS
PROGRAM_ERROR = 1
OTHERS = 2.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
with the help of edit_mask you can do that...
Regards
vijay
06-19-2006 12:16 PM
Use EDIT MASK option in the field catalog to specify a conversion exit that would format date