Skip to Content
0
Sep 23, 2011 at 11:47 AM

Triggering a Process Chain From R/3 program

128 Views

hi

i have a requirement where i have to trigger process chain from R3 Program.

create a event in BW system and add that event in process chain in start variant.

write below logic in R3 side

below code i have written in ABAP program in R3 side

parameters: rfcdest like rfcdisplay-rfcdest,

zevent type char32.

CALL FUNCTION 'Z999B_CB_F_EVENTRAISE' destination rfcdest

EXPORTING

EVENTID = ZEVENT

EXCEPTIONS

BAD_EVENTID = 1

EVENTID_DOES_NOT_EXIST = 2

EVENTID_MISSING = 3

RAISE_FAILED = 4

OTHERS = 5

.

IF SY-SUBRC 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

Create a Customized FM with Remote Enabled in BW system

call that FM with RFC destination and Event name as Export parameter from a ABAP program in R3 Side

i have given the Event name in Variant as same as i have created in BW system SM62

when i had run the Program in R3 side the program run successfully but the process chain did not run in BW system.

please let me know what is the reason behind this.

Below FM i have developed in BW system with Remote Enabled in Attribute tab page of FM.

FUNCTION Z999B_CB_F_EVENTRAISE.

*"----


""Local Interface:

*" IMPORTING

*" VALUE(EVENTID) TYPE CHAR32

*"----


CALL FUNCTION 'BP_EVENT_RAISE'

EXPORTING

eventid = eventid

  • EVENTPARM = ' '

  • TARGET_INSTANCE = ' '

EXCEPTIONS

BAD_EVENTID = 1

EVENTID_DOES_NOT_EXIST = 2

EVENTID_MISSING = 3

RAISE_FAILED = 4

OTHERS = 5

.

IF sy-subrc 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

ENDFUNCTION.

Regards

Atul