Posts

Modify Screen as per the selection Screen

We can modify screen as per the selection screen FORM f_modify_screen . * IF p_calim IS NOT INITIAL. * LOOP AT SCREEN. * IF screen-group1 EQ 'M1'. * screen-active = '0'. * screen-input = '0'. * MODIFY SCREEN. * ENDIF. * ENDLOOP. * ENDIF. *IF sy-ucomm EQ 'ONLI'. LOOP AT SCREEN. IF screen-group1 = 'M1'. IF p_calim = 'X'. screen-active = '0'. ELSE. screen-active = '1'. ENDIF. MODIFY SCREEN. ENDIF. ENDLOOP. *ENDIF. LOOP AT SCREEN. IF screen-group1 = 'M2'. IF P_Recept = 'X'. screen-active = '0'. ELSE. screen-active = '1'. ENDIF. MODIFY SCREEN. ENDIF. ENDLOOP. ENDFORM. SELECTION-SCREEN: BEGIN OF BLOCK b1 WITH FRAME TITLE text-001. select-OPTIONS: s_BUKRS FOR bsid-bukrs NO-EXTENSION NO INTERVALS OBLIGATORY, s_KUNNR F...

Send Mail and Commit The Records

* Send Mail CALL FUNCTION 'SO_NEW_DOCUMENT_SEND_API1' EXPORTING document_data = lt_mailsubject TABLES object_content = lt_mailtxt receivers = lt_mailrecipients EXCEPTIONS too_many_receivers = 1 document_not_sent = 2 document_type_not_exist = 3 operation_no_authorization = 4 parameter_error = 5 x_error = 6 enqueue_error = 7 OTHERS = 8. IF sy-subrc EQ 0. COMMIT WORK. * Push mail out from SAP outbox SUBMIT rsconn01 WITH mode = 'INT' AND RETURN. ENDIF. ********************************ROHINI KUMAR*********************************                                 Please support my work : sap.rohini988@gmail.com               ...

Submit Reports

FBL5N loop at t_fbl5n into st_fbl5n CALL 'LIST_FREE_MEMORY'. SUBMIT rfitemar WITH dd_bukrs EQ st_fbl5n-bukrs WITH dd_hkont EQ st_fbl5n-hkont WITH x_opsel EQ 'X' WITH pa_stida EQ vl_datum WITH pa_vari EQ st_fbl5n-alv_layout WITH x_norm EQ 'X' WITH x_shbv EQ 'X' EXPORTING LIST TO MEMORY AND RETURN. CALL FUNCTION 'LIST_FROM_MEMORY' TABLES listobject = list_tab EXCEPTIONS not_found = 1 OTHERS = 2. CHECK sy-subrc = 0. *Converting to ASCII CALL FUNCTION 'LIST_TO_ASCI' TABLES listasci = t_tab2 listobject = list_tab EXCEPTIONS empty_list = 1 list_index_invalid = 2. CHECK sy-subrc <> 0. * Start of processing of the INTERNAL TABLE t_tab2. ENDLOOP. DATA: p...

Tranporting Field daynamic

DATA lv_fields TYPE string. lv_fields = 'VV077'. FIELD-SYMBOLS: TYPE any. FIELD-SYMBOLS: TYPE any. FIELD-SYMBOLS: TYPE any. FIELD-SYMBOLS: TYPE any. data : lv_matnr type mara-matnr, lv_umrez type p DECIMALS 3, LV_ABSMG TYPE LAENG. LOOP AT t_item[] ASSIGNING . ASSIGN COMPONENT 'VV077' OF STRUCTURE TO . ASSIGN COMPONENT 'ARTNR' OF STRUCTURE TO . ASSIGN COMPONENT 'ABSMG' OF STRUCTURE TO . IF IS ASSIGNED. lv_matnr = . LV_ABSMG = . SELECT SINGLE MATNR,UMREZ,UMREN FROM MARM INTO @DATA(GS_MARM) WHERE MATNR = @lv_matnr and MEINH = 'PAL'. lv_umrez = gs_marm-umren / gs_marm-umrez. lv_umrez = LV_UMREZ * LV_ABSMG. = lv_umrez . MODIFY t_item[] FROM TRANSPORTING (lv_fields). ENDIF. clear: lv_matnr,lv_umrez,gs_marm, ,LV_ABSMG. ENDLOOP. ********************************ROHINI KUMAR*********************************                            ...

Field Symbols Example to Change Value at run time

Changin Value at Run time FIELD-SYMBOLS: TYPE any. FIELD-SYMBOLS: TYPE any. LOOP AT t_item[] ASSIGNING . ASSIGN COMPONENT 'VV077' OF STRUCTURE TO . IF IS ASSIGNED. = '0.01'. MODIFY t_item[] FROM . ENDIF. ENDLOOP. XCOPA500 copa Document COPA0005 Enhancement for actual data update (CO-PA) EXIT_SAPLKEII_001 EXIT_SAPLKEII_002 FIELD-SYMBOLS: TYPE any. FIELD-SYMBOLS: TYPE any. FIELD-SYMBOLS: TYPE any. data : lv_matnr type mara-matnr. LOOP AT t_item[] ASSIGNING . ASSIGN COMPONENT 'VV077' OF STRUCTURE TO . ASSIGN COMPONENT 'ARTNR' OF STRUCTURE TO . IF IS ASSIGNED. lv_matnr = . SELECT SINGLE MATNR,UMREZ,UMREN FROM MARM INTO @DATA(GS_MARM) WHERE MATNR = @lv_matnr. = '0.01'. MODIFY t_item[] FROM . ENDIF. clear: lv_matnr. ENDLOOP. FIELD-SYMBOLS: TYPE any. FIELD-SYMBOLS: TYPE any. FIELD-SYMBOLS: TYPE any. data : lv_matnr type mara-matnr, ...

Dynamic Report Creating Records

************************************************************************ * Program Name : ZMM_MIC_REPORT * * Object ID : MM * * Description : MIC REPORT * * Create Date : 20-01-2021 * * FO Owner : Rohini Kumar * * Tech Owner : Rohini Kumar * * Project Module : R2R * ************************************************************************ * Change Log * ************************************************************************ * REQ# DATE WHO CHANGE_ID DESCR * *----------------------------------------------------------------------- * 001 ...

Exlude the Delete button in TMG

ADD SOME CODE Process before output on screen Moduel excl_cua_funct-function = 'DELE' Append excl_cua_funct. in include program like that you can disalbe Module delete button in moduel pool Please support my work ********************************ROHINI KUMAR*********************************                                 Please support my work : sap.rohini988@gmail.com                                LinkedIn Link  :  https://www.linkedin.com/in/rohini-kumar-14647a13a/ ********************************************************************************