Hi experts,
In the below code am not able to execute . the form EXB706K
how to use this form.
METHOD if_ex_trip_post_fi~exb706k.
DATA: w_lgart TYPE t706k-lgart,
w_users TYPE t706k-users,
w_kont1 TYPE t706k-kont1,
w_koart1 TYPE t706k-koart1,
w_ctry TYPE zfsp_mappings-country_key,
w_objnm TYPE zfsp_mappings-objname,
w_value1 TYPE zfsp_mappings-value1,
w_value2 TYPE zfsp_mappings-value2.
TYPES:BEGIN OF ty_t001,
bukrs TYPE t001-bukrs,
END OF ty_t001.
DATA: it_t001 TYPE STANDARD TABLE OF ty_t001,
wa_t001 TYPE ty_t001.
INCLUDE zsample1.
SELECT bukrs
FROM t001 INTO TABLE it_t001.
SELECT SINGLE country_key objname value1 value2
FROM zfsp_mappings INTO (w_ctry , w_objnm , w_value1 , w_value2)
WHERE objname = 'ADVANCE' AND
value1 = 'YES'.
BREAK-POINT.
LOOP AT it_t001 INTO wa_t001.
IF wa_t001-bukrs+0(2) = w_value2 .
FORM EXB706K
USING lgart users kont1 koart1
* REISETÄTIGKEIT steht in WA_HEAD-KZTKT
USERS = wa_t001-bukrs.
ENDFORM.
CONTINUE.
ELSE.
ENDIF.
ENDLOOP.
ENDMETHOD.
Bluesky
