SAP Reports / Programs | Production Planning and Control | Sales and Operations Planning | Sales Plan(PP-SOP-SP) SAP PP

MMCP6F04 SAP ABAP INCLUDE - Routines for Generated Coding: Consistent Planning







MMCP6F04 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 MMCP6F04 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 MMCP6F04. "Basic submit
SUBMIT MMCP6F04 AND RETURN. "Return to original report after report execution complete
SUBMIT MMCP6F04 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
    See more syntax options for the ABAP SUBMIT statement


Text pool values


Title: Routines for Generated Coding: Consistent Planning


INCLUDES used within this REPORT MMCP6F04

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:

DEQUEUE_E_RMCP1S CALL FUNCTION 'DEQUEUE_E_RMCP1S' EXPORTING MANDT = RMCP1S-MANDT GSTRU = RMCP1S-GSTRU SSOUR = RMCP1S-SSOUR VRSIO = RMCP1S-VRSIO KEY = RMCP1S-KEY X_GSTRU = ' ' X_SSOUR = ' ' X_VRSIO = ' ' X_KEY = ' '.

DEQUEUE_E_RMCP1S CALL FUNCTION 'DEQUEUE_E_RMCP1S' EXPORTING MANDT = RMCP1S-MANDT GSTRU = RMCP1S-GSTRU SSOUR = RMCP1S-SSOUR VRSIO = RMCP1S-VRSIO KEY = RMCP1S-KEY X_GSTRU = ' ' X_SSOUR = ' ' X_VRSIO = ' ' X_KEY = ' '.

ENQUEUE_E_RMCP1S CALL FUNCTION 'ENQUEUE_E_RMCP1S' EXPORTING MANDT = RMCP1S-MANDT GSTRU = RMCP1S-GSTRU SSOUR = RMCP1S-SSOUR VRSIO = RMCP1S-VRSIO KEY = RMCP1S-KEY X_GSTRU = ' ' X_SSOUR = ' ' X_VRSIO = ' ' X_KEY = ' ' EXCEPTIONS FOREIGN_LOCK = 01 SYSTEM_FAILURE = 02 OTHERS = 03. "UC418315

ENQUEUE_E_RMCP1S CALL FUNCTION 'ENQUEUE_E_RMCP1S' EXPORTING MANDT = RMCP1S-MANDT GSTRU = RMCP1S-GSTRU SSOUR = RMCP1S-SSOUR VRSIO = RMCP1S-VRSIO KEY = RMCP1S-KEY X_GSTRU = ' ' X_SSOUR = ' ' X_VRSIO = ' ' X_KEY = ' ' EXCEPTIONS FOREIGN_LOCK = 01 SYSTEM_FAILURE = 02 OTHERS = 03. "UC418315

MC_GSTRU_PRUEFEN CALL FUNCTION 'MC_GSTRU_PRUEFEN' EXPORTING I_GSTRU = SAV_GSTRU TABLES T_DATF = DATENFELDER T_KEYS = KEYFELDER T_UNITS = EINHEITEN EXCEPTIONS OTHERS = 1.

MC_PERIO_GET_FIRST_AND_LASTDAY CALL FUNCTION 'MC_PERIO_GET_FIRST_AND_LASTDAY' EXPORTING IFABKL = YC_FABKL IPERKZ = YC_PERKZ IPERIV = YC_PERIV IPERID = YC_PERID IMPORTING EFIRSTDAY = YC_V-VONTG ELASTDAY = YC_V-BISTG EXCEPTIONS PERID_INVALID = 01.

DATE_CONVERT_TO_FACTORYDATE CALL FUNCTION 'DATE_CONVERT_TO_FACTORYDATE' EXPORTING DATE = YC_V-VONTG FACTORY_CALENDAR_ID = YC_FABKL CORRECT_OPTION = '+' IMPORTING FACTORYDATE = YC_UGRENZ.

DATE_CONVERT_TO_FACTORYDATE CALL FUNCTION 'DATE_CONVERT_TO_FACTORYDATE' EXPORTING DATE = YC_V-BISTG CORRECT_OPTION = '-' FACTORY_CALENDAR_ID = YC_FABKL IMPORTING FACTORYDATE = YC_OGRENZ.

