1104:
1105: CURSOR rtg_reschedule_valid
1106: IS
1107: SELECT 'Invalid Op Seq Exists'
1108: FROM SYS.DUAL
1109: WHERE EXISTS ( SELECT 'X'
1110: FROM BOM_OPERATION_SEQUENCES
1111: WHERE change_notice = p_revised_item_rec.eco_name
1112: AND routing_sequence_id = p_rev_item_unexp_rec.routing_sequence_id
1308: , p_routing_sequence_id NUMBER)
1309:
1310: IS
1311: SELECT 'CTP not unique'
1312: FROM SYS.DUAL
1313: WHERE EXISTS (SELECT NULL
1314: FROM BOM_OPERATIONAL_ROUTINGS
1315: WHERE ctp_flag = 1 -- Yes
1316: AND NVL(cfm_routing_flag, 2) = NVL(p_cfm_routing_flag, 2)
1352: , p_priority NUMBER )
1353:
1354: IS
1355: SELECT 'Priority not unique'
1356: FROM SYS.DUAL
1357: WHERE EXISTS (SELECT NULL
1358: FROM BOM_OPERATIONAL_ROUTINGS
1359: WHERE priority = p_priority
1360: AND NVL(cfm_routing_flag, 2) = NVL(p_cfm_routing_flag, 2)
1392: CURSOR l_subinv_csr ( p_organization_id NUMBER
1393: , p_subinventory VARCHAR2)
1394: IS
1395: SELECT 'SubInv exists'
1396: FROM SYS.DUAL
1397: WHERE NOT EXISTS ( SELECT null
1398: FROM mtl_secondary_inventories
1399: WHERE organization_id = p_organization_id
1400: AND secondary_inventory_name = p_subinventory
1466: RETURN BOOLEAN
1467: IS
1468: Cursor CheckDuplicate is
1469: SELECT 'checking for duplicates' dummy
1470: FROM sys.dual
1471: WHERE EXISTS (
1472: SELECT null
1473: FROM mtl_item_locations
1474: WHERE organization_id = p_organization_id
2198: , p_rev_item_id NUMBER
2199: )
2200: IS
2201: SELECT 'Lot Number is invalid'
2202: FROM SYS.DUAL
2203: WHERE NOT EXISTS ( SELECT 'Valid Lot'
2204: FROM WIP_DISCRETE_JOBS wdj1
2205: WHERE wdj1.lot_number = p_lot_number
2206: AND wdj1.status_type = 1
2226: , p_bill_sequence_id NUMBER
2227: , p_routing_sequence_id NUMBER )
2228: IS
2229: SELECT 'WO Range is invalid'
2230: FROM SYS.DUAL
2231: WHERE NOT EXISTS ( SELECT 'Valid WO'
2232: FROM WIP_DISCRETE_JOBS wdj1
2233: , WIP_ENTITIES we1
2234: WHERE wdj1.status_type = 1
3982: p_revised_item_rec.new_effective_date
3983: )
3984: INTO l_token_tbl(3).token_value,
3985: l_token_tbl(4).token_value
3986: FROM SYS.DUAL;
3987:
3988: l_token_tbl(2).token_name := 'ECO_NAME';
3989: l_token_tbl(2).token_value := p_revised_item_rec.eco_name;
3990:
5352: -- to validate alternate designator.
5353: CURSOR c_Check_Alternate( p_alt_designator VARCHAR2,
5354: p_organization_id NUMBER ) IS
5355: SELECT 'Invalid Alaternatae'
5356: FROM SYS.DUAL
5357: WHERE NOT EXISTS ( SELECT NULL
5358: FROM bom_alternate_designators
5359: WHERE alternate_designator_code = p_alt_designator
5360: AND organization_id = p_organization_id
5891: -- Enhancement for ECO Routing
5892: ******************************************************************/
5893: CURSOR rev_op_seq IS
5894: SELECT 'Rev Op Exist'
5895: FROM SYS.DUAL
5896: WHERE EXISTS ( SELECT NULL
5897: FROM BOM_OPERATION_SEQUENCES
5898: WHERE revised_item_sequence_id =
5899: p_rev_item_unexp_rec.revised_item_sequence_id) ;
6422:
6423: -- Moved from BOM_Validate_Op_Seq.Check_Access by MK on 12/04
6424: CURSOR c_CheckCancelled IS
6425: SELECT 1
6426: FROM SYS.DUAL
6427: WHERE NOT EXISTS
6428: ( SELECT NULL
6429: FROM BOM_OPERATION_SEQUENCES
6430: WHERE NVL(operation_type, 1) = NVL(p_operation_type, 1)