[Home] [Help]
1742: if v_wljdi_job_op_seq_num(l_d) is not null then
1743: begin
1744: select 1
1745: into l_xst
1746: from wip_operations
1747: where wip_entity_id = p_wip_entity_id
1748: and organization_id = p_org_id
1749: and operation_seq_num = v_wljdi_job_op_seq_num(l_d);
1750: exception
2994: select first_unit_start_date,
2995: last_unit_start_date
2996: into l_op_start_date_old,
2997: l_op_compl_date_old
2998: from wip_operations
2999: where wip_entity_id = p_wip_entity_id
3000: and operation_seq_num = l_job_op_seq_num;
3001: EXCEPTION
3002: when others then
3243: select wo.first_unit_start_date,
3244: wo.last_unit_completion_date
3245: into l_op_sdate,
3246: l_op_edate
3247: from wip_operations wo
3248: where wo.wip_entity_id = p_wip_entity_id
3249: and wo.operation_seq_num = l_job_op_seq_num;
3250: else -- p_handle_wip_cur_op = 'N'
3251: l_stmt_num := 20;
3950: select wo.first_unit_start_date,
3951: wo.last_unit_completion_date
3952: into l_op_sdate,
3953: l_op_edate
3954: from wip_operations wo,
3955: bom_department_resources bdr
3956: where wo.wip_entity_id = p_wip_entity_id
3957: and wo.operation_seq_num = l_job_op_seq_num
3958: and wo.organization_id = p_org_id
4642: into l_res_sdate,
4643: l_res_edate,
4644: l_resource_id, -- this is used for validate instance_id
4645: l_department_id /*Added Department Id for bug 5476647*/
4646: from wip_operation_resources wor, wip_operations wo
4647: where wor.wip_entity_id = p_wip_entity_id
4648: and wor.organization_id = p_org_id
4649: and wor.operation_seq_num = l_job_op_seq_num
4650: and wor.resource_seq_num = l_res_seq_num
5506: select wo.first_unit_start_date,
5507: wo.last_unit_completion_date
5508: into l_op_sdate,
5509: l_op_edate
5510: from wip_operations wo,
5511: wip_requirement_operations wro
5512: where wo.wip_entity_id = p_wip_entity_id
5513: and wo.operation_seq_num = l_job_op_seq_num
5514: and wro.wip_entity_id = wo.wip_entity_id
5876: wo.scheduled_quantity
5877: into l_op_sdate,
5878: l_op_edate,
5879: l_sched_qty
5880: from wip_operations wo
5881: where wo.wip_entity_id = p_wip_entity_id
5882: and wo.operation_seq_num = l_job_op_seq_num;
5883: exception
5884: when no_data_found then
10487: begin
10488: l_stmt_num := 810;
10489: if(l_chg_alt_flag = 1 or l_chg_ref_flag = 1 or l_chg_rev_flag = 1) then
10490: -- Delete WO records
10491: delete from wip_operations
10492: where wip_entity_id = v_wlji_wip_entity_id(v_idx);
10493: delete from wip_operation_yields
10494: where wip_entity_id = v_wlji_wip_entity_id(v_idx);
10495: delete from wip_operation_resources
11033: else
11034: l_qntydiff := 0;
11035: end if;
11036:
11037: update wip_operations
11038: set -- BD: BUG 3479666
11039: -- in option C, we should not change operation start/completion
11040: -- date based on job header level information
11041: --
11120: --LBM enh : changed the expression for required quantity
11121: update wip_requirement_operations wro
11122: set wro.date_required = (
11123: select nvl(min(first_unit_start_date), v_wlji_fusd(v_idx))
11124: from wip_operations
11125: where organization_id = v_wlji_org_id(v_idx)
11126: and wip_entity_id = v_wlji_wip_entity_id(v_idx)
11127: and operation_seq_num = abs(wro.operation_seq_num)),
11128: last_updated_by = v_wlji_last_updt_by(v_idx),
11153: then
11154: l_stmt_num := 920.31;
11155: select min(operation_seq_num)
11156: into l_min_op_seq_num
11157: from wip_operations
11158: where wip_entity_id = v_wlji_wip_entity_id(v_idx);
11159: l_stmt_num := 920.32;
11160: select bd.scrap_account,
11161: bd.est_absorption_account,
11163: into l_scrap_account_10,
11164: l_est_scrap_abs_account_10,
11165: l_department_id
11166: from bom_departments bd,
11167: wip_operations wo
11168: where wo.wip_entity_id = v_wlji_wip_entity_id(v_idx)
11169: and wo.operation_seq_num = l_min_op_seq_num
11170: and bd.department_id = wo.department_id;
11171:
11588: set (current_job_op_seq_num,
11589: current_rtg_op_seq_num)
11590: =(select wo.operation_seq_num,
11591: wo.wsm_op_seq_num
11592: from wip_operations wo
11593: where organization_id = v_wlji_org_id(v_idx)
11594: and wip_entity_id = v_wlji_wip_entity_id(v_idx)
11595: and wo.quantity_in_queue
11596: + wo.quantity_running
13774: begin
13775:
13776: select nvl(p_new_res_tbl(l_index).dept_id,wo.department_id)
13777: into p_new_res_tbl(l_index).dept_id
13778: from bom_resources br,bom_department_resources bdr, wip_operations wo
13779: where br.resource_id = p_new_res_tbl(l_index).resource_id
13780: and br.resource_code = p_new_res_tbl(l_index).resource_code
13781: and (br.disable_date > sysdate or br.disable_date is null)
13782: and br.organization_id = p_org_id
13803: l_stmt_num := 170;
13804: begin
13805: select 1
13806: into l_dummy
13807: from wip_operations wo
13808: where wo.wip_entity_id = p_wip_entity_id
13809: and wo.organization_id = p_org_id
13810: and wo.operation_seq_num = p_job_op_seq_num
13811: and p_new_res_tbl(l_index).start_date >= wo.first_unit_start_date
15644: quantity_in_queue + quantity_running + quantity_waiting_to_move
15645: into l_cur_job_op_seq_num,
15646: l_cur_op_seq_id,
15647: l_cur_job_qty
15648: from wip_operations
15649: where wip_entity_id = p_wip_entity_id
15650: and (quantity_in_queue <> 0 or
15651: quantity_running <> 0 or
15652: quantity_waiting_to_move <> 0);
17296: raise e_wljdi_common_error;
17297: end if;
17298: l_stmt_num := 110.2;
17299: -- update WO for current operation
17300: UPDATE WIP_OPERATIONS
17301: set scheduled_quantity = NVL(l_op_qty, scheduled_quantity),
17302: first_unit_start_date = NVL(l_op_sdate, first_unit_start_date),
17303: first_unit_completion_date = NVL(l_op_edate, first_unit_completion_date),
17304: last_unit_start_date = NVL(l_op_sdate, last_unit_start_date),
17586: -- We'll store the data here quite simple..
17587: -- l_v_setup_op_res_num('Y-10-10') := 'Y';
17588: -- l_v_setup_op_res_num('(handle_curr_op)-(Op seq Num)-(resource seq num)') := 'Y';
17589: -- Indicates that setup resource has been added for the
17590: -- resource seq num 10, operation 10 in (WIP_OPERATIONS) --> handle curr op is Y'
17591: l_v_setup_op_res_num.delete;
17592: -- ST : Detailed Scheduling...
17593:
17594:
18348: -- ST : Detailed Scheduling ...
18349: -- If setup resources are added for a resource, keep track of it..
18350: IF l_job_op_seq_num IS NOT NULL THEN
18351:
18352: -- Added to WIP Operations...
18353: fnd_file.put_line(fnd_file.log,'Adding : ' || 'Y'||'-'||l_job_op_seq_num||'-'||l_temp_par_res_seq);
18354: l_v_setup_op_res_num('Y'||'-'||l_job_op_seq_num||'-'||l_temp_par_res_seq) := 'Y';
18355:
18356: ELSIF l_rtg_op_seq_num IS NOT NULL THEN
20145: wo.department_id,
20146: null,
20147: null,
20148: round(l_cur_job_qty*l_v_comp(l_in).qpa, 6)
20149: from wip_operations wo,
20150: mtl_system_items msi
20151: where wo.operation_seq_num = l_v_comp(l_in).job_op_seq_num
20152: and wo.wip_entity_id= p_wip_entity_id
20153: and msi.inventory_item_id = l_v_comp(l_in).item_id
21390: -- {{ Update quantity
21391: l_stmt_num := 80;
21392: select max(operation_seq_num)
21393: into l_max_op_seq_num
21394: from wip_operations
21395: where wip_entity_id = p_wip_entity_id;
21396:
21397: l_stmt_num := 90;
21398: update wip_operations wo
21394: from wip_operations
21395: where wip_entity_id = p_wip_entity_id;
21396:
21397: l_stmt_num := 90;
21398: update wip_operations wo
21399: set wo.previous_operation_seq_num = (
21400: select max(operation_seq_num)
21401: from wip_operations
21402: where wip_entity_id = p_wip_entity_id
21397: l_stmt_num := 90;
21398: update wip_operations wo
21399: set wo.previous_operation_seq_num = (
21400: select max(operation_seq_num)
21401: from wip_operations
21402: where wip_entity_id = p_wip_entity_id
21403: and operation_seq_num < wo.operation_seq_num),
21404: wo.next_operation_seq_num = (
21405: select min(operation_seq_num)
21402: where wip_entity_id = p_wip_entity_id
21403: and operation_seq_num < wo.operation_seq_num),
21404: wo.next_operation_seq_num = (
21405: select min(operation_seq_num)
21406: from wip_operations
21407: where wip_entity_id = p_wip_entity_id
21408: and operation_seq_num > wo.operation_seq_num),
21409: wo.quantity_in_queue =
21410: decode(operation_seq_num,
21421: end if;
21422:
21423: l_stmt_num := 100;
21424: /*This SQL is commneted as per bug 5125991
21425: update wip_operations
21426: set quantity_completed = p_start_quantity
21427: where wip_entity_id = p_wip_entity_id
21428: and operation_seq_num < l_max_op_seq_num;
21429: if lbji_debug = 'Y' then
21447: set (current_job_op_seq_num,
21448: current_rtg_op_seq_num)
21449: =(select wo.operation_seq_num,
21450: wo.wsm_op_seq_num
21451: from wip_operations wo
21452: where organization_id = p_org_id
21453: and wip_entity_id = p_wip_entity_id
21454: and wo.quantity_in_queue
21455: + wo.quantity_running
21473: set (current_job_op_seq_num,
21474: current_rtg_op_seq_num)
21475: =(select wo.operation_seq_num,
21476: wo.wsm_op_seq_num
21477: from wip_operations wo
21478: where organization_id = p_org_id
21479: and wip_entity_id = p_wip_entity_id
21480: and wo.quantity_in_queue
21481: + wo.quantity_running