83: X_Alt_Desig_Code VARCHAR2) RETURN BOOLEAN IS
84: CURSOR c_check_bom_rtg_cost
85: IS
86: SELECT 1
87: FROM BOM_BILL_OF_MATERIALS
88: WHERE BOM_BILL_OF_MATERIALS.Alternate_Bom_Designator =
89: X_Alt_Desig_Code
90: UNION
91: SELECT 1
84: CURSOR c_check_bom_rtg_cost
85: IS
86: SELECT 1
87: FROM BOM_BILL_OF_MATERIALS
88: WHERE BOM_BILL_OF_MATERIALS.Alternate_Bom_Designator =
89: X_Alt_Desig_Code
90: UNION
91: SELECT 1
92: FROM BOM_OPERATIONAL_ROUTINGS
144: DUMMY NUMBER;
145: MESSAGE_NAME VARCHAR2(80);
146: BEGIN
147: SELECT 1 INTO DUMMY FROM DUAL WHERE NOT EXISTS
148: (SELECT 1 FROM BOM_BILL_OF_MATERIALS
149: WHERE BOM_BILL_OF_MATERIALS.Organization_ID = X_Organization_Id
150: AND BOM_BILL_OF_MATERIALS.Alternate_Bom_Designator =
151: X_Alternate_Designator_Code
152: );
145: MESSAGE_NAME VARCHAR2(80);
146: BEGIN
147: SELECT 1 INTO DUMMY FROM DUAL WHERE NOT EXISTS
148: (SELECT 1 FROM BOM_BILL_OF_MATERIALS
149: WHERE BOM_BILL_OF_MATERIALS.Organization_ID = X_Organization_Id
150: AND BOM_BILL_OF_MATERIALS.Alternate_Bom_Designator =
151: X_Alternate_Designator_Code
152: );
153:
146: BEGIN
147: SELECT 1 INTO DUMMY FROM DUAL WHERE NOT EXISTS
148: (SELECT 1 FROM BOM_BILL_OF_MATERIALS
149: WHERE BOM_BILL_OF_MATERIALS.Organization_ID = X_Organization_Id
150: AND BOM_BILL_OF_MATERIALS.Alternate_Bom_Designator =
151: X_Alternate_Designator_Code
152: );
153:
154: SELECT 1 INTO DUMMY FROM DUAL WHERE NOT EXISTS