156: -- Developer Mani Choudhary
157: -- Date 31-MAY-2005
158: -- Proration to consider period start and period type
159: -------------------------------------------------------------------------
160: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
161: fnd_log.string(fnd_log.level_statement,G_MODULE_CURRENT||'.Calculate_sll_amount.ppc',
162: 'input parameters period start '||p_period_start
163: ||' p_period_type = ' || p_period_type);
164: END IF;
157: -- Date 31-MAY-2005
158: -- Proration to consider period start and period type
159: -------------------------------------------------------------------------
160: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
161: fnd_log.string(fnd_log.level_statement,G_MODULE_CURRENT||'.Calculate_sll_amount.ppc',
162: 'input parameters period start '||p_period_start
163: ||' p_period_type = ' || p_period_type);
164: END IF;
165:
184: p_source_uom => l_uom_code,
185: p_period_type => p_period_type,
186: p_period_start => p_period_start
187: );
188: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
189: fnd_log.string(fnd_log.level_statement,G_MODULE_CURRENT||'.Calculate_sll_amount.ppc',
190: 'afer calling OKS_TIME_MEASURES_PUB.get_quantity input parameters period start '||p_period_start||' p_period_type = ' || p_period_type
191: ||' result l_temp '||l_temp);
192: END IF;
185: p_period_type => p_period_type,
186: p_period_start => p_period_start
187: );
188: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
189: fnd_log.string(fnd_log.level_statement,G_MODULE_CURRENT||'.Calculate_sll_amount.ppc',
190: 'afer calling OKS_TIME_MEASURES_PUB.get_quantity input parameters period start '||p_period_start||' p_period_type = ' || p_period_type
191: ||' result l_temp '||l_temp);
192: END IF;
193:
196: END IF;
197:
198: l_next_frequency :=l_next_frequency + l_temp;
199:
200: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
201: fnd_log.string(fnd_log.level_statement,G_MODULE_CURRENT||'.Calculate_sll_amount.ppc',
202: 'afer calling OKS_TIME_MEASURES_PUB.get_quantity input parameters period start '||p_period_start||' p_period_type = ' || p_period_type
203: ||' result l_next_frequency '||l_next_frequency);
204: END IF;
197:
198: l_next_frequency :=l_next_frequency + l_temp;
199:
200: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
201: fnd_log.string(fnd_log.level_statement,G_MODULE_CURRENT||'.Calculate_sll_amount.ppc',
202: 'afer calling OKS_TIME_MEASURES_PUB.get_quantity input parameters period start '||p_period_start||' p_period_type = ' || p_period_type
203: ||' result l_next_frequency '||l_next_frequency);
204: END IF;
205:
213: p_source_uom => l_uom_code,
214: p_period_type => p_period_type,
215: p_period_start => p_period_start
216: );
217: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
218: fnd_log.string(fnd_log.level_statement,G_MODULE_CURRENT||'.Calculate_sll_amount.ppc',
219: 'afer calling OKS_TIME_MEASURES_PUB.get_quantity input parameters period start '||p_period_start||' p_period_type = ' || p_period_type
220: ||' result l_curr_frequency '||l_curr_frequency);
221: END IF;
214: p_period_type => p_period_type,
215: p_period_start => p_period_start
216: );
217: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
218: fnd_log.string(fnd_log.level_statement,G_MODULE_CURRENT||'.Calculate_sll_amount.ppc',
219: 'afer calling OKS_TIME_MEASURES_PUB.get_quantity input parameters period start '||p_period_start||' p_period_type = ' || p_period_type
220: ||' result l_curr_frequency '||l_curr_frequency);
221: END IF;
222:
242:
243:
244: -- l_tot_frequency := l_tot_frequency + l_curr_frequency + l_next_frequency;
245:
246: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
247: fnd_log.string(fnd_log.level_statement,G_MODULE_CURRENT||'.Calculate_sll_amount.ppc',
248: ' result l_tot_frequency '||l_tot_frequency);
249: END IF;
250:
243:
244: -- l_tot_frequency := l_tot_frequency + l_curr_frequency + l_next_frequency;
245:
246: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
247: fnd_log.string(fnd_log.level_statement,G_MODULE_CURRENT||'.Calculate_sll_amount.ppc',
248: ' result l_tot_frequency '||l_tot_frequency);
249: END IF;
250:
251: --errorout_ad('l_tot_frequency '||l_tot_frequency);
255: l_period_sll_amt := ( l_sll_remain_amount /( nvl(l_tot_frequency,1) * nvl(l_sll_period,1))) * nvl(l_curr_frequency,0) ;
256:
257: l_period_sll_amt := OKS_EXTWAR_UTIL_PVT.round_currency_amt(l_period_sll_amt, l_currency_code);
258:
259: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
260: fnd_log.string(fnd_log.level_statement,G_MODULE_CURRENT||'.Calculate_sll_amount.ppc',
261: ' result l_period_sll_amt '||l_period_sll_amt);
262: END IF;
263:
256:
257: l_period_sll_amt := OKS_EXTWAR_UTIL_PVT.round_currency_amt(l_period_sll_amt, l_currency_code);
258:
259: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
260: fnd_log.string(fnd_log.level_statement,G_MODULE_CURRENT||'.Calculate_sll_amount.ppc',
261: ' result l_period_sll_amt '||l_period_sll_amt);
262: END IF;
263:
264:
263:
264:
265: l_sll_remain_amount := l_sll_remain_amount - (l_period_sll_amt * nvl(l_sll_period,1)) ;
266:
267: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
268: fnd_log.string(fnd_log.level_statement,G_MODULE_CURRENT||'.Calculate_sll_amount.ppc',
269: ' result l_sll_remain_amount '||l_sll_remain_amount);
270: END IF;
271:
264:
265: l_sll_remain_amount := l_sll_remain_amount - (l_period_sll_amt * nvl(l_sll_period,1)) ;
266:
267: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
268: fnd_log.string(fnd_log.level_statement,G_MODULE_CURRENT||'.Calculate_sll_amount.ppc',
269: ' result l_sll_remain_amount '||l_sll_remain_amount);
270: END IF;
271:
272: --errorout_ad('l_period_sll_amt '||l_period_sll_amt);