MCP_EVENT_READ CALL FUNCTION 'MCP_EVENT_READ' EXPORTING IPLOBJ = TAB_STRU_SXYZ-PLOBJ ISTFNA = YC_STFNA IVRSIO = YC_VRSIO ISSOUR = SPACE IOPERA = '+' IFABKL = YC_FABKL TABLES TMCP6VE = YC_V.

MCP_EVENT_READ CALL FUNCTION 'MCP_EVENT_READ' EXPORTING IPLOBJ = TAB_STRU_SXYZ-PLOBJ ISTFNA = YC_STFNA IVRSIO = YC_VRSIO ISSOUR = SPACE IOPERA = '*' IFABKL = YC_FABKL TABLES TMCP6VE = YC_V.

MC_ADD_ERTAG_AND_ATAGE CALL FUNCTION 'MC_ADD_ERTAG_AND_ATAGE' EXPORTING IFABKL = SAV_T445A-FABKL TABLES IPTAB = I_PERIOTAB EXCEPTIONS FACTORY_CAL_READ_NOT_POSSIBLE = 1 PERID_INVALID = 2 OTHERS = 3.

MC_PERIOTAB_BT_FIRST_LASTDAY CALL FUNCTION 'MC_PERIOTAB_BT_FIRST_LASTDAY' EXPORTING I_PERIV = YC_HLP_PERIV I_PERKZ = I_NACH_PERIO I_FIRSTDAY = YC_FIRSTDAY I_LASTDAY = YC_LASTDAY I_FABKL = SAV_T445A-FABKL TABLES T_PERIOTAB = I_PERIOTAB1 EXCEPTIONS WRONG_PARAMETER = 1 OTHERS = 2.

MC_ADD_ERTAG_AND_ATAGE CALL FUNCTION 'MC_ADD_ERTAG_AND_ATAGE' EXPORTING IFABKL = SAV_T445A-FABKL TABLES IPTAB = I_PERIOTAB1 EXCEPTIONS FACTORY_CAL_READ_NOT_POSSIBLE = 1 PERID_INVALID = 2 OTHERS = 3.

MCP_PERIO_ADAPT CALL FUNCTION 'MCP_PERIO_ADAPT' EXPORTING IFABKL = SAV_T445A-FABKL TABLES I_PGABV = I_SOURCE O_PGABV = I_TARGET EXCEPTIONS CONVERT_TO_DAYTAB_IMPOSSIBLE = 1 OTHERS = 2.

MC_PERIODE_ZUM_DATUM CALL FUNCTION 'MC_PERIODE_ZUM_DATUM' EXPORTING IDATE = TN_HLP_ERTAG IPERKZ = PER_W IMPORTING EPERID = TN_HLP_SPWOC EXCEPTIONS OTHERS = 1.

MC_PERIODE_ZUM_DATUM CALL FUNCTION 'MC_PERIODE_ZUM_DATUM' EXPORTING IDATE = TN_HLP_ERTAG IPERKZ = PER_M IMPORTING EPERID = TN_HLP_SPMON EXCEPTIONS OTHERS = 1.

MC_TP_PERIOTAB_AUFBAU CALL FUNCTION 'MC_TP_PERIOTAB_AUFBAU' EXPORTING I_PERIV = SAV_TP_PERIV TABLES I_TPTAB = TP_PERIOTAB EXCEPTIONS TP_NOTFOUND = 1 OTHERS = 2.

ADD_ERTAG_AND_ATAGE_IN_TP CALL FUNCTION 'ADD_ERTAG_AND_ATAGE_IN_TP' EXPORTING IFABKL = TF_FABKL TABLES IPTAB = TP_PERIOTAB EXCEPTIONS FACTORY_CAL_READ_NOT_POSSIBLE = 1 PERID_INVALID = 2 OTHERS = 3.

MC_PERIODE_ZUM_DATUM





CALL FUNCTION 'MC_PERIODE_ZUM_DATUM' EXPORTING IDATE = TC_HLP_VONTG IPERKZ = TC_HLP_COLS-PERIO IPERIV = TC_HLP_PERIV IMPORTING EPERID = TC_HLP_PERNA EXCEPTIONS OTHERS = 1.

