[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: --
342: and bcolu2.status = 'BOM_LOOP');
343:
344: WriteToLog('Rows updated to status BOM_BULK::' ||sql%rowcount, 2);
345:
346: l_mrp_aset_id := to_number(FND_PROFILE.VALUE('MRP_DEFAULT_ASSIGNMENT_SET'));
347: WriteToLog('MRP Assignment Set Id::'||l_mrp_aset_id, 2);
348:
349: BEGIN
350: select assignment_set_id
1182: Check profile option 'Inherit Operation_sequence_number'. If it is set
1183: to 'Yes', ensure that the childern default the operation sequence number
1184: from its parent, if not already assigned.
1185: +--------------------------------------------------------------------------*/
1186: lOpseqProfile := FND_PROFILE.Value('BOM:CONFIG_INHERIT_OP_SEQ');
1187: WriteToLog('Profile Config_inherit_op_seq is ' || lOpseqProfile, 3);
1188:
1189: lStmtNum := 80;
1190: if lOpseqProfile = 1 then
1766: where organization_id = pOrgId
1767: and inventory_item_id = pConfigId ;
1768: WriteToLog('Config name is.. '|| v_config ,5);
1769:
1770: lcreate_item := nvl(FND_PROFILE.VALUE('CTO_CONFIG_EXCEPTION'), 1);
1771: WriteToLog ('Config exception profile:: '||lcreate_item, 3);
1772: WriteToLog ('Estimated Release date :: '||to_char(lEstRelDate),1);
1773:
1774: open missed_lines(pLineId,lConfigBillId, lEstRelDate ); /* New Approach for effectivity dates */
4149:
4150: --
4151: -- Get item sequence increment
4152: --
4153: p_seq_increment := fnd_profile.value('BOM:ITEM_SEQUENCE_INCREMENT');
4154: WriteToLog('Item Seq Increment::'||to_char(p_seq_increment), 5);
4155:
4156: --
4157: -- update item_num of top model
6697: delimiter varchar2(10);
6698: profile_setting varchar2(30);
6699: CURSOR profile_check IS
6700: select nvl(substr(profile_option_value,1,30),'N')
6701: from fnd_profile_option_values val,fnd_profile_options op
6702: where op.application_id = 401
6703: and op.profile_option_name = 'USE_NAME_ICG_DESC'
6704: and val.level_id = 10001 /* This is for site level */
6705: and val.application_id = op.application_id