adesso orange🍊Stellenangebote:
Software Engineer Trainee · Senior
| (Senior) Cloud Software Engineer BTP
(Senior) Consultant Technologie · Consultant ABAP
Werkstudent Softwareentwicklung · Fiori / UI5 · Consulting · Application Management
ENQUEUE READ
Aus SAP Wiki ツ
Version vom 18. Juli 2021, 15:55 Uhr von M1ch3lde (Diskussion | Beiträge) (Die Seite wurde neu angelegt: „== Deklaration == lv_garg TYPE seqg3-garg, lt_enq TYPE TABLE OF seqg3. == Codeschnipsel == "mandt, code, sscc entspricht Sperreintrag im Sperrobjekt eine…“)
Deklaration
lv_garg TYPE seqg3-garg, lt_enq TYPE TABLE OF seqg3.
Codeschnipsel
"mandt, code, sscc entspricht Sperreintrag im Sperrobjekt einer Tabelle CONCATENATE ls_selrowcont-mandt ls_selrowcont-code ls_selrowcont-sscc INTO lv_garg. CALL FUNCTION 'ENQUEUE_READ' EXPORTING gclient = sy-mandt gname = 'ZBESTAND_LDL' garg = lv_garg guname = '*' * LOCAL = ' ' * FAST = ' ' * GARGNOWC = ' ' IMPORTING * NUMBER = subrc = lv_subrc TABLES enq = lt_enq * EXCEPTIONS * COMMUNICATION_FAILURE = 1 * SYSTEM_FAILURE = 2 * OTHERS = 3 . IF sy-subrc <> 0. * Implement suitable error handling here ELSEIF sy-subrc = 0. IF lt_enq IS INITIAL. lcl_utilities=>enqueue( EXPORTING iv_ldl = ls_selrowcont-code iv_sscc = ls_selrowcont-sscc IMPORTING ev_subrc = lv_subrc ). ELSEIF lt_enq IS NOT INITIAL. "Sperreintrag vorhanden READ TABLE lt_enq INTO DATA(ls_enq) INDEX 1. MESSAGE s013(zldl_bestmoni) WITH ls_enq-guname DISPLAY LIKE 'E'. ENDIF. ENDIF.