[Home] [Help]
861: select wco.operation_seq_num,
862: wco.operation_sequence_id
863: into x_start_op_seq_num,
864: x_start_op_seq_id
865: from wsm_copy_operations wco
866: where wco.wip_entity_id = p_wip_entity_id
867: and NVL(wco.network_start_end, 'X') = l_char_temp; -- donot use 'S'
868:
869: exception
900: select wco.operation_seq_num,
901: wco.operation_sequence_id
902: into x_end_op_seq_num,
903: x_end_op_seq_id
904: from wsm_copy_operations wco
905: where wco.wip_entity_id = p_wip_entity_id
906: and NVL(wco.network_start_end, 'X') = l_char_temp; -- donot use 'E'
907:
908: exception
933: x_err_code := 0;
934:
935: select nvl(operation_sequence_id, -1)
936: into x_op_seq_id
937: from wsm_copy_operations
938: where wip_entity_id = p_wip_entity_id
939: and operation_seq_num = p_rtg_op_seq_num;
940: exception
941: when others then
2315: l_temp :=0;
2316: begin
2317: select 1
2318: into l_temp
2319: from wsm_copy_operations
2320: where wip_entity_id = p_wip_entity_id
2321: and organization_id = p_org_id
2322: and operation_seq_num = v_wljdi_routing_op_seq_num(l_d);
2323: exception
2932: reco_completion_date
2933: into l_recommended,
2934: l_op_start_date_old,
2935: l_op_compl_date_old
2936: from wsm_copy_operations
2937: where wip_entity_id = p_wip_entity_id
2938: and operation_seq_num = l_rtg_op_seq_num;
2939: EXCEPTION
2940: when others then
3247: select reco_start_date,
3248: reco_completion_date
3249: into l_op_sdate,
3250: l_op_edate
3251: from wsm_copy_operations
3252: where wip_entity_id = p_wip_entity_id
3253: and operation_seq_num = l_rtg_op_seq_num;
3254: end if;
3255:
4058: select reco_start_date,
4059: reco_completion_date
4060: into l_op_sdate,
4061: l_op_edate
4062: from wsm_copy_operations wco,
4063: bom_department_resources bdr
4064: where wip_entity_id = p_wip_entity_id
4065: and operation_seq_num = l_rtg_op_seq_num
4066: and organization_id = p_org_id
4580: l_stmt_num := 30.0;
4581: /*Added Department Id for bug 5476647*/
4582: select wco.recommended,wco.department_id
4583: into l_op_recommended,l_department_id
4584: from wsm_copy_operations wco
4585: where wco.wip_entity_id = p_wip_entity_id
4586: and wco.operation_seq_num = l_rtg_op_seq_num;
4587: EXCEPTION
4588: when others then
5031: into l_op_recommended,
5032: l_res_recommended,
5033: l_the_sdate,
5034: l_the_edate
5035: from wsm_copy_operations wco,
5036: wsm_copy_op_resources wcor
5037: where wco.wip_entity_id = p_wip_entity_id
5038: and wco.operation_seq_num = l_rtg_op_seq_num
5039: and wcor.wip_entity_id = wco.wip_entity_id
5529: into l_op_sdate,
5530: l_op_edate,
5531: l_op_recommended,
5532: l_scheduled_qty
5533: from wsm_copy_operations wco
5534: where wco.wip_entity_id = p_wip_entity_id
5535: and wco.operation_seq_num = l_rtg_op_seq_num;
5536: EXCEPTION
5537: when no_data_found then
5617: l_op_edate,
5618: l_op_recommended,
5619: l_scheduled_qty,
5620: l_bom_qpa
5621: from wsm_copy_operations wco,
5622: wsm_copy_requirement_ops wcro
5623: where wco.wip_entity_id = p_wip_entity_id
5624: and wco.operation_seq_num = l_rtg_op_seq_num
5625: and wcro.wip_entity_id = wco.wip_entity_id
5995:
5996: begin
5997: select wco.reco_start_date,wco.reco_completion_date
5998: into l_op_sdate,l_op_edate
5999: from wsm_copy_operations wco
6000: where wco.wip_entity_id = p_wip_entity_id
6001: and wco.organization_id = p_org_id
6002: and wco.operation_seq_num = l_rtg_op_seq_num;
6003: exception
13737: begin
13738:
13739: select nvl(p_new_res_tbl(l_index).dept_id,wco.department_id)
13740: into p_new_res_tbl(l_index).dept_id
13741: from bom_resources br,bom_department_resources bdr, wsm_copy_operations wco
13742: where br.resource_id = p_new_res_tbl(l_index).resource_id
13743: and br.resource_code = p_new_res_tbl(l_index).resource_code
13744: and (br.disable_date > sysdate or br.disable_date is null)
13745: and br.organization_id = p_org_id
13763: l_stmt_num := 190;
13764: begin
13765: select 1
13766: into l_dummy
13767: from wsm_copy_operations wco
13768: where wco.organization_id = p_org_id
13769: and wco.wip_entity_id = p_wip_entity_id
13770: and wco.operation_seq_num = p_rtg_op_seq_num
13771: and p_new_res_tbl(l_index).start_date >= wco.reco_start_date
15278: begin
15279: l_stmt_num := 10.3;
15280: select operation_seq_num
15281: into l_cur_rtg_op_seq_num
15282: from wsm_copy_operations
15283: where wip_entity_id = p_wip_entity_id
15284: and operation_sequence_id = l_cur_op_seq_id;
15285: exception
15286: when no_data_found then
15729:
15730: select decode(sign(min(operation_sequence_id)),-1,min(operation_sequence_id)-1,-2),
15731: decode(v_wljdi_routing_op_seq_num(l_d),null,max(operation_seq_num)+g_op_seq_incr,v_wljdi_routing_op_seq_num(l_d))
15732: into l_op_seq_id,v_wljdi_routing_op_seq_num(l_d)
15733: from wsm_copy_operations
15734: where wip_entity_id = p_wip_entity_id
15735: and organization_id = p_org_id;
15736:
15737: if v_wljdi_recommended(l_d) is null then
15749: else
15750: v_wljdi_scheduled_quantity(l_d) := l_cur_job_qty;
15751: end if;
15752:
15753: insert into wsm_copy_operations
15754: (WIP_ENTITY_ID,
15755: OPERATION_SEQ_NUM,
15756: RECOMMENDED,
15757: RECO_PATH_SEQ_NUM,
16057: bsor.attribute13,
16058: bsor.attribute14,
16059: bsor.attribute15,
16060: null
16061: from wsm_copy_operations wco,
16062: bom_resources br,
16063: bom_std_op_resources bsor
16064: where bsor.standard_operation_id = v_wljdi_std_op_id(l_d)
16065: and br.resource_id = bsor.resource_id
16188: bsor.attribute13,
16189: bsor.attribute14,
16190: bsor.attribute15,
16191: null
16192: from wsm_copy_operations wco,
16193: bom_resources br,
16194: bom_std_sub_op_resources bsor,
16195: wsm_copy_op_resources wcor
16196: where bsor.standard_operation_id = v_wljdi_std_op_id(l_d)
16317: begin
16318:
16319: select operation_sequence_id
16320: into l_from_op_seq_id
16321: from wsm_copy_operations
16322: where wip_entity_id = p_wip_entity_id
16323: and operation_seq_num = v_wljdi_routing_op_seq_num(l_d);
16324:
16325: select operation_sequence_id
16323: and operation_seq_num = v_wljdi_routing_op_seq_num(l_d);
16324:
16325: select operation_sequence_id
16326: into l_to_op_seq_id
16327: from wsm_copy_operations
16328: where wip_entity_id = p_wip_entity_id
16329: and operation_seq_num = v_wljdi_next_rtg_op_seq_num(l_d);
16330:
16331: exception
16639: end if;
16640:
16641: l_stmt_num := 70.3;
16642: -- reset WCO
16643: update wsm_copy_operations
16644: set recommended = 'N',
16645: reco_path_seq_num = null,
16646: last_update_date = p_last_updt_date,
16647: last_updated_by = p_last_updt_by,
16654:
16655: l_stmt_num := 70.4;
16656: -- mark the recomended operations
16657: forall i in 1..l_v_path_ops.count
16658: update wsm_copy_operations
16659: set recommended = 'Y',
16660: reco_path_seq_num = l_v_path_seq_num(i),
16661: last_update_date = p_last_updt_date,
16662: last_updated_by = p_last_updt_by,
16764:
16765: end if;
16766:
16767: -- reset WCO
16768: update wsm_copy_operations
16769: set recommended = 'N',
16770: reco_path_seq_num = null,
16771: last_update_date = p_last_updt_date,
16772: last_updated_by = p_last_updt_by,
16778: where wip_entity_id = p_wip_entity_id;
16779:
16780: -- mark the recomended operations
16781: forall i in 1..l_v_path_ops.count
16782: update wsm_copy_operations
16783: set recommended = 'Y',
16784: reco_path_seq_num = l_v_path_seq_num(i),
16785: last_update_date = p_last_updt_date,
16786: last_updated_by = p_last_updt_by,
16792: where wip_entity_id = p_wip_entity_id
16793: and operation_seq_num = l_v_path_ops(i);
16794:
16795: -- Null out dates for non-recommended operations.
16796: update wsm_copy_operations
16797: set reco_start_date = null,
16798: reco_completion_date = null
16799: where wip_entity_id = p_wip_entity_id
16800: and recommended = 'N';
16962: l_temp :=0;
16963: begin
16964: select 1
16965: into l_temp
16966: from wsm_copy_operations wco
16967: where wco.wip_entity_id = p_wip_entity_id
16968: and wco.organization_id = p_org_id
16969: and wco.operation_seq_num = l_rtg_op_seq_num
16970: and wco.network_start_end is null;
17011: raise e_wljdi_common_error;
17012: end;
17013: end if;
17014:
17015: delete from wsm_copy_operations
17016: where wip_entity_id = p_wip_entity_id
17017: and operation_seq_num = l_rtg_op_seq_num;
17018:
17019: delete from wsm_copy_op_resources
17046: l_stmt_num := 110;
17047: -- Update WCO, to mark changes
17048: if(l_out > 0) then
17049: forall i in l_v_rtg_op_seq.first..l_v_rtg_op_seq.last
17050: UPDATE WSM_COPY_OPERATIONS
17051: set yield = NVL(l_v_op_yield(i), yield),
17052: reco_scheduled_quantity = NVL(l_v_op_qty(i), reco_scheduled_quantity),
17053: --BC: bug 3545531 we will allow user to nullify the dates on WCO
17054: --reco_start_date = NVL(l_v_start_date(i), reco_start_date),
19737: v_wljdi_attribute13(l_d),
19738: v_wljdi_attribute14(l_d),
19739: v_wljdi_attribute15(l_d)
19740: from
19741: wsm_copy_operations wco
19742: where wco.wip_entity_id = p_wip_entity_id
19743: and wco.organization_id = p_org_id
19744: and wco.operation_seq_num= l_rtg_op_seq_num;
19745: