FORM data_changed_finished USING pe_modified TYPE char01
pt_good_cells TYPE lvc_t_modi.
DATA: ls_modi TYPE lvc_s_modi.
DATA: LS_SCOL TYPE LVC_S_SCOL.
DATA: LS_STYL TYPE LVC_S_STYL.
CLEAR: ls_modi, gs_flight_tmp.
CHECK pe_modified IS NOT INITIAL.
gv_changed = 'X'.
LOOP AT pt_good_cells INTO ls_modi.
READ TABLE gt_flight_tmp INTO gs_flight_tmp INDEX ls_modi-row_id.
IF gs_flight_tmp-id EQ icon_red_light.
CLEAR gs_flight_tmp-conf.
ENDIF.
IF GS_FLIGHT_TMP-ID EQ ICON_GREEN_LIGHT.
GS_FLIGHT_TMP-CHANGE = 'X'.
LOOP AT GS_FLIGHT_TMP-CELLSTYL INTO LS_STYL.
CASE LS_STYL-FIELDNAME.
WHEN 'BNAME' OR
'FLDATE' OR
'CARRID' OR
'CITYFROM' OR
'CITYTO' OR
'PRICE'.
LS_STYL-STYLE = CL_GUI_ALV_GRID=>MC_STYLE_DISABLED.
ENDCASE.
MODIFY GS_FLIGHT_TMP-CELLSTYL FROM LS_STYL.
CLEAR LS_STYL.
ENDLOOP.
ENDIF.
IF GS_FLIGHT_TMP-ID EQ ICON_YELLOW_LIGHT.
LOOP AT GS_FLIGHT_TMP-CELLSTYL INTO LS_STYL.
CASE LS_STYL-FIELDNAME.
WHEN 'BNAME' OR
'FLDATE' OR
'CARRID' OR
'CITYFROM' OR
'CITYTO' OR
'PRICE'.
LS_STYL-STYLE = CL_GUI_ALV_GRID=>MC_STYLE_ENABLED.
ENDCASE.
MODIFY GS_FLIGHT_TMP-CELLSTYL FROM LS_STYL.
CLEAR LS_STYL.
ENDLOOP.
ENDIF.
GS_FLIGHT_TMP-SEATS = '좌석'.
MODIFY gt_flight_tmp FROM gs_flight_tmp INDEX ls_modi-row_id.
CLEAR gs_flight_tmp.
ENDLOOP.
PERFORM refresh_grid USING go_grid.
ENDFORM.
'SAP > ABAP 코드' 카테고리의 다른 글
(ABAP 코드) SAPGUI_PROGRESS_INDICATOR (0) | 2022.02.08 |
---|---|
(ABAP 코드) EXCEL_DOWNLOAD(SWM0) (0) | 2022.02.08 |
(ABAP 코드) DATA_CHANGED (0) | 2022.01.25 |
(ABAP 코드) 동적으로 생성한 테이블 필드 채웅 (0) | 2022.01.21 |
(ABAP 코드) 월별 동적 인터널테이블 구성 (0) | 2022.01.21 |