SAP/ABAP: MMPUR_MESSAGE_FORCED

*useful macros for message handling
INCLUDE mm_messages_mac. 

 mmpur_message_forced 
 'E' 
 'ZICF_CO' 
 '017' 
 ls_mepoitem-matnr 
 ls_mepoitem-werks 
 ls_mepoitem-bwtar 
 '' .

SAP/ABAP: MODIF ID

SELECTION-SCREEN BEGIN OF BLOCK TEST1 WITH FRAME TITLE TEXT-002.
 SELECT-OPTIONS: SO_TARIH FOR S121-SPTAG MODIF ID R11,
 SO_MALGR FOR MARA-MATKL.
 PARAMETERS: PA_HAFTA LIKE S121-SPWOC MODIF ID R12,
 PA_AY LIKE S121-SPMON MODIF ID R13.

SELECTION-SCREEN END OF BLOCK TEST1.

AT SELECTION-SCREEN OUTPUT.

if pa_ay eq 'X'.

LOOP AT SCREEN.

CASE SCREEN-GROUP1.
 WHEN 'R13'.
 SCREEN-INPUT = '1'.
 SCREEN-OUTPUT ='1'.
 SCREEN-ACTIVE = '1'.

WHEN 'R12'.
 SCREEN-INPUT = '0'.
 SCREEN-OUTPUT ='1'.
 SCREEN-ACTIVE = '1'.
 WHEN 'R11'.
 SCREEN-INPUT = '0'.
 SCREEN-OUTPUT ='1'.
 SCREEN-ACTIVE = '1'.

ENDCASE.
 MODIFY SCREEN.
 ENDLOOP.

elseif ......... .

endif.

PHP: Trigger

CREATE TRIGGER 'user_after_ins_tr' AFTER INSERT ON 'user' FOR EACH ROW

BEGIN

INSERT INTO user_online (user_id, online) VALUES (NEW.id, true);
INSERT INTO user_log (user_id, action, regData) VALUES (NEW.id, 1, NOW());
END;

SAP/ABAP: MESSAGE_STORE, MESSAGES_SHOW

DATA : GT_RETURN LIKE BAPIRET2
OCCURS 0 WITH HEADER LINE.

“E! ==> Message Class

IF GT_RETURN[] IS NOT INITIAL.
LOOP AT GT_RETURN.
PERFORM MESSAGE_STORE USING GT_RETURN-TYPE
GT_RETURN-ID
GT_RETURN-NUMBER
GT_RETURN-MESSAGE_V1
GT_RETURN-MESSAGE_V2
GT_RETURN-MESSAGE_V3
GT_RETURN-MESSAGE_V4.
ENDLOOP.

CALL FUNCTION 'MESSAGES_SHOW'
EXCEPTIONS
INCONSISTENT_RANGE = 1
NO_MESSAGES        = 2
OTHERS             = 3.

ENDIF.

*&---------------------------------------------------------------------
*&      Form  MESSAGE_STORE
*&---------------------------------------------------------------------
FORM MESSAGE_STORE  USING    P_TYPE
P_ID
P_NUMBER
P_V1
P_V2
P_V3
P_V4.
CALL FUNCTION 'MESSAGE_STORE'
EXPORTING
ARBGB                  = P_ID
MSGTY                  = P_TYPE
MSGV1                  = P_V1
MSGV2                  = P_V2
MSGV3                  = P_V3
MSGV4                  = P_V4
TXTNR                  = P_NUMBER
EXCEPTIONS
MESSAGE_TYPE_NOT_VALID = 1
NOT_ACTIVE             = 2
OTHERS                 = 3.

ENDFORM.                    " MESSAGE_STORE

SAP/ABAP: C14Z_MESSAGES_SHOW_AS_POPUP FM

DATA: GT_MESSAGE_TAB TYPE TABLE OF ESP1_MESSAGE_WA_TYPE WITH HEADER LINE .

IF GT_MESSTAB[] IS NOT INITIAL.
CALL FUNCTION 'C14Z_MESSAGES_SHOW_AS_POPUP'
TABLES
I_MESSAGE_TAB = GT_MESSAGE_TAB.
ENDIF.

SAP/ABAP: REPLACE ALL OCCURRENCES

REPLACE ALL OCCURRENCES OF 'STD'
        IN GS_STD-TEXT_STRING WITH GS_STD-STDT.