1387: END LOOP;
1388: END IF;
1389: END IF;
1390: --turn off the trigger BOMTBICX
1391: bom_globals.g_skip_bomtbicx := 'Y';
1392:
1393: IF l_from_eff_ctrl = 1 AND l_to_eff_ctrl = 1 THEN -- Date - Date
1394:
1395:
3556: END IF;
3557:
3558:
3559: --Turn on the trigger BOMTBICX
3560: bom_globals.g_skip_bomtbicx := 'N';
3561:
3562: /*
3563: --find list of actually copied comps
3564: l_comp_ctr := 1;
3969: from_org_id,
3970: rev_date
3971: ),
3972: GET_MESSAGE ('BOM_COPY_ERR_ENG_COMP_MFG_BILL',
3973: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
3974: bom_globals.get_item_name(to_item_id, from_org_id)
3975: ),
3976: 'BOM_COPY',
3977: SYSDATE,
3970: rev_date
3971: ),
3972: GET_MESSAGE ('BOM_COPY_ERR_ENG_COMP_MFG_BILL',
3973: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
3974: bom_globals.get_item_name(to_item_id, from_org_id)
3975: ),
3976: 'BOM_COPY',
3977: SYSDATE,
3978: user_id,
4058: from_org_id,
4059: rev_date
4060: ),
4061: GET_MESSAGE ('BOM_COPY_ERR_COMP_FOR_WIP_JOB',
4062: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
4063: bom_globals.get_item_name(to_item_id, from_org_id)
4064: ),
4065: 'BOM_COPY',
4066: SYSDATE,
4059: rev_date
4060: ),
4061: GET_MESSAGE ('BOM_COPY_ERR_COMP_FOR_WIP_JOB',
4062: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
4063: bom_globals.get_item_name(to_item_id, from_org_id)
4064: ),
4065: 'BOM_COPY',
4066: SYSDATE,
4067: user_id,
4197: from_org_id,
4198: rev_date
4199: ),
4200: GET_MESSAGE ('BOM_COPY_ERR_COMP_NOT_STANDARD',
4201: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
4202: bom_globals.get_item_name(to_item_id, from_org_id)
4203: ),
4204: 'BOM_COPY',
4205: SYSDATE,
4198: rev_date
4199: ),
4200: GET_MESSAGE ('BOM_COPY_ERR_COMP_NOT_STANDARD',
4201: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
4202: bom_globals.get_item_name(to_item_id, from_org_id)
4203: ),
4204: 'BOM_COPY',
4205: SYSDATE,
4206: user_id,
4380: rev_date
4381: ),
4382: GET_MESSAGE (
4383: 'BOM_CPY_REV_CHANGE_POLICY_ERR',
4384: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
4385: bom_globals.get_item_name(to_item_id, from_org_id)
4386: ),
4387: 'BOM_COPY',
4388: SYSDATE,
4381: ),
4382: GET_MESSAGE (
4383: 'BOM_CPY_REV_CHANGE_POLICY_ERR',
4384: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
4385: bom_globals.get_item_name(to_item_id, from_org_id)
4386: ),
4387: 'BOM_COPY',
4388: SYSDATE,
4389: user_id,
4399: WHERE bcb.bill_sequence_id = to_sequence_id
4400: AND bcb.component_item_id = msib.inventory_item_id
4401: AND msib.organization_id = to_org_id
4402: AND 'Y' <>
4403: bom_globals.check_change_policy_range(
4404: to_item_id,
4405: to_org_id,
4406: NULL, -- p_start_revision
4407: NULL, -- p_end_revision
4408: NULL, -- p_start_rev_id
4409: NULL, -- p_end_rev_id
4410: bcb.effectivity_date, -- p_effective_date
4411: bcb.disable_date, -- p_disable_date
4412: bom_globals.get_change_policy_val(to_item_id, to_org_id,
4413: BOM_Revisions.Get_Item_Revision_Id_Fn('ALL','ALL',to_org_id,
4414: to_item_id, NVL(x_effectivity_date, trgt_comps_eff_date)),
4415: null, -- rev id
4416: p_trgt_str_type_id), -- p_current_chg_pol
4445: rev_date
4446: ),
4447: GET_MESSAGE (
4448: 'BOM_CPY_REV_CHANGE_POLICY_ERR',
4449: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
4450: bom_globals.get_item_name(to_item_id, from_org_id)
4451: ),
4452: 'BOM_COPY',
4453: SYSDATE,
4446: ),
4447: GET_MESSAGE (
4448: 'BOM_CPY_REV_CHANGE_POLICY_ERR',
4449: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
4450: bom_globals.get_item_name(to_item_id, from_org_id)
4451: ),
4452: 'BOM_COPY',
4453: SYSDATE,
4454: user_id,
4464: WHERE bcb.bill_sequence_id = to_sequence_id
4465: AND bcb.component_item_id = msib.inventory_item_id
4466: AND msib.organization_id = to_org_id
4467: AND 'Y' <>
4468: bom_globals.check_change_policy_range(
4469: to_item_id,
4470: to_org_id,
4471: NULL, -- p_start_revision
4472: NULL, -- p_end_revision
4473: bcb.from_end_item_rev_id, -- p_start_rev_id
4474: bcb.to_end_item_rev_id, -- p_end_rev_id
4475: NULL, -- p_effective_date
4476: NULL, -- p_disable_date
4477: bom_globals.get_change_policy_val(to_item_id, to_org_id,
4478: NVL(eco_end_item_rev_id, trgt_comps_end_item_rev_id),
4479: null, -- rev id
4480: p_trgt_str_type_id), -- p_current_chg_pol
4481: p_trgt_str_type_id, -- p_structure_type_id
4515: rev_date
4516: ),
4517: GET_MESSAGE
4518: ('BOM_COPY_ERR_COMP_REV_DIFF',
4519: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
4520: bom_globals.get_item_name(to_item_id, from_org_id),
4521: get_current_item_rev (bcb.component_item_id,
4522: from_org_id,
4523: rev_date
4516: ),
4517: GET_MESSAGE
4518: ('BOM_COPY_ERR_COMP_REV_DIFF',
4519: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
4520: bom_globals.get_item_name(to_item_id, from_org_id),
4521: get_current_item_rev (bcb.component_item_id,
4522: from_org_id,
4523: rev_date
4524: )
4943: END;
4944:
4945: BEGIN
4946: --Turn off trigger BOMTBICX
4947: bom_globals.g_skip_bomtbicx := 'Y';
4948:
4949: IF (to_rtg_seq_id = -1)
4950: THEN
4951: sql_stmt_num := 30;
4966: AND bos.operation_seq_num = bic.operation_seq_num);
4967: END IF;
4968:
4969: --Turn on trigger BOMTBICX
4970: bom_globals.g_skip_bomtbicx := 'N';
4971: EXCEPTION
4972: WHEN DUP_VAL_ON_INDEX
4973: THEN
4974: RAISE overlap_error;
5153: from_org_id,
5154: rev_date
5155: ),
5156: GET_MESSAGE ('BOM_COPY_ERR_NO_PLANNING_COMPS',
5157: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
5158: bom_globals.get_item_name(to_item_id, from_org_id)
5159: ),
5160: 'BOM_COPY',
5161: SYSDATE,
5154: rev_date
5155: ),
5156: GET_MESSAGE ('BOM_COPY_ERR_NO_PLANNING_COMPS',
5157: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
5158: bom_globals.get_item_name(to_item_id, from_org_id)
5159: ),
5160: 'BOM_COPY',
5161: SYSDATE,
5162: user_id,
5206: from_org_id,
5207: rev_date
5208: ),
5209: GET_MESSAGE ('BOM_COPY_ERR_NO_OPT_MODEL_COMP',
5210: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
5211: bom_globals.get_item_name(to_item_id, from_org_id)
5212: ),
5213: 'BOM_COPY',
5214: SYSDATE,
5207: rev_date
5208: ),
5209: GET_MESSAGE ('BOM_COPY_ERR_NO_OPT_MODEL_COMP',
5210: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
5211: bom_globals.get_item_name(to_item_id, from_org_id)
5212: ),
5213: 'BOM_COPY',
5214: SYSDATE,
5215: user_id,
5260: from_org_id,
5261: rev_date
5262: ),
5263: GET_MESSAGE ('BOM_COPY_ERR_NO_ATO_OPT_COMPS',
5264: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
5265: bom_globals.get_item_name(to_item_id, from_org_id)
5266: ),
5267: 'BOM_COPY',
5268: SYSDATE,
5261: rev_date
5262: ),
5263: GET_MESSAGE ('BOM_COPY_ERR_NO_ATO_OPT_COMPS',
5264: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
5265: bom_globals.get_item_name(to_item_id, from_org_id)
5266: ),
5267: 'BOM_COPY',
5268: SYSDATE,
5269: user_id,
5314: from_org_id,
5315: rev_date
5316: ),
5317: GET_MESSAGE ('BOM_COPY_ERR_NO_ATO_STD_COMPS',
5318: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
5319: bom_globals.get_item_name(to_item_id, from_org_id)
5320: ),
5321: 'BOM_COPY',
5322: SYSDATE,
5315: rev_date
5316: ),
5317: GET_MESSAGE ('BOM_COPY_ERR_NO_ATO_STD_COMPS',
5318: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
5319: bom_globals.get_item_name(to_item_id, from_org_id)
5320: ),
5321: 'BOM_COPY',
5322: SYSDATE,
5323: user_id,
5369: from_org_id,
5370: rev_date
5371: ),
5372: GET_MESSAGE ('BOM_COPY_ERR_NO_PTO_COMPS',
5373: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
5374: bom_globals.get_item_name(to_item_id, from_org_id)
5375: ),
5376: 'BOM_COPY',
5377: SYSDATE,
5370: rev_date
5371: ),
5372: GET_MESSAGE ('BOM_COPY_ERR_NO_PTO_COMPS',
5373: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
5374: bom_globals.get_item_name(to_item_id, from_org_id)
5375: ),
5376: 'BOM_COPY',
5377: SYSDATE,
5378: user_id,
5431:
5432: copy_comps := copy_comps - SQL%ROWCOUNT;
5433: sql_stmt_num := 43;
5434: --Turn off trigger BOMTBICX
5435: bom_globals.g_skip_bomtbicx := 'Y';
5436:
5437: UPDATE bom_components_b bic
5438: SET bic.wip_supply_type = phantom
5439: WHERE bic.bill_sequence_id = to_sequence_id
5446: AND msi2.organization_id = to_org_id
5447: AND msi1.inventory_item_id = to_item_id
5448: AND msi1.organization_id = to_org_id);
5449:
5450: bom_globals.g_skip_bomtbicx := 'N';
5451: sql_stmt_num := 44;
5452: bom_globals.g_skip_bomtbicx := 'Y';
5453:
5454: UPDATE bom_components_b bic
5448: AND msi1.organization_id = to_org_id);
5449:
5450: bom_globals.g_skip_bomtbicx := 'N';
5451: sql_stmt_num := 44;
5452: bom_globals.g_skip_bomtbicx := 'Y';
5453:
5454: UPDATE bom_components_b bic
5455: SET bic.optional = 1
5456: WHERE bic.bill_sequence_id = to_sequence_id
5468: AND msi1.inventory_item_id = to_item_id
5469: AND msi1.organization_id = to_org_id);
5470:
5471: --Turn on trigger BOMTBICX
5472: bom_globals.g_skip_bomtbicx := 'N';
5473: sql_stmt_num := 46;
5474:
5475: IF specific_copy_flag = 'Y'
5476: THEN
6137: -- Update the created by column only when specific copy flag is no..
6138: -- If specific copy flag is 'Y', then after copy_bill, call update_created_by.
6139: IF specific_copy_flag = 'N' THEN
6140: --Turn off trigger BOMTBICX
6141: bom_globals.g_skip_bomtbicx := 'Y';
6142:
6143: UPDATE bom_components_b bic
6144: SET created_by = user_id
6145: WHERE bic.bill_sequence_id = to_sequence_id;
6144: SET created_by = user_id
6145: WHERE bic.bill_sequence_id = to_sequence_id;
6146:
6147: --Turn on trigger BOMTBICX
6148: bom_globals.g_skip_bomtbicx := 'N';
6149: END IF;
6150: sql_stmt_num := 85;
6151:
6152: SELECT COUNT (*)
6175: -- dbms_profiler.stop_profiler();
6176: EXCEPTION
6177: WHEN overlap_error
6178: THEN
6179: bom_globals.g_skip_bomtbicx := 'N';
6180: fnd_message.set_name ('BOM', 'BOM_BAD_COPY_GUI');
6181:
6182: IF specific_copy_flag = 'Y'
6183: THEN
6224: app_exception.raise_exception;
6225: END IF;
6226: WHEN common_error
6227: THEN
6228: bom_globals.g_skip_bomtbicx := 'N';
6229: fnd_message.set_name ('BOM', 'BOM_COMMON_OTHER_ORGS2');
6230:
6231: IF specific_copy_flag = 'Y'
6232: THEN
6273: app_exception.raise_exception;
6274: END IF;
6275: WHEN OTHERS
6276: THEN
6277: bom_globals.g_skip_bomtbicx := 'N';
6278: err_msg := 'COPY_BILL (' || sql_stmt_num || ') ' || SQLERRM;
6279: fnd_message.set_name ('BOM', 'BOM_SQL_ERR');
6280: fnd_message.set_token ('ENTITY', err_msg);
6281: ROLLBACK TO begin_bill_copy;
6757: WHEN EXISTS ( SELECT 1
6758: FROM bom_structures_b bsb
6759: WHERE bsb.organization_id = oav.organization_id
6760: AND bsb.assembly_item_id = p_item_id
6761: AND NVL(bsb.alternate_bom_designator,bom_globals.get_primary_ui) = NVL(p_structure_name,bom_globals.get_primary_ui)
6762: AND bsb.bill_sequence_id = bsb.common_bill_sequence_id
6763: ) THEN
6764: 1 -- Structure already exists
6765: WHEN EXISTS ( SELECT 1
6765: WHEN EXISTS ( SELECT 1
6766: FROM bom_structures_b bsb
6767: WHERE bsb.organization_id = oav.organization_id
6768: AND bsb.assembly_item_id = p_item_id
6769: AND NVL(bsb.alternate_bom_designator,bom_globals.get_primary_ui) = NVL(p_structure_name,bom_globals.get_primary_ui)
6770: AND bsb.bill_sequence_id <> bsb.common_bill_sequence_id
6771: ) THEN
6772: 2 -- Structure already exists and it is common structure
6773: ELSE
6776: NVL((SELECT assembly_type
6777: FROM bom_structures_b bsb
6778: WHERE bsb.organization_id = x_org_list_tbl(l_index)
6779: AND bsb.assembly_item_id = p_item_id
6780: AND NVL(bsb.alternate_bom_designator,bom_globals.get_primary_ui) = NVL(p_structure_name,bom_globals.get_primary_ui)
6781: ),2) AS assembly_type,
6782: (SELECT revision
6783: FROM (SELECT revision
6784: FROM mtl_item_revisions_b mir
6891: bom_copy_structure_request bcsr
6892: WHERE bsb.assembly_item_id = cp_item_id
6893: AND bcsr.copy_request_id = cp_copy_request_id
6894: AND bsb.organization_id = bcol.organization_id
6895: AND NVL (bsb.alternate_bom_designator, bom_globals.get_primary_ui) =
6896: NVL (bcsr.trgt_structure_name, bom_globals.get_primary_ui)
6897: AND bcol.copy_request_id = bcsr.copy_request_id
6898: AND bcol.organization_id = mp.organization_id;
6899:
6892: WHERE bsb.assembly_item_id = cp_item_id
6893: AND bcsr.copy_request_id = cp_copy_request_id
6894: AND bsb.organization_id = bcol.organization_id
6895: AND NVL (bsb.alternate_bom_designator, bom_globals.get_primary_ui) =
6896: NVL (bcsr.trgt_structure_name, bom_globals.get_primary_ui)
6897: AND bcol.copy_request_id = bcsr.copy_request_id
6898: AND bcol.organization_id = mp.organization_id;
6899:
6900: l_count NUMBER := 0;
6936: WHERE bsb.bill_sequence_id <> bsb.source_bill_sequence_id
6937: AND bsb.assembly_item_id = cp_item_id
6938: AND bcsr.copy_request_id = cp_copy_request_id
6939: AND bsb.organization_id = bcol.organization_id
6940: AND NVL (bsb.alternate_bom_designator, bom_globals.get_primary_ui) =
6941: NVL (bcsr.trgt_structure_name, bom_globals.get_primary_ui)
6942: AND bcol.copy_request_id = bcsr.copy_request_id
6943: AND bcol.organization_id = mp.organization_id;
6944:
6937: AND bsb.assembly_item_id = cp_item_id
6938: AND bcsr.copy_request_id = cp_copy_request_id
6939: AND bsb.organization_id = bcol.organization_id
6940: AND NVL (bsb.alternate_bom_designator, bom_globals.get_primary_ui) =
6941: NVL (bcsr.trgt_structure_name, bom_globals.get_primary_ui)
6942: AND bcol.copy_request_id = bcsr.copy_request_id
6943: AND bcol.organization_id = mp.organization_id;
6944:
6945: l_count NUMBER := 0;
7020: bom_structures_b bsb
7021: WHERE bsb.assembly_item_id = cp_item_id
7022: AND bcsr.copy_request_id = bcol.copy_request_id
7023: AND bsb.organization_id = bcol.organization_id
7024: AND NVL (bsb.alternate_bom_designator, bom_globals.get_primary_ui) =
7025: NVL (bcsr.trgt_structure_name, bom_globals.get_primary_ui));
7026:
7027: l_count NUMBER := 0;
7028: BEGIN
7021: WHERE bsb.assembly_item_id = cp_item_id
7022: AND bcsr.copy_request_id = bcol.copy_request_id
7023: AND bsb.organization_id = bcol.organization_id
7024: AND NVL (bsb.alternate_bom_designator, bom_globals.get_primary_ui) =
7025: NVL (bcsr.trgt_structure_name, bom_globals.get_primary_ui));
7026:
7027: l_count NUMBER := 0;
7028: BEGIN
7029: FOR c1_rec IN c1 (p_item_id, p_copy_request_id)
7063: bom_structures_b bsb
7064: WHERE bcsr.copy_request_id = bcol.copy_request_id
7065: AND bsb.organization_id = bcol.organization_id
7066: AND bsb.assembly_item_id = cp_item_id
7067: AND NVL (bsb.alternate_bom_designator, bom_globals.get_primary_ui) =
7068: NVL (bcsr.trgt_structure_name, bom_globals.get_primary_ui));
7069:
7070: l_count NUMBER := 0;
7071: BEGIN
7064: WHERE bcsr.copy_request_id = bcol.copy_request_id
7065: AND bsb.organization_id = bcol.organization_id
7066: AND bsb.assembly_item_id = cp_item_id
7067: AND NVL (bsb.alternate_bom_designator, bom_globals.get_primary_ui) =
7068: NVL (bcsr.trgt_structure_name, bom_globals.get_primary_ui));
7069:
7070: l_count NUMBER := 0;
7071: BEGIN
7072: FOR c1_rec IN c1 (p_item_id, p_copy_request_id)
7088: p_user_id IN NUMBER
7089: ,p_to_bill_sequence_id IN NUMBER )
7090: IS
7091: BEGIN
7092: bom_globals.g_skip_bomtbicx := 'Y';
7093:
7094: UPDATE bom_components_b bic
7095: SET created_by = p_user_id
7096: WHERE bic.bill_sequence_id = p_to_bill_sequence_id;
7095: SET created_by = p_user_id
7096: WHERE bic.bill_sequence_id = p_to_bill_sequence_id;
7097:
7098: --Turn on trigger BOMTBICX
7099: bom_globals.g_skip_bomtbicx := 'N';
7100:
7101: END;
7102:
7103: /* This procedure can be used in following scenario
7611: x_msg_count => l_msg_count,
7612: x_msg_data => l_msg_data
7613: );
7614: --turn off the trigger BOMTBICX
7615: bom_globals.g_skip_bomtbicx := 'Y';
7616:
7617: IF l_from_eff_ctrl = 1 AND l_to_eff_ctrl = 1 THEN -- Date - Date
7618:
7619:
9550: END IF;
9551:
9552:
9553: --Turn on the trigger BOMTBICX
9554: bom_globals.g_skip_bomtbicx := 'N';
9555:
9556: OPEN l_from_to_comps_csr (from_sequence_id, to_sequence_id, l_last_copied_comp_seq_id);
9557:
9558: FETCH l_from_to_comps_csr
9914: from_org_id,
9915: rev_date
9916: ),
9917: GET_MESSAGE ('BOM_COPY_ERR_ENG_COMP_MFG_BILL',
9918: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
9919: bom_globals.get_item_name(to_item_id, from_org_id)
9920: ),
9921: 'BOM_COPY',
9922: SYSDATE,
9915: rev_date
9916: ),
9917: GET_MESSAGE ('BOM_COPY_ERR_ENG_COMP_MFG_BILL',
9918: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
9919: bom_globals.get_item_name(to_item_id, from_org_id)
9920: ),
9921: 'BOM_COPY',
9922: SYSDATE,
9923: user_id,
10016: from_org_id,
10017: rev_date
10018: ),
10019: GET_MESSAGE ('BOM_COPY_ERR_COMP_FOR_WIP_JOB',
10020: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10021: bom_globals.get_item_name(to_item_id, from_org_id)
10022: ),
10023: 'BOM_COPY',
10024: SYSDATE,
10017: rev_date
10018: ),
10019: GET_MESSAGE ('BOM_COPY_ERR_COMP_FOR_WIP_JOB',
10020: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10021: bom_globals.get_item_name(to_item_id, from_org_id)
10022: ),
10023: 'BOM_COPY',
10024: SYSDATE,
10025: user_id,
10115: from_org_id,
10116: rev_date
10117: ),
10118: GET_MESSAGE ('BOM_COPY_ERR_COMP_NOT_STANDARD',
10119: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10120: bom_globals.get_item_name(to_item_id, from_org_id)
10121: ),
10122: 'BOM_COPY',
10123: SYSDATE,
10116: rev_date
10117: ),
10118: GET_MESSAGE ('BOM_COPY_ERR_COMP_NOT_STANDARD',
10119: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10120: bom_globals.get_item_name(to_item_id, from_org_id)
10121: ),
10122: 'BOM_COPY',
10123: SYSDATE,
10124: user_id,
10318: rev_date
10319: ),
10320: GET_MESSAGE (
10321: 'BOM_CPY_REV_CHANGE_POLICY_ERR',
10322: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10323: bom_globals.get_item_name(to_item_id, from_org_id)
10324: ),
10325: 'BOM_COPY',
10326: SYSDATE,
10319: ),
10320: GET_MESSAGE (
10321: 'BOM_CPY_REV_CHANGE_POLICY_ERR',
10322: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10323: bom_globals.get_item_name(to_item_id, from_org_id)
10324: ),
10325: 'BOM_COPY',
10326: SYSDATE,
10327: user_id,
10337: WHERE bcb.bill_sequence_id = to_sequence_id
10338: AND bcb.component_item_id = msib.inventory_item_id
10339: AND msib.organization_id = to_org_id
10340: AND 'Y' <>
10341: bom_globals.check_change_policy_range(
10342: to_item_id,
10343: to_org_id,
10344: NULL, -- p_start_revision
10345: NULL, -- p_end_revision
10346: NULL, -- p_start_rev_id
10347: NULL, -- p_end_rev_id
10348: bcb.effectivity_date, -- p_effective_date
10349: bcb.disable_date, -- p_disable_date
10350: bom_globals.get_change_policy_val(to_item_id, to_org_id,
10351: BOM_Revisions.Get_Item_Revision_Id_Fn('ALL','ALL',to_org_id,
10352: to_item_id,x_effectivity_date),
10353: null, -- rev id
10354: p_trgt_str_type_id), -- p_current_chg_pol
10383: rev_date
10384: ),
10385: GET_MESSAGE (
10386: 'BOM_CPY_REV_CHANGE_POLICY_ERR',
10387: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10388: bom_globals.get_item_name(to_item_id, from_org_id)
10389: ),
10390: 'BOM_COPY',
10391: SYSDATE,
10384: ),
10385: GET_MESSAGE (
10386: 'BOM_CPY_REV_CHANGE_POLICY_ERR',
10387: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10388: bom_globals.get_item_name(to_item_id, from_org_id)
10389: ),
10390: 'BOM_COPY',
10391: SYSDATE,
10392: user_id,
10402: WHERE bcb.bill_sequence_id = to_sequence_id
10403: AND bcb.component_item_id = msib.inventory_item_id
10404: AND msib.organization_id = to_org_id
10405: AND 'Y' <>
10406: bom_globals.check_change_policy_range(
10407: to_item_id,
10408: to_org_id,
10409: NULL, -- p_start_revision
10410: NULL, -- p_end_revision
10411: bcb.from_end_item_rev_id, -- p_start_rev_id
10412: bcb.to_end_item_rev_id, -- p_end_rev_id
10413: NULL, -- p_effective_date
10414: NULL, -- p_disable_date
10415: bom_globals.get_change_policy_val(to_item_id, to_org_id,
10416: eco_end_item_rev_id,
10417: null, -- rev id
10418: p_trgt_str_type_id), -- p_current_chg_pol
10419: p_trgt_str_type_id, -- p_structure_type_id
10454: rev_date
10455: ),
10456: GET_MESSAGE
10457: ('BOM_COPY_ERR_COMP_REV_DIFF',
10458: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10459: bom_globals.get_item_name(to_item_id, from_org_id),
10460: get_current_item_rev (bcb.component_item_id,
10461: from_org_id,
10462: rev_date
10455: ),
10456: GET_MESSAGE
10457: ('BOM_COPY_ERR_COMP_REV_DIFF',
10458: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10459: bom_globals.get_item_name(to_item_id, from_org_id),
10460: get_current_item_rev (bcb.component_item_id,
10461: from_org_id,
10462: rev_date
10463: )
10578: END;
10579:
10580: BEGIN
10581: --Turn off trigger BOMTBICX
10582: bom_globals.g_skip_bomtbicx := 'Y';
10583:
10584: IF (to_rtg_seq_id = -1)
10585: THEN
10586: sql_stmt_num := 30;
10601: AND bos.operation_seq_num = bic.operation_seq_num);
10602: END IF;
10603:
10604: --Turn on trigger BOMTBICX
10605: bom_globals.g_skip_bomtbicx := 'N';
10606: EXCEPTION
10607: WHEN DUP_VAL_ON_INDEX
10608: THEN
10609: RAISE overlap_error;
10789: from_org_id,
10790: rev_date
10791: ),
10792: GET_MESSAGE ('BOM_COPY_ERR_NO_PLANNING_COMPS',
10793: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10794: bom_globals.get_item_name(to_item_id, from_org_id)
10795: ),
10796: 'BOM_COPY',
10797: SYSDATE,
10790: rev_date
10791: ),
10792: GET_MESSAGE ('BOM_COPY_ERR_NO_PLANNING_COMPS',
10793: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10794: bom_globals.get_item_name(to_item_id, from_org_id)
10795: ),
10796: 'BOM_COPY',
10797: SYSDATE,
10798: user_id,
10843: from_org_id,
10844: rev_date
10845: ),
10846: GET_MESSAGE ('BOM_COPY_ERR_NO_OPT_MODEL_COMP',
10847: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10848: bom_globals.get_item_name(to_item_id, from_org_id)
10849: ),
10850: 'BOM_COPY',
10851: SYSDATE,
10844: rev_date
10845: ),
10846: GET_MESSAGE ('BOM_COPY_ERR_NO_OPT_MODEL_COMP',
10847: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10848: bom_globals.get_item_name(to_item_id, from_org_id)
10849: ),
10850: 'BOM_COPY',
10851: SYSDATE,
10852: user_id,
10898: from_org_id,
10899: rev_date
10900: ),
10901: GET_MESSAGE ('BOM_COPY_ERR_NO_ATO_OPT_COMPS',
10902: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10903: bom_globals.get_item_name(to_item_id, from_org_id)
10904: ),
10905: 'BOM_COPY',
10906: SYSDATE,
10899: rev_date
10900: ),
10901: GET_MESSAGE ('BOM_COPY_ERR_NO_ATO_OPT_COMPS',
10902: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10903: bom_globals.get_item_name(to_item_id, from_org_id)
10904: ),
10905: 'BOM_COPY',
10906: SYSDATE,
10907: user_id,
10953: from_org_id,
10954: rev_date
10955: ),
10956: GET_MESSAGE ('BOM_COPY_ERR_NO_ATO_STD_COMPS',
10957: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10958: bom_globals.get_item_name(to_item_id, from_org_id)
10959: ),
10960: 'BOM_COPY',
10961: SYSDATE,
10954: rev_date
10955: ),
10956: GET_MESSAGE ('BOM_COPY_ERR_NO_ATO_STD_COMPS',
10957: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
10958: bom_globals.get_item_name(to_item_id, from_org_id)
10959: ),
10960: 'BOM_COPY',
10961: SYSDATE,
10962: user_id,
11009: from_org_id,
11010: rev_date
11011: ),
11012: GET_MESSAGE ('BOM_COPY_ERR_NO_PTO_COMPS',
11013: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
11014: bom_globals.get_item_name(to_item_id, from_org_id)
11015: ),
11016: 'BOM_COPY',
11017: SYSDATE,
11010: rev_date
11011: ),
11012: GET_MESSAGE ('BOM_COPY_ERR_NO_PTO_COMPS',
11013: bom_globals.get_item_name(bcb.component_item_id, from_org_id),
11014: bom_globals.get_item_name(to_item_id, from_org_id)
11015: ),
11016: 'BOM_COPY',
11017: SYSDATE,
11018: user_id,
11072:
11073: copy_comps := copy_comps - SQL%ROWCOUNT;
11074: sql_stmt_num := 43;
11075: --Turn off trigger BOMTBICX
11076: bom_globals.g_skip_bomtbicx := 'Y';
11077:
11078: UPDATE bom_components_b bic
11079: SET bic.wip_supply_type = phantom
11080: WHERE bic.bill_sequence_id = to_sequence_id
11088: AND msi1.inventory_item_id = to_item_id
11089: AND msi1.organization_id = to_org_id)
11090: AND bic.revised_item_sequence_id = rev_item_seq_id;
11091:
11092: bom_globals.g_skip_bomtbicx := 'N';
11093: sql_stmt_num := 44;
11094: bom_globals.g_skip_bomtbicx := 'Y';
11095:
11096: UPDATE bom_components_b bic
11090: AND bic.revised_item_sequence_id = rev_item_seq_id;
11091:
11092: bom_globals.g_skip_bomtbicx := 'N';
11093: sql_stmt_num := 44;
11094: bom_globals.g_skip_bomtbicx := 'Y';
11095:
11096: UPDATE bom_components_b bic
11097: SET bic.optional = 1
11098: WHERE bic.bill_sequence_id = to_sequence_id
11111: AND msi1.organization_id = to_org_id)
11112: AND bic.revised_item_sequence_id = rev_item_seq_id;
11113:
11114: --Turn on trigger BOMTBICX
11115: bom_globals.g_skip_bomtbicx := 'N';
11116: sql_stmt_num := 46;
11117:
11118: INSERT INTO bom_reference_designators
11119: (component_reference_designator,
11481:
11482: EXCEPTION
11483: WHEN overlap_error
11484: THEN
11485: bom_globals.g_skip_bomtbicx := 'N';
11486: fnd_message.set_name ('BOM', 'BOM_BAD_COPY_GUI');
11487:
11488: INSERT INTO mtl_interface_errors
11489: (unique_id,
11524: sysdate
11525: );
11526: WHEN common_error
11527: THEN
11528: bom_globals.g_skip_bomtbicx := 'N';
11529: fnd_message.set_name ('BOM', 'BOM_COMMON_OTHER_ORGS2');
11530:
11531: INSERT INTO mtl_interface_errors
11532: (unique_id,
11567: sysdate
11568: );
11569: WHEN OTHERS
11570: THEN
11571: bom_globals.g_skip_bomtbicx := 'N';
11572: err_msg := 'copy_bill_for_revised_item (' || sql_stmt_num || ') ' || SQLERRM;
11573: fnd_message.set_name ('BOM', 'BOM_SQL_ERR');
11574: fnd_message.set_token ('ENTITY', err_msg);
11575: ROLLBACK TO begin_revised_item_bill_copy;