[Home] [Help]
58: | are modified to handle BUY model type also. This
59: | change is done as part of 'Procuring config' and
60: | Auto create Req for ATO item project(Patch set G)
61: | The changes made in the CTOATPIB.pls file is replicated
62: | here .Look at the individual places for Further comments.
63: | Get_all_item_orgs procedure is modified as part of this
64: | Project
65: | Modified on 24-AUG-2001 by Sushant Sawant: BUG #1957336
66: | Added a new functionality for preconfigure bom.
1022: gLoginId, -- last_update_login
1023: null, -- program_application_id,??
1024: null, -- program_id,??
1025: sysdate -- program_update_date
1026: from dual;
1027:
1028: /*
1029: This statement has to be there to exit after the first pass
1030: for buy and dropship to avoid pursuing make/transfer, make/transfer chains
1115: gLoginId, -- last_update_login
1116: null, -- program_application_id,??
1117: null, -- program_id,??
1118: sysdate -- program_update_date
1119: from dual
1120: where NOT EXISTS
1121: (select NULL
1122: from bom_cto_src_orgs
1123: where line_id = pLineId
1178: gLoginId, -- last_update_login
1179: null, -- program_application_id,??
1180: null, -- program_id,??
1181: sysdate -- program_update_date
1182: from dual
1183: where NOT EXISTS
1184: (select NULL
1185: from bom_cto_src_orgs
1186: where line_id = pLineId
1291: gLoginId, -- last_update_login
1292: null, -- program_application_id,??
1293: null, -- program_id,??
1294: sysdate -- program_update_date
1295: from dual
1296: where NOT EXISTS
1297: (select NULL
1298: from bom_cto_src_orgs
1299: where line_id = pLineId
1444: gLoginId, -- last_update_login
1445: null, -- program_application_id,??
1446: null, -- program_id,??
1447: sysdate -- program_update_date
1448: from dual
1449: where NOT EXISTS
1450: (select NULL
1451: from bom_cto_src_orgs
1452: where line_id = pLineId
1941: -- get assignment id for config item
1942: --
1943: SELECT mrp_sr_assignments_s.nextval
1944: INTO lConfigAssignmentId
1945: FROM DUAL;
1946:
1947: --
1948: -- form lAssignmentTbl from lAssignmentRec
1949: --
2203: v_step := 'Step A1' ;
2204:
2205: select bom_explosion_temp_s.nextval
2206: into v_mfg_comp_seq_id
2207: from dual;
2208:
2209: IF PG_DEBUG <> 0 THEN
2210: oe_debug_pub.add('populate_bcol: ' || ' sequence ' || v_mfg_comp_seq_id , 3);
2211: END IF;
4152:
4153: l_stmt := 40;
4154: select fnd_attached_documents_s.nextval
4155: into l_attached_document_id
4156: from dual;
4157:
4158: l_stmt := 50;
4159:
4160: FND_ATTACHED_DOCUMENTS_PKG.INSERT_ROW
4837: End if;
4838:
4839: select bom_explosion_temp_s.nextval
4840: into xGrpId
4841: from dual;
4842:
4843: If PG_DEBUG <> 0 Then
4844: cto_wip_workflow_api_pk.cto_debug('create_isp_bom', 'xGrpId::'||to_char(xGrpId));
4845: cto_wip_workflow_api_pk.cto_debug('create_isp_bom', 'ItemId::'||to_char(p_item_id));
6779:
6780: v_oe_bcol_diff:= 'N' ;
6781:
6782: begin
6783: select 'Y' into v_oe_bcol_diff from dual
6784: where exists
6785: ((Select 1
6786: from oe_order_lines_all oel
6787: Where not exists