[Home] [Help]
129: -- 3222932 setting global replacement of null disable dates
130:
131: g_futuredate DATE := to_date('01/01/2099 00:00:00','MM/DD/YYYY HH24:MI:SS'); /* 02-14-2005 Sushant */
132:
133: PG_DEBUG Number := NVL(FND_PROFILE.value('ONT_DEBUG_LEVEL'), 0);
134:
135: /***************************************************************************
136: This procedure will be called by the Update Configuration BOMs concurrent
137: program for a particular bcol_upg sequence. It will create BOMs and
184: WriteToLog(' Sequence::'||p_seq, 1);
185: WriteToLog(' Changed sourcing::'||p_changed_src, 1);
186:
187: l_stmt_num := 10;
188: l_flow_calc := FND_PROFILE.Value('CTO_PERFORM_FLOW_CALC');
189: WriteToLog('Perform_flow_calc::'||l_flow_calc, 3);
190:
191: WHILE TRUE LOOP
192: --
353: and bcolu2.status = 'BOM_LOOP');
354:
355: WriteToLog('Rows updated to status BOM_BULK::' ||sql%rowcount, 2);
356:
357: l_mrp_aset_id := to_number(FND_PROFILE.VALUE('MRP_DEFAULT_ASSIGNMENT_SET'));
358: WriteToLog('MRP Assignment Set Id::'||l_mrp_aset_id, 2);
359:
360: BEGIN
361: select assignment_set_id
1241: Check profile option 'Inherit Operation_sequence_number'. If it is set
1242: to 'Yes', ensure that the childern default the operation sequence number
1243: from its parent, if not already assigned.
1244: +--------------------------------------------------------------------------*/
1245: lOpseqProfile := FND_PROFILE.Value('BOM:CONFIG_INHERIT_OP_SEQ');
1246: WriteToLog('Profile Config_inherit_op_seq is ' || lOpseqProfile, 3);
1247:
1248: lStmtNum := 80;
1249: if lOpseqProfile = 1 then
1825: where organization_id = pOrgId
1826: and inventory_item_id = pConfigId ;
1827: WriteToLog('Config name is.. '|| v_config ,5);
1828:
1829: lcreate_item := nvl(FND_PROFILE.VALUE('CTO_CONFIG_EXCEPTION'), 1);
1830: WriteToLog ('Config exception profile:: '||lcreate_item, 3);
1831: WriteToLog ('Estimated Release date :: '||to_char(lEstRelDate),1);
1832:
1833: open missed_lines(pLineId,lConfigBillId, lEstRelDate ); /* New Approach for effectivity dates */
4316:
4317: --
4318: -- Get item sequence increment
4319: --
4320: p_seq_increment := fnd_profile.value('BOM:ITEM_SEQUENCE_INCREMENT');
4321: WriteToLog('Item Seq Increment::'||to_char(p_seq_increment), 5);
4322:
4323: --
4324: -- update item_num of top model
6909: delimiter varchar2(10);
6910: profile_setting varchar2(30);
6911: CURSOR profile_check IS
6912: select nvl(substr(profile_option_value,1,30),'N')
6913: from fnd_profile_option_values val,fnd_profile_options op
6914: where op.application_id = 401
6915: and op.profile_option_name = 'USE_NAME_ICG_DESC'
6916: and val.level_id = 10001 /* This is for site level */
6917: and val.application_id = op.application_id