ABAP 물타기/Report
Custom Possible Entry
물타기
2010. 7. 4. 20:52
- Create Date : 2010-07-04
- Change Date : 2010-07-04
잡담 -ㅂ-;
뭐... 문법이란게... 안 쓰면 잊어버리니...
ALV Layout 저장한것 불러오는거랑 비스므리하다..
parameters : p_carr1 type spfli-carrid,
p_carr2 type spfli-carrid.
at SELECTION-SCREEN ON VALUE-REQUEST FOR p_carr2.
call screen 100 starting at 10 5 ending at 50 10.
at line-selection.
check not p_carr2 is initial.
leave to screen 0.
*&---------------------------------------------------------------------*
*& Module VALUE_LIST OUTPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
MODULE VALUE_LIST OUTPUT.
suppress dialog.
leave to list-processing and return to screen 0.
set pf-status space.
p_carr2 = 'KO'.
write :/ p_carr2 color col_key, 'korea'.
hide p_carr2.
p_carr2 = 'JP'.
write :/ p_carr2 color col_key, 'japan'.
hide p_carr2.
p_carr2 = 'CA'.
write :/ p_carr2 color col_key, 'china'.
hide p_carr2.
ENDMODULE. " VALUE_LIST OUTPUT
p_carr2 type spfli-carrid.
at SELECTION-SCREEN ON VALUE-REQUEST FOR p_carr2.
call screen 100 starting at 10 5 ending at 50 10.
at line-selection.
check not p_carr2 is initial.
leave to screen 0.
*&---------------------------------------------------------------------*
*& Module VALUE_LIST OUTPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
MODULE VALUE_LIST OUTPUT.
suppress dialog.
leave to list-processing and return to screen 0.
set pf-status space.
p_carr2 = 'KO'.
write :/ p_carr2 color col_key, 'korea'.
hide p_carr2.
p_carr2 = 'JP'.
write :/ p_carr2 color col_key, 'japan'.
hide p_carr2.
p_carr2 = 'CA'.
write :/ p_carr2 color col_key, 'china'.
hide p_carr2.
ENDMODULE. " VALUE_LIST OUTPUT