Zur Klarstellung:
Folgende Benutzer bedankten sich beim Autor a-dead-trousers für den Beitrag (Insgesamt 2):
sap_koun • Icke0801
Code: Alles auswählen.
CLEAR gv_ok_code.
CALL FUNCTION 'POPUP_GET_VALUES_USER_BUTTONS'
EXPORTING
* F1_FORMNAME = ' '
* F1_PROGRAMNAME = ' '
* F4_FORMNAME = ' '
* F4_PROGRAMNAME = ' '
formname = 'ACTION'
programname = l_repid
popup_title = 'Please Enter'
ok_pushbuttontext = 'Execute'
icon_ok_push = lv_icon_ok
first_pushbutton = lv_button1
icon_button_1 = lv_icon1
second_pushbutton = lv_button2
icon_button_2 = lv_icon2
* QUICKINFO_OK_PUSH = ' '
* QUICKINFO_BUTTON_1 = ' '
* QUICKINFO_BUTTON_2 = ' '
start_column = '2'
start_row = '2'
* NO_CHECK_FOR_FIXED_VALUES = ' '
IMPORTING
returncode = lv_rc "space/'A'=Abbruch
TABLES
fields = lt_fields
EXCEPTIONS
error_in_fields = 1
OTHERS = 2.
Code: Alles auswählen.
TABLES: sscrfields.
PARAMETERS: p_belnr TYPE belnr_d.
SELECTION-SCREEN PUSHBUTTON text-001
USER-COMMAND 'SUBMIT'.
AT SELECTION SCREEN.
IF sscrfields-ucomm = 'SUBMIT'.
PERFORM submit.
ENDIF.
FORM submit.
" hier folgt der REST-API-Call
DATA(http_client) = cl_http_client=>create_by_url( url = 'https://some.api.com'
EXCEPTIONS
OTHERS = 4 ).
" ...
ENDFORM.