[Home] [Help]
390: /* Start : fields added to add resource */
391: type t_wljdi_department_id is table of wsm_lot_job_dtl_interface.department_id %type;
392: type t_wljdi_department_code is table of wsm_lot_job_dtl_interface.department_code %type;
393: type t_wljdi_activity_id is table of wsm_lot_job_dtl_interface.activity_id %type;
394: type t_wljdi_standard_rate_flag is table of wsm_lot_job_dtl_interface.standard_rate_flag %type;
395: type t_wljdi_usage_rate_or_amt is table of wsm_lot_job_dtl_interface.usage_rate_or_amount %type;
396:
397: type t_wljdi_basis_type is table of wsm_lot_job_dtl_interface.basis_type %type;
398: type t_wljdi_uom_code is table of wsm_lot_job_dtl_interface.uom_code %type;
419: type t_wljdi_attribute15 is table of wsm_lot_job_dtl_interface.attribute15 %type;
420:
421: -- Added For LBJ Interface Alcoa Enhancement
422: type t_wljdi_recommended is table of wsm_lot_job_dtl_interface.recommended %type;
423: type t_wljdi_std_op_code is table of wsm_lot_job_dtl_interface.standard_operation_code %type;
424: type t_wljdi_std_op_id is table of wsm_lot_job_dtl_interface.standard_operation_id %type;
425: type t_wljdi_op_yield_enable is table of wsm_lot_job_dtl_interface.operation_yield_enabled %type;
426: type t_wljdi_min_trf_qty is table of wsm_lot_job_dtl_interface.minimum_transfer_quantity %type;
427: type t_wljdi_backflush_flag is table of wsm_lot_job_dtl_interface.backflush_flag %type;
420:
421: -- Added For LBJ Interface Alcoa Enhancement
422: type t_wljdi_recommended is table of wsm_lot_job_dtl_interface.recommended %type;
423: type t_wljdi_std_op_code is table of wsm_lot_job_dtl_interface.standard_operation_code %type;
424: type t_wljdi_std_op_id is table of wsm_lot_job_dtl_interface.standard_operation_id %type;
425: type t_wljdi_op_yield_enable is table of wsm_lot_job_dtl_interface.operation_yield_enabled %type;
426: type t_wljdi_min_trf_qty is table of wsm_lot_job_dtl_interface.minimum_transfer_quantity %type;
427: type t_wljdi_backflush_flag is table of wsm_lot_job_dtl_interface.backflush_flag %type;
428: type t_wljdi_count_point_type is table of wsm_lot_job_dtl_interface.count_point_type %type;
438: type t_wljdi_quantity_per_assembly is table of wsm_lot_job_dtl_interface.quantity_per_assembly %type;
439: type t_wljdi_supply_subinventory is table of wsm_lot_job_dtl_interface.supply_subinventory %type;
440: type t_wljdi_supply_locator_id is table of wsm_lot_job_dtl_interface.supply_locator_id %type;
441: type t_wljdi_applied_resource_units is table of wsm_lot_job_dtl_interface.applied_resource_units %type;
442: type t_desc is table of bom_standard_operations.operation_description%type index by binary_integer;
443: type t_op_code is table of bom_standard_operations.operation_code%type index by binary_integer;
444:
445: /*Added below two types for bugfix:7248992 */
446: type t_wljdi_cum_yield is table of wsm_lot_job_dtl_interface.cumulative_yield %type;
439: type t_wljdi_supply_subinventory is table of wsm_lot_job_dtl_interface.supply_subinventory %type;
440: type t_wljdi_supply_locator_id is table of wsm_lot_job_dtl_interface.supply_locator_id %type;
441: type t_wljdi_applied_resource_units is table of wsm_lot_job_dtl_interface.applied_resource_units %type;
442: type t_desc is table of bom_standard_operations.operation_description%type index by binary_integer;
443: type t_op_code is table of bom_standard_operations.operation_code%type index by binary_integer;
444:
445: /*Added below two types for bugfix:7248992 */
446: type t_wljdi_cum_yield is table of wsm_lot_job_dtl_interface.cumulative_yield %type;
447: type t_wljdi_rev_cum_yield is table of wsm_lot_job_dtl_interface.reverse_cumulative_yield %type;
517: /* Start : changes for adding resource ... */
518: v_wljdi_department_id t_wljdi_department_id := t_wljdi_department_id();
519: v_wljdi_department_code t_wljdi_department_code := t_wljdi_department_code();
520: v_wljdi_activity_id t_wljdi_activity_id := t_wljdi_activity_id();
521: v_wljdi_standard_rate_flag t_wljdi_standard_rate_flag := t_wljdi_standard_rate_flag();
522: v_wljdi_usage_rate_or_amt t_wljdi_usage_rate_or_amt := t_wljdi_usage_rate_or_amt();
523:
524: v_wljdi_basis_type t_wljdi_basis_type := t_wljdi_basis_type();
525: v_wljdi_uom_code t_wljdi_uom_code := t_wljdi_uom_code();
630: res_seq_num NUMBER,
631: sub_grp_num NUMBER,
632: rpl_grp_num NUMBER,
633: activity_id NUMBER,
634: standard_rate_flag NUMBER,
635: assigned_units NUMBER,
636: usage_rate_or_amount NUMBER,
637: usage_rate_or_amount_inverse NUMBER,
638: uom_code VARCHAR2(3),
683: basis_type NUMBER,
684: activity_id NUMBER,
685: schedule_seq_num NUMBER,
686: reco_flag VARCHAR2(1),
687: standard_rate NUMBER,
688: resource_code VARCHAR2(10)
689: );
690: type t_op_res is table of rec_op_res index by binary_integer;
691:
1283: department_code ,
1284: -- ST : Detailed Scheduling : Added for resource adding changes : end
1285: -- Added For LBJ Interface Alcoa Enhancement
1286: recommended,
1287: standard_operation_code,
1288: standard_operation_id,
1289: operation_yield_enabled,
1290: minimum_transfer_quantity,
1291: backflush_flag,
1284: -- ST : Detailed Scheduling : Added for resource adding changes : end
1285: -- Added For LBJ Interface Alcoa Enhancement
1286: recommended,
1287: standard_operation_code,
1288: standard_operation_id,
1289: operation_yield_enabled,
1290: minimum_transfer_quantity,
1291: backflush_flag,
1292: count_point_type,
1355: department_code ,
1356: /* ST : Detailed Scheduling : Added for resource adding changes : end */
1357: -- Added For LBJ Interface Alcoa Enhancement
1358: recommended,
1359: standard_operation_code,
1360: standard_operation_id,
1361: operation_yield_enabled,
1362: minimum_transfer_quantity,
1363: backflush_flag,
1356: /* ST : Detailed Scheduling : Added for resource adding changes : end */
1357: -- Added For LBJ Interface Alcoa Enhancement
1358: recommended,
1359: standard_operation_code,
1360: standard_operation_id,
1361: operation_yield_enabled,
1362: minimum_transfer_quantity,
1363: backflush_flag,
1364: count_point_type,
2188:
2189: -- Added For LBJ Interface Alcoa Enhancement
2190: if (l_sub_type = WSM_SUB_ADD) then
2191:
2192: -- This code Defaults Standard operation Id.
2193: if (v_wljdi_std_op_code(l_d) is not null) then
2194: begin
2195: select standard_operation_id
2196: into v_wljdi_std_op_id(l_d)
2191:
2192: -- This code Defaults Standard operation Id.
2193: if (v_wljdi_std_op_code(l_d) is not null) then
2194: begin
2195: select standard_operation_id
2196: into v_wljdi_std_op_id(l_d)
2197: from bom_standard_operations
2198: where organization_id = p_org_id
2199: and operation_code = v_wljdi_std_op_code(l_d)
2193: if (v_wljdi_std_op_code(l_d) is not null) then
2194: begin
2195: select standard_operation_id
2196: into v_wljdi_std_op_id(l_d)
2197: from bom_standard_operations
2198: where organization_id = p_org_id
2199: and operation_code = v_wljdi_std_op_code(l_d)
2200: and standard_operation_id = nvl(v_wljdi_std_op_id(l_d),standard_operation_id);
2201: exception
2196: into v_wljdi_std_op_id(l_d)
2197: from bom_standard_operations
2198: where organization_id = p_org_id
2199: and operation_code = v_wljdi_std_op_code(l_d)
2200: and standard_operation_id = nvl(v_wljdi_std_op_id(l_d),standard_operation_id);
2201: exception
2202: when others then
2203: raise e_inv_std_op;
2204: end;
2208: v_wljdi_std_op_code(l_d) is null) then
2209: begin
2210: select operation_code
2211: into v_wljdi_std_op_code(l_d)
2212: from bom_standard_operations
2213: where organization_id = p_org_id
2214: and standard_operation_id = v_wljdi_std_op_id(l_d);
2215: exception
2216: when others then
2210: select operation_code
2211: into v_wljdi_std_op_code(l_d)
2212: from bom_standard_operations
2213: where organization_id = p_org_id
2214: and standard_operation_id = v_wljdi_std_op_id(l_d);
2215: exception
2216: when others then
2217: raise e_inv_std_op;
2218: end;
2236: v_wljdi_backflush_flag(l_d),
2237: v_wljdi_op_yield_enable(l_d),
2238: v_wljdi_option_dep_flag(l_d),
2239: v_wljdi_inc_in_rollup(l_d)
2240: from bom_standard_operations
2241: where standard_operation_id = v_wljdi_std_op_id(l_d)
2242: and organization_id = p_org_id;
2243: exception
2244: when others then
2237: v_wljdi_op_yield_enable(l_d),
2238: v_wljdi_option_dep_flag(l_d),
2239: v_wljdi_inc_in_rollup(l_d)
2240: from bom_standard_operations
2241: where standard_operation_id = v_wljdi_std_op_id(l_d)
2242: and organization_id = p_org_id;
2243: exception
2244: when others then
2245: raise e_inv_std_op;
2598: department_id = nvl(l_v_dept_id(i),department_id),
2599: setup_id = l_v_setup_id(i), -- Added for bug fix 4704289
2600: /* ST : Detailed Scheduling end */
2601: -- Added For LBJ Interface Alcoa Enhancement
2602: standard_operation_id = l_v_std_op_id(i),
2603: operation_start_date = l_v_op_start_date(i),
2604: operation_completion_date = l_v_op_completion_date(i),
2605: minimum_transfer_quantity = l_v_min_trf_qty(i),
2606: count_point_type = l_v_count_point_type(i),
2608: backflush_flag = l_v_backflush_flag(i),
2609: operation_yield_enabled = l_v_op_yield_enable(i),
2610: option_dependent_flag = l_v_option_dep_flag(i),
2611: include_in_rollup = l_v_inc_in_rollup(i),
2612: standard_operation_code = l_v_std_op_code(i),
2613: recommended = l_v_recommended(i),
2614: inventory_item_id_old = l_v_item_old_id(i)
2615: where record_id = l_v_record_id(i);
2616:
2721: substr('default_wljdi_fields: (#'||l_stmt_num||') '
2722: || p_error_msg, 1, 2000));
2723: when e_inv_std_op then
2724: fnd_message.set_name('WSM','WSM_INVALID_FIELD');
2725: fnd_message.set_token('FLD_NAME', 'standard_operation_id/standard_operation_code combination');
2726: p_error_msg := 'WLJDI(record_id =' || v_wljdi_record_id(l_d) || ') '|| fnd_message.get;
2727: p_error_code := -1;
2728: fnd_file.put_line(fnd_file.log,substr('default_wljdi_fields: (#'||l_stmt_num||') '|| p_error_msg, 1, 2000));
2729: when e_invalid_min_trf_qty then
3162: l_res_unit_of_measure varchar2(3);
3163: l_res_default_basis_type number;
3164: l_res_default_activity_id number;
3165: l_res_autocharge_type number;
3166: l_res_standard_rate_flag number;
3167: l_res_batchable number;
3168: l_check_primary number;
3169: e_res_id_null exception;
3170: e_assgnd_units_null exception;
3839: select unit_of_measure,
3840: default_basis_type,
3841: default_activity_id,
3842: autocharge_type,
3843: standard_rate_flag,
3844: batchable,
3845: resource_code
3846: into l_res_unit_of_measure,
3847: l_res_default_basis_type,
3846: into l_res_unit_of_measure,
3847: l_res_default_basis_type,
3848: l_res_default_activity_id,
3849: l_res_autocharge_type,
3850: l_res_standard_rate_flag,
3851: l_res_batchable,
3852: l_res_code
3853: from bom_resources
3854: where resource_id=l_resource_id
4202: end if;
4203:
4204: p_v_res(l_i).res_seq_num := l_res_seq_num;
4205: p_v_res(l_i).autocharge_type := l_res_autocharge_type;
4206: p_v_res(l_i).standard_rate := nvl(l_res_standard_rate_flag,1);
4207: p_v_res(l_i).activity_id := l_activity_id;
4208: p_v_res(l_i).basis_type := l_basis_type ;
4209: p_v_res(l_i).uom_code := l_res_unit_of_measure;
4210: p_v_res(l_i).scheduled_flag := l_sch_flag;
5796: end if;
5797: end if; --p_handle_wip_cur_op end if
5798: ELSIF (p_substitution_type=WSM_SUB_ADD) THEN
5799:
5800: -- For a standard job, assembly should not be a component.
5801: begin
5802: select 1
5803: into l_comp_exist
5804: from dual
5805: where exists ( select 1
5806: from wip_discrete_jobs
5807: where wip_entity_id = p_wip_entity_id
5808: and organization_id = p_org_id
5809: and job_type = WIP_CONSTANTS.STANDARD
5810: and primary_item_id = l_item_id );
5811:
5812: raise e_no_assy_as_comp;
5813:
7449: GOTO skip_validate_constants;
7450: end if;
7451:
7452: l_stmt_num := 85;
7453: -- Dafault: job_type = 3 is non-standard job. Anything else/null => standard job
7454: if (v_wlji_job_type(v_idx) is null) or (v_wlji_job_type(v_idx) <> 3) then
7455: v_wlji_job_type(v_idx) := 1;
7456: end if;
7457:
7455: v_wlji_job_type(v_idx) := 1;
7456: end if;
7457:
7458: l_stmt_num := 95;
7459: -- Validate: mode_flag cannot be 2 for non-standard jobs, can only be 1
7460: if v_wlji_job_type(v_idx) = 3 then
7461: if v_wlji_mode_flag(v_idx) = 2 then
7462: l_aux_mesg := 'Mode Flag cannot be 2 for non-standard jobs';
7463: handle_invalid_field('MODE FlAG', l_aux_mesg, l_stmt_num);
7458: l_stmt_num := 95;
7459: -- Validate: mode_flag cannot be 2 for non-standard jobs, can only be 1
7460: if v_wlji_job_type(v_idx) = 3 then
7461: if v_wlji_mode_flag(v_idx) = 2 then
7462: l_aux_mesg := 'Mode Flag cannot be 2 for non-standard jobs';
7463: handle_invalid_field('MODE FlAG', l_aux_mesg, l_stmt_num);
7464: l_error_code := -1;
7465: GOTO skip_validate_constants;
7466: else
8310: GOTO abort_this_job;
8311: end if;
8312: if lbji_debug = 'Y' then
8313: fnd_file.put_line(fnd_file.log,
8314: 'Validate Non-standard References.. OK.');
8315: end if;
8316:
8317: end if; -- non-standard validations end
8318: ------------------------------------------------
8313: fnd_file.put_line(fnd_file.log,
8314: 'Validate Non-standard References.. OK.');
8315: end if;
8316:
8317: end if; -- non-standard validations end
8318: ------------------------------------------------
8319: -- }}} End: Validation of a non-std job creation
8320: ------------------------------------------------
8321:
8319: -- }}} End: Validation of a non-std job creation
8320: ------------------------------------------------
8321:
8322: -----------------------------------------------------
8323: -- {{{ Begin: validations for standard job creations
8324: -----------------------------------------------------
8325: if v_wlji_job_type(v_idx) = 1 then
8326:
8327: l_stmt_num := 310;
8808: -- }} get revisions
8809:
8810: end if; -- job type =1
8811: -----------------------------------------------------
8812: -- }}} End: validations for standard job creations
8813: -----------------------------------------------------
8814:
8815: l_stmt_num := 380;
8816: -- {{ Validate Date_Released, job_type 1 and 3
9425: -- Validation added for Bug 4919218: End
9426: else
9427: if lbji_debug = 'Y' then
9428: fnd_file.put_line(fnd_file.log,
9429: 'Update BOM/Routing alternates for standard job..');
9430: end if;
9431: end if;
9432:
9433: end if; -- }} if std-job
9437:
9438: --------------------------------------------
9439: -- {{{ Begin: Update of references (non-std)
9440: --------------------------------------------
9441: -- Non standard job bom/routing reference update.
9442: -- The assumption is that this module will NOT update the
9443: -- qty/dates/etc.,they will be taken care in the later modules.
9444: -- This module will just look at the reference info, and assume
9445: -- qty/date/etc to be same as the old values.
9562:
9563: end if; -- }} old_status_type = 1
9564:
9565: -- user can update the bom_reference and the routing reference of a
9566: -- non-standard job only if the job is unreleased.
9567: if (l_chg_bom_ref = 1 or l_chg_rtg_ref = 1) and
9568: l_cur_status_type <> 1
9569: then
9570: fnd_file.put_line(fnd_file.log,
9586: v_wlji_alt_rtg(v_idx) := l_cur_alt_rtg;
9587: else
9588: if lbji_debug = 'Y' then
9589: fnd_file.put_line(fnd_file.log,
9590: 'Update BOM/Routing references for non-standard job..');
9591: end if;
9592: end if;
9593:
9594: end if; -- }} job type = 3
9640: end if;
9641:
9642: if l_chg_bom_rev = 1 then
9643: -- validate bom rev/rev_date
9644: if l_cur_job_type = 1 then -- standard job
9645: l_stmt_num:= 660.1;
9646: wip_revisions.bom_revision (
9647: v_wlji_org_id(v_idx),
9648: v_wlji_item_id(v_idx),
9663: end if;
9664:
9665: if l_chg_rtg_rev = 1 then
9666: -- validate rtg rev/rev_date
9667: if l_cur_job_type = 1 then -- standard job
9668: l_stmt_num:= 670.1;
9669: wip_revisions.routing_revision (
9670: v_wlji_org_id(v_idx),
9671: v_wlji_item_id(v_idx),
13535: (BR.unit_of_measure),
13536: nvl(p_new_res_tbl(l_index).basis_type,BR.default_basis_type),
13537: uom.uom_class,
13538: br.batchable,
13539: nvl(BR.standard_rate_flag,2)
13540: into p_new_res_tbl(l_index).autocharge_type,
13541: p_new_res_tbl(l_index).uom_code,
13542: p_new_res_tbl(l_index).basis_type,
13543: l_uom_class,
13541: p_new_res_tbl(l_index).uom_code,
13542: p_new_res_tbl(l_index).basis_type,
13543: l_uom_class,
13544: l_batchable,
13545: p_new_res_tbl(l_index).standard_rate_flag
13546: from bom_resources BR,
13547: mtl_units_of_measure_vl uom
13548: where br.resource_id = p_new_res_tbl(l_index).resource_id
13549: and autocharge_type = nvl(p_new_res_tbl(l_index).autocharge_type,autocharge_type)
13548: where br.resource_id = p_new_res_tbl(l_index).resource_id
13549: and autocharge_type = nvl(p_new_res_tbl(l_index).autocharge_type,autocharge_type)
13550: and nvl(p_new_res_tbl(l_index).uom_code,br.unit_of_measure) = br.unit_of_measure -- uom.uom_code
13551: and br.unit_of_measure = uom.uom_code
13552: and nvl(BR.standard_rate_flag,-1) = nvl(nvl(p_new_res_tbl(l_index).standard_rate_flag,BR.standard_rate_flag),-1);
13553:
13554: EXCEPTION
13555: WHEN NO_DATA_FOUND THEN
13556: l_field_name := 'Resource Information';
13876: -- Now copy the values derived into the global table also..
13877: v_wljdi_uom_code(l_index) := p_new_res_tbl(l_index).uom_code;
13878: v_wljdi_basis_type(l_index) := p_new_res_tbl(l_index).basis_type;
13879: v_wljdi_res_autocharge_type(l_index) := p_new_res_tbl(l_index).autocharge_type;
13880: v_wljdi_standard_rate_flag(l_index) := p_new_res_tbl(l_index).standard_rate_flag;
13881: v_wljdi_department_id(l_index) := p_new_res_tbl(l_index).dept_id;
13882:
13883: l_index := p_new_res_tbl.next(l_index);
13884:
14110: l_new_res_tbl(l_temp).res_seq_num := v_wljdi_resource_seq_num(l_temp);
14111: l_new_res_tbl(l_temp).sub_grp_num := v_wljdi_substitute_group_num(l_temp);
14112: l_new_res_tbl(l_temp).rpl_grp_num := v_wljdi_replacement_group_num(l_temp);
14113: l_new_res_tbl(l_temp).activity_id := v_wljdi_activity_id(l_temp);
14114: l_new_res_tbl(l_temp).standard_rate_flag := v_wljdi_standard_rate_flag(l_temp);
14115: l_new_res_tbl(l_temp).assigned_units := v_wljdi_assigned_units(l_temp);
14116: l_new_res_tbl(l_temp).usage_rate_or_amount := v_wljdi_usage_rate_or_amt(l_temp);
14117: l_new_res_tbl(l_temp).usage_rate_or_amount_inverse := 0; /* calculate it shiva ..... */
14118: l_new_res_tbl(l_temp).uom_code := v_wljdi_uom_code(l_temp);
14165: l_new_res_tbl(l_temp).res_seq_num := v_wljdi_resource_seq_num(l_temp);
14166: l_new_res_tbl(l_temp).sub_grp_num := v_wljdi_substitute_group_num(l_temp);
14167: l_new_res_tbl(l_temp).rpl_grp_num := v_wljdi_replacement_group_num(l_temp);
14168: l_new_res_tbl(l_temp).activity_id := v_wljdi_activity_id(l_temp);
14169: l_new_res_tbl(l_temp).standard_rate_flag := v_wljdi_standard_rate_flag(l_temp);
14170: l_new_res_tbl(l_temp).assigned_units := v_wljdi_assigned_units(l_temp);
14171: l_new_res_tbl(l_temp).usage_rate_or_amount := v_wljdi_usage_rate_or_amt(l_temp);
14172: l_new_res_tbl(l_temp).usage_rate_or_amount_inverse := 0; /* calculate it shiva ..... */
14173: l_new_res_tbl(l_temp).uom_code := v_wljdi_uom_code(l_temp);
14261: group_sequence_number,
14262: parent_resource_seq,
14263:
14264: autocharge_type,
14265: standard_rate_flag,
14266: applied_resource_units,
14267: applied_resource_value,
14268: start_date,
14269: completion_date,
14327: v_wljdi_grp_seq_num(i),
14328: v_wljdi_parent_seq_num(i),
14329:
14330: v_wljdi_res_autocharge_type(i),
14331: v_wljdi_standard_rate_flag(i),
14332: 0,
14333: 0,
14334: v_wljdi_start_date(i),
14335: v_wljdi_completion_date(i),
14445: group_sequence_num,
14446: parent_resource_seq_num,
14447:
14448: autocharge_type,
14449: standard_rate_flag,
14450: reco_start_date,
14451: reco_completion_date,
14452:
14453: attribute_category,
14511: v_wljdi_grp_seq_num(i),
14512: v_wljdi_parent_seq_num(i),
14513:
14514: v_wljdi_res_autocharge_type(i),
14515: v_wljdi_standard_rate_flag(i),
14516: v_wljdi_start_date(i),
14517: v_wljdi_completion_date(i),
14518:
14519: v_wljdi_attribute_category(i),
14651:
14652: v_wljdi_department_id.delete(l_index);
14653: v_wljdi_department_code.delete(l_index);
14654: v_wljdi_activity_id.delete(l_index);
14655: v_wljdi_standard_rate_flag.delete(l_index);
14656: v_wljdi_usage_rate_or_amt.delete(l_index);
14657: v_wljdi_basis_type.delete(l_index);
14658: v_wljdi_uom_code.delete(l_index);
14659: v_wljdi_scheduled_flag.delete(l_index);
14927: /* ST : Detailed Scheduling : Added for resource adding changes */
14928: department_id ,
14929: department_code ,
14930: activity_id ,
14931: standard_rate_flag ,
14932: usage_rate_or_amount ,
14933: basis_type ,
14934: uom_code ,
14935: scheduled_flag ,
14953: attribute15 ,
14954: /* ST : Detailed Scheduling : Added for resource adding changes : end */
14955: -- Added For LBJ Interface Alcoa Enhancement
14956: recommended,
14957: standard_operation_code,
14958: standard_operation_id,
14959: operation_yield_enabled,
14960: minimum_transfer_quantity,
14961: backflush_flag,
14954: /* ST : Detailed Scheduling : Added for resource adding changes : end */
14955: -- Added For LBJ Interface Alcoa Enhancement
14956: recommended,
14957: standard_operation_code,
14958: standard_operation_id,
14959: operation_yield_enabled,
14960: minimum_transfer_quantity,
14961: backflush_flag,
14962: count_point_type,
15046: /* ST : Detailed Scheduling : Added for resource adding changes */
15047: department_id ,
15048: department_code ,
15049: activity_id ,
15050: standard_rate_flag ,
15051: usage_rate_or_amount ,
15052: --usage_rate_or_amount_inve ,
15053: basis_type ,
15054: uom_code ,
15078: attribute15 ,
15079: /* ST : Detailed Scheduling : Added for resource adding changes : end */
15080: -- Added For LBJ Interface Alcoa Enhancement
15081: recommended,
15082: standard_operation_code,
15083: standard_operation_id,
15084: operation_yield_enabled,
15085: minimum_transfer_quantity,
15086: backflush_flag,
15079: /* ST : Detailed Scheduling : Added for resource adding changes : end */
15080: -- Added For LBJ Interface Alcoa Enhancement
15081: recommended,
15082: standard_operation_code,
15083: standard_operation_id,
15084: operation_yield_enabled,
15085: minimum_transfer_quantity,
15086: backflush_flag,
15087: count_point_type,
15388: v_wljdi_department_id := t_wljdi_department_id();
15389: v_wljdi_department_code := t_wljdi_department_code();
15390:
15391: v_wljdi_activity_id := t_wljdi_activity_id();
15392: v_wljdi_standard_rate_flag := t_wljdi_standard_rate_flag();
15393: v_wljdi_usage_rate_or_amt := t_wljdi_usage_rate_or_amt();
15394: v_wljdi_basis_type := t_wljdi_basis_type();
15395: v_wljdi_uom_code := t_wljdi_uom_code();
15396: v_wljdi_scheduled_flag := t_wljdi_scheduled_flag();
15489: /* ST : Detailed Scheduling : Considered for adding a resource */
15490: v_wljdi_department_id ,
15491: v_wljdi_department_code ,
15492: v_wljdi_activity_id ,
15493: v_wljdi_standard_rate_flag ,
15494: v_wljdi_usage_rate_or_amt ,
15495: v_wljdi_basis_type ,
15496: v_wljdi_uom_code ,
15497: v_wljdi_scheduled_flag ,
15589: /* ST : Detailed Scheduling : Considered for adding a resource */
15590: v_wljdi_department_id ,
15591: v_wljdi_department_code ,
15592: v_wljdi_activity_id ,
15593: v_wljdi_standard_rate_flag ,
15594: v_wljdi_usage_rate_or_amt ,
15595: v_wljdi_basis_type ,
15596: v_wljdi_uom_code ,
15597: v_wljdi_scheduled_flag ,
15761: RECO_COMPLETION_DATE,
15762: OPERATION_SEQUENCE_ID,
15763: ROUTING_SEQUENCE_ID,
15764: ORGANIZATION_ID,
15765: STANDARD_OPERATION_ID,
15766: STANDARD_OPERATION_CODE,
15767: DEPARTMENT_ID,
15768: DEPARTMENT_CODE,
15769: SCRAP_ACCOUNT,
15762: OPERATION_SEQUENCE_ID,
15763: ROUTING_SEQUENCE_ID,
15764: ORGANIZATION_ID,
15765: STANDARD_OPERATION_ID,
15766: STANDARD_OPERATION_CODE,
15767: DEPARTMENT_ID,
15768: DEPARTMENT_CODE,
15769: SCRAP_ACCOUNT,
15770: EST_ABSORPTION_ACCOUNT,
15914: into l_temp
15915: from dual
15916: where exists ( SELECT 1
15917: FROM bom_std_op_resources bsor
15918: WHERE bsor.standard_operation_id = v_wljdi_std_op_id(l_d)
15919: AND bsor.autocharge_type = WIP_CONSTANTS.PO_MOVE)
15920: or exists ( SELECT 1
15921: FROM bom_std_sub_op_resources bsor
15922: WHERE bsor.standard_operation_id = v_wljdi_std_op_id(l_d)
15918: WHERE bsor.standard_operation_id = v_wljdi_std_op_id(l_d)
15919: AND bsor.autocharge_type = WIP_CONSTANTS.PO_MOVE)
15920: or exists ( SELECT 1
15921: FROM bom_std_sub_op_resources bsor
15922: WHERE bsor.standard_operation_id = v_wljdi_std_op_id(l_d)
15923: AND bsor.autocharge_type = WIP_CONSTANTS.PO_MOVE);
15924: if l_temp=1 then
15925: fnd_message.set_name('WSM','WSM_OP_PO_MOVE');
15926: p_error_msg := fnd_message.get;
15936: p_error_code := - 1;
15937: raise e_wljdi_common_error;
15938: end;
15939: l_temp :=0;
15940: -- This insert statement adds primary resources for standard operation.
15941:
15942: INSERT INTO WSM_COPY_OP_RESOURCES
15943: (wip_entity_id,
15944: operation_seq_num,
15955: phantom_flag,
15956: phantom_op_seq_num,
15957: phantom_item_id,
15958: activity_id,
15959: standard_rate_flag,
15960: assigned_units,
15961: max_assigned_units,
15962: firm_type,
15963: usage_rate_or_amount,
16015: null,
16016: null,
16017: null,
16018: bsor.activity_id,
16019: bsor.standard_rate_flag,
16020: bsor.assigned_units,
16021: bsor.assigned_units,
16022: 0, -- Unfirmed
16023: bsor.usage_rate_or_amount,
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
16066: and nvl(br.disable_date, SYSDATE + 1) > SYSDATE
16067: and wco.organization_id = p_org_id
16068: and wco.wip_entity_id = p_wip_entity_id
16067: and wco.organization_id = p_org_id
16068: and wco.wip_entity_id = p_wip_entity_id
16069: and wco.operation_seq_num = v_wljdi_routing_op_seq_num(l_d);
16070:
16071: -- This insert statement adds substitute resources for standard operation.
16072:
16073: INSERT INTO WSM_COPY_OP_RESOURCES
16074: (wip_entity_id,
16075: operation_seq_num,
16086: phantom_flag,
16087: phantom_op_seq_num,
16088: phantom_item_id,
16089: activity_id,
16090: standard_rate_flag,
16091: assigned_units,
16092: max_assigned_units,
16093: firm_type,
16094: usage_rate_or_amount,
16146: null,
16147: null,
16148: null,
16149: bsor.activity_id,
16150: bsor.standard_rate_flag,
16151: bsor.assigned_units,
16152: bsor.assigned_units,
16153: 0, -- Unfirmed
16154: bsor.usage_rate_or_amount,
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)
16197: and br.resource_id = bsor.resource_id
16198: and nvl(br.disable_date, SYSDATE + 1) > SYSDATE
16199: and wco.organization_id = p_org_id
16200: and wco.wip_entity_id = p_wip_entity_id
16200: and wco.wip_entity_id = p_wip_entity_id
16201: and wco.operation_seq_num = v_wljdi_routing_op_seq_num(l_d)
16202: and exists (select 1
16203: from bom_std_op_resources bsor1
16204: where bsor1.standard_operation_id = bsor.standard_operation_id
16205: and bsor1.substitute_group_num = bsor.substitute_group_num )
16206: and wcor.wip_entity_id = wco.wip_entity_id
16207: and wcor.operation_seq_num = wco.operation_seq_num
16208: and wcor.resource_seq_num = (select max(resource_seq_num)
17363: group_sequence_id,
17364: group_sequence_number,
17365: parent_resource_seq,
17366: autocharge_type,
17367: standard_rate_flag,
17368: applied_resource_units,
17369: applied_resource_value,
17370: start_date,
17371: completion_date,
17418: v_wljdi_grp_seq_id(l_d),
17419: v_wljdi_grp_seq_num(l_d),
17420: null,
17421: l_v_res(l_resource_id).autocharge_type,
17422: l_v_res(l_resource_id).standard_rate,
17423: 0,
17424: 0,
17425: l_v_res(l_resource_id).start_date,
17426: l_v_res(l_resource_id).completion_date,
17488: scheduled_flag,
17489: assigned_units,
17490: maximum_assigned_units,
17491: autocharge_type,
17492: standard_rate_flag,
17493: applied_resource_units,
17494: applied_resource_value,
17495: attribute_category,
17496: attribute1,
17538: l_v_res(l_resource_id).scheduled_flag,
17539: v_wljdi_assigned_units(l_d),
17540: l_v_res(l_resource_id).max_assg_units,
17541: l_v_res(l_resource_id).autocharge_type,
17542: l_v_res(l_resource_id).standard_rate,
17543: 0,
17544: 0,
17545: v_wljdi_attribute_category(l_d),
17546: v_wljdi_attribute1(l_d),
17674: phantom_flag,
17675: phantom_op_seq_num,
17676: phantom_item_id,
17677: activity_id,
17678: standard_rate_flag,
17679: assigned_units,
17680: max_assigned_units,
17681: firm_type,
17682: usage_rate_or_amount,
17734: null,
17735: null,
17736: null,
17737: l_v_res(l_resource_id).activity_id,
17738: l_v_res(l_resource_id).standard_rate,
17739: v_wljdi_assigned_units(l_d),
17740: l_v_res(l_resource_id).max_assg_units,
17741: l_v_res(l_resource_id).firm_type,
17742: v_wljdi_usage_rate_or_amt(l_d),
19699: 0, -- Since it's not a planned component
19700: 2, -- No quantity relation
19701: 1, -- Include in cost rollup
19702: 2, -- No ATP
19703: 4, -- Standard component
19704: v_wljdi_recommended(l_d),
19705: l_v_comp(l_in).date_required,
19706: wco.department_id,
19707: p_org_id,
21148: p_item,
21149: decode(p_job_type, 3, p_bom_reference_id, null),
21150: decode(p_job_type, 3, p_routing_reference_id, null),
21151: p_firm_planned_flag,
21152: decode(p_job_type, 3, wip_constants.nonstandard, wip_constants.standard),
21153: p_wip_supply_type,
21154: p_class_code,
21155: l_material_account,
21156: l_material_overhead_account,