[Home] [Help]
866: select wco.operation_seq_num,
867: wco.operation_sequence_id
868: into x_start_op_seq_num,
869: x_start_op_seq_id
870: from wsm_copy_operations wco
871: where wco.wip_entity_id = p_wip_entity_id
872: and NVL(wco.network_start_end, 'X') = l_char_temp; -- donot use 'S'
873:
874: exception
905: select wco.operation_seq_num,
906: wco.operation_sequence_id
907: into x_end_op_seq_num,
908: x_end_op_seq_id
909: from wsm_copy_operations wco
910: where wco.wip_entity_id = p_wip_entity_id
911: and NVL(wco.network_start_end, 'X') = l_char_temp; -- donot use 'E'
912:
913: exception
938: x_err_code := 0;
939:
940: select nvl(operation_sequence_id, -1)
941: into x_op_seq_id
942: from wsm_copy_operations
943: where wip_entity_id = p_wip_entity_id
944: and operation_seq_num = p_rtg_op_seq_num;
945: exception
946: when others then
2320: l_temp :=0;
2321: begin
2322: select 1
2323: into l_temp
2324: from wsm_copy_operations
2325: where wip_entity_id = p_wip_entity_id
2326: and organization_id = p_org_id
2327: and operation_seq_num = v_wljdi_routing_op_seq_num(l_d);
2328: exception
2937: reco_completion_date
2938: into l_recommended,
2939: l_op_start_date_old,
2940: l_op_compl_date_old
2941: from wsm_copy_operations
2942: where wip_entity_id = p_wip_entity_id
2943: and operation_seq_num = l_rtg_op_seq_num;
2944: EXCEPTION
2945: when others then
3252: select reco_start_date,
3253: reco_completion_date
3254: into l_op_sdate,
3255: l_op_edate
3256: from wsm_copy_operations
3257: where wip_entity_id = p_wip_entity_id
3258: and operation_seq_num = l_rtg_op_seq_num;
3259: end if;
3260:
4063: select reco_start_date,
4064: reco_completion_date
4065: into l_op_sdate,
4066: l_op_edate
4067: from wsm_copy_operations wco,
4068: bom_department_resources bdr
4069: where wip_entity_id = p_wip_entity_id
4070: and operation_seq_num = l_rtg_op_seq_num
4071: and organization_id = p_org_id
4585: l_stmt_num := 30.0;
4586: /*Added Department Id for bug 5476647*/
4587: select wco.recommended,wco.department_id
4588: into l_op_recommended,l_department_id
4589: from wsm_copy_operations wco
4590: where wco.wip_entity_id = p_wip_entity_id
4591: and wco.operation_seq_num = l_rtg_op_seq_num;
4592: EXCEPTION
4593: when others then
5036: into l_op_recommended,
5037: l_res_recommended,
5038: l_the_sdate,
5039: l_the_edate
5040: from wsm_copy_operations wco,
5041: wsm_copy_op_resources wcor
5042: where wco.wip_entity_id = p_wip_entity_id
5043: and wco.operation_seq_num = l_rtg_op_seq_num
5044: and wcor.wip_entity_id = wco.wip_entity_id
5535: into l_op_sdate,
5536: l_op_edate,
5537: l_op_recommended,
5538: l_scheduled_qty
5539: from wsm_copy_operations wco
5540: where wco.wip_entity_id = p_wip_entity_id
5541: and wco.operation_seq_num = l_rtg_op_seq_num;
5542: EXCEPTION
5543: when no_data_found then
5623: l_op_edate,
5624: l_op_recommended,
5625: l_scheduled_qty,
5626: l_bom_qpa
5627: from wsm_copy_operations wco,
5628: wsm_copy_requirement_ops wcro
5629: where wco.wip_entity_id = p_wip_entity_id
5630: and wco.operation_seq_num = l_rtg_op_seq_num
5631: and wcro.wip_entity_id = wco.wip_entity_id
6006:
6007: begin
6008: select wco.reco_start_date,wco.reco_completion_date,wco.reco_scheduled_quantity
6009: into l_op_sdate,l_op_edate,l_sched_qty
6010: from wsm_copy_operations wco
6011: where wco.wip_entity_id = p_wip_entity_id
6012: and wco.organization_id = p_org_id
6013: and wco.operation_seq_num = l_rtg_op_seq_num;
6014: exception
13841: begin
13842:
13843: select nvl(p_new_res_tbl(l_index).dept_id,wco.department_id)
13844: into p_new_res_tbl(l_index).dept_id
13845: from bom_resources br,bom_department_resources bdr, wsm_copy_operations wco
13846: where br.resource_id = p_new_res_tbl(l_index).resource_id
13847: and br.resource_code = p_new_res_tbl(l_index).resource_code
13848: and (br.disable_date > sysdate or br.disable_date is null)
13849: and br.organization_id = p_org_id
13867: l_stmt_num := 190;
13868: begin
13869: select 1
13870: into l_dummy
13871: from wsm_copy_operations wco
13872: where wco.organization_id = p_org_id
13873: and wco.wip_entity_id = p_wip_entity_id
13874: and wco.operation_seq_num = p_rtg_op_seq_num
13875: and p_new_res_tbl(l_index).start_date >= wco.reco_start_date
15654: begin
15655: l_stmt_num := 10.3;
15656: select operation_seq_num
15657: into l_cur_rtg_op_seq_num
15658: from wsm_copy_operations
15659: where wip_entity_id = p_wip_entity_id
15660: and operation_sequence_id = l_cur_op_seq_id;
15661: exception
15662: when no_data_found then
16105:
16106: select decode(sign(min(operation_sequence_id)),-1,min(operation_sequence_id)-1,-2),
16107: 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))
16108: into l_op_seq_id,v_wljdi_routing_op_seq_num(l_d)
16109: from wsm_copy_operations
16110: where wip_entity_id = p_wip_entity_id
16111: and organization_id = p_org_id;
16112:
16113: if v_wljdi_recommended(l_d) is null then
16125: else
16126: v_wljdi_scheduled_quantity(l_d) := l_cur_job_qty;
16127: end if;
16128:
16129: insert into wsm_copy_operations
16130: (WIP_ENTITY_ID,
16131: OPERATION_SEQ_NUM,
16132: RECOMMENDED,
16133: RECO_PATH_SEQ_NUM,
16433: bsor.attribute13,
16434: bsor.attribute14,
16435: bsor.attribute15,
16436: null
16437: from wsm_copy_operations wco,
16438: bom_resources br,
16439: bom_std_op_resources bsor
16440: where bsor.standard_operation_id = v_wljdi_std_op_id(l_d)
16441: and br.resource_id = bsor.resource_id
16564: bsor.attribute13,
16565: bsor.attribute14,
16566: bsor.attribute15,
16567: null
16568: from wsm_copy_operations wco,
16569: bom_resources br,
16570: bom_std_sub_op_resources bsor,
16571: wsm_copy_op_resources wcor
16572: where bsor.standard_operation_id = v_wljdi_std_op_id(l_d)
16693: begin
16694:
16695: select operation_sequence_id
16696: into l_from_op_seq_id
16697: from wsm_copy_operations
16698: where wip_entity_id = p_wip_entity_id
16699: and operation_seq_num = v_wljdi_routing_op_seq_num(l_d);
16700:
16701: select operation_sequence_id
16699: and operation_seq_num = v_wljdi_routing_op_seq_num(l_d);
16700:
16701: select operation_sequence_id
16702: into l_to_op_seq_id
16703: from wsm_copy_operations
16704: where wip_entity_id = p_wip_entity_id
16705: and operation_seq_num = v_wljdi_next_rtg_op_seq_num(l_d);
16706:
16707: exception
17033: end if;
17034:
17035: l_stmt_num := 70.3;
17036: -- reset WCO
17037: update wsm_copy_operations
17038: set recommended = 'N',
17039: reco_path_seq_num = null,
17040: last_update_date = p_last_updt_date,
17041: last_updated_by = p_last_updt_by,
17048:
17049: l_stmt_num := 70.4;
17050: -- mark the recomended operations
17051: forall i in 1..l_v_path_ops.count
17052: update wsm_copy_operations
17053: set recommended = 'Y',
17054: reco_path_seq_num = l_v_path_seq_num(i),
17055: last_update_date = p_last_updt_date,
17056: last_updated_by = p_last_updt_by,
17158:
17159: end if;
17160:
17161: -- reset WCO
17162: update wsm_copy_operations
17163: set recommended = 'N',
17164: reco_path_seq_num = null,
17165: last_update_date = p_last_updt_date,
17166: last_updated_by = p_last_updt_by,
17172: where wip_entity_id = p_wip_entity_id;
17173:
17174: -- mark the recomended operations
17175: forall i in 1..l_v_path_ops.count
17176: update wsm_copy_operations
17177: set recommended = 'Y',
17178: reco_path_seq_num = l_v_path_seq_num(i),
17179: last_update_date = p_last_updt_date,
17180: last_updated_by = p_last_updt_by,
17186: where wip_entity_id = p_wip_entity_id
17187: and operation_seq_num = l_v_path_ops(i);
17188:
17189: -- Null out dates for non-recommended operations.
17190: update wsm_copy_operations
17191: set reco_start_date = null,
17192: reco_completion_date = null
17193: where wip_entity_id = p_wip_entity_id
17194: and recommended = 'N';
17404: l_temp :=0;
17405: begin
17406: select 1
17407: into l_temp
17408: from wsm_copy_operations wco
17409: where wco.wip_entity_id = p_wip_entity_id
17410: and wco.organization_id = p_org_id
17411: and wco.operation_seq_num = l_rtg_op_seq_num
17412: and wco.network_start_end is null;
17453: raise e_wljdi_common_error;
17454: end;
17455: end if;
17456:
17457: delete from wsm_copy_operations
17458: where wip_entity_id = p_wip_entity_id
17459: and operation_seq_num = l_rtg_op_seq_num;
17460:
17461: delete from wsm_copy_op_resources
17492: l_stmt_num := 110;
17493: -- Update WCO, to mark changes
17494: if(l_out > 0) then
17495: forall i in l_v_rtg_op_seq.first..l_v_rtg_op_seq.last
17496: UPDATE WSM_COPY_OPERATIONS
17497: set yield = NVL(l_v_op_yield(i), yield),
17498: reco_scheduled_quantity = NVL(l_v_op_qty(i), reco_scheduled_quantity),
17499: --BC: bug 3545531 we will allow user to nullify the dates on WCO
17500: --reco_start_date = NVL(l_v_start_date(i), reco_start_date),
20329: v_wljdi_attribute13(l_d),
20330: v_wljdi_attribute14(l_d),
20331: v_wljdi_attribute15(l_d)
20332: from
20333: wsm_copy_operations wco
20334: where wco.wip_entity_id = p_wip_entity_id
20335: and wco.organization_id = p_org_id
20336: and wco.operation_seq_num= l_rtg_op_seq_num;
20337: