SAP Reports / Programs | Cross-Application Components | European Monetary Union: Euro | Local Currency Changeover(CA-EUR-CNV) SAP CA

EWUSTDJ1 SAP ABAP INCLUDE - Include for EMU Job Scheduling







EWUSTDJ1 is a standard ABAP INCLUDE available within your SAP system (depending on your version and release level). Below is the basic information available for this SAP report including which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC. Also check out the submitted Comments related to this SAP report or see any standard documentation available.

If you would like to execute this report or see the full code listing simply enter EWUSTDJ1 into the relevant SAP transactions such as SE38 or SE80


ABAP code to call this SAP report using the submit statement

This report can be called from another progam/report simply by using the ABAP SUBMIT statement, see below for example ABAP code snipts of how to do this.






SUBMIT EWUSTDJ1. "Basic submit
SUBMIT EWUSTDJ1 AND RETURN. "Return to original report after report execution complete
SUBMIT EWUSTDJ1 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Title: Include for EMU Job Scheduling


INCLUDES used within this REPORT EWUSTDJ1

No INCLUDES are used within this REPORT code!


TABLES used within REPORT and the associated SELECT statement:





No SAP DATABASE tables are accessed within this REPORT code!


Function Modules used within report and the associated call statement:

BP_JOB_DELETE CALL FUNCTION 'BP_JOB_DELETE' EXPORTING JOBCOUNT = TBTCO-JOBCOUNT JOBNAME = TBTCO-JOBNAME EXCEPTIONS CANT_DELETE_EVENT_ENTRY = 1 CANT_DELETE_JOB = 2 CANT_DELETE_JOBLOG = 3 CANT_DELETE_STEPS = 4 CANT_DELETE_TIME_ENTRY = 5 CANT_DERELEASE_SUCCESSOR = 6 CANT_ENQ_PREDECESSOR = 7 CANT_ENQ_SUCCESSOR = 8 CANT_ENQ_TBTCO_ENTRY = 9 CANT_UPDATE_PREDECESSOR = 10 CANT_UPDATE_SUCCESSOR = 11 COMMIT_FAILED = 12 JOBCOUNT_MISSING = 13 JOBNAME_MISSING = 14 JOB_DOES_NOT_EXIST = 15 JOB_IS_ALREADY_RUNNING = 16 NO_DELETE_AUTHORITY = 17 OTHERS = 18 .

BP_JOB_DELETE CALL FUNCTION 'BP_JOB_DELETE' EXPORTING JOBCOUNT = TBTCO-JOBCOUNT JOBNAME = TBTCO-JOBNAME EXCEPTIONS CANT_DELETE_EVENT_ENTRY = 1 CANT_DELETE_JOB = 2 CANT_DELETE_JOBLOG = 3 CANT_DELETE_STEPS = 4 CANT_DELETE_TIME_ENTRY = 5 CANT_DERELEASE_SUCCESSOR = 6 CANT_ENQ_PREDECESSOR = 7 CANT_ENQ_SUCCESSOR = 8 CANT_ENQ_TBTCO_ENTRY = 9 CANT_UPDATE_PREDECESSOR = 10 CANT_UPDATE_SUCCESSOR = 11 COMMIT_FAILED = 12 JOBCOUNT_MISSING = 13 JOBNAME_MISSING = 14 JOB_DOES_NOT_EXIST = 15 JOB_IS_ALREADY_RUNNING = 16 NO_DELETE_AUTHORITY = 17 OTHERS = 18 .

BP_JOB_CREATE CALL FUNCTION 'BP_JOB_CREATE' EXPORTING JOB_CR_DIALOG = 'N' JOB_CR_HEAD_INP = GLOBAL_JOB * ADK_MODE = FALSE IMPORTING JOB_CR_HEAD_OUT = GLOBAL_JOB JOB_CR_STDT_OUT = GLOBAL_START_DATE TABLES JOB_CR_STEPLIST = GLOBAL_STEP_TBL EXCEPTIONS CANT_CREATE_JOB = 1 INVALID_DIALOG_TYPE = 2 INVALID_JOB_DATA = 3 JOB_CREATE_CANCELED = 4 OTHERS = 5.

