DBA Data[Home] [Help]

APPS.WSMPLBJI dependencies on WSMPUTIL

Line 397: IF (WSMPUTIL.REFER_SITE_LEVEL_PROFILE = 'Y') THEN

393: conc_status boolean;
394:
395: BEGIN
396:
397: IF (WSMPUTIL.REFER_SITE_LEVEL_PROFILE = 'Y') THEN
398: l_profile := WSMPUTIL.CREATE_LBJ_COPY_RTG_PROFILE(0);
399: ELSE
400: l_org_id := get_one_org_id(p_group_id, WIP_CONSTANTS.PENDING);
401: if (l_org_id = -1) then

Line 398: l_profile := WSMPUTIL.CREATE_LBJ_COPY_RTG_PROFILE(0);

394:
395: BEGIN
396:
397: IF (WSMPUTIL.REFER_SITE_LEVEL_PROFILE = 'Y') THEN
398: l_profile := WSMPUTIL.CREATE_LBJ_COPY_RTG_PROFILE(0);
399: ELSE
400: l_org_id := get_one_org_id(p_group_id, WIP_CONSTANTS.PENDING);
401: if (l_org_id = -1) then
402: conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',

Line 406: l_profile := WSMPUTIL.CREATE_LBJ_COPY_RTG_PROFILE(l_org_id);

402: conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',
403: 'Error: failed in get_one_org_id');
404: return;
405: end if;
406: l_profile := WSMPUTIL.CREATE_LBJ_COPY_RTG_PROFILE(l_org_id);
407: END IF;
408:
409: if(l_profile = 2) then
410: g_create_job_copy := 'N';

Line 446: IF (WSMPUTIL.REFER_SITE_LEVEL_PROFILE = 'Y') THEN

442: conc_status boolean;
443:
444: BEGIN
445:
446: IF (WSMPUTIL.REFER_SITE_LEVEL_PROFILE = 'Y') THEN
447: l_profile := WSMPUTIL.CREATE_LBJ_COPY_RTG_PROFILE(0);
448: ELSE
449: l_org_id := get_one_org_id(l_group_id, WIP_CONSTANTS.RUNNING);
450: if (l_org_id = -1) then

Line 447: l_profile := WSMPUTIL.CREATE_LBJ_COPY_RTG_PROFILE(0);

443:
444: BEGIN
445:
446: IF (WSMPUTIL.REFER_SITE_LEVEL_PROFILE = 'Y') THEN
447: l_profile := WSMPUTIL.CREATE_LBJ_COPY_RTG_PROFILE(0);
448: ELSE
449: l_org_id := get_one_org_id(l_group_id, WIP_CONSTANTS.RUNNING);
450: if (l_org_id = -1) then
451: conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',

Line 455: l_profile := WSMPUTIL.CREATE_LBJ_COPY_RTG_PROFILE(l_org_id);

451: conc_status := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR',
452: 'Error: failed in get_one_org_id');
453: return;
454: end if;
455: l_profile := WSMPUTIL.CREATE_LBJ_COPY_RTG_PROFILE(l_org_id);
456: END IF;
457:
458: if(l_profile = 2) then
459: g_create_job_copy := 'N';