MCP_EVENT_IN_TP_DISAGG CALL FUNCTION 'MCP_EVENT_IN_TP_DISAGG' EXPORTING EI_TP_PERIV = SAV_TP_PERIV EI_FABKL = SAV_T445A-FABKL TABLES EI_TP_PERIOTAB = TP_PERIOTAB EI_EVENT_TAB = TA_EVENT EI_EVENT = TA_EVENT_TP_DISAGG EXCEPTIONS PERIOD_NOT_FOUND = 1 TP_NOT_FOUND = 2 OTHERS = 3.

MCP_EVENT_IN_COLS_AGG CALL FUNCTION 'MCP_EVENT_IN_COLS_AGG' EXPORTING EC_FLG_SEPERATE = ' ' TABLES EC_TP_PERIOTAB = TP_PERIOTAB EC_TP_PGCOLS = TP_PGCOLS_TAB EC_COLS = TA_COLS EC_EVENT_TAB = TA_HLP_TP_DISAGG EXCEPTIONS PERIOD_WRONG = 1 OTHERS = 2.

MC_PERIODE_ZUM_DATUM CALL FUNCTION 'MC_PERIODE_ZUM_DATUM' EXPORTING IDATE = TA_HLP_DATUM IPERKZ = TA_EVENT_TP-PERKZ IPERIV = TA_EVENT_TP-PERIV IMPORTING EPERID = TA_HLP_PERID EXCEPTIONS OTHERS = 1.

MC_PERIO_GET_FIRST_AND_LASTDAY CALL FUNCTION 'MC_PERIO_GET_FIRST_AND_LASTDAY' EXPORTING IFABKL = SAV_T445A-FABKL IPERKZ = TA_EVENT_TP-PERKZ IPERIV = TA_EVENT_TP-PERIV IPERID = TA_HLP_PERID IMPORTING EFIRSTDAY = TA_HLP_ERTAG ELASTDAY = TA_HLP_BISTAG EXCEPTIONS PERID_INVALID = 1 OTHERS = 2.

DATE_CONVERT_TO_FACTORYDATE CALL FUNCTION 'DATE_CONVERT_TO_FACTORYDATE' EXPORTING DATE = TA_HLP_DATUM FACTORY_CALENDAR_ID = SAV_T445A-FABKL CORRECT_OPTION = '+' IMPORTING DATE = TA_HLP_DATUM.

MC_PERIODE_ZUM_DATUM CALL FUNCTION 'MC_PERIODE_ZUM_DATUM' EXPORTING IDATE = TA_HLP_DATUM IPERKZ = TA_ZL_PERKZ IPERIV = TA_ZL_PERIV IMPORTING EPERID = TA_HLP_PERID.

MC_PERIODE_ZUM_DATUM CALL FUNCTION 'MC_PERIODE_ZUM_DATUM' EXPORTING IDATE = TA_HLP_DATUM IPERKZ = TA_CALC_TAB-PERKZ IPERIV = TA_CALC_TAB-PERIV IMPORTING EPERID = TA_HLP_PERID EXCEPTIONS OTHERS = 1.

MC_PERIO_GET_FIRST_AND_LASTDAY CALL FUNCTION 'MC_PERIO_GET_FIRST_AND_LASTDAY' EXPORTING IFABKL = TA_T445A-FABKL * IWERKS = ' ' IPERKZ = TA_CALC_TAB-PERKZ IPERIV = TA_CALC_TAB-PERIV IPERID = TA_HLP_PERID IMPORTING EFIRSTDAY = TA_HLP_ERTAG ELASTDAY = TA_HLP_BISTAG EXCEPTIONS PERID_INVALID = 1 OTHERS = 2.

DATE_CONVERT_TO_FACTORYDATE CALL FUNCTION 'DATE_CONVERT_TO_FACTORYDATE' EXPORTING DATE = TA_HLP_DATUM FACTORY_CALENDAR_ID = TA_T445A-FABKL CORRECT_OPTION = '+' IMPORTING DATE = TA_HLP_DATUM.



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 MMCP6F04 or its description.