[Home] [Help]
1147: begin
1148: l_stmt_num := 50;
1149:
1150: --fix for bug5990761 allow update of job name for unreleased jobs
1151: select decode(wdj.status_type, WIP_CONSTANTS.UNRELEASED,NVL(p_job_name,we.wip_entity_name),we.wip_entity_name),we.wip_entity_name
1152: into p_job_name,l_old_job_name
1153: from wip_discrete_jobs wdj,
1154: wip_entities we
1155: where wdj.wip_entity_id = p_wip_entity_id
1153: from wip_discrete_jobs wdj,
1154: wip_entities we
1155: where wdj.wip_entity_id = p_wip_entity_id
1156: and wdj.status_type in (
1157: WIP_CONSTANTS.UNRELEASED,
1158: WIP_CONSTANTS.RELEASED,
1159: WIP_CONSTANTS.HOLD,
1160: WIP_CONSTANTS.CANCELLED)
1161: and wdj.wip_entity_id = we.wip_entity_id
1154: wip_entities we
1155: where wdj.wip_entity_id = p_wip_entity_id
1156: and wdj.status_type in (
1157: WIP_CONSTANTS.UNRELEASED,
1158: WIP_CONSTANTS.RELEASED,
1159: WIP_CONSTANTS.HOLD,
1160: WIP_CONSTANTS.CANCELLED)
1161: and wdj.wip_entity_id = we.wip_entity_id
1162: and we.organization_id = p_org_id;
1155: where wdj.wip_entity_id = p_wip_entity_id
1156: and wdj.status_type in (
1157: WIP_CONSTANTS.UNRELEASED,
1158: WIP_CONSTANTS.RELEASED,
1159: WIP_CONSTANTS.HOLD,
1160: WIP_CONSTANTS.CANCELLED)
1161: and wdj.wip_entity_id = we.wip_entity_id
1162: and we.organization_id = p_org_id;
1163: exception
1156: and wdj.status_type in (
1157: WIP_CONSTANTS.UNRELEASED,
1158: WIP_CONSTANTS.RELEASED,
1159: WIP_CONSTANTS.HOLD,
1160: WIP_CONSTANTS.CANCELLED)
1161: and wdj.wip_entity_id = we.wip_entity_id
1162: and we.organization_id = p_org_id;
1163: exception
1164: when others then
1304: cumulative_yield,/*Added for bugfix:7248992 */
1305: reverse_cumulative_yield/*Added for bugfix:7248992 */
1306: from wsm_lot_job_dtl_interface
1307: where parent_header_id = p_parent_header_id
1308: and process_status = WIP_CONSTANTS.RUNNING;
1309:
1310: cursor c_wljdi_indp is
1311: select record_id,
1312: -- ST Fix for bug 4285032 :
1378: from wsm_lot_job_dtl_interface
1379: where parent_header_id IS NULL
1380: and wip_entity_id = p_wip_entity_id
1381: and organization_id = p_org_id
1382: and process_status = WIP_CONSTANTS.RUNNING
1383: and NVL(group_id, -1) = NVL(p_group_id, -1);
1384:
1385: l_stmt_num number;
1386: l_d number;
2145:
2146: if v_wljdi_src_phantom_item_id(l_d) is not null then
2147: if ( (v_wljdi_src_phantom_item_id(l_d)= v_wljdi_inventory_item_id_old(l_d) and
2148: l_sub_type = WSM_SUB_DEL) OR
2149: (v_wljdi_wip_supply_type(l_d)= WIP_CONSTANTS.PHANTOM and
2150: l_sub_type = WSM_SUB_ADD and
2151: v_wljdi_src_phantom_item_id(l_d)= v_wljdi_inventory_item_id_new(l_d)) ) then
2152: v_wljdi_src_phantom_item_id(l_d):=0;
2153: end if;
2151: v_wljdi_src_phantom_item_id(l_d)= v_wljdi_inventory_item_id_new(l_d)) ) then
2152: v_wljdi_src_phantom_item_id(l_d):=0;
2153: end if;
2154: else
2155: if (v_wljdi_wip_supply_type(l_d)= WIP_CONSTANTS.PHANTOM and
2156: l_sub_type = WSM_SUB_ADD) then
2157: v_wljdi_src_phantom_item_id(l_d):= 0;
2158: else
2159: v_wljdi_src_phantom_item_id(l_d):= -1;
2284: end if;
2285:
2286: -- Validate Count Point
2287: if (v_wljdi_count_point_type(l_d) is not null and
2288: v_wljdi_count_point_type(l_d) not in (WIP_CONSTANTS.YES_AUTO,
2289: WIP_CONSTANTS.NO_AUTO,
2290: WIP_CONSTANTS.NO_DIRECT)) then
2291: raise e_invalid_count_point;
2292: end if;
2285:
2286: -- Validate Count Point
2287: if (v_wljdi_count_point_type(l_d) is not null and
2288: v_wljdi_count_point_type(l_d) not in (WIP_CONSTANTS.YES_AUTO,
2289: WIP_CONSTANTS.NO_AUTO,
2290: WIP_CONSTANTS.NO_DIRECT)) then
2291: raise e_invalid_count_point;
2292: end if;
2293: if (v_wljdi_count_point_type(l_d) is null) then
2286: -- Validate Count Point
2287: if (v_wljdi_count_point_type(l_d) is not null and
2288: v_wljdi_count_point_type(l_d) not in (WIP_CONSTANTS.YES_AUTO,
2289: WIP_CONSTANTS.NO_AUTO,
2290: WIP_CONSTANTS.NO_DIRECT)) then
2291: raise e_invalid_count_point;
2292: end if;
2293: if (v_wljdi_count_point_type(l_d) is null) then
2294: v_wljdi_count_point_type(l_d) :=0;
2295: end if;
2296:
2297: -- Validate Backflush flag.
2298: if (v_wljdi_backflush_flag(l_d) is not null and
2299: v_wljdi_backflush_flag(l_d) not in (WIP_CONSTANTS.WBF_BF_NOPAGE ,
2300: WIP_CONSTANTS.WBF_BF_PAGE)) then
2301: raise e_invalid_backflush_flag;
2302: end if;
2303: if (v_wljdi_backflush_flag(l_d) is null) then
2296:
2297: -- Validate Backflush flag.
2298: if (v_wljdi_backflush_flag(l_d) is not null and
2299: v_wljdi_backflush_flag(l_d) not in (WIP_CONSTANTS.WBF_BF_NOPAGE ,
2300: WIP_CONSTANTS.WBF_BF_PAGE)) then
2301: raise e_invalid_backflush_flag;
2302: end if;
2303: if (v_wljdi_backflush_flag(l_d) is null) then
2304: v_wljdi_backflush_flag(l_d) :=0;
3872: end if;
3873:
3874: if l_basis_type is null then
3875: l_basis_type := l_res_default_basis_type;
3876: elsif l_basis_type not in (WIP_CONSTANTS.PER_ITEM,
3877: WIP_CONSTANTS.PER_LOT) then
3878: raise e_inv_res_basis_type;
3879: end if;
3880:
3873:
3874: if l_basis_type is null then
3875: l_basis_type := l_res_default_basis_type;
3876: elsif l_basis_type not in (WIP_CONSTANTS.PER_ITEM,
3877: WIP_CONSTANTS.PER_LOT) then
3878: raise e_inv_res_basis_type;
3879: end if;
3880:
3881: if l_res_autocharge_type = WIP_CONSTANTS.PO_MOVE then
3877: WIP_CONSTANTS.PER_LOT) then
3878: raise e_inv_res_basis_type;
3879: end if;
3880:
3881: if l_res_autocharge_type = WIP_CONSTANTS.PO_MOVE then
3882: raise e_inv_res_charge_type;
3883: end if;
3884:
3885: if l_res_autocharge_type is null then
3886: raise e_inv_resource_charge_type;
3887: end if;
3888:
3889: if l_sch_flag is null then
3890: l_sch_flag := WIP_CONSTANTS.SCHED_NO;
3891: elsif l_sch_flag not in (WIP_CONSTANTS.SCHED_YES,
3892: WIP_CONSTANTS.SCHED_NO,
3893: WIP_CONSTANTS.SCHED_PRIOR,
3894: WIP_CONSTANTS.SCHED_NEXT) then
3887: end if;
3888:
3889: if l_sch_flag is null then
3890: l_sch_flag := WIP_CONSTANTS.SCHED_NO;
3891: elsif l_sch_flag not in (WIP_CONSTANTS.SCHED_YES,
3892: WIP_CONSTANTS.SCHED_NO,
3893: WIP_CONSTANTS.SCHED_PRIOR,
3894: WIP_CONSTANTS.SCHED_NEXT) then
3895: raise e_inv_res_sch_flag;
3888:
3889: if l_sch_flag is null then
3890: l_sch_flag := WIP_CONSTANTS.SCHED_NO;
3891: elsif l_sch_flag not in (WIP_CONSTANTS.SCHED_YES,
3892: WIP_CONSTANTS.SCHED_NO,
3893: WIP_CONSTANTS.SCHED_PRIOR,
3894: WIP_CONSTANTS.SCHED_NEXT) then
3895: raise e_inv_res_sch_flag;
3896: end if;
3889: if l_sch_flag is null then
3890: l_sch_flag := WIP_CONSTANTS.SCHED_NO;
3891: elsif l_sch_flag not in (WIP_CONSTANTS.SCHED_YES,
3892: WIP_CONSTANTS.SCHED_NO,
3893: WIP_CONSTANTS.SCHED_PRIOR,
3894: WIP_CONSTANTS.SCHED_NEXT) then
3895: raise e_inv_res_sch_flag;
3896: end if;
3897:
3890: l_sch_flag := WIP_CONSTANTS.SCHED_NO;
3891: elsif l_sch_flag not in (WIP_CONSTANTS.SCHED_YES,
3892: WIP_CONSTANTS.SCHED_NO,
3893: WIP_CONSTANTS.SCHED_PRIOR,
3894: WIP_CONSTANTS.SCHED_NEXT) then
3895: raise e_inv_res_sch_flag;
3896: end if;
3897:
3898: if l_assg_units <=0 or l_assg_units is null then
5811: where exists ( select 1
5812: from wip_discrete_jobs
5813: where wip_entity_id = p_wip_entity_id
5814: and organization_id = p_org_id
5815: and job_type = WIP_CONSTANTS.STANDARD
5816: and primary_item_id = l_item_id );
5817:
5818: raise e_no_assy_as_comp;
5819:
5837: end;*/
5838:
5839: ---Validate wip supply type
5840:
5841: if l_wip_supply_type= WIP_CONSTANTS.PHANTOM then
5842: raise e_phantom_comp;
5843: end if;
5844:
5845: if l_wip_supply_type not in (WIP_CONSTANTS.PUSH,
5841: if l_wip_supply_type= WIP_CONSTANTS.PHANTOM then
5842: raise e_phantom_comp;
5843: end if;
5844:
5845: if l_wip_supply_type not in (WIP_CONSTANTS.PUSH,
5846: WIP_CONSTANTS.ASSY_PULL,
5847: WIP_CONSTANTS.OP_PULL,
5848: WIP_CONSTANTS.BULK,
5849: WIP_CONSTANTS.VENDOR) or l_wip_supply_type is null then
5842: raise e_phantom_comp;
5843: end if;
5844:
5845: if l_wip_supply_type not in (WIP_CONSTANTS.PUSH,
5846: WIP_CONSTANTS.ASSY_PULL,
5847: WIP_CONSTANTS.OP_PULL,
5848: WIP_CONSTANTS.BULK,
5849: WIP_CONSTANTS.VENDOR) or l_wip_supply_type is null then
5850: raise e_invalid_wip_supply_type;
5843: end if;
5844:
5845: if l_wip_supply_type not in (WIP_CONSTANTS.PUSH,
5846: WIP_CONSTANTS.ASSY_PULL,
5847: WIP_CONSTANTS.OP_PULL,
5848: WIP_CONSTANTS.BULK,
5849: WIP_CONSTANTS.VENDOR) or l_wip_supply_type is null then
5850: raise e_invalid_wip_supply_type;
5851: end if;
5844:
5845: if l_wip_supply_type not in (WIP_CONSTANTS.PUSH,
5846: WIP_CONSTANTS.ASSY_PULL,
5847: WIP_CONSTANTS.OP_PULL,
5848: WIP_CONSTANTS.BULK,
5849: WIP_CONSTANTS.VENDOR) or l_wip_supply_type is null then
5850: raise e_invalid_wip_supply_type;
5851: end if;
5852:
5845: if l_wip_supply_type not in (WIP_CONSTANTS.PUSH,
5846: WIP_CONSTANTS.ASSY_PULL,
5847: WIP_CONSTANTS.OP_PULL,
5848: WIP_CONSTANTS.BULK,
5849: WIP_CONSTANTS.VENDOR) or l_wip_supply_type is null then
5850: raise e_invalid_wip_supply_type;
5851: end if;
5852:
5853: --check if component already defined for given job and operation.
5905: raise e_invalid_qpa;
5906: end if;*/
5907: l_quantity_per_assembly := (l_req_qty/l_sched_qty);
5908:
5909: if l_mrp_net_flag is null or l_mrp_net_flag not in (WIP_CONSTANTS.YES,WIP_CONSTANTS.NO)then
5910: raise e_invalid_mrp_net_flag;
5911: end if;
5912:
5913: -- For Adhoc components Bill QPA is considered as 1.
5914: --p_v_comp(l_i).component_yield := round(1/l_quantity_per_assembly,6);
5915: p_v_comp(l_i).component_yield := 1;
5916: p_v_comp(l_i).qpa:=l_quantity_per_assembly;
5917:
5918: if(l_wip_supply_type in (WIP_CONSTANTS.ASSY_PULL,WIP_CONSTANTS.OP_PULL) and
5919: l_supply_subinventory IS NULL) then
5920:
5921: select wip_supply_subinventory, wip_supply_locator_id
5922: into l_supply_subinventory, l_supply_locator_id
5953: when others then
5954: raise e_invalid_item;
5955: end;*/
5956:
5957: if l_wip_supply_type not in (WIP_CONSTANTS.PUSH,
5958: WIP_CONSTANTS.ASSY_PULL,
5959: WIP_CONSTANTS.OP_PULL,
5960: WIP_CONSTANTS.BULK,
5961: WIP_CONSTANTS.VENDOR,
5954: raise e_invalid_item;
5955: end;*/
5956:
5957: if l_wip_supply_type not in (WIP_CONSTANTS.PUSH,
5958: WIP_CONSTANTS.ASSY_PULL,
5959: WIP_CONSTANTS.OP_PULL,
5960: WIP_CONSTANTS.BULK,
5961: WIP_CONSTANTS.VENDOR,
5962: WIP_CONSTANTS.PHANTOM) or l_wip_supply_type is null then
5955: end;*/
5956:
5957: if l_wip_supply_type not in (WIP_CONSTANTS.PUSH,
5958: WIP_CONSTANTS.ASSY_PULL,
5959: WIP_CONSTANTS.OP_PULL,
5960: WIP_CONSTANTS.BULK,
5961: WIP_CONSTANTS.VENDOR,
5962: WIP_CONSTANTS.PHANTOM) or l_wip_supply_type is null then
5963: raise e_invalid_wip_supply_type;
5956:
5957: if l_wip_supply_type not in (WIP_CONSTANTS.PUSH,
5958: WIP_CONSTANTS.ASSY_PULL,
5959: WIP_CONSTANTS.OP_PULL,
5960: WIP_CONSTANTS.BULK,
5961: WIP_CONSTANTS.VENDOR,
5962: WIP_CONSTANTS.PHANTOM) or l_wip_supply_type is null then
5963: raise e_invalid_wip_supply_type;
5964: end if;
5957: if l_wip_supply_type not in (WIP_CONSTANTS.PUSH,
5958: WIP_CONSTANTS.ASSY_PULL,
5959: WIP_CONSTANTS.OP_PULL,
5960: WIP_CONSTANTS.BULK,
5961: WIP_CONSTANTS.VENDOR,
5962: WIP_CONSTANTS.PHANTOM) or l_wip_supply_type is null then
5963: raise e_invalid_wip_supply_type;
5964: end if;
5965:
5958: WIP_CONSTANTS.ASSY_PULL,
5959: WIP_CONSTANTS.OP_PULL,
5960: WIP_CONSTANTS.BULK,
5961: WIP_CONSTANTS.VENDOR,
5962: WIP_CONSTANTS.PHANTOM) or l_wip_supply_type is null then
5963: raise e_invalid_wip_supply_type;
5964: end if;
5965:
5966: --check if component already defined for given job and operation.
6035: end if; */
6036:
6037: l_quantity_per_assembly := (l_req_qty/l_sched_qty);
6038:
6039: if l_mrp_net_flag is null or l_mrp_net_flag not in (WIP_CONSTANTS.YES,WIP_CONSTANTS.NO)then
6040: raise e_invalid_mrp_net_flag;
6041: end if;
6042:
6043: -- For Adhoc components Bill QPA is considered as 1.
6045:
6046: p_v_comp(l_i).component_yield := 1;
6047: p_v_comp(l_i).qpa:=l_quantity_per_assembly;
6048:
6049: if(l_wip_supply_type in (WIP_CONSTANTS.ASSY_PULL,WIP_CONSTANTS.OP_PULL) and
6050: l_supply_subinventory IS NULL) then
6051:
6052: select wip_supply_subinventory, wip_supply_locator_id
6053: into l_supply_subinventory, l_supply_locator_id
6293: error_code,
6294: error_msg,
6295: num_of_children
6296: from wsm_lot_job_interface
6297: where process_status = WIP_CONSTANTS.PENDING
6298: and NVL(transaction_date, creation_date) <= sysdate+1
6299: and NVL(group_id, -99) = NVL(p_group_id, NVL(group_id, -99))
6300: and load_type in (5,6)
6301: order by load_type;
6310: process_status,
6311: error_code,
6312: error_msg
6313: from wsm_lot_job_dtl_interface
6314: where process_status = WIP_CONSTANTS.PENDING
6315: and parent_header_id IS NULL
6316: and NVL(group_id, -99) = NVL(p_group_id, NVL(group_id, -99))
6317: and transaction_date <= sysdate+1;
6318:
6400: WHILE l_h <= v_wlji_header_id.last
6401: LOOP
6402: v_wlji_err_code(l_h) := 0;
6403: v_wlji_err_msg(l_h) := '';
6404: v_wlji_process_status(l_h) := WIP_CONSTANTS.RUNNING;
6405:
6406: Declare
6407: e_org_weid_error exception;
6408: Begin -- {{ check org/job_name for this header_id
6440: Exception
6441:
6442: when e_org_weid_error then
6443: l_stmt_num := 70;
6444: v_wlji_process_status(l_h) := WIP_CONSTANTS.ERROR;
6445: v_wlji_err_code(l_h) := -1;
6446: v_wlji_err_msg(l_h) := l_err_msg;
6447: fnd_file.put_line(fnd_file.log,
6448: 'Error (WLJI.Header_Id = ' || v_wlji_header_id(l_h) || ') : '
6493: WHILE l_d <= v_wljdi_record_id.last
6494: LOOP
6495: v_wljdi_err_code(l_d) := 0;
6496: v_wljdi_err_msg(l_d) := NULL;
6497: v_wljdi_process_status(l_d) := WIP_CONSTANTS.RUNNING;
6498:
6499: Declare
6500: e_org_weid_error exception;
6501: Begin -- {{ check org/job_name for this header_id
6532:
6533: Exception
6534: when e_org_weid_error then
6535: l_stmt_num := 130;
6536: v_wljdi_process_status(l_d) := WIP_CONSTANTS.ERROR;
6537: v_wljdi_err_code(l_d) := -1;
6538: v_wljdi_err_msg(l_d) := l_err_msg;
6539: fnd_file.put_line(fnd_file.log,
6540: 'Error: WLJDI(Record_Id = ' || v_wljdi_record_id(l_d) ||') '
6664: if(l_h_rows > 0) then
6665: l_h := v_wlji_header_id.first;
6666: WHILE l_h <= v_wlji_header_id.last
6667: LOOP
6668: if v_wlji_process_status(l_h) <> WIP_CONSTANTS.ERROR then
6669: l_job_name_hash := dbms_utility.get_hash_value(
6670: v_wlji_job_name(l_h) || v_wlji_org_id(l_h),
6671: 37, 1073741824);
6672: if not l_v_job_gid.exists(l_job_name_hash) then -- one new job name
6693: if(l_d_rows > 0) then
6694: l_d := v_wljdi_record_id.first;
6695: WHILE l_d <= v_wljdi_record_id.last
6696: LOOP
6697: if v_wljdi_process_status(l_d) <> WIP_CONSTANTS.ERROR then
6698: l_job_name_hash := dbms_utility.get_hash_value(
6699: v_wljdi_job_name(l_d) || v_wljdi_org_id(l_d),
6700: 37, 1073741824);
6701: if not l_v_job_gid.exists(l_job_name_hash) then -- a new job
6961: num_of_children
6962: --, NVL(infinite_schedule_flag, 'N')
6963: from wsm_lot_job_interface
6964: where group_id = p_group_id
6965: and process_status = 2 -- WIP_CONSTANTS.RUNNING;
6966: order by organization_id,
6967: load_type,
6968: NVL(transaction_date, creation_date),
6969: priority,
6973: select unique
6974: wip_entity_id,
6975: organization_id
6976: from wsm_lot_job_dtl_interface
6977: where process_status = WIP_CONSTANTS.RUNNING
6978: and parent_header_id IS NULL
6979: and group_id = p_group_id
6980: and transaction_date <= sysdate+1
6981: order by organization_id;
7516:
7517: l_stmt_num := 115;
7518: -- Validate: STATUS TYPE
7519: if v_wlji_status_type(v_idx) not in (
7520: WIP_CONSTANTS.UNRELEASED,
7521: WIP_CONSTANTS.RELEASED,
7522: WIP_CONSTANTS.HOLD,
7523: WIP_CONSTANTS.CANCELLED
7524: ) then
7517: l_stmt_num := 115;
7518: -- Validate: STATUS TYPE
7519: if v_wlji_status_type(v_idx) not in (
7520: WIP_CONSTANTS.UNRELEASED,
7521: WIP_CONSTANTS.RELEASED,
7522: WIP_CONSTANTS.HOLD,
7523: WIP_CONSTANTS.CANCELLED
7524: ) then
7525: l_aux_mesg := '';
7518: -- Validate: STATUS TYPE
7519: if v_wlji_status_type(v_idx) not in (
7520: WIP_CONSTANTS.UNRELEASED,
7521: WIP_CONSTANTS.RELEASED,
7522: WIP_CONSTANTS.HOLD,
7523: WIP_CONSTANTS.CANCELLED
7524: ) then
7525: l_aux_mesg := '';
7526: handle_invalid_field('STATUS TYPE', l_aux_mesg, l_stmt_num);
7519: if v_wlji_status_type(v_idx) not in (
7520: WIP_CONSTANTS.UNRELEASED,
7521: WIP_CONSTANTS.RELEASED,
7522: WIP_CONSTANTS.HOLD,
7523: WIP_CONSTANTS.CANCELLED
7524: ) then
7525: l_aux_mesg := '';
7526: handle_invalid_field('STATUS TYPE', l_aux_mesg, l_stmt_num);
7527: l_error_code := -1;
7603: -- Now wip_entity_id is available, check job status
7604: begin
7605: l_stmt_num := 140.2;
7606: -- For unreleased jobs allow job name update if wip_entity_id is not null - fix for bug5990761
7607: select decode(wdj.status_type, WIP_CONSTANTS.UNRELEASED, NVL(v_wlji_job_name(v_idx),we.wip_entity_name), we.wip_entity_name)
7608: into v_wlji_job_name(v_idx)
7609: from wip_discrete_jobs wdj,
7610: wip_entities we
7611: where wdj.wip_entity_id = v_wlji_wip_entity_id(v_idx)
7609: from wip_discrete_jobs wdj,
7610: wip_entities we
7611: where wdj.wip_entity_id = v_wlji_wip_entity_id(v_idx)
7612: and wdj.status_type in (
7613: WIP_CONSTANTS.UNRELEASED,
7614: WIP_CONSTANTS.RELEASED,
7615: WIP_CONSTANTS.HOLD,
7616: WIP_CONSTANTS.CANCELLED)
7617: and wdj.wip_entity_id = we.wip_entity_id
7610: wip_entities we
7611: where wdj.wip_entity_id = v_wlji_wip_entity_id(v_idx)
7612: and wdj.status_type in (
7613: WIP_CONSTANTS.UNRELEASED,
7614: WIP_CONSTANTS.RELEASED,
7615: WIP_CONSTANTS.HOLD,
7616: WIP_CONSTANTS.CANCELLED)
7617: and wdj.wip_entity_id = we.wip_entity_id
7618: and we.organization_id = v_wlji_org_id(v_idx);
7611: where wdj.wip_entity_id = v_wlji_wip_entity_id(v_idx)
7612: and wdj.status_type in (
7613: WIP_CONSTANTS.UNRELEASED,
7614: WIP_CONSTANTS.RELEASED,
7615: WIP_CONSTANTS.HOLD,
7616: WIP_CONSTANTS.CANCELLED)
7617: and wdj.wip_entity_id = we.wip_entity_id
7618: and we.organization_id = v_wlji_org_id(v_idx);
7619: exception
7612: and wdj.status_type in (
7613: WIP_CONSTANTS.UNRELEASED,
7614: WIP_CONSTANTS.RELEASED,
7615: WIP_CONSTANTS.HOLD,
7616: WIP_CONSTANTS.CANCELLED)
7617: and wdj.wip_entity_id = we.wip_entity_id
7618: and we.organization_id = v_wlji_org_id(v_idx);
7619: exception
7620: when others then
8911: -----------------------------------------------------
8912:
8913: l_stmt_num := 380;
8914: -- {{ Validate Date_Released, job_type 1 and 3
8915: if (v_wlji_status_type(v_idx) = WIP_CONSTANTS.UNRELEASED) and
8916: (v_wlji_date_released(v_idx) is not null ) then
8917:
8918: v_wlji_date_released(v_idx) := null;
8919: if lbji_debug = 'Y' then
8919: if lbji_debug = 'Y' then
8920: fnd_file.put_line(fnd_file.log,
8921: 'Date_Released is ignored for unreleased job');
8922: end if;
8923: elsif (v_wlji_status_type(v_idx) = WIP_CONSTANTS.RELEASED ) then
8924: if (v_wlji_date_released(v_idx) > sysdate ) then
8925: l_error_code := -1;
8926: handle_errmsg_name('WIP', 'WIP_INVALID_RELEASE_DATE', l_stmt_num);
8927: l_error_count := l_error_count + 1;
10080: -- 2. user updates only quantity (increases) for a released job, status is unchanged
10081: -- 3. user updates staus to released, and increases quantity.
10082:
10083: if WSMPLCVA.v_org(v_wlji_org_id(v_idx)).PO_CREATION_TIME
10084: <> WIP_CONSTANTS.MANUAL_CREATION
10085: then
10086: if (v_wlji_status_type(v_idx) = 3 and l_cur_status_type = 1) then
10087: if wsmputil.check_osp_operation(
10088: v_wlji_wip_entity_id(v_idx),
10095: p_organization_id => v_wlji_org_id(v_idx),
10096: p_repetitive_schedule_id => null,
10097: p_operation_seq_num => l_osp_op_seq_num,
10098: p_resource_seq_num => null,
10099: p_run_reqimport => wip_constants.no);
10100: end if; -- check_osp_operation
10101: end if;
10102: l_stmt_num := 740.1;
10103: if (v_wlji_start_quantity(v_idx) > l_cur_start_qty) AND
10109: p_repetitive_schedule_id => null,
10110: p_added_quantity => (v_wlji_start_quantity(v_idx) - l_cur_start_qty),
10111: p_op_seq => null);
10112: end if;
10113: end if; -- WIP_CONSTANTS.MANUAL_CREATION
10114: -- }} osp end
10115:
10116: l_stmt_num := 750;
10117: -- {{ Validate net-quantity
10275:
10276: -- BA: BUG 3479666
10277: ELSIF v_wlji_scheduling_method(v_idx) = 1 THEN
10278: if(v_wlji_fusd(v_idx) is not null) then
10279: l_scheduling_mode := WIP_CONSTANTS.FORWARDS;
10280: else
10281: l_scheduling_mode := WIP_CONSTANTS.BACKWARDS;
10282: end if;
10283: -- EA: BUG 3479666
10277: ELSIF v_wlji_scheduling_method(v_idx) = 1 THEN
10278: if(v_wlji_fusd(v_idx) is not null) then
10279: l_scheduling_mode := WIP_CONSTANTS.FORWARDS;
10280: else
10281: l_scheduling_mode := WIP_CONSTANTS.BACKWARDS;
10282: end if;
10283: -- EA: BUG 3479666
10284:
10285: ELSIF v_wlji_scheduling_method(v_idx) = 2 THEN
10589: -- Added code to restrict serial tagged components also.
10590: if( dummy_number <> 1 or
10591: inv_cache.get_serial_tagged(v_wlji_org_id(v_idx),
10592: v_wsli(v_wlji_src_line_id(v_idx)).inventory_item_id,
10593: WIP_CONSTANTS.ISSCOMP_TYPE ) = WIP_CONSTANTS.SER_TAGGED ) then
10594: l_error_code := -1;
10595: handle_errmsg_name('WSM',
10596: 'WSM_SERIAL_COMP_NOT_SUPPORTED',
10597: l_stmt_num);
11057: -- last_unit_completion_date),
11058: -- ED: BUG 3479666
11059: scheduled_quantity
11060: = round(v_wlji_start_quantity(v_idx),
11061: wip_constants.max_displayed_precision),
11062: quantity_in_queue
11063: = decode(v_wlji_status_type(v_idx),
11064: 1, 0,
11065: 3, decode(l_cur_status_type,
11065: 3, decode(l_cur_status_type,
11066: 1, decode(operation_seq_num,
11067: g_op_seq_incr,
11068: round(v_wlji_start_quantity(v_idx),
11069: wip_constants.max_displayed_precision),
11070: quantity_in_queue),
11071: decode(l_qntydiff,
11072: 1, decode(operation_seq_num,
11073: g_op_seq_incr,
11071: decode(l_qntydiff,
11072: 1, decode(operation_seq_num,
11073: g_op_seq_incr,
11074: round(v_wlji_start_quantity(v_idx),
11075: wip_constants.max_displayed_precision),
11076: quantity_in_queue),
11077: quantity_in_queue)),
11078: quantity_in_queue),
11079: last_updated_by = v_wlji_last_updt_by(v_idx),
11262: l_stmt_num := 950.3;
11263: wsm_reservations_pvt.modify_reservations_jobupdate (
11264:
11265: p_wip_entity_id => v_wlji_wip_entity_id(v_idx),
11266: p_old_net_qty => round(v_wlji_net_quantity(v_idx),wip_constants.max_displayed_precision),
11267: p_new_net_qty => round(v_wlji_net_quantity(v_idx),wip_constants.max_displayed_precision),
11268: p_inventory_item_id => v_wlji_item_id(v_idx),
11269: p_org_id => v_wlji_org_id(v_idx),
11270: p_status_type => v_wlji_status_type(v_idx),
11263: wsm_reservations_pvt.modify_reservations_jobupdate (
11264:
11265: p_wip_entity_id => v_wlji_wip_entity_id(v_idx),
11266: p_old_net_qty => round(v_wlji_net_quantity(v_idx),wip_constants.max_displayed_precision),
11267: p_new_net_qty => round(v_wlji_net_quantity(v_idx),wip_constants.max_displayed_precision),
11268: p_inventory_item_id => v_wlji_item_id(v_idx),
11269: p_org_id => v_wlji_org_id(v_idx),
11270: p_status_type => v_wlji_status_type(v_idx),
11271: x_return_status => l_return_status,
11364:
11365: wsm_reservations_pvt.modify_reservations_jobupdate (
11366: p_wip_entity_id => v_wlji_wip_entity_id(v_idx),
11367: p_old_net_qty => l_net_qty_old ,
11368: p_new_net_qty => round(v_wlji_net_quantity(v_idx),wip_constants.max_displayed_precision),
11369: p_inventory_item_id => v_wlji_item_id(v_idx),
11370: p_org_id => v_wlji_org_id(v_idx),
11371: p_status_type => v_wlji_status_type(v_idx),
11372: x_return_status => l_return_status,
11402: alternate_bom_designator = v_wlji_alt_bom(v_idx),
11403: alternate_routing_designator= v_wlji_alt_rtg(v_idx),
11404: firm_planned_flag = v_wlji_firm_planned_flag(v_idx),
11405: start_quantity = nvl(round(v_wlji_start_quantity(v_idx),
11406: wip_constants.max_displayed_precision),
11407: wdj.start_quantity),
11408: net_quantity = nvl(round(v_wlji_net_quantity(v_idx),
11409: wip_constants.max_displayed_precision),
11410: wdj.net_quantity),
11405: start_quantity = nvl(round(v_wlji_start_quantity(v_idx),
11406: wip_constants.max_displayed_precision),
11407: wdj.start_quantity),
11408: net_quantity = nvl(round(v_wlji_net_quantity(v_idx),
11409: wip_constants.max_displayed_precision),
11410: wdj.net_quantity),
11411: lot_number = decode(wdj.status_type, WIP_CONSTANTS.UNRELEASED,
11412: v_wlji_job_name(v_idx),wdj.lot_number), -- fix for bug5990761
11413: status_type = nvl(v_wlji_status_type(v_idx),wdj.status_type),
11407: wdj.start_quantity),
11408: net_quantity = nvl(round(v_wlji_net_quantity(v_idx),
11409: wip_constants.max_displayed_precision),
11410: wdj.net_quantity),
11411: lot_number = decode(wdj.status_type, WIP_CONSTANTS.UNRELEASED,
11412: v_wlji_job_name(v_idx),wdj.lot_number), -- fix for bug5990761
11413: status_type = nvl(v_wlji_status_type(v_idx),wdj.status_type),
11414: date_released = v_wlji_date_released(v_idx), -- bug 2697295
11415: scheduled_start_date = decode(l_txnexist, 0,
11537: from wsm_lot_based_jobs
11538: where wip_entity_id = v_wlji_wip_entity_id(v_idx);
11539: l_stmt_num := 985.1;
11540: if(l_on_reco_path = 'Y' ) then
11541: if(l_scheduling_mode = WIP_CONSTANTS.FORWARDS) then
11542: l_start_date := v_wlji_fusd(v_idx);
11543: l_end_date := null;
11544: else
11545: l_start_date := null;
11576:
11577: l_stmt_num := 990;
11578: -- {{ Releasing job, insert period balance
11579: if (v_wlji_load_type(v_idx) = 6 AND
11580: v_wlji_status_type(v_idx) = WIP_CONSTANTS.RELEASED and
11581: l_cur_status_type = WIP_CONSTANTS.UNRELEASED)
11582: then
11583:
11584: --
11577: l_stmt_num := 990;
11578: -- {{ Releasing job, insert period balance
11579: if (v_wlji_load_type(v_idx) = 6 AND
11580: v_wlji_status_type(v_idx) = WIP_CONSTANTS.RELEASED and
11581: l_cur_status_type = WIP_CONSTANTS.UNRELEASED)
11582: then
11583:
11584: --
11585: -- Begin R12Dev Update to set the current_job/rtg_op_seq_num on WLBJ
12367: request_id = fnd_global.conc_request_id,
12368: program_id = fnd_global.conc_program_id,
12369: program_application_id = fnd_global.prog_appl_id
12370: where parent_header_id IS NULL
12371: and process_status = WIP_CONSTANTS.RUNNING
12372: and wip_entity_id = l_v_d_we_id_err(i)
12373: and organization_id = l_v_d_org_id_err(i);
12374:
12375: errbuf := 'The interface process marked at least one row as errored';
12381: if(l_d_idx_ok > 1) then
12382: forall i in l_v_d_we_id_ok.first..l_v_d_we_id_ok.last
12383: delete from wsm_lot_job_dtl_interface
12384: where parent_header_id IS NULL
12385: and process_status = WIP_CONSTANTS.RUNNING
12386: and wip_entity_id = l_v_d_we_id_ok(i)
12387: and organization_id = l_v_d_org_id_ok(i);
12388: end if;
12389: end if; -- l_d_jobs > 0
12722: l_scheduled_compl_date := p_job_scheduled_compl_date;
12723:
12724: if(p_infinite_schedule = 'Y') then
12725: if(p_job_scheduled_start_date IS NULL) then
12726: l_sch_mode := WIP_CONSTANTS.BACKWARDS;
12727: l_sch_date := p_job_scheduled_compl_date;
12728: else
12729: l_sch_mode := WIP_CONSTANTS.FORWARDS;
12730: l_sch_date := p_job_scheduled_start_date;
12725: if(p_job_scheduled_start_date IS NULL) then
12726: l_sch_mode := WIP_CONSTANTS.BACKWARDS;
12727: l_sch_date := p_job_scheduled_compl_date;
12728: else
12729: l_sch_mode := WIP_CONSTANTS.FORWARDS;
12730: l_sch_date := p_job_scheduled_start_date;
12731: end if;
12732: -- force import_lot_job_details to get scheduled_start_date
12733: -- and scheduled_compl_date from WDJ in such case
13001: p_rtg_op_seq_num => p_rtg_op_seq_num,
13002: p_error_code => p_error_code,
13003: p_error_msg => p_error_msg,
13004: p_src_client_server => 0,
13005: p_po_creation_time => wip_constants.manual_creation); -- default is not to create PO
13006:
13007: END build_job_detail_info;
13008:
13009:
14481: p_organization_id => p_org_id,
14482: p_repetitive_schedule_id => null,
14483: p_operation_seq_num => p_job_op_seq_num,
14484: p_resource_seq_num => v_wljdi_resource_seq_num(l_index),
14485: p_run_reqimport => wip_constants.no
14486: );
14487:
14488: g_num_of_osp_exists := nvl(g_num_of_osp_exists,0) + 1;
14489:
15096: cumulative_yield, /*Added for bugfix:7248992 */
15097: reverse_cumulative_yield/*Added for bugfix:7248992 */
15098: from wsm_lot_job_dtl_interface
15099: where parent_header_id = p_parent_header_id
15100: and process_status = WIP_CONSTANTS.RUNNING
15101: order by load_type,
15102: NVL(parent_resource_seq_num,0), -- Detailed Scheduling Code review remark...
15103: -- (Moved parent resource_seq_num before substitution_type so that setup resources are processed after runtime resource
15104: -- ST : Detailed Scheduling Added to grpup the new setup resources for a runtime resource together
15224: from wsm_lot_job_dtl_interface
15225: where parent_header_id IS NULL
15226: and wip_entity_id = p_wip_entity_id
15227: and organization_id = p_org_id
15228: and process_status = WIP_CONSTANTS.RUNNING
15229: and NVL(group_id, -1) = NVL(p_group_id, -1)
15230: order by load_type,
15231: NVL(parent_resource_seq_num,0),
15232: -- Detailed Scheduling Code review remark...
15376: l_job_qty_scrapped
15377: from wip_discrete_jobs
15378: where wip_entity_id = p_wip_entity_id;
15379:
15380: if(l_job_status = WIP_CONSTANTS.UNRELEASED) then
15381: l_cur_job_op_seq_num := g_op_seq_incr;
15382: l_cur_rtg_op_seq_num := l_start_op_seq_num;
15383: l_cur_op_seq_id := l_start_op_seq_id;
15384: l_cur_job_qty := l_job_start_qty;
15625: recommended
15626: from wsm_lot_job_dtl_interface
15627: where ((parent_header_id = p_parent_header_id)
15628: or (parent_header_id IS NULL and wip_entity_id = p_wip_entity_id and organization_id = p_org_id and NVL(group_id, -1) = NVL(p_group_id, -1)))
15629: and process_status = WIP_CONSTANTS.RUNNING
15630: and (job_op_seq_num=g_op_seq_incr and routing_op_seq_num=l_start_op_seq_num)
15631: and load_type <> 5
15632: and ((load_type=3 and substitution_type not in (1,2))
15633: or (load_type=1 and substitution_type not in (1,2))));
15664: end;
15665: end if;
15666: exception
15667: when no_data_found then
15668: if (l_job_status IN ( WIP_CONSTANTS.COMP_CHRG,
15669: WIP_CONSTANTS.COMP_NOCHRG,
15670: WIP_CONSTANTS.CLOSED) )
15671: then
15672: l_cur_job_op_seq_num := null;
15665: end if;
15666: exception
15667: when no_data_found then
15668: if (l_job_status IN ( WIP_CONSTANTS.COMP_CHRG,
15669: WIP_CONSTANTS.COMP_NOCHRG,
15670: WIP_CONSTANTS.CLOSED) )
15671: then
15672: l_cur_job_op_seq_num := null;
15673: l_cur_rtg_op_seq_num := l_end_op_seq_num;
15666: exception
15667: when no_data_found then
15668: if (l_job_status IN ( WIP_CONSTANTS.COMP_CHRG,
15669: WIP_CONSTANTS.COMP_NOCHRG,
15670: WIP_CONSTANTS.CLOSED) )
15671: then
15672: l_cur_job_op_seq_num := null;
15673: l_cur_rtg_op_seq_num := l_end_op_seq_num;
15674: l_cur_op_seq_id := l_end_op_seq_id;
16291: from dual
16292: where exists ( SELECT 1
16293: FROM bom_std_op_resources bsor
16294: WHERE bsor.standard_operation_id = v_wljdi_std_op_id(l_d)
16295: AND bsor.autocharge_type = WIP_CONSTANTS.PO_MOVE)
16296: or exists ( SELECT 1
16297: FROM bom_std_sub_op_resources bsor
16298: WHERE bsor.standard_operation_id = v_wljdi_std_op_id(l_d)
16299: AND bsor.autocharge_type = WIP_CONSTANTS.PO_MOVE);
16295: AND bsor.autocharge_type = WIP_CONSTANTS.PO_MOVE)
16296: or exists ( SELECT 1
16297: FROM bom_std_sub_op_resources bsor
16298: WHERE bsor.standard_operation_id = v_wljdi_std_op_id(l_d)
16299: AND bsor.autocharge_type = WIP_CONSTANTS.PO_MOVE);
16300: if l_temp=1 then
16301: fnd_message.set_name('WSM','WSM_OP_PO_MOVE');
16302: p_error_msg := fnd_message.get;
16303: p_error_code := - 1;
16627: where wcor.organization_id = p_org_id
16628: and wcor.wip_entity_id = p_wip_entity_id
16629: and wcor.operation_seq_num = v_wljdi_routing_op_seq_num(l_d)
16630: and wcor.recommended = 'Y'
16631: and wcor.schedule_flag <> WIP_CONSTANTS.SCHED_NO;
16632:
16633: end if;
16634: end if;
16635: l_d := v_wljdi_record_id.next(l_d);
17933: p_program_id,
17934: p_prog_updt_date);
17935:
17936: -- If resource is PO_RECIPT, we should create requisition.
17937: if l_v_res(l_resource_id).autocharge_type = WIP_CONSTANTS.PO_RECEIPT then
17938:
17939: wip_osp.create_requisition(
17940: p_wip_entity_id => p_wip_entity_id,
17941: p_organization_id => p_org_id,
17941: p_organization_id => p_org_id,
17942: p_repetitive_schedule_id => null,
17943: p_operation_seq_num => l_job_op_seq_num,
17944: p_resource_seq_num => l_v_res(l_resource_id).res_seq_num,
17945: p_run_reqimport => wip_constants.no);
17946:
17947: g_num_of_osp_exists := nvl(g_num_of_osp_exists,0) + 1;
17948:
17949: end if;
18048: p_program_id,
18049: p_prog_updt_date);
18050: END IF;
18051:
18052: if l_v_res(l_resource_id).scheduled_flag <> WIP_CONSTANTS.SCHED_NO and
18053: l_v_res(l_resource_id).reco_flag = 'Y' then
18054:
18055: insert into wip_operation_resource_usage
18056: (wip_entity_id,
18257: v_wljdi_attribute15(l_d),
18258: null);
18259:
18260: if l_v_res(l_resource_id).reco_flag='Y' and
18261: l_v_res(l_resource_id).scheduled_flag <> WIP_CONSTANTS.SCHED_NO then
18262:
18263: insert into wsm_copy_op_resource_usage
18264: (wip_entity_id,
18265: operation_seq_num,
19969: wip_picking_pvt.cancel_comp_allocations(
19970: p_wip_entity_id => p_wip_entity_id,
19971: p_operation_seq_num => l_job_op_seq_num,
19972: p_inventory_item_id => l_item_old_id,
19973: p_wip_entity_type => WIP_CONSTANTS.LOTBASED,
19974: x_return_status => x_return_status,
19975: x_msg_data => p_error_msg);
19976:
19977: if (x_return_status <> fnd_api.g_ret_sts_success) then
20278: attribute14,
20279: attribute15)
20280: select
20281: p_wip_entity_id,
20282: decode(l_v_comp(l_in).wip_supply_type, WIP_CONSTANTS.PHANTOM,(-1*l_rtg_op_seq_num),l_rtg_op_seq_num),
20283: l_v_comp(l_in).item_id,
20284: decode(nvl(v_wljdi_src_phantom_item_id(l_d),-1),-1,l_v_comp(l_in).item_id,
20285: 0,l_v_comp(l_in).item_id, v_wljdi_src_phantom_item_id(l_d)),
20286: -1, -- Since not in bill
20766: wsm_lot_job_interface wlji,
20767: mtl_system_items msi
20768: where wsli.header_id = wlji.source_line_id
20769: and wlji.group_id = p_group_id
20770: and wlji.process_status = 2 -- WIP_CONSTANTS.running
20771: and wlji.mode_flag = 2
20772: and msi.inventory_item_id = wsli.inventory_item_id
20773: and msi.organization_id = wsli.organization_id;
20774:
21410: decode(operation_seq_num,
21411: l_max_op_seq_num,
21412: (decode(p_status_type,
21413: 3, round(p_start_quantity,
21414: wip_constants.max_displayed_precision),
21415: 0)),
21416: 0)
21417: where wo.wip_entity_id = p_wip_entity_id;
21418: if lbji_debug = 'Y' then
21489: --
21490:
21491: -- bug 3311985: osp code moved from build_job_header_info
21492: -- osp begin -- this has to be put after insertion into wip_entities
21493: if p_status_type = 3 and p_po_creation_time <> wip_constants.manual_creation then
21494: if p_src_client_server = 1 then
21495: l_stmt_num := 130;
21496: if wsmputil.check_osp_operation(p_wip_entity_id, l_job_op_seq_num, p_org_id) then
21497: g_num_of_osp_exists := g_num_of_osp_exists + 1;
21500: p_organization_id => p_org_id,
21501: p_repetitive_schedule_id => null,
21502: p_operation_seq_num => l_job_op_seq_num,
21503: p_resource_seq_num => null,
21504: p_run_reqimport => wip_constants.yes);
21505: end if; -- check_osp_operation
21506: else
21507: l_stmt_num := 140;
21508: -- if build_job_info is called from form, only then P_Run_ReqImport should be YES, i.e.
21514: p_organization_id => p_org_id,
21515: p_repetitive_schedule_id => null,
21516: p_operation_seq_num => l_job_op_seq_num,
21517: p_resource_seq_num => null,
21518: p_run_reqimport => wip_constants.no);
21519: end if; -- check_osp_operation
21520: end if; -- p_src_client_server
21521: end if; -- p_status_type = 3
21522: -- osp end
21805: p_source_code,
21806: p_description,
21807: p_status_type,
21808: -- BC: bug 3382472
21809: --NVL(p_date_released, decode(p_status_type, wip_constants.unreleased, null, sysdate)),
21810: NVL(p_date_released, decode(p_status_type,
21811: wip_constants.released, sysdate,
21812: null)),
21813: -- EC: bug 3382472
21807: p_status_type,
21808: -- BC: bug 3382472
21809: --NVL(p_date_released, decode(p_status_type, wip_constants.unreleased, null, sysdate)),
21810: NVL(p_date_released, decode(p_status_type,
21811: wip_constants.released, sysdate,
21812: null)),
21813: -- EC: bug 3382472
21814: p_item,
21815: decode(p_job_type, 3, p_bom_reference_id, null),
21814: p_item,
21815: decode(p_job_type, 3, p_bom_reference_id, null),
21816: decode(p_job_type, 3, p_routing_reference_id, null),
21817: p_firm_planned_flag,
21818: decode(p_job_type, 3, wip_constants.nonstandard, wip_constants.standard),
21819: p_wip_supply_type,
21820: p_class_code,
21821: l_material_account,
21822: l_material_overhead_account,
21829: l_overhead_account,
21830: l_overhead_variance_account,
21831: trunc(p_job_scheduled_start_date,'mi'), --round(p_job_scheduled_start_date,'mi'),
21832: trunc(p_job_scheduled_compl_date,'mi'), --round(p_job_scheduled_compl_date,'mi'),
21833: round(p_start_quantity, wip_constants.max_displayed_precision),
21834: 0, -- quantity_completed
21835: 0, -- quantity_scrapped
21836: round(p_net_quantity, wip_constants.max_displayed_precision),
21837: p_common_bill_sequence_id,
21832: trunc(p_job_scheduled_compl_date,'mi'), --round(p_job_scheduled_compl_date,'mi'),
21833: round(p_start_quantity, wip_constants.max_displayed_precision),
21834: 0, -- quantity_completed
21835: 0, -- quantity_scrapped
21836: round(p_net_quantity, wip_constants.max_displayed_precision),
21837: p_common_bill_sequence_id,
21838: p_common_routing_sequence_id,
21839: p_bom_revision,
21840: p_routing_revision,
22000: end if;
22001: end if;
22002:
22003: l_stmt_num := 160;
22004: if p_status_type = WIP_CONSTANTS.RELEASED then
22005: insert_into_period_balances (
22006: p_wip_entity_id => p_wip_entity_id,
22007: p_organization_id => p_org_id,
22008: p_class_code => p_class_code,