[Home] [Help]
1573:
1574: CURSOR Get_Operational_Routing_Info( routing_id IN NUMBER) IS
1575: SELECT pending_from_ecn
1576: , alternate_routing_designator
1577: FROM bom_operational_routings
1578: WHERE routing_sequence_id = routing_id ;
1579: -- ERES change ends
1580:
1581: abort_implementation exception;
2073: CURSOR get_common_routing IS
2074: SELECT r.organization_id,
2075: r.assembly_item_id,
2076: r.routing_sequence_id
2077: FROM bom_operational_routings r
2078: WHERE r.common_assembly_item_id = item.revised_item_id
2079: AND r.common_routing_sequence_id = item.routing_sequence_id;
2080:
2081: common_routing get_common_routing%ROWTYPE;
2722: Cursor Check_Routing(p_item_id IN NUMBER,
2723: p_org_id IN NUMBER,
2724: p_alternate IN VARCHAR2) is
2725: Select 'x' dummy
2726: From bom_operational_routings bor
2727: Where bor.assembly_item_id = p_item_id
2728: And bor.organization_id = p_org_id
2729: And nvl(bor.alternate_routing_designator, 'PRIMARY ALTERNATE') =
2730: nvl(p_alternate, 'PRIMARY ALTERNATE')
3184: --Again, we allow empty routings to get implemented for the same reason for which we allowe empty BOMs
3185: SELECT Count(*) INTO l_no_operations FROM dual WHERE EXISTS(
3186: select 1 FROM bom_operation_sequences WHERE routing_sequence_id IN
3187: (
3188: SELECT routing_sequence_id FROM BOM_OPERATIONAL_ROUTINGS WHERE
3189: ASSEMBLY_ITEM_ID = item.revised_item_id and
3190: ORGANIZATION_ID = item.organization_id
3191: ) AND revised_item_sequence_id = item.revised_item_sequence_id AND acd_type <> acd_delete
3192: );
4804: IF item.routing_sequence_id IS NOT NULL
4805: THEN
4806: SELECT alternate_routing_designator
4807: INTO l_alternate_routing_designator
4808: FROM bom_operational_routings
4809: WHERE routing_sequence_id = item.routing_sequence_id;
4810: /*
4811: BOM_Rtg_Header_Util.Query_Row
4812: ( p_assembly_item_id => item.revised_item_id
4848: ,l_common_routing_sequence_id
4849: ,l_ctp_flag
4850: ,l_priority
4851: ,l_routing_comment
4852: FROM bom_operational_routings
4853: WHERE assembly_item_id = item.revised_item_id
4854: AND organization_id = item.organization_id
4855: AND NVL(alternate_routing_designator, 'NULL_ALTERNATE_DESIGNATOR' )
4856: = NVL(l_alternate_routing_designator, 'NULL_ALTERNATE_DESIGNATOR')
4863: item.priority IS NOT NULL OR
4864: item.routing_comment IS NOT NULL
4865: THEN
4866:
4867: UPDATE bom_operational_routings
4868: SET common_assembly_item_id =
4869: l_common_assembly_item_id
4870: , common_routing_sequence_id =
4871: l_common_routing_sequence_id
4893: -- ERES flag to be set for triggering Routing Event:
4894: bERES_Flag_for_Routing := TRUE;
4895: -- Bug 4455543: Set l_WIP_Flag_for_Routing when routing header is being updated by revised item
4896: l_WIP_Flag_for_Routing := 'Y';
4897: FND_FILE.PUT_LINE(FND_FILE.LOG, 'in bom_operational_routings ... bERES_Flag_for_Routing=TRUE');
4898: END IF;
4899: -- ERES changes end.
4900: END IF;
4901: --end of bugfix 3234628
7474: , l_alternate_designator;
7475: CLOSE Get_Operational_Routing_Info;
7476: -- ERES change ends
7477:
7478: Update bom_operational_routings
7479: set last_update_date = sysdate,
7480: last_updated_by = userid,
7481: last_update_login = loginid,
7482: request_id = reqstid,
7497: IF (l_eres_enabled = 'Y')
7498: THEN
7499: -- bug 3234628, May-2004:
7500: -- odaboval added this test in order to only raise an ERES event
7501: -- when a row in bom_operational_routings has been updated:
7502: -- bug 3908563 : added bERES_Flag_for_Routing in the condition
7503: -- and removed ROWCOUNT>0 from the condition.
7504: IF (bERES_Flag_for_Routing)
7505: THEN