Line 639: wsmputil.find_common_routing(

635:
636: l_stmt_num := 10;
637: Begin
638:
639: wsmputil.find_common_routing(
640: p_routing_sequence_id => p_routing_seq_id,
641: p_common_routing_sequence_id => l_common_routing_sequence_id,
642: x_err_code => l_error_code,
643: x_err_msg => l_error_msg);

Line 656: wsmputil.FIND_ROUTING_START(

652: -- if a replacement exitsts in bos. If no, then return error. Otherwise return no error, but
653: -- return the ORIGINAL op-seq-id defined in bon with the understanding that it may actually not be eff.
654: -- This holds for both find_routing_start and end.
655:
656: wsmputil.FIND_ROUTING_START(
657: l_common_routing_sequence_id,
658: p_routing_revision_date, -- CZH.I_OED-1
659: l_start_seq_id,
660: l_error_code,

Line 670: wsmputil.FIND_ROUTING_END(

666:
667:
668: -- BA: CZH.I_OED-1, call this to make sure the end is effective
669: l_stmt_num := 25;
670: wsmputil.FIND_ROUTING_END(
671: l_common_routing_sequence_id,
672: p_routing_revision_date, -- CZH.I_OED-1
673: l_end_seq_id,
674: l_error_code,

Line 708: -- wsmputil.replacement_op_seq_id has been used to find the equivalent effective op-seq-id's. (abb)

704: -- number of op-seq-id's, thus the following sql WOULD have returned multiple rows if not I had
705: -- included a condition that the op-seq-id must exists in bon too. Note that this op-seq-id
706: -- is not necessarily the effective one, but this exists in the network and would be used by the
707: -- wsm_bon_cur cursor to find the other op-seq-id's in the network. IN the cursor loop,
708: -- wsmputil.replacement_op_seq_id has been used to find the equivalent effective op-seq-id's. (abb)
709:
710: select unique(bos.operation_sequence_id)
711: into l_bon_seq_id1
712: from bom_operation_sequences bos, bom_operation_networks bon

Line 723: if wsmputil.check_po_move (

719:
720: end if;
721:
722: -- osp begin
723: if wsmputil.check_po_move (
724: p_sequence_id => l_bon_seq_id1,
725: p_sequence_id_type => 'O',
726: p_routing_rev_date => p_routing_revision_date,
727: x_err_code => l_error_code,

Line 751: l_bon_seq_id2 := wsmputil.replacement_op_seq_id(

747: FETCH wsm_bon_cur into l_bon_seq_id2, l_dummy;
748: EXIT when wsm_bon_cur%NOTFOUND;
749:
750: -- BA: CZH.I_OED-2
751: l_bon_seq_id2 := wsmputil.replacement_op_seq_id(
752: l_bon_seq_id2,
753: p_routing_revision_date);
754: -- EA: CZH.I_OED-2
755:

Line 811: and operation_sequence_id = wsmputil.replacement_op_seq_id(

807: select operation_seq_num
808: into abb_op_seq_num
809: from wip_operations
810: where wip_entity_id = p_wip_entity_id
811: and operation_sequence_id = wsmputil.replacement_op_seq_id(
812: l_bon_seq_id1,
813: p_routing_revision_date);
814:
815: l_stmt_num := 76;

Line 907: wsmputil.find_common_routing(

903:
904: l_stmt_num := 100;
905:
906: if p_explode_header_detail = 2 then
907: wsmputil.find_common_routing(
908: p_routing_sequence_id => p_routing_seq_id,
909: p_common_routing_sequence_id => l_common_routing_sequence_id,
910: x_err_code => p_error_code,
911: x_err_msg => p_error_msg);

Line 961: if wsmputil.WSM_ESA_ENABLED(p_wip_entity_id => null,

957:
958:
959: l_stmt_num := 110;
960:
961: if wsmputil.WSM_ESA_ENABLED(p_wip_entity_id => null,
962: err_code => l_error_code,
963: err_msg => l_error_msg,
964: p_org_id => p_org,
965: p_job_type => p_job_type) = 1

Line 1272: if wsmputil.check_osp_operation(p_wip_entity_id, l_job_seq_num, p_org) then

1268:
1269: if p_status_type = 3 and p_po_creation_time <> wip_constants.manual_creation then
1270: if p_src_client_server = 1 then
1271:
1272: if wsmputil.check_osp_operation(p_wip_entity_id, l_job_seq_num, p_org) then
1273: l_atleast_one_osp_exists := l_atleast_one_osp_exists + 1;
1274: wip_osp.create_requisition(
1275: P_Wip_Entity_Id => p_wip_entity_id,
1276: P_Organization_Id => p_org,

Line 1287: if wsmputil.check_osp_operation(p_wip_entity_id, l_job_seq_num, p_org) then

1283:
1284: -- if build_lbji_info is called from form, only then P_Run_ReqImport should be YES, i.e.
1285: -- the requisition import concurrent request should be launched immediately.
1286:
1287: if wsmputil.check_osp_operation(p_wip_entity_id, l_job_seq_num, p_org) then
1288: l_atleast_one_osp_exists := l_atleast_one_osp_exists + 1;
1289: wip_osp.create_requisition(
1290: P_Wip_Entity_Id => p_wip_entity_id,
1291: P_Organization_Id => p_org,

Line 1735: wsmputil.WSM_ESA_ENABLED(

1731: -- abb H optional scrap accounting
1732: l_stat_num := 40;
1733:
1734: if (l_scrap_account is NULL or l_est_scrap_abs_account is NULL) and
1735: wsmputil.WSM_ESA_ENABLED(
1736: p_wip_entity_id => null,
1737: err_code => l_error_code,
1738: err_msg => l_error_msg,
1739: p_org_id => p_organization_id,

Line 2286: --l_inv_period_id := wsmputil.get_inv_acct_period (

2282:
2283: BEGIN
2284:
2285: -- BD: bugfix 3299811, this is a regression of bugfix 3126650
2286: --l_inv_period_id := wsmputil.get_inv_acct_period (
2287: -- x_err_code => p_error_code,
2288: -- x_err_msg => p_err_msg,
2289: -- p_organization_id => p_organization_id,
2290: -- p_date => trunc(nvl(p_release_date, sysdate)) );

Line 2521: wsmputil.WRITE_TO_WIE (

2517: fnd_file.put_line(fnd_file.log, '*** WARNING MESSAGE BEGIN ***');
2518: fnd_file.put_line(fnd_file.log, p_err_msg);
2519: fnd_file.put_line(fnd_file.log, '*** WARNING MESSAGE END ***');
2520: fnd_file.new_line(fnd_file.log, 1);
2521: wsmputil.WRITE_TO_WIE (
2522: p_header_id,
2523: substr(p_err_msg,1,2000),
2524: p_request_id,
2525: p_program_id,

Line 3690: wsmputil.validate_non_std_references(v_wlji_item(v_index),

3686: -- 13: Invalid Completion Subinventory
3687: -- 14: Invalid Firm Planned Flag
3688:
3689:
3690: wsmputil.validate_non_std_references(v_wlji_item(v_index),
3691: v_wlji_routing_reference_id(v_index),
3692: v_wlji_bom_reference_id(v_index),
3693: v_wlji_alt_routing_designator(v_index),
3694: v_wlji_alt_bom_designator(v_index),

Line 3886: v_wlji_lucd(v_index) := wsmputil.GET_SCHEDULED_DATE (

3882: END IF;
3883:
3884: IF v_wlji_fusd(v_index) IS NOT NULL AND
3885: v_wlji_lucd(v_index) IS NULL THEN
3886: v_wlji_lucd(v_index) := wsmputil.GET_SCHEDULED_DATE (
3887: v_wlji_org(v_index),
3888: v_wlji_item(v_index),
3889: 'F',
3890: v_wlji_fusd(v_index),

Line 3905: v_wlji_fusd(v_index) := wsmputil.GET_SCHEDULED_DATE (

3901:
3902:
3903: IF v_wlji_fusd(v_index) IS NULL AND
3904: v_wlji_lucd(v_index) IS NOT NULL THEN
3905: v_wlji_fusd(v_index) := wsmputil.GET_SCHEDULED_DATE (
3906: v_wlji_org(v_index),
3907: v_wlji_item(v_index),
3908: 'B',
3909: v_wlji_lucd(v_index),

Line 4348: l_return_value := wsmputil.CHECK_WMTI( -- CZH.I

4344:
4345: l_stmt_num := 460.1;
4346: /*Bug 3414163:Call to Check_wmti is commented.*/
4347: /*
4348: l_return_value := wsmputil.CHECK_WMTI( -- CZH.I
4349: P_WIP_ENTITY_ID => null,
4350: P_WIP_ENTITY_NAME => v_wlji_job_name(v_index),
4351: P_TRANSACTION_DATE => null,
4352: X_ERR_CODE => l_error_code,

Line 4367: --l_return_value := wsmputil.CHECK_WSMT( -- CZH.I

4363: */
4364: /*Bug 3414163:End of changes*/
4365: l_stmt_num := 460.2;
4366: -- bug 3453139 remove this
4367: --l_return_value := wsmputil.CHECK_WSMT( -- CZH.I
4368: -- P_WIP_ENTITY_ID => null,
4369: -- P_WIP_ENTITY_NAME => v_wlji_job_name(v_index),
4370: -- P_TRANSACTION_ID => NULL,
4371: -- P_TRANSACTION_DATE => null,

Line 4840: wsmputil.find_common_routing(

4836: l_stmt_num := 604;
4837: -- check that the item in the inventory lot exists as a component of the
4838: -- assembly item for the given alt bom designator, attached at the first operation.
4839:
4840: wsmputil.find_common_routing(
4841: p_routing_sequence_id => routing_seq_id,
4842: p_common_routing_sequence_id => p_common_routing_sequence_id,
4843: x_err_code => l_error_code,
4844: x_err_msg => l_err_msg);

Line 4860: wsmputil.find_routing_start(

4856: l_rtg_rev_date := v_wlji_routing_revision_date(v_index);
4857: l_bom_rev_date := v_wlji_bom_revision_date(v_index); --BUGFIX 2380517
4858: -- EA: CZH.I_OED-1
4859:
4860: wsmputil.find_routing_start(
4861: p_common_routing_sequence_id,
4862: l_rtg_rev_date, -- ADD: CZH.I_OED-1
4863: l_start_op_seq_id,
4864: l_error_code,

Line 4873: l_start_op_seq_id := wsmputil.replacement_op_seq_id(

4869: l_error_code := -1;
4870: end if;
4871:
4872: --BA: CZH.I_OED-2
4873: l_start_op_seq_id := wsmputil.replacement_op_seq_id(
4874: l_start_op_seq_id,
4875: l_rtg_rev_date);
4876: --EA: CZH.I_OED-2
4877:

Line 5097: wsmputil.return_att_quantity(p_org_id => v_wlji_org(v_index),

5093: GOTO skip_other_steps;
5094: end;
5095:
5096: l_stmt_num := 650;
5097: wsmputil.return_att_quantity(p_org_id => v_wlji_org(v_index),
5098: p_item_id => v_wsli(v_wlji_source_line_id(v_index)).inventory_item_id,
5099: p_rev => v_wsli(v_wlji_source_line_id(v_index)).revision,
5100: p_lot_no => v_wsli(v_wlji_source_line_id(v_index)).lot_number,
5101: p_subinv => v_wsli(v_wlji_source_line_id(v_index)).subinventory_code,

Line 5226: wsmputil.find_common_routing(

5222:
5223:
5224: -- *** check for disabled ops in the network and provide warning ***
5225: if v_wlji_load_type(v_index) = 5 then
5226: wsmputil.find_common_routing(
5227: p_routing_sequence_id => routing_seq_id,
5228: p_common_routing_sequence_id => p_common_routing_sequence_id,
5229: x_err_code => l_error_code,
5230: x_err_msg => l_err_msg);

Line 5233: if (wsmputil.network_with_disabled_op(

5229: x_err_code => l_error_code,
5230: x_err_msg => l_err_msg);
5231:
5232:
5233: if (wsmputil.network_with_disabled_op(
5234: p_common_routing_sequence_id,
5235: v_wlji_routing_revision_date(v_index),
5236: l_error_code,
5237: l_err_msg) = 1)

Line 6006: wsmputil.validate_non_std_references(

6002: l_stmt_num:= 702;
6003: if (p_change_bom_reference = 1 or p_change_routing_reference = 1) then
6004:
6005: if p_change_bom_reference = 1 then
6006: wsmputil.validate_non_std_references(
6007: null,
6008: null,
6009: v_wlji_bom_reference_id(v_index),
6010: null,

Line 6040: wsmputil.validate_non_std_references(

6036: end if;
6037:
6038: l_stmt_num:= 703;
6039: if p_change_routing_reference = 1 then
6040: wsmputil.validate_non_std_references(
6041: null,
6042: v_wlji_routing_reference_id(v_index),
6043: null,
6044: v_wlji_alt_routing_designator(v_index),

Line 6346: l_dummy := WSMPUTIL.GET_INV_ACCT_PERIOD(

6342: -- l_error_code := SQLCODE;
6343: -- HANDLE_ERROR( l_error_code, l_err_msg, l_stmt_num);
6344: -- GOTO skip_resched_validations;
6345: --end;
6346: l_dummy := WSMPUTIL.GET_INV_ACCT_PERIOD(
6347: x_err_code => l_error_code,
6348: x_err_msg => l_err_msg,
6349: p_organization_id => v_wlji_org(v_index),
6350: p_date => trunc(nvl(v_wlji_date_released(v_index),sysdate)));

Line 6403: wsmputil.WSM_ESA_ENABLED(p_wip_entity_id => v_wlji_wip_entity_id(v_index),

6399: -- WSMPLCVA.v_org(v_wlji_org(v_index)).ESTIMATED_SCRAP_ACCOUNTING = 1
6400: -- and p_old_job_type = 1 then
6401:
6402: if (p_old_status_type IN (1,6)) and (v_wlji_status_type(v_index) = 3) and
6403: wsmputil.WSM_ESA_ENABLED(p_wip_entity_id => v_wlji_wip_entity_id(v_index),
6404: err_code => l_error_code,
6405: err_msg => l_error_msg,
6406: p_org_id => '',
6407: p_job_type => '') = 1 then

Line 6491: if wsmputil.check_osp_operation(v_wlji_wip_entity_id(v_index), l_osp_op_seq_num , v_wlji_org(v_index)) then

6487:
6488: if WSMPLCVA.v_org(v_wlji_org(v_index)).PO_CREATION_TIME <> WIP_CONSTANTS.MANUAL_CREATION then
6489:
6490: if (v_wlji_status_type(v_index) = 3 and p_old_status_type = 1) then
6491: if wsmputil.check_osp_operation(v_wlji_wip_entity_id(v_index), l_osp_op_seq_num , v_wlji_org(v_index)) then
6492: l_atleast_one_osp_exists := l_atleast_one_osp_exists + 1;
6493: wip_osp.create_requisition(
6494: P_Wip_Entity_Id => v_wlji_wip_entity_id(v_index),
6495: P_Organization_Id => v_wlji_org(v_index),

Line 6630: v_wlji_lucd(v_index) := wsmputil.GET_SCHEDULED_DATE(

6626: l_stmt_num);
6627: l_error_code := -1;
6628: GOTO skip_resched_validations;
6629: ELSE
6630: v_wlji_lucd(v_index) := wsmputil.GET_SCHEDULED_DATE(
6631: v_wlji_org(v_index),
6632: v_wlji_item(v_index),
6633: 'F',
6634: v_wlji_fusd(v_index),

Line 6641: v_wlji_fusd(v_index) := wsmputil.GET_SCHEDULED_DATE (

6637: l_err_msg,
6638: v_wlji_start_quantity(v_index)); --Fixed bug # 2313574
6639: END IF;
6640: ELSIF ((v_wlji_fusd(v_index) IS NULL) AND (v_wlji_lucd(v_index) IS NOT NULL)) THEN
6641: v_wlji_fusd(v_index) := wsmputil.GET_SCHEDULED_DATE (
6642: v_wlji_org(v_index),
6643: v_wlji_item(v_index),
6644: 'B',
6645: v_wlji_lucd(v_index),

Line 6950: wsmputil.WSM_ESA_ENABLED(

6946: l_stmt_num := 1065;
6947: -- abb H: optional scrap accounting
6948:
6949: if (p_old_status_type IN (1,6) and v_wlji_status_type(v_index) = 3) and
6950: wsmputil.WSM_ESA_ENABLED(
6951: p_wip_entity_id => v_wlji_wip_entity_id(v_index),
6952: err_code => l_error_code,
6953: err_msg => l_error_msg,
6954: p_org_id => '',

Line 7573: wsmputil.WRITE_TO_WIE (

7569: -- abbkanban end
7570:
7571: dummy_err_code := 0;
7572: dummy_err_msg := NULL;
7573: wsmputil.WRITE_TO_WIE (
7574: v_wlji_header_id(v_index),
7575: substr(v_wlji_err_msg(v_index),1,2000),
7576: v_wlji_request_id(v_index),
7577: v_wlji_program_id(v_index),