Hi Jimster,
I copied from view source only...but i have n't copied entir view source due to space constraint.
here is the entire view source.
ENGINE SQLORA SET DEFAULT_CONNECTION MADPR
ENGINE SQLORA
SELECT
a.SUPPLIER_PLANT_NAME,
a.SUPPLIER_PART_NUM,
a.SUPPLIER_REGION,
a.REGION_BUILT,
a.OEM_GROUP_NAME,
a.OEM_NAME,
a.PLATFORM_FAMILY,
a.PLATFORM_NAME,
a.NAMEPLATE_NAME,
a.COUNTRY_NAME,
v.GLOBAL_SEGMENT,
v.REGIONAL_SEGMENT,
v.DESIGN_PARENT,
vc.SALES_PARENT,
a.VEHICLE_CLASS_CODE,
a.VEHICLE_TYPE_CODE,
b.CURR_UNITS,
b.NEXT_1_UNITS,
b.NEXT_2_UNITS,
b.NEXT_3_UNITS,
b.NEXT_4_UNITS,
b.NEXT_5_UNITS,
b.VEHICLE_START_DATE,
b.VEHICLE_END_DATE,
a.SBU_CODE,
a.PART_DESC_NAME,
a.PRODUCT_CLASS_NAME,
a.PRODUCT_CAT_NAME,
a.SERIES,
a.PROBABILITY_CODE_CS,
a.SUPPLIER_NAME,
a.SUPPLIER_COUNTRY_NAME,
a.CUST_PART_NUM,
a.TIER_1_PART_NUM,
a.TIER_1_SUPPLIER_NAME,
a.TIER_1_SHIP_TO,
a.CURRENCY_CODE,
c.XRATE_CURR,
a.PRICE_CY,
a.PRICE_CY_P1,
a.PRICE_CY_P2,
a.PRICE_CY_P3,
a.PRICE_CY_P4,
a.PRICE_CY_P5,
decode(a.is_lumpsum,'Y',0.00,a.UNITS_CY) as UNITS_CY,
decode(a.is_lumpsum,'Y',0.00,a.UNITS_CY_P1) as UNITS_CY_P1,
decode(a.is_lumpsum,'Y',0.00,a.UNITS_CY_P2) as UNITS_CY_P2,
decode(a.is_lumpsum,'Y',0.00,a.UNITS_CY_P3) as UNITS_CY_P3,
decode(a.is_lumpsum,'Y',0.00,a.UNITS_CY_P4) as UNITS_CY_P4,
decode(a.is_lumpsum,'Y',0.00,a.UNITS_CY_P5) as UNITS_CY_P5,
a.UC_SALES_CY,
a.UC_SALES_CY_P1,
a.UC_SALES_CY_P2,
a.UC_SALES_CY_P3,
a.UC_SALES_CY_P4,
a.UC_SALES_CY_P5,
a.PART_START_DATE,
a.PART_END_DATE,
a.TECH_CODE,
a.TECH_SFX_CODE,
a.TECH_SFX_CODE_2,
a.TECH_SFX_CODE_3,
a.TECH_SFX_CODE_4,
a.TECH_SFX_CODE_5,
a.TECH_SFX_CODE_6,
a.TECH_SFX_CODE_7,
a.APPRATE_AVG_CURR,
a.APPRATE_AVG_YR1,
a.APPRATE_AVG_YR2,
a.APPRATE_AVG_YR3,
a.APPRATE_AVG_YR4,
a.APPRATE_AVG_YR5,
a.ALLOCRATE_AVG_CURR,
a.ALLOCRATE_AVG_YR1,
a.ALLOCRATE_AVG_YR2,
a.ALLOCRATE_AVG_YR3,
a.ALLOCRATE_AVG_YR4,
a.ALLOCRATE_AVG_YR5,
a.QTY_PER_VEHICLE,
a.CONFIG_NAME,
a.COMMODITY_CODE,
a.SEAT_TYPE_CODE,
a.SEAT_LOC_CODE,
a.SEAT_POS_CODE,
a.SEAT_POS_QTY,
a.SEAT_POS_CY,
a.SEAT_POS_CY_P1,
a.SEAT_POS_CY_P2,
a.SEAT_POS_CY_P3,
a.SEAT_POS_CY_P4,
a.SEAT_POS_CY_P5,
a.SUSP_HOUSING_MATERIAL,
a.LINKAGE_DESIGN,
a.SUSP_BALL_JOINT_TYPE,
a.SUSP_NUM_OF_BUSHINGS,
a.SUSP_CS_PROCESS,
a.PART_DESC_LONG,
a.SALES_MANAGER,
a.MARKET_ANALYST,
a.BADGE,
a.BUSINESS_GROUP_CODE,
a.FBU_CODE,
a.COMPETITOR_FLAG,
a.COMPONENT_PART,
a.QUOTE_NUM,
a.ANTICIPATED_AWARD_DATE,
a.ANTICIPATED_QUOTE_DATE,
a.ORIGINAL_PRICE_LC,
a.PART_ID,
a.VEHICLE_BUILD_ID,
a.SW_SKELETON,
case when a.sbu_code = 'Elec' then 'Electronics' else a.CPSBU_NAME end as CPSBU_NAME,
a.OPPORTUNITY_NUM,
v.MNEMONIC_CODE
,c.XRATE_YR1,c.XRATE_YR2,c.XRATE_YR3,c.XRATE_YR4,c.XRATE_YR5,b.COUNTRY_BY_VM
FROM
V_ADHOC400_PART_TECH a,
V_ADHOC_VEH_BUILD b,
V_ADHOC_EXHANGE_RATES c,
VEHICLE_BUILD v,
VEHICLE_CROSSREF vc
WHERE
a.VEHICLE_BUILD_ID = b.VEHICLE_BUILD_ID
AND
a.VEHICLE_BUILD_ID = v.ID
AND
a.VEHICLE_BUILD_ID = vc.VEHICLE_BUILD_ID
AND
a.CURRENCY_CODE = c.CURRENCY_CODE
-IF EQ '' GOTO NF2;
-NF2
-IF EQ '' GOTO NF3;
-NF3
-IF EQ '' GOTO NF4;
-NF4
-IF EQ '' GOTO NF5;
-NF5
-IF EQ '' GOTO NF6;
-NF6
-IF EQ '' GOTO NF7;
-NF7
-IF EQ '' GOTO NF8;
-NF8
;
TABLE FILE SQLOUT
PRINT SUPPLIER_PLANT_NAME
SUPPLIER_PART_NUM
SUPPLIER_REGION
REGION_BUILT
OEM_GROUP_NAME
OEM_NAME
PLATFORM_FAMILY
PLATFORM_NAME
NAMEPLATE_NAME
COUNTRY_NAME
GLOBAL_SEGMENT
REGIONAL_SEGMENT
DESIGN_PARENT
SALES_PARENT
VEHICLE_CLASS_CODE
VEHICLE_TYPE_CODE
CURR_UNITS
NEXT_1_UNITS
NEXT_2_UNITS
NEXT_3_UNITS
NEXT_4_UNITS
NEXT_5_UNITS
VEHICLE_START_DATE
VEHICLE_END_DATE
SBU_CODE
PART_DESC_NAME
PRODUCT_CLASS_NAME
PRODUCT_CAT_NAME
SERIES
PROBABILITY_CODE_CS
SUPPLIER_NAME
SUPPLIER_COUNTRY_NAME
CUST_PART_NUM
TIER_1_PART_NUM
TIER_1_SUPPLIER_NAME
TIER_1_SHIP_TO
CURRENCY_CODE
COMPUTE XRATE/D20.6=XRATE_CURR;
PRICE_CY
PRICE_CY_P1
PRICE_CY_P2
PRICE_CY_P3
PRICE_CY_P4
PRICE_CY_P5
UNITS_CY
UNITS_CY_P1
UNITS_CY_P2
UNITS_CY_P3
UNITS_CY_P4
UNITS_CY_P5
UC_SALES_CY
UC_SALES_CY_P1
UC_SALES_CY_P2
UC_SALES_CY_P3
UC_SALES_CY_P4
UC_SALES_CY_P5
PART_START_DATE
PART_END_DATE
TECH_CODE
TECH_SFX_CODE
TECH_SFX_CODE_2
TECH_SFX_CODE_3
TECH_SFX_CODE_4
TECH_SFX_CODE_5
TECH_SFX_CODE_6
TECH_SFX_CODE_7
APPRATE_AVG_CURR
APPRATE_AVG_YR1
APPRATE_AVG_YR2
APPRATE_AVG_YR3
APPRATE_AVG_YR4
APPRATE_AVG_YR5
ALLOCRATE_AVG_CURR
ALLOCRATE_AVG_YR1
ALLOCRATE_AVG_YR2
ALLOCRATE_AVG_YR3
ALLOCRATE_AVG_YR4
ALLOCRATE_AVG_YR5
QTY_PER_VEHICLE
CONFIG_NAME
COMMODITY_CODE
SEAT_TYPE_CODE
SEAT_LOC_CODE
SEAT_POS_CODE
SEAT_POS_QTY
SEAT_POS_CY
SEAT_POS_CY_P1
SEAT_POS_CY_P2
SEAT_POS_CY_P3
SEAT_POS_CY_P4
SEAT_POS_CY_P5
SUSP_HOUSING_MATERIAL
LINKAGE_DESIGN
SUSP_BALL_JOINT_TYPE
SUSP_NUM_OF_BUSHINGS
SUSP_CS_PROCESS
PART_DESC_LONG
SALES_MANAGER
MARKET_ANALYST
BADGE
BUSINESS_GROUP_CODE
FBU_CODE
COMPETITOR_FLAG
COMPONENT_PART
QUOTE_NUM
ANTICIPATED_AWARD_DATE
ANTICIPATED_QUOTE_DATE
ORIGINAL_PRICE_LC
PART_ID
VEHICLE_BUILD_ID
SW_SKELETON
CPSBU_NAME
MNEMONIC_CODE
OPPORTUNITY_NUM
COUNTRY_BY_VM
ON TABLE HOLD AS RPT_OUT FORMAT ALPHA
END
-INCLUDE MAD_DB_ERR
-***************************************************************************
-* FOCEXEC NAME: MAD_DB_ERR *
-* CALLED FROM OTHER FOCEXEC: NO *
-* CALLED BY: ?? *
-* CALLS/INCLUDES: MAD_INC *
-* AUTHOR: SATYAM COMPUTERS *
-* DATE CREATED: 1/21/2005 *
-***************************************************************************
-* *
-* MODIFICATION LOG *
-* *
-* DATE CHANGED BY DESCRIPTION OF CHANGE *
-* ---------- ------------- -------------------------------------------*
-***************************************************************************
-*********************code added for database connection checking********************************
-SET &ERR_MSG = 'There are no existing records for the selection criteria. Please edit criteria or quit.';
-IF 0 NE 0 THEN GOTO ERROR ELSE GOTO CORR;
1
0 NUMBER OF RECORDS IN TABLE= 105069 LINES= 105069
0
-IF 0 NE 0 THEN GOTO ERROR ELSE GOTO CORR;
-CORR
-************************************************************************************************
-IF 105069 EQ 0 THEN GOTO NOREPORT;
TABLE FILE RPT_OUT
PRINT SUPPLIER_PLANT_NAME
SUPPLIER_PART_NUM
SUPPLIER_REGION
REGION_BUILT
OEM_GROUP_NAME
OEM_NAME
PLATFORM_FAMILY
PLATFORM_NAME
NAMEPLATE_NAME
COUNTRY_NAME
GLOBAL_SEGMENT
REGIONAL_SEGMENT
DESIGN_PARENT
SALES_PARENT
VEHICLE_CLASS_CODE
VEHICLE_TYPE_CODE
CURR_UNITS
NEXT_1_UNITS
NEXT_2_UNITS
NEXT_3_UNITS
NEXT_4_UNITS
NEXT_5_UNITS
VEHICLE_START_DATE
VEHICLE_END_DATE
SBU_CODE
PART_DESC_NAME
PRODUCT_CLASS_NAME
PRODUCT_CAT_NAME
SERIES
PROBABILITY_CODE_CS
SUPPLIER_NAME
SUPPLIER_COUNTRY_NAME
CUST_PART_NUM
TIER_1_PART_NUM
TIER_1_SUPPLIER_NAME
TIER_1_SHIP_TO
CURRENCY_CODE
COMPUTE XRATE_CURR/D20.6=XRATE;
PRICE_CY
PRICE_CY_P1
PRICE_CY_P2
PRICE_CY_P3
PRICE_CY_P4
PRICE_CY_P5
UNITS_CY
UNITS_CY_P1
UNITS_CY_P2
UNITS_CY_P3
UNITS_CY_P4
UNITS_CY_P5
UC_SALES_CY
UC_SALES_CY_P1
UC_SALES_CY_P2
UC_SALES_CY_P3
UC_SALES_CY_P4
UC_SALES_CY_P5
PART_START_DATE
PART_END_DATE
TECH_CODE
TECH_SFX_CODE
TECH_SFX_CODE_2
TECH_SFX_CODE_3
TECH_SFX_CODE_4
TECH_SFX_CODE_5
TECH_SFX_CODE_6
TECH_SFX_CODE_7
APPRATE_AVG_CURR
APPRATE_AVG_YR1
APPRATE_AVG_YR2
APPRATE_AVG_YR3
APPRATE_AVG_YR4
APPRATE_AVG_YR5
ALLOCRATE_AVG_CURR
ALLOCRATE_AVG_YR1
ALLOCRATE_AVG_YR2
ALLOCRATE_AVG_YR3
ALLOCRATE_AVG_YR4
ALLOCRATE_AVG_YR5
QTY_PER_VEHICLE
CONFIG_NAME
COMMODITY_CODE
SEAT_TYPE_CODE
SEAT_LOC_CODE
SEAT_POS_CODE
SEAT_POS_QTY
SEAT_POS_CY
SEAT_POS_CY_P1
SEAT_POS_CY_P2
SEAT_POS_CY_P3
SEAT_POS_CY_P4
SEAT_POS_CY_P5
SUSP_HOUSING_MATERIAL
LINKAGE_DESIGN
SUSP_BALL_JOINT_TYPE
SUSP_NUM_OF_BUSHINGS
SUSP_CS_PROCESS
PART_DESC_LONG
SALES_MANAGER
MARKET_ANALYST
BADGE
BUSINESS_GROUP_CODE
FBU_CODE
COMPETITOR_FLAG
COMPONENT_PART
QUOTE_NUM
ANTICIPATED_AWARD_DATE
ANTICIPATED_QUOTE_DATE
ORIGINAL_PRICE_LC
PART_ID
VEHICLE_BUILD_ID
SW_SKELETON
CPSBU_NAME
OPPORTUNITY_NUM
MNEMONIC_CODE
COUNTRY_BY_VM
ON TABLE HOLD AS RPT_TBL FORMAT ALPHA
END
-****************************BEGIN:EPHS - Full Assy*************************************
TABLE FILE RPT_TBL
PRINT
SUPPLIER_PLANT_NAME
SUPPLIER_PART_NUM
SUPPLIER_REGION
REGION_BUILT
OEM_GROUP_NAME
OEM_NAME
PLATFORM_FAMILY
PLATFORM_NAME
NAMEPLATE_NAME
COUNTRY_NAME
GLOBAL_SEGMENT
REGIONAL_SEGMENT
DESIGN_PARENT
SALES_PARENT
VEHICLE_CLASS_CODE
VEHICLE_TYPE_CODE
CURR_UNITS
NEXT_1_UNITS
NEXT_2_UNITS
NEXT_3_UNITS
NEXT_4_UNITS
NEXT_5_UNITS
VEHICLE_START_DATE
VEHICLE_END_DATE
SBU_CODE
PART_DESC_NAME
PRODUCT_CLASS_NAME
PRODUCT_CAT_NAME
SERIES
PROBABILITY_CODE_CS
SUPPLIER_NAME
SUPPLIER_COUNTRY_NAME
CUST_PART_NUM
TIER_1_PART_NUM
TIER_1_SUPPLIER_NAME
TIER_1_SHIP_TO
CURRENCY_CODE
XRATE_CURR
COMPUTE PRICE_CY_NEW/D20.4S = PRICE_CY * 0.52;
COMPUTE PRICE_CY_P1_NEW/D20.4S = PRICE_CY_P1 * 0.52;
COMPUTE PRICE_CY_P2_NEW/D20.4S = PRICE_CY_P2 * 0.52;
COMPUTE PRICE_CY_P3_NEW/D20.4S = PRICE_CY_P3 * 0.52;
COMPUTE PRICE_CY_P4_NEW/D20.4S = PRICE_CY_P4 * 0.52;
COMPUTE PRICE_CY_P5_NEW/D20.4S = PRICE_CY_P5 * 0.52;
UNITS_CY
UNITS_CY_P1
UNITS_CY_P2
UNITS_CY_P3
UNITS_CY_P4
UNITS_CY_P5
COMPUTE UC_SALES_CY_NEW/D20CS = UC_SALES_CY * 0.52;
COMPUTE UC_SALES_CY_P1_NEW/D20CS = UC_SALES_CY_P1 * 0.52;
COMPUTE UC_SALES_CY_P2_NEW/D20CS = UC_SALES_CY_P2 * 0.52;
COMPUTE UC_SALES_CY_P3_NEW/D20CS = UC_SALES_CY_P3 * 0.52;
COMPUTE UC_SALES_CY_P4_NEW/D20CS = UC_SALES_CY_P4 * 0.52;
COMPUTE UC_SALES_CY_P5_NEW/D20CS = UC_SALES_CY_P5 * 0.52;
PART_START_DATE
PART_END_DATE
TECH_CODE
TECH_SFX_CODE
TECH_SFX_CODE_2
TECH_SFX_CODE_3
TECH_SFX_CODE_4
TECH_SFX_CODE_5
TECH_SFX_CODE_6
TECH_SFX_CODE_7
APPRATE_AVG_CURR
APPRATE_AVG_YR1
APPRATE_AVG_YR2
APPRATE_AVG_YR3
APPRATE_AVG_YR4
APPRATE_AVG_YR5
ALLOCRATE_AVG_CURR
ALLOCRATE_AVG_YR1
ALLOCRATE_AVG_YR2
ALLOCRATE_AVG_YR3
ALLOCRATE_AVG_YR4
ALLOCRATE_AVG_YR5
QTY_PER_VEHICLE
CONFIG_NAME
COMMODITY_CODE
SEAT_TYPE_CODE
SEAT_LOC_CODE
SEAT_POS_CODE
SEAT_POS_QTY
SEAT_POS_CY
SEAT_POS_CY_P1
SEAT_POS_CY_P2
SEAT_POS_CY_P3
SEAT_POS_CY_P4
SEAT_POS_CY_P5
SUSP_HOUSING_MATERIAL
LINKAGE_DESIGN
SUSP_BALL_JOINT_TYPE
SUSP_NUM_OF_BUSHINGS
SUSP_CS_PROCESS
PART_DESC_LONG
SALES_MANAGER
MARKET_ANALYST
BADGE
BUSINESS_GROUP_CODE
FBU_CODE
COMPETITOR_FLAG
COMPONENT_PART
QUOTE_NUM
ANTICIPATED_AWARD_DATE
ANTICIPATED_QUOTE_DATE
ORIGINAL_PRICE_LC
PART_ID
VEHICLE_BUILD_ID
SW_SKELETON
CPSBU_NAME
OPPORTUNITY_NUM
COUNTRY_BY_VM
COMPUTE LVS_PART_SALES/A35 = 'EPHS-Power Pack';
COMPUTE LVS_PART_UNITS/A35 = 'EPHS-Power Pack';
COMPUTE LVS_PRODUCT/A35 = 'EPHS';
MNEMONIC_CODE
WHERE PART_DESC_NAME EQ 'EPHS-Full Assy'
ON TABLE HOLD AS TBL_FULL_ASSY_PP FORMAT ALPHA
END
TABLE FILE RPT_TBL
PRINT
SUPPLIER_PLANT_NAME
SUPPLIER_PART_NUM
SUPPLIER_REGION
REGION_BUILT
OEM_GROUP_NAME
OEM_NAME
PLATFORM_FAMILY
PLATFORM_NAME
NAMEPLATE_NAME
COUNTRY_NAME
GLOBAL_SEGMENT
REGIONAL_SEGMENT
DESIGN_PARENT
SALES_PARENT
VEHICLE_CLASS_CODE
VEHICLE_TYPE_CODE
CURR_UNITS
NEXT_1_UNITS
NEXT_2_UNITS
NEXT_3_UNITS
NEXT_4_UNITS
NEXT_5_UNITS
VEHICLE_START_DATE
VEHICLE_END_DATE
SBU_CODE
PART_DESC_NAME
PRODUCT_CLASS_NAME
PRODUCT_CAT_NAME
SERIES
PROBABILITY_CODE_CS
SUPPLIER_NAME
SUPPLIER_COUNTRY_NAME
CUST_PART_NUM
TIER_1_PART_NUM
TIER_1_SUPPLIER_NAME
TIER_1_SHIP_TO
CURRENCY_CODE
XRATE_CURR
COMPUTE PRICE_CY_NEW/D20.4S = PRICE_CY * 0.48;
COMPUTE PRICE_CY_P1_NEW/D20.4S = PRICE_CY_P1 * 0.48;
COMPUTE PRICE_CY_P2_NEW/D20.4S = PRICE_CY_P2 * 0.48;
COMPUTE PRICE_CY_P3_NEW/D20.4S = PRICE_CY_P3 * 0.48;
COMPUTE PRICE_CY_P4_NEW/D20.4S = PRICE_CY_P4 * 0.48;
COMPUTE PRICE_CY_P5_NEW/D20.4S = PRICE_CY_P5 * 0.48;
UNITS_CY
UNITS_CY_P1
UNITS_CY_P2
UNITS_CY_P3
UNITS_CY_P4
UNITS_CY_P5
COMPUTE UC_SALES_CY_NEW/D20CS = UC_SALES_CY * 0.48;
COMPUTE UC_SALES_CY_P1_NEW/D20CS = UC_SALES_CY_P1 * 0.48;
COMPUTE UC_SALES_CY_P2_NEW/D20CS = UC_SALES_CY_P2 * 0.48;
COMPUTE UC_SALES_CY_P3_NEW/D20CS = UC_SALES_CY_P3 * 0.48;
COMPUTE UC_SALES_CY_P4_NEW/D20CS = UC_SALES_CY_P4 * 0.48;
COMPUTE UC_SALES_CY_P5_NEW/D20CS = UC_SALES_CY_P5 * 0.48;
PART_START_DATE
PART_END_DATE
TECH_CODE
TECH_SFX_CODE
TECH_SFX_CODE_2
TECH_SFX_CODE_3
TECH_SFX_CODE_4
TECH_SFX_CODE_5
TECH_SFX_CODE_6
TECH_SFX_CODE_7
APPRATE_AVG_CURR
APPRATE_AVG_YR1
APPRATE_AVG_YR2
APPRATE_AVG_YR3
APPRATE_AVG_YR4
APPRATE_AVG_YR5
ALLOCRATE_AVG_CURR
ALLOCRATE_AVG_YR1
ALLOCRATE_AVG_YR2
ALLOCRATE_AVG_YR3
ALLOCRATE_AVG_YR4
ALLOCRATE_AVG_YR5
QTY_PER_VEHICLE
CONFIG_NAME
COMMODITY_CODE
SEAT_TYPE_CODE
SEAT_LOC_CODE
SEAT_POS_CODE
SEAT_POS_QTY
SEAT_POS_CY
SEAT_POS_CY_P1
SEAT_POS_CY_P2
SEAT_POS_CY_P3
SEAT_POS_CY_P4
SEAT_POS_CY_P5
SUSP_HOUSING_MATERIAL
LINKAGE_DESIGN
SUSP_BALL_JOINT_TYPE
SUSP_NUM_OF_BUSHINGS
SUSP_CS_PROCESS
PART_DESC_LONG
SALES_MANAGER
MARKET_ANALYST
BADGE
BUSINESS_GROUP_CODE
FBU_CODE
COMPETITOR_FLAG
COMPONENT_PART
QUOTE_NUM
ANTICIPATED_AWARD_DATE
ANTICIPATED_QUOTE_DATE
ORIGINAL_PRICE_LC
PART_ID
VEHICLE_BUILD_ID
SW_SKELETON
CPSBU_NAME
OPPORTUNITY_NUM
COMPUTE LVS_PART_SALES/A35 = 'EPHS-Hydraulic Gear';
COMPUTE LVS_PART_UNITS/A35 = 'EPHS-Hydraulic Gear DNI';
COMPUTE LVS_PRODUCT/A35 = 'HPS';
MNEMONIC_CODE
COUNTRY_BY_VM
WHERE PART_DESC_NAME EQ 'EPHS-Full Assy'
ON TABLE HOLD AS TBL_FULL_ASSY_SG FORMAT ALPHA
END
TABLE FILE TBL_FULL_ASSY_PP
PRINT *
BY VEHICLE_BUILD_ID NOPRINT
BY PART_ID NOPRINT
ON TABLE HOLD AS TBL_FULL_ASSY_COMP FORMAT ALPHA
MORE
FILE TBL_FULL_ASSY_SG
END
-****************************END:EPHS - Full Assy*************************************
-****************************BEGIN:EPS - Column Drive*************************************
TABLE FILE RPT_TBL
PRINT
SUPPLIER_PLANT_NAME
SUPPLIER_PART_NUM
SUPPLIER_REGION
REGION_BUILT
OEM_GROUP_NAME
OEM_NAME
PLATFORM_FAMILY
PLATFORM_NAME
NAMEPLATE_NAME
COUNTRY_NAME
GLOBAL_SEGMENT
REGIONAL_SEGMENT
DESIGN_PARENT
SALES_PARENT
VEHICLE_CLASS_CODE
VEHICLE_TYPE_CODE
CURR_UNITS
NEXT_1_UNITS
NEXT_2_UNITS
NEXT_3_UNITS
NEXT_4_UNITS
NEXT_5_UNITS
VEHICLE_START_DATE
VEHICLE_END_DATE
SBU_CODE
PART_DESC_NAME
PRODUCT_CLASS_NAME
PRODUCT_CAT_NAME
SERIES
PROBABILITY_CODE_CS
SUPPLIER_NAME
SUPPLIER_COUNTRY_NAME
CUST_PART_NUM
TIER_1_PART_NUM
TIER_1_SUPPLIER_NAME
TIER_1_SHIP_TO
CURRENCY_CODE
XRATE_CURR
COMPUTE PRICE_CY_NEW/D20.4S = PRICE_CY * 0.84;
COMPUTE PRICE_CY_P1_NEW/D20.4S = PRICE_CY_P1 * 0.84;
COMPUTE PRICE_CY_P2_NEW/D20.4S = PRICE_CY_P2 * 0.84;
COMPUTE PRICE_CY_P3_NEW/D20.4S = PRICE_CY_P3 * 0.84;
COMPUTE PRICE_CY_P4_NEW/D20.4S = PRICE_CY_P4 * 0.84;
COMPUTE PRICE_CY_P5_NEW/D20.4S = PRICE_CY_P5 * 0.84;
UNITS_CY
UNITS_CY_P1
UNITS_CY_P2
UNITS_CY_P3
UNITS_CY_P4
UNITS_CY_P5
COMPUTE UC_SALES_CY_NEW/D20CS = UC_SALES_CY * 0.84;
COMPUTE UC_SALES_CY_P1_NEW/D20CS = UC_SALES_CY_P1 * 0.84;
COMPUTE UC_SALES_CY_P2_NEW/D20CS = UC_SALES_CY_P2 * 0.84;
COMPUTE UC_SALES_CY_P3_NEW/D20CS = UC_SALES_CY_P3 * 0.84;
COMPUTE UC_SALES_CY_P4_NEW/D20CS = UC_SALES_CY_P4 * 0.84;
COMPUTE UC_SALES_CY_P5_NEW/D20CS = UC_SALES_CY_P5 * 0.84;
PART_START_DATE
PART_END_DATE
TECH_CODE
TECH_SFX_CODE
TECH_SFX_CODE_2
TECH_SFX_CODE_3
TECH_SFX_CODE_4
TECH_SFX_CODE_5
TECH_SFX_CODE_6
TECH_SFX_CODE_7
APPRATE_AVG_CURR
APPRATE_AVG_YR1
APPRATE_AVG_YR2
APPRATE_AVG_YR3
APPRATE_AVG_YR4
APPRATE_AVG_YR5
ALLOCRATE_AVG_CURR
ALLOCRATE_AVG_YR1
ALLOCRATE_AVG_YR2
ALLOCRATE_AVG_YR3
ALLOCRATE_AVG_YR4
ALLOCRATE_AVG_YR5
QTY_PER_VEHICLE
CONFIG_NAME
COMMODITY_CODE
SEAT_TYPE_CODE
SEAT_LOC_CODE
SEAT_POS_CODE
SEAT_POS_QTY
SEAT_POS_CY
SEAT_POS_CY_P1
SEAT_POS_CY_P2
SEAT_POS_CY_P3
SEAT_POS_CY_P4
SEAT_POS_CY_P5
SUSP_HOUSING_MATERIAL
LINKAGE_DESIGN
SUSP_BALL_JOINT_TYPE
SUSP_NUM_OF_BUSHINGS
SUSP_CS_PROCESS
PART_DESC_LONG
SALES_MANAGER
MARKET_ANALYST
BADGE
BUSINESS_GROUP_CODE
FBU_CODE
COMPETITOR_FLAG
COMPONENT_PART
QUOTE_NUM
ANTICIPATED_AWARD_DATE
ANTICIPATED_QUOTE_DATE
ORIGINAL_PRICE_LC
PART_ID
VEHICLE_BUILD_ID
SW_SKELETON
CPSBU_NAME
OPPORTUNITY_NUM
COMPUTE LVS_PART_SALES/A35 = 'EPS-Column Power Head';
COMPUTE LVS_PART_UNITS/A35 = 'EPS-Column Power Head';
COMPUTE LVS_PRODUCT/A35 = 'EPS';
MNEMONIC_CODE
COUNTRY_BY_VM
WHERE PART_DESC_NAME EQ 'EPS-CD Full Assy'
ON TABLE HOLD AS TBL_EPSCD_PP FORMAT ALPHA
END
TABLE FILE RPT_TBL
PRINT
SUPPLIER_PLANT_NAME
SUPPLIER_PART_NUM
SUPPLIER_REGION
REGION_BUILT
OEM_GROUP_NAME
OEM_NAME
PLATFORM_FAMILY
PLATFORM_NAME
NAMEPLATE_NAME
COUNTRY_NAME
GLOBAL_SEGMENT
REGIONAL_SEGMENT
DESIGN_PARENT
SALES_PARENT
VEHICLE_CLASS_CODE
VEHICLE_TYPE_CODE
CURR_UNITS
NEXT_1_UNITS
NEXT_2_UNITS
NEXT_3_UNITS
NEXT_4_UNITS
NEXT_5_UNITS
VEHICLE_START_DATE
VEHICLE_END_DATE
SBU_CODE
PART_DESC_NAME
PRODUCT_CLASS_NAME
PRODUCT_CAT_NAME
SERIES
PROBABILITY_CODE_CS
SUPPLIER_NAME
SUPPLIER_COUNTRY_NAME
CUST_PART_NUM
TIER_1_PART_NUM
TIER_1_SUPPLIER_NAME
TIER_1_SHIP_TO
CURRENCY_CODE
XRATE_CURR
COMPUTE PRICE_CY_NEW/D20.4S = PRICE_CY * 0.16;
COMPUTE PRICE_CY_P1_NEW/D20.4S = PRICE_CY_P1 * 0.16;
COMPUTE PRICE_CY_P2_NEW/D20.4S = PRICE_CY_P2 * 0.16;
COMPUTE PRICE_CY_P3_NEW/D20.4S = PRICE_CY_P3 * 0.16;
COMPUTE PRICE_CY_P4_NEW/D20.4S = PRICE_CY_P4 * 0.16;
COMPUTE PRICE_CY_P5_NEW/D20.4S = PRICE_CY_P5 * 0.16;
UNITS_CY
UNITS_CY_P1
UNITS_CY_P2
UNITS_CY_P3
UNITS_CY_P4
UNITS_CY_P5
COMPUTE UC_SALES_CY_NEW/D20CS = UC_SALES_CY * 0.16;
COMPUTE UC_SALES_CY_P1_NEW/D20CS = UC_SALES_CY_P1 * 0.16;
COMPUTE UC_SALES_CY_P2_NEW/D20CS = UC_SALES_CY_P2 * 0.16;
COMPUTE UC_SALES_CY_P3_NEW/D20CS = UC_SALES_CY_P3 * 0.16;
COMPUTE UC_SALES_CY_P4_NEW/D20CS = UC_SALES_CY_P4 * 0.16;
COMPUTE UC_SALES_CY_P5_NEW/D20CS = UC_SALES_CY_P5 * 0.16;
PART_START_DATE
PART_END_DATE
TECH_CODE
TECH_SFX_CODE
TECH_SFX_CODE_2
TECH_SFX_CODE_3
TECH_SFX_CODE_4
TECH_SFX_CODE_5
TECH_SFX_CODE_6
TECH_SFX_CODE_7
APPRATE_AVG_CURR
APPRATE_AVG_YR1
APPRATE_AVG_YR2
APPRATE_AVG_YR3
APPRATE_AVG_YR4
APPRATE_AVG_YR5
ALLOCRATE_AVG_CURR
ALLOCRATE_AVG_YR1
ALLOCRATE_AVG_YR2
ALLOCRATE_AVG_YR3
ALLOCRATE_AVG_YR4
ALLOCRATE_AVG_YR5
QTY_PER_VEHICLE
CONFIG_NAME
COMMODITY_CODE
SEAT_TYPE_CODE
SEAT_LOC_CODE
SEAT_POS_CODE
SEAT_POS_QTY
SEAT_POS_CY
SEAT_POS_CY_P1
SEAT_POS_CY_P2
SEAT_POS_CY_P3
SEAT_POS_CY_P4
SEAT_POS_CY_P5
SUSP_HOUSING_MATERIAL
LINKAGE_DESIGN
SUSP_BALL_JOINT_TYPE
SUSP_NUM_OF_BUSHINGS
SUSP_CS_PROCESS
PART_DESC_LONG
SALES_MANAGER
MARKET_ANALYST
BADGE
BUSINESS_GROUP_CODE
FBU_CODE
COMPETITOR_FLAG
COMPONENT_PART
QUOTE_NUM
ANTICIPATED_AWARD_DATE
ANTICIPATED_QUOTE_DATE
ORIGINAL_PRICE_LC
PART_ID
VEHICLE_BUILD_ID
SW_SKELETON
CPSBU_NAME
OPPORTUNITY_NUM
COMPUTE LVS_PART_SALES/A35 = 'EPS-Mechanical Gear';
COMPUTE LVS_PART_UNITS/A35 = 'EPS-Mechanical Gear DNI';
COMPUTE LVS_PRODUCT/A35 = 'Mechanical Gears';
MNEMONIC_CODE
COUNTRY_BY_VM
WHERE PART_DESC_NAME EQ 'EPS-CD Full Assy'
ON TABLE HOLD AS TBL_EPSCD_MG FORMAT ALPHA
END
TABLE FILE TBL_EPSCD_PP
PRINT *
BY VEHICLE_BUILD_ID NOPRINT
BY PART_ID NOPRINT
ON TABLE HOLD AS TBL_EPSCD_COMP FORMAT ALPHA
MORE
FILE TBL_EPSCD_MG
END
-****************************END:EPS - Column Drive*************************************
-****************************BEGIN:NON FULL-ASSY AND EPS - Column Drive*************************************
TABLE FILE RPT_TBL
PRINT
SUPPLIER_PLANT_NAME
SUPPLIER_PART_NUM
SUPPLIER_REGION
REGION_BUILT
OEM_GROUP_NAME
OEM_NAME
PLATFORM_FAMILY
PLATFORM_NAME
NAMEPLATE_NAME
COUNTRY_NAME
GLOBAL_SEGMENT
REGIONAL_SEGMENT
DESIGN_PARENT
SALES_PARENT
VEHICLE_CLASS_CODE
VEHICLE_TYPE_CODE
CURR_UNITS
NEXT_1_UNITS
NEXT_2_UNITS
NEXT_3_UNITS
NEXT_4_UNITS
NEXT_5_UNITS
VEHICLE_START_DATE
VEHICLE_END_DATE
SBU_CODE
PART_DESC_NAME
PRODUCT_CLASS_NAME
PRODUCT_CAT_NAME
SERIES
PROBABILITY_CODE_CS
SUPPLIER_NAME
SUPPLIER_COUNTRY_NAME
CUST_PART_NUM
TIER_1_PART_NUM
TIER_1_SUPPLIER_NAME
TIER_1_SHIP_TO
CURRENCY_CODE
XRATE_CURR
COMPUTE PRICE_CY_NEW/D20.4S = PRICE_CY ;
COMPUTE PRICE_CY_P1_NEW/D20.4S = PRICE_CY_P1 ;
COMPUTE PRICE_CY_P2_NEW/D20.4S = PRICE_CY_P2 ;
COMPUTE PRICE_CY_P3_NEW/D20.4S = PRICE_CY_P3 ;
COMPUTE PRICE_CY_P4_NEW/D20.4S = PRICE_CY_P4 ;
COMPUTE PRICE_CY_P5_NEW/D20.4S = PRICE_CY_P5 ;
UNITS_CY
UNITS_CY_P1
UNITS_CY_P2
UNITS_CY_P3
UNITS_CY_P4
UNITS_CY_P5
COMPUTE UC_SALES_CY_NEW/D20CS = UC_SALES_CY ;
COMPUTE UC_SALES_CY_P1_NEW/D20CS = UC_SALES_CY_P1;
COMPUTE UC_SALES_CY_P2_NEW/D20CS = UC_SALES_CY_P2 ;
COMPUTE UC_SALES_CY_P3_NEW/D20CS = UC_SALES_CY_P3 ;
COMPUTE UC_SALES_CY_P4_NEW/D20CS = UC_SALES_CY_P4 ;
COMPUTE UC_SALES_CY_P5_NEW/D20CS = UC_SALES_CY_P5 ;
PART_START_DATE
PART_END_DATE
TECH_CODE
TECH_SFX_CODE
TECH_SFX_CODE_2
TECH_SFX_CODE_3
TECH_SFX_CODE_4
TECH_SFX_CODE_5
TECH_SFX_CODE_6
TECH_SFX_CODE_7
APPRATE_AVG_CURR
APPRATE_AVG_YR1
APPRATE_AVG_YR2
APPRATE_AVG_YR3
APPRATE_AVG_YR4
APPRATE_AVG_YR5
ALLOCRATE_AVG_CURR
ALLOCRATE_AVG_YR1
ALLOCRATE_AVG_YR2
ALLOCRATE_AVG_YR3
ALLOCRATE_AVG_YR4
ALLOCRATE_AVG_YR5
QTY_PER_VEHICLE
CONFIG_NAME
COMMODITY_CODE
SEAT_TYPE_CODE
SEAT_LOC_CODE
SEAT_POS_CODE
SEAT_POS_QTY
SEAT_POS_CY
SEAT_POS_CY_P1
SEAT_POS_CY_P2
SEAT_POS_CY_P3
SEAT_POS_CY_P4
SEAT_POS_CY_P5
SUSP_HOUSING_MATERIAL
LINKAGE_DESIGN
SUSP_BALL_JOINT_TYPE
SUSP_NUM_OF_BUSHINGS
SUSP_CS_PROCESS
PART_DESC_LONG
SALES_MANAGER
MARKET_ANALYST
BADGE
BUSINESS_GROUP_CODE
FBU_CODE
COMPETITOR_FLAG
COMPONENT_PART
QUOTE_NUM
ANTICIPATED_AWARD_DATE
ANTICIPATED_QUOTE_DATE
ORIGINAL_PRICE_LC
PART_ID
VEHICLE_BUILD_ID
SW_SKELETON
CPSBU_NAME
OPPORTUNITY_NUM
COUNTRY_BY_VM
COMPUTE LVS_PART_SALES/A35 =
IF VEHICLE_CLASS_CODE = 'NC' AND SBU_CODE = 'LVS' THEN PART_DESC_NAME ELSE
IF (SBU_CODE = 'LVS' AND PRODUCT_CAT_NAME = 'Chassis Modules')
OR (SBU_CODE = 'LVS' AND PART_DESC_NAME = 'EPHS-Component Part')
OR (SBU_CODE = 'LVS' AND PART_DESC_NAME = 'EPS-Column Component Part')
OR (SBU_CODE = 'LVS' AND PART_DESC_NAME = 'Worm Gear') THEN PART_DESC_NAME ELSE
IF PRODUCT_CAT_NAME = 'EPHS' AND PART_DESC_NAME = 'EPHS-Power Pack' THEN 'EPHS-Power Pack' ELSE
IF PRODUCT_CAT_NAME = 'EPHS' AND PART_DESC_NAME = 'EPHS-Steering Gear' THEN 'EPHS-Steering Gear' ELSE
IF PRODUCT_CAT_NAME = 'EPHS' AND PART_DESC_NAME = 'EPHS-Component Part' THEN 'DNI' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Belt Rack Drive' THEN 'EPS-BD' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Column HD MR' | '&' | 'P' THEN 'EPS-Column HD MR'|'&'|'P' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Column Power Pack' THEN 'EPS-Column Power Pack' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Concentric Rack Drive' THEN 'EPS-CRD' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Pinion Drive' AND TECH_SFX_CODE_3 = 'Single Pinion' THEN 'EPS-PD(Single)' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Pinion Drive' AND TECH_SFX_CODE_3 = 'Dual Pinion' THEN 'EPS-PD(Dual)' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Column Component Part' THEN 'DNI' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PRODUCT_CLASS_NAME = 'EAS' AND PART_DESC_NAME = 'EPS-Column Power Head' THEN 'EPS-Column Power Head' ELSE
-*Changed for CSA 1317946
IF PRODUCT_CAT_NAME = 'EPS' AND PRODUCT_CLASS_NAME = 'EAS' AND PART_DESC_NAME = 'EPS-SP' THEN 'EPS-SP' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PRODUCT_CLASS_NAME = 'EAS' AND PART_DESC_NAME = 'EPS-DP' THEN 'EPS-DP' ELSE
-*Changed for CSA 1317946
IF PRODUCT_CAT_NAME = 'MR'|'&'|'P' AND PART_DESC_NAME = 'MR'|'&'|'P Gears' THEN 'MR'|'&'|'P Gears' ELSE
IF PRODUCT_CAT_NAME = 'PR'|'&'|'P' AND PART_DESC_NAME = 'PR'|'&'|'P Gears' THEN 'PR'|'&'|'P Gears' ELSE
IF PRODUCT_CAT_NAME = 'PR'|'&'|'P' AND PRODUCT_CLASS_NAME = 'NS' AND PART_DESC_NAME = 'NS-PR'|'&'|'P' THEN 'NS-Hydraulic Gear' ELSE
IF PRODUCT_CAT_NAME = 'PR'|'&'|'P' AND PRODUCT_CLASS_NAME = 'VA/VE' AND PART_DESC_NAME = 'VA/VE-PR'|'&'|'P' THEN 'VA/VE-Hydraulic Gear' ELSE
IF PRODUCT_CAT_NAME = 'RCB' AND PART_DESC_NAME = 'RCB Gears' THEN 'RCB Gears' ELSE
-*Changed for CSA 1317946
IF PRODUCT_CAT_NAME = 'RCB' AND PART_DESC_NAME = 'Worm Gears' THEN 'RCB Gears' ELSE
-*Changed for CSA 1317946
IF PRODUCT_CAT_NAME = 'HPS' AND PRODUCT_CLASS_NAME = 'Rack '|'&'|' Pinion' AND PART_DESC_NAME = 'Hydraulic Gear' THEN 'Hydraulic Gear' ELSE
IF PRODUCT_CAT_NAME = 'HPS' AND PRODUCT_CLASS_NAME = 'Rack '|'&'|' Pinion' AND PART_DESC_NAME = 'EPHS-Hydraulic Gear' THEN 'EPHS-Hydraulic Gear' ELSE
-*IF PRODUCT_CAT_NAME = 'Mechanical Gears' AND PRODUCT_CLASS_NAME = 'Rack '|'&'|' Pinion' AND PART_DESC_NAME = 'Mechanical Gear' THEN 'Mechanical Gear' ELSE
-*IF PRODUCT_CAT_NAME = 'Mechanical Gears' AND PRODUCT_CLASS_NAME = 'Rack '|'&'|' Pinion' AND PART_DESC_NAME = 'EPS-Mechanical Gear' THEN 'EPS-Mechanical Gear' ELSE
IF PRODUCT_CAT_NAME = 'MMSG' AND PRODUCT_CLASS_NAME = 'Rack '|'&'|' Pinion' AND PART_DESC_NAME = 'Manual Gear' THEN 'Manual Gear' ELSE
IF PRODUCT_CAT_NAME = 'MMSG' AND PRODUCT_CLASS_NAME = 'Rack '|'&'|' Pinion' AND PART_DESC_NAME = 'EPS-Mechanical Gear' THEN 'EPS-Mechanical Gear' ELSE
-*IF PRODUCT_CAT_NAME = 'Other Steering' AND PART_DESC_NAME = 'Worm Gear' THEN 'Worm Gear' ELSE
-*IF PRODUCT_CAT_NAME EQ 'Other Steering' AND PART_DESC_NAME NE 'Worm Gear' THEN 'DNI' ELSE '';
IF PRODUCT_CAT_NAME = 'Other Steering' THEN PART_DESC_NAME ELSE '';
COMPUTE LVS_PART_UNITS/A35 =
IF VEHICLE_CLASS_CODE = 'NC' AND SBU_CODE = 'LVS' THEN PART_DESC_NAME ELSE
IF (SBU_CODE = 'LVS' AND PRODUCT_CAT_NAME = 'Chassis Modules')
OR (SBU_CODE = 'LVS' AND PART_DESC_NAME = 'EPHS-Component Part')
OR (SBU_CODE = 'LVS' AND PART_DESC_NAME = 'EPS-Column Component Part')
OR (SBU_CODE = 'LVS' AND PART_DESC_NAME = 'Worm Gear')
OR (SBU_CODE = 'LVS' AND PART_DESC_NAME = 'EPS-SP')
OR (SBU_CODE = 'LVS' AND PART_DESC_NAME = 'EPS-DP') THEN PART_DESC_NAME ELSE
IF PRODUCT_CAT_NAME = 'EPHS' AND PART_DESC_NAME = 'EPHS-Power Pack' THEN 'EPHS-Power Pack' ELSE
IF PRODUCT_CAT_NAME = 'EPHS' AND PART_DESC_NAME = 'EPHS-Steering Gear' THEN 'DNI' ELSE
IF PRODUCT_CAT_NAME = 'EPHS' AND PART_DESC_NAME = 'EPHS-Component Part' THEN 'DNI' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Belt Rack Drive' THEN 'EPS-BD' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Column HD MR' | '&' | 'P' THEN 'DNI' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Column Power Pack' THEN 'EPS-Column Power Pack' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Concentric Rack Drive' THEN 'EPS-CRD' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Pinion Drive' AND TECH_SFX_CODE_3 = 'Single Pinion' THEN 'EPS-PD(Single)' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Pinion Drive' AND TECH_SFX_CODE_3 = 'Dual Pinion' THEN 'EPS-PD(Dual)' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Column Component Part' THEN 'DNI' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PRODUCT_CLASS_NAME = 'EAS' AND PART_DESC_NAME = 'EPS-Column Power Head' THEN 'EPS-Column Power Head' ELSE
IF PRODUCT_CAT_NAME = 'MR'|'&'|'P' AND PART_DESC_NAME = 'MR'|'&'|'P Gears' THEN 'MR'|'&'|'P Gears' ELSE
IF PRODUCT_CAT_NAME = 'PR'|'&'|'P' AND PART_DESC_NAME = 'PR'|'&'|'P Gears' THEN 'PR'|'&'|'P Gears' ELSE
IF PRODUCT_CAT_NAME = 'PR'|'&'|'P' AND PRODUCT_CLASS_NAME = 'NS' AND PART_DESC_NAME = 'NS-PR'|'&'|'P' THEN 'NS-Hydraulic Gear DNI' ELSE
IF PRODUCT_CAT_NAME = 'PR'|'&'|'P' AND PRODUCT_CLASS_NAME = 'VA/VE' AND PART_DESC_NAME = 'VA/VE-PR'|'&'|'P' THEN 'VA/VE-Hydraulic Gear DNI' ELSE
IF PRODUCT_CAT_NAME = 'RCB' AND PART_DESC_NAME = 'RCB Gears' THEN 'RCB Gears' ELSE
IF PRODUCT_CAT_NAME = 'HPS' AND PRODUCT_CLASS_NAME = 'Rack '|'&'|' Pinion' AND PART_DESC_NAME = 'Hydraulic Gear' THEN 'Hydraulic Gear' ELSE
IF PRODUCT_CAT_NAME = 'HPS' AND PRODUCT_CLASS_NAME = 'Rack '|'&'|' Pinion' AND PART_DESC_NAME = 'EPHS-Hydraulic Gear' THEN 'EPHS-Hydraulic Gear DNI' ELSE
IF PRODUCT_CAT_NAME = 'Mechanical Gears' AND PRODUCT_CLASS_NAME = 'Rack '|'&'|' Pinion' AND PART_DESC_NAME = 'Mechanical Gear' THEN 'Mechanical Gear' ELSE
IF PRODUCT_CAT_NAME = 'Mechanical Gears' AND PRODUCT_CLASS_NAME = 'Rack '|'&'|' Pinion' AND PART_DESC_NAME = 'EPS-Mechanical Gear' THEN 'EPS-Mechanical Gear DNI' ELSE
-*IF PRODUCT_CAT_NAME = 'Other Steering' AND PART_DESC_NAME = 'Worm Gear' THEN 'Worm Gear' ELSE
-*IF PRODUCT_CAT_NAME EQ 'Other Steering' AND PART_DESC_NAME NE 'Worm Gear' THEN 'DNI' ELSE '' ;
IF PRODUCT_CAT_NAME = 'Other Steering' THEN PART_DESC_NAME ELSE
-*Changed out for CSA 1317946
IF SBU_CODE = 'LVS' AND PART_DESC_NAME = 'Worm Gears' THEN 'RCB Gear' ELSE '';
COMPUTE LVS_PRODUCT/A35 =
IF VEHICLE_CLASS_CODE = 'NC' AND SBU_CODE = 'LVS' THEN PRODUCT_CAT_NAME ELSE
IF (SBU_CODE = 'LVS' AND PRODUCT_CAT_NAME = 'Chassis Modules')
OR (SBU_CODE = 'LVS' AND PART_DESC_NAME = 'EPHS-Component Part')
OR (SBU_CODE = 'LVS' AND PART_DESC_NAME = 'EPS-Column Component Part')
OR (SBU_CODE = 'LVS' AND PART_DESC_NAME = 'Worm Gear')
-*Changed for CSA 1317946
OR (SBU_CODE = 'LVS' AND PART_DESC_NAME = 'EPS-SP')
OR (SBU_CODE = 'LVS' AND PART_DESC_NAME = 'EPS-DP')
OR (SBU_CODE = 'LVS' AND PART_DESC_NAME = '') THEN PRODUCT_CAT_NAME ELSE
IF PRODUCT_CAT_NAME = 'EPHS' AND PART_DESC_NAME = 'EPHS-Power Pack' THEN 'EPHS' ELSE
IF PRODUCT_CAT_NAME = 'EPHS' AND PART_DESC_NAME = 'EPHS-Steering Gear' THEN 'HPS' ELSE
IF PRODUCT_CAT_NAME = 'EPHS' AND PART_DESC_NAME = 'EPHS-Component Part' THEN 'Other Steering' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Belt Rack Drive' THEN 'EPS' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Column HD MR' | '&' | 'P' THEN 'Mech Gears' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Column Power Pack' THEN 'EPS' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Concentric Rack Drive' THEN 'EPS' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Pinion Drive' THEN 'EPS' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PART_DESC_NAME = 'EPS-Column Component Part' THEN 'Other Steering' ELSE
IF PRODUCT_CAT_NAME = 'EPS' AND PRODUCT_CLASS_NAME = 'EAS' AND PART_DESC_NAME = 'EPS-Column Power Head' THEN 'EPS' ELSE
IF PRODUCT_CAT_NAME = 'RCB' THEN 'RCB' ELSE
IF PRODUCT_CAT_NAME = 'HPS' AND PRODUCT_CLASS_NAME = 'Rack '|'&'|' Pinion' AND PART_DESC_NAME = 'Hydraulic Gear' THEN 'HPS' ELSE
IF PRODUCT_CAT_NAME = 'HPS' AND PRODUCT_CLASS_NAME = 'Rack '|'&'|' Pinion' AND PART_DESC_NAME = 'EPHS-Hydraulic Gear' THEN 'HPS' ELSE
IF PRODUCT_CAT_NAME = 'Mechanical Gears' AND PRODUCT_CLASS_NAME = 'Rack '|'&'|' Pinion' AND PART_DESC_NAME = 'Mechanical Gear' THEN 'Mechanical Gears' ELSE
IF PRODUCT_CAT_NAME = 'Mechanical Gears' AND PRODUCT_CLASS_NAME = 'Rack '|'&'|' Pinion' AND PART_DESC_NAME = 'EPS-Mechanical Gear' THEN 'Mechanical Gears' ELSE
IF PRODUCT_CAT_NAME = 'MR'|'&'|'P' AND PART_DESC_NAME = 'MR'|'&'|'P Gears' THEN 'Mech Gears' ELSE
IF PRODUCT_CAT_NAME = 'PR'|'&'|'P' AND PART_DESC_NAME = 'PR'|'&'|'P Gears' THEN 'HPS' ELSE
IF PRODUCT_CAT_NAME = 'PR'|'&'|'P' AND PRODUCT_CLASS_NAME = 'NS' AND PART_DESC_NAME = 'NS-PR'|'&'|'P' THEN 'HPS' ELSE
IF PRODUCT_CAT_NAME = 'PR'|'&'|'P' AND PRODUCT_CLASS_NAME = 'VA/VE' AND PART_DESC_NAME = 'VA/VE-PR'|'&'|'P' THEN 'HPS' ELSE
IF PRODUCT_CAT_NAME = 'Other Steering' AND PART_DESC_NAME = 'Worm Gear' THEN 'Worm Gear' ELSE
IF PRODUCT_CAT_NAME EQ 'Other Steering' AND PART_DESC_NAME NE 'Worm Gear' THEN 'Other Steering' ELSE '';
MNEMONIC_CODE
WHERE (PART_DESC_NAME NE 'EPS-CD Full Assy' AND PART_DESC_NAME NE 'EPHS-Full Assy')
ON TABLE HOLD AS TBL_ANNUAL FORMAT ALPHA
END
-*TABLE FILE TBL_ANNUAL
-*PRINT *
-*END
-****************************BEGIN:NON FULL-ASSY AND EPS - Column Drive*************************************
-*** Combine the FULL-ASSY + EPS -COLUMN DRiVE + Other Products into 1 table
TABLE FILE TBL_FULL_ASSY_COMP
PRINT *
BY VEHICLE_BUILD_ID NOPRINT
BY PART_ID NOPRINT
ON TABLE HOLD AS RPT_COMP FORMAT ALPHA
MORE
FILE TBL_EPSCD_COMP
MORE
FILE TBL_ANNUAL
END
-*TABLE FILE RPT_COMP
-*PRINT *
-*END
-****************************TRW CHA & OSS minus CHA CPs*************************************
TABLE FILE RPT_COMP
PRINT *
WHERE ((BUSINESS_GROUP_CODE EQ 'OSS' ) OR (BUSINESS_GROUP_CODE EQ 'AEG') OR ( BUSINESS_GROUP_CODE EQ 'CHA' AND COMPONENT_PART NE 'Y' ))
-IF N EQ '' GOTO NO4E;
AND COMPETITOR_FLAG EQ 'N'
-NO4E
-IF EQ '' GOTO NO5B;
-NO5B
ON TABLE HOLD AS RPT_OUT_1 FORMAT ALPHA
END
-IF 105069 EQ 0 THEN GOTO N_TAB;
(FOC1346) : FORMAT ERROR: Record 5276 , Column 7116
(FOC1346) : FORMAT ERROR: Record 5277 , Column 0
(FOC1346) : FORMAT ERROR: Record 5277 , Column 66
(FOC1346) : FORMAT ERROR: Record 5277 , Column 132
(FOC1346) : FORMAT ERROR: Record 5277 , Column 183
(FOC1346) : FORMAT ERROR: Record 5277 , Column 234
Thanks,
Raghu
WebFOCUS 7.6.7
Windows
Excel, PDF, HTML