Ansicht
Dokumentation
CS_BOMRTO_DYNSQL_PE - Program to generate SQL code for method MAT_CHECK_ECN_PE
General Material Data CL_GUI_FRONTEND_SERVICES - Frontend ServicesThis documentation is copyright by SAP AG.
Purpose
You can use this report to generate dynamic SQL for parameter effectivity, when there is change in Customizing. You have to provide a reference to table AEFF and TECS, copy the SQL code in the method MAT_CHECK_ECN_PE of the ABAP managed database procedure CL_CS_AMDP_BOM_RTO_ATTRIBand activate it.
Integration
Prerequisites
Features
This report can be used if there is a change in the following Customizing:
- Change in Active Profile in Logistics-General→Engineering Change Management→Set Control Data.
- Change in effectivity type in active profile in Logistics-General→Engineering Change Management→Parameter Effectivity →Maintain Effectivity Profiles.
You can also use this report when a material is added to a specific profile under:
SAP Easy Access Menu → Logistics →Central Functions→Engineering→Engineering Change Management→Environment→Parameter Effectivity→ Assign Material to Profile.
Selection
Standard Variants
Output
Activities
Example
Generated Code for the Report:
METHOD MAT_CHECK_ECN_PE
by database procedure for hdb language sqlscript
options READ-ONLY
using TECS, AEEF.
BEGIN
SET01 = SELECT AEEF.*, AENNR_TAB.THE_INDEX
FROM AEEF AS AEEF
INNER JOIN :AENNR_TAB AS AENNR_TAB ON AEEF.MANDT = AENNR_TAB.MANDT AND AEEF.AENNR = AENNR_TAB.AENNR
INNER JOIN :HEAD_TAB AS HEAD_TAB ON AENNR_TAB.THE_INDEX = HEAD_TAB.THE_INDEX AND AENNR_TAB.MANDT = HEAD_TAB.MANDT
INNER JOIN TECS AS TECS ON HEAD_TAB.MANDT = TECS.MANDT AND HEAD_TAB.TECHS = TECS.TECHS
WHERE (AENNR_TAB.CLINT IN ('0000000002' )
AND AEEF.DATE_LO <= TECS.DATE_LO AND AEEF.DATE_LO<> '00000000');
/*****************End of of Parameter**********/
SET02 = SELECT SET01.*
FROM :SET01 AS SET01
INNER JOIN :AENNR_TAB AS AENNR_TAB ON AENNR_TAB.AENNR = SET01.AENNR
INNER JOIN :HEAD_TAB AS HEAD_TAB ON AENNR_TAB.THE_INDEX = HEAD_TAB.THE_INDEX AND AENNR_TAB.MANDT = HEAD_TAB.MANDT
INNER JOIN TECS AS TECS ON HEAD_TAB.MANDT = TECS.MANDT AND HEAD_TAB.TECHS = TECS.TECHS
WHERE (SET01.DATE_HI >= TECS.DATE_LO AND SET01.DATE_HI <> '00000000');
/*****************End of Parameter**********/
SET03 = SELECT SET01.*
FROM :SET01 AS SET01
INNER JOIN :AENNR_TAB AS AENNR_TAB ON AENNR_TAB.AENNR = SET01.AENNR
INNER JOIN :HEAD_TAB AS HEAD_TAB ON AENNR_TAB.THE_INDEX = HEAD_TAB.THE_INDEX AND AENNR_TAB.MANDT = HEAD_TAB.MANDT
INNER JOIN TECS AS TECS ON HEAD_TAB.MANDT = TECS.MANDT AND HEAD_TAB.TECHS = TECS.TECHS
WHERE (SET01.DATE_LO = TECS.DATE_LO AND SET01.DATE_OI <> 'X' AND SET01.DATE_HI = '00000000');
/******************* End of SET03 DATE of Parameter***********/
SET04 = SELECT SET01.*
FROM :SET01 AS SET01
INNER JOIN :AENNR_TAB AS AENNR_TAB ON AENNR_TAB.AENNR = SET01.AENNR
INNER JOIN :HEAD_TAB AS HEAD_TAB ON AENNR_TAB.THE_INDEX = HEAD_TAB.THE_INDEX AND AENNR_TAB.MANDT = HEAD_TAB.MANDT
WHERE SET01.DATE_OI = 'X' UNION ALL SELECT * FROM :SET03 UNION ALL SELECT * FROM :SET02;
/******************* End of SET04 DATE of Parameter***********/
VALID_AENNR_PAR_EFF = SELECT MANDT, THE_INDEX, AENNR FROM :SET04;END;
ENDMETHOD.
Addresses (Business Address Services) Fill RESBD Structure from EBP Component Structure
This documentation is copyright by SAP AG.
Length: 5481 Date: 20240531 Time: 041035 sap01-206 ( 57 ms )