JOB_SUBMIT CALL FUNCTION 'JOB_SUBMIT' EXPORTING AUTHCKNAM = SY-UNAME JOBCOUNT = JOBNUMBER JOBNAME = JOBNAME REPORT = REPORT * variant = variante EXCEPTIONS BAD_PRIPARAMS = 1 BAD_XPGFLAGS = 2 INVALID_JOBDATA = 3 JOBNAME_MISSING = 4 JOB_NOTEX = 5 JOB_SUBMIT_FAILED = 6 LOCK_FAILED = 7 PROGRAM_MISSING = 8 PROG_ABAP_AND_EXTPG_SET = 9 OTHERS = 10.

JOB_CLOSE CALL FUNCTION 'JOB_CLOSE' EXPORTING EVENT_ID = EVENTID EVENT_PARAM = LV_EVENT_PARAM EVENT_PERIODIC = 'X' JOBCOUNT = JOBNUMBER JOBNAME = JOBNAME * strtimmed = ' ' IMPORTING JOB_WAS_RELEASED = JWR EXCEPTIONS CANT_START_IMMEDIATE = 1 INVALID_STARTDATE = 2 JOBNAME_MISSING = 3 JOB_CLOSE_FAILED = 4 JOB_NOSTEPS = 5 JOB_NOTEX = 6 LOCK_FAILED = 7 OTHERS = 8.

BP_JOB_CREATE CALL FUNCTION 'BP_JOB_CREATE' EXPORTING JOB_CR_DIALOG = 'N' JOB_CR_HEAD_INP = GLOBAL_JOB * ADK_MODE = FALSE IMPORTING JOB_CR_HEAD_OUT = GLOBAL_JOB JOB_CR_STDT_OUT = GLOBAL_START_DATE TABLES JOB_CR_STEPLIST = GLOBAL_STEP_TBL EXCEPTIONS CANT_CREATE_JOB = 1 INVALID_DIALOG_TYPE = 2 INVALID_JOB_DATA = 3 JOB_CREATE_CANCELED = 4 OTHERS = 5.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '072' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '073' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '074' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '075' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

JOB_SUBMIT CALL FUNCTION 'JOB_SUBMIT' EXPORTING AUTHCKNAM = SY-UNAME EXTPGM_SYSTEM = HOSTNAME JOBCOUNT = JOBNUMBER JOBNAME = JOBNAME REPORT = REPORT VARIANT = VARIANTE EXCEPTIONS BAD_PRIPARAMS = 1 BAD_XPGFLAGS = 2 INVALID_JOBDATA = 3 JOBNAME_MISSING = 4 JOB_NOTEX = 5 JOB_SUBMIT_FAILED = 6 LOCK_FAILED = 7 PROGRAM_MISSING = 8 PROG_ABAP_AND_EXTPG_SET = 9 OTHERS = 10.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '076' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '077' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '091' MSGV1 = JOBNAME MSGV2 = REPORT EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '092' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '078' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '079' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '080' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND





CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '081' MSGV1 = REPORT EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '082' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '090' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

ENQUEUE_EEWUCLSTAT CALL FUNCTION 'ENQUEUE_EEWUCLSTAT' EXPORTING MODE_EWUCLSTAT = 'E' MANDT = SY-MANDT PAKET = EWUPAK-PAKET TABNAME = PREDTABNAME * TASK_NUMB = * X_PAKET = ' ' * X_TABNAME = ' ' * X_TASK_NUMB = ' ' * _SCOPE = '2' _WAIT = 'X' * _COLLECT = ' ' EXCEPTIONS FOREIGN_LOCK = 1 SYSTEM_FAILURE = 2 OTHERS = 3.

JOB_CLOSE CALL FUNCTION 'JOB_CLOSE' EXPORTING JOBCOUNT = JOBNUMBER JOBNAME = JOBNAME * Startdatum + -Zeit SDLSTRTDT = STR_DAT SDLSTRTTM = STR_ZEIT STRTIMMED = ' ' TARGETSYSTEM = HOSTNAME IMPORTING JOB_WAS_RELEASED = JWR EXCEPTIONS CANT_START_IMMEDIATE = 1 INVALID_STARTDATE = 2 JOBNAME_MISSING = 3 JOB_CLOSE_FAILED = 4 JOB_NOSTEPS = 5 JOB_NOTEX = 6 LOCK_FAILED = 7 OTHERS = 8.

JOB_CLOSE CALL FUNCTION 'JOB_CLOSE' EXPORTING EVENT_ID = EVENT_ID * EVENT_PARAM = ' ' * EVENT_PERIODIC = ' ' JOBCOUNT = JOBNUMBER JOBNAME = JOBNAME TARGETSYSTEM = HOSTNAME IMPORTING JOB_WAS_RELEASED = JWR EXCEPTIONS CANT_START_IMMEDIATE = 1 INVALID_STARTDATE = 2 JOBNAME_MISSING = 3 JOB_CLOSE_FAILED = 4 JOB_NOSTEPS = 5 JOB_NOTEX = 6 LOCK_FAILED = 7 OTHERS = 8.

DEQUEUE_EEWUCLSTAT CALL FUNCTION 'DEQUEUE_EEWUCLSTAT' EXPORTING MODE_EWUCLSTAT = 'E' MANDT = SY-MANDT PAKET = EWUPAK-PAKET TABNAME = PREDTABNAME.

JOB_CLOSE CALL FUNCTION 'JOB_CLOSE' EXPORTING JOBCOUNT = JOBNUMBER JOBNAME = JOBNAME * entweder Vorgänger * pred_jobname = jobvorgaenger * pred_jobcount = jobvorcount * oder Startdatum + -Zeit SDLSTRTDT = STR_DAT SDLSTRTTM = STR_ZEIT STRTIMMED = ' ' TARGETSYSTEM = HOSTNAME IMPORTING JOB_WAS_RELEASED = JWR EXCEPTIONS CANT_START_IMMEDIATE = 1 INVALID_STARTDATE = 2 JOBNAME_MISSING = 3 JOB_CLOSE_FAILED = 4 JOB_NOSTEPS = 5 JOB_NOTEX = 6 LOCK_FAILED = 7 OTHERS = 8.

JOB_CLOSE CALL FUNCTION 'JOB_CLOSE' EXPORTING JOBCOUNT = JOBNUMBER JOBNAME = JOBNAME * entweder Vorgänger oder PRED_JOBNAME = JOBVORGAENGER PRED_JOBCOUNT = JOBVORCOUNT * Startdatum + -Zeit * sdlstrtdt = str_dat * sdlstrttm = str_zeit * strtimmed = ' ' TARGETSYSTEM = HOSTNAME IMPORTING JOB_WAS_RELEASED = JWR EXCEPTIONS CANT_START_IMMEDIATE = 1 INVALID_STARTDATE = 2 JOBNAME_MISSING = 3 JOB_CLOSE_FAILED = 4 JOB_NOSTEPS = 5 JOB_NOTEX = 6 LOCK_FAILED = 7 OTHERS = 8.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '083' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '084' MSGV1 = JOBNAME MSGV2 = STR_DAT MSGV3 = STR_ZEIT EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '085' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '086' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '087' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '088' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '089' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.

EWU_PROTOCOL_APPEND CALL FUNCTION 'EWU_PROTOCOL_APPEND' EXPORTING MSGTY = 'E' MSGID = 'MQ' MSGNO = '086' MSGV1 = JOBNAME EXCEPTIONS OTHERS = 4.



Contribute (Add Comments)

Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.

The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.

This will then be available for everyone to easily find by simply searching on the report name EWUSTDJ1 or its description.