Code: Alles auswählen.
CALL METHOD cl_gui_cfw=>set_new_ok_code
EXPORTING
new_code = 'PRPS'.
Code: Alles auswählen.
FUNCTION Z_PERFORM_PRPS.
data: cua_status like t185v-status.
data: cua_titel like t185v-ctitel.
data: ok-code like t185f-fcode.
data: xtab_main like t185v-dynnr.
data: xtab_sub like t185v-dynnr.
cua_status = 'IV5000'.
cua_titel = '*PM'.
ok-code = 'ENT1'.
xtab_main = '7200'.
xtab_sub = '7235'.
CALL FUNCTION 'SCREEN_SEQUENCE_CONTROL'
EXPORTING
PROGRAMM = 'SAPLIQS0'
KOPFGRUPPE = 'Q1'
POSITIONSGRUPPE = '*'
FUNKTION = 'PRPS'
IMPORTING
CUA_STATUS = cua_status
CUA_TITEL = cua_titel
FOLGEFUNKTION = ok-code
DYNPROBAUSTEIN1 = xtab_main
DYNPROBAUSTEIN2 = xtab_sub.
ENDFUNCTION.
Code: Alles auswählen.
FUNCTION Z_PERFORM_PRPS.
data: cua_status like t185v-status.
data: cua_titel like t185v-ctitel.
data: ok-code like t185f-fcode.
data: xtab_main like t185v-dynnr.
data: xtab_sub like t185v-dynnr.
cua_status = 'IV5000'.
cua_titel = '*PM'.
ok-code = 'ENT1'.
xtab_main = '7200'.
xtab_sub = '7235'.
CALL FUNCTION 'SCREEN_SEQUENCE_CONTROL'
EXPORTING
PROGRAMM = 'SAPLIQS0'
KOPFGRUPPE = 'Q1'
POSITIONSGRUPPE = '*'
FUNKTION = 'PRPS'
IMPORTING
CUA_STATUS = cua_status
CUA_TITEL = cua_titel
FOLGEFUNKTION = ok-code
DYNPROBAUSTEIN1 = xtab_main
DYNPROBAUSTEIN2 = xtab_sub.
ENDFUNCTION.
Code: Alles auswählen.
CALL FUNCTION 'SCREEN_SEQUENCE_CONTROL'
EXPORTING
PROGRAMM = 'SAPLIQS0'
KOPFGRUPPE = 'Q1'
POSITIONSGRUPPE = '*'
FUNKTION = 'PRPS'.