Use the below program by entering T-Code. TABLES : tstc, tadir, modsapt, modact, trdir, tfdir, enlfdir, sxs_attrt , tstct. DATA : jtab LIKE tadir OCCURS 0 WITH HEADER LINE.DATA : field1(30).DATA : v_devclass LIKE tadir-devclass. PARAMETERS : p_tcode LIKE tstc-tcode, p_pgmna LIKE tstc-pgmna. DATA wa_tadir TYPE tadir. START-OF-SELECTION. IF NOT p_tcode IS INITIAL. SELECT SINGLE * FROM tstc WHERE tcode EQ p_tcode. ELSEIF NOT p_pgmna IS INITIAL. tstc-pgmna = p_pgmna. ENDIF. IF sy-subrc EQ 0. SELECT SINGLE * FROM tadir WHERE pgmid = ‘R3TR’ AND object = ‘PROG’ AND obj_name = tstc-pgmna. MOVE : tadir-devclass TO v_devclass. IF sy-subrc NE 0. SELECT SINGLE * FROM trdir WHERE name = tstc-pgmna. IF trdir-subc EQ ‘F’. SELECT SINGLE * FROM tfdir WHERE pname = tstc-pgmna. SELECT SINGLE * FROM enlfdir WHERE funcname = tfdir-funcname. SELECT SINGLE * FROM tadir WHERE pgmid = ‘R3TR’ AND object = ‘FUGR’ AND obj_name EQ enlfdir-area. MOVE : tadir-devclass TO v_devclass. ENDIF. ENDIF. SELECT * FROM tadir INTO TABLE jtab WHERE pgmid = ‘R3TR’ AND object IN (‘SMOD’, ‘SXSD’) AND devclass = v_devclass. SELECT SINGLE * FROM tstct WHERE sprsl EQ sy-langu AND tcode EQ p_tcode. FORMAT COLOR COL_POSITIVE INTENSIFIED OFF. WRITE:/(19) ‘Transaction Code – ‘, 20(20) p_tcode, 45(50) tstct-ttext. SKIP. IF NOT jtab[] IS INITIAL. WRITE:/(105) sy-uline. FORMAT COLOR COL_HEADING INTENSIFIED ON. * SORTING THE INTERNAL TABLE SORT jtab BY object. DATA : wf_txt(60) TYPE c, wf_smod TYPE i, wf_badi TYPE i, wf_object2(30) TYPE c. CLEAR : wf_smod, wf_badi , wf_object2. *GET THE TOTAL SMOD. LOOP AT jtab INTO wa_tadir. AT FIRST. FORMAT COLOR COL_HEADING INTENSIFIED ON. WRITE:/1 sy-vline, 2 ‘Enhancement/ Business Add-in’, 41 sy-vline , 42 ‘Description’, 105 sy-vline. WRITE:/(105) sy-uline. ENDAT. CLEAR wf_txt. AT NEW object. IF wa_tadir-object = ‘SMOD’. wf_object2 = ‘Enhancement’ . ELSEIF wa_tadir-object = ‘SXSD’. wf_object2 = ‘ Business Add-in’. ENDIF. FORMAT COLOR COL_GROUP INTENSIFIED ON. WRITE:/1 sy-vline, 2 wf_object2, 105 sy-vline. ENDAT. CASE wa_tadir-object. WHEN ‘SMOD’. wf_smod = wf_smod + 1.“How to Find Enhancement and BADI in SAP by any T-Code?” yazısının devamını oku
Yazar arşivleri: mericdonmezer
How to Debug IDOC with BD87 in SAP?
Open BD87 and list the IDOC that you want to debug. Select the IDOC. From Menu select Edit-Restrict and Process Unclick Background Process and Execute From Menu select Edit-Process-Foreground processingThen execute and debug foreground.
How to Copy Standard GUI Status to your SAP ABAP Program?
Open Transaction SE41. Click Copy Status Button. Copy from Program SAPLSALV status STANDARD to your program. Goto your program, Rebuild your code and then activate it.
How to Open Background Job from SAP ABAP?
ParametersDATA: lv_jobcount TYPE btcjobcnt, ” Jobnummerlv_jobname TYPE btcjob, ” Jobnamelv_time TYPE sy-uzeit. Create Job NameCONCATENATE ‘ZPROGRAM’ sy-datum sy-uzeit INTO lv_jobname SEPARATED BY space. Open JobCALL FUNCTION ‘JOB_OPEN’EXPORTINGjobname = lv_jobnameIMPORTINGjobcount = lv_jobcountEXCEPTIONScant_create_job = 1invalid_job_data = 2jobname_missing = 3OTHERS = 4. Call Submit Program that you want to process in the background.SUBMIT zprogram AND RETURN VIA JOB“How to Open Background Job from SAP ABAP?” yazısının devamını oku
How to Disable ATC Check in SAP ABAP Code?
SET EXTENDED CHECK OFF.“Your code blogSET EXTENDED CHECK ON.
How to Connect Another Database from SAP?
With SM51 transaction code list the active application server. Select the main server system that you use. Open DB connections with DBCO. Create new connection to the database that you want to connect. Make the connection permanent by clicking checkbox. You can check the connection by program ADBC_TEST_CONNECTION Exit SM51 mode. Create new SAP program.“How to Connect Another Database from SAP?” yazısının devamını oku
How to Read Release Status of Purchase Order?
EKKO table includes all values. Release Group: EKKO-FRGGR Release Strategy: EKKO-FRGSX Release Indicator: EKKO-FRGKE (1 means Release Strategy is in progress) Release Status: EKKO-FRGZU (XX means 2 approval is done)
How to Debug Background Job in SAP?
Set a breakpoint in ABAP report that you want to debug. Create a background JOB in SM36 transaction and set a future start. In SM37 transaction, put the cursor on the job line, type JDBG in the command line and press enter. The JOB will start in debug mode.
How to Create Authorization Object in SAP ABAP?
By using SU21 transaction you can create authorization object. You can create Z* authorization object like standart objects. If you want to call authorization object from code you can write the code below. AUTHORITY-CHECK OBJECT ‘F_BKPF_BUK’ ID ‘BUKRS’ FIELD p_bukrs ID ‘ACTVT’ FIELD ’03’. AUTHORITY-CHECK OBJECT ‘ZYP_WERKS’ ID ‘ACTVT’ FIELD ’06’. If you have an authorizaton object on SAP transaction you can check it by SU22 transaction. You can also check“How to Create Authorization Object in SAP ABAP?” yazısının devamını oku
How to Find Price Table in SAP ABAP?
Open VK13 transaction. Choose the condition type that you want and click Condition Information. Run the list with filters that you want. Table name is on the top of the screen. In our example it is written as 800. This means values are stored in A800 table.