48: l_progress VARCHAR2(3) := '000';
49: BEGIN
50:
51: IF (g_debug = 'Y' AND
52: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
53: fnd_log.string(fnd_log.level_statement,
54: g_module_prefix || l_api_name,
55: 'Parameters:' || to_char(p_req_ou) || ' ' || to_char(p_po_ou) || ' ' || p_po_currency_code || ' ' || p_rate_type || ' ' || p_rate_date);
56: END IF;
49: BEGIN
50:
51: IF (g_debug = 'Y' AND
52: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
53: fnd_log.string(fnd_log.level_statement,
54: g_module_prefix || l_api_name,
55: 'Parameters:' || to_char(p_req_ou) || ' ' || to_char(p_po_ou) || ' ' || p_po_currency_code || ' ' || p_rate_type || ' ' || p_rate_date);
56: END IF;
57:
83:
84: l_progress := '003';
85:
86: IF (g_debug = 'Y' AND
87: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
88: fnd_log.string(fnd_log.level_statement,
89: g_module_prefix || l_api_name,
90: 'Return:' || ' Rate:' || to_char(l_rate));
91: END IF;
84: l_progress := '003';
85:
86: IF (g_debug = 'Y' AND
87: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
88: fnd_log.string(fnd_log.level_statement,
89: g_module_prefix || l_api_name,
90: 'Return:' || ' Rate:' || to_char(l_rate));
91: END IF;
92:
93: RETURN l_rate;
94: EXCEPTION
95: WHEN OTHERS THEN
96: IF (g_debug = 'Y' AND
97: fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) THEN
98: fnd_log.string(fnd_log.level_unexpected,
99: g_module_prefix || l_api_name,
100: 'Exception:' || l_progress || ' ' || SQLERRM );
101: END IF;
94: EXCEPTION
95: WHEN OTHERS THEN
96: IF (g_debug = 'Y' AND
97: fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) THEN
98: fnd_log.string(fnd_log.level_unexpected,
99: g_module_prefix || l_api_name,
100: 'Exception:' || l_progress || ' ' || SQLERRM );
101: END IF;
102: RETURN 1;
127: l_progress VARCHAR2(3) := '000';
128: BEGIN
129:
130: IF (g_debug = 'Y' AND
131: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
132: fnd_log.string(fnd_log.level_statement,
133: g_module_prefix || l_api_name,
134: 'Parameters:' ||
135: to_char(p_req_ou) || ' ' ||
128: BEGIN
129:
130: IF (g_debug = 'Y' AND
131: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
132: fnd_log.string(fnd_log.level_statement,
133: g_module_prefix || l_api_name,
134: 'Parameters:' ||
135: to_char(p_req_ou) || ' ' ||
136: to_char(p_po_ou) || ' ' ||
182:
183: END IF;
184:
185: IF (g_debug = 'Y' AND
186: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
187: fnd_log.string(fnd_log.level_statement,
188: g_module_prefix || l_api_name,
189: 'Conversion Rate:' || to_char(l_conversion_rate));
190: END IF;
183: END IF;
184:
185: IF (g_debug = 'Y' AND
186: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
187: fnd_log.string(fnd_log.level_statement,
188: g_module_prefix || l_api_name,
189: 'Conversion Rate:' || to_char(l_conversion_rate));
190: END IF;
191:
200: END IF;
201: EXCEPTION
202: WHEN OTHERS THEN
203: IF (g_debug = 'Y' AND
204: fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) THEN
205: fnd_log.string(fnd_log.level_unexpected,
206: g_module_prefix || l_api_name,
207: 'Exception:' || l_progress || ' ' || SQLERRM );
208: END IF;
201: EXCEPTION
202: WHEN OTHERS THEN
203: IF (g_debug = 'Y' AND
204: fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) THEN
205: fnd_log.string(fnd_log.level_unexpected,
206: g_module_prefix || l_api_name,
207: 'Exception:' || l_progress || ' ' || SQLERRM );
208: END IF;
209: END calculate_price_diff;
233: l_progress VARCHAR2(3) := '000';
234: BEGIN
235:
236: IF (g_debug = 'Y' AND
237: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
238: fnd_log.string(fnd_log.level_statement,
239: g_module_prefix || l_api_name,
240: 'Parameters:' ||
241: to_char(p_req_ou) || ' ' ||
234: BEGIN
235:
236: IF (g_debug = 'Y' AND
237: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
238: fnd_log.string(fnd_log.level_statement,
239: g_module_prefix || l_api_name,
240: 'Parameters:' ||
241: to_char(p_req_ou) || ' ' ||
242: to_char(p_po_ou) || ' ' ||
288:
289: END IF;
290:
291: IF (g_debug = 'Y' AND
292: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
293: fnd_log.string(fnd_log.level_statement,
294: g_module_prefix || l_api_name,
295: 'Conversion Rate:' || to_char(l_conversion_rate));
296: END IF;
289: END IF;
290:
291: IF (g_debug = 'Y' AND
292: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
293: fnd_log.string(fnd_log.level_statement,
294: g_module_prefix || l_api_name,
295: 'Conversion Rate:' || to_char(l_conversion_rate));
296: END IF;
297:
306: END IF;
307: EXCEPTION
308: WHEN OTHERS THEN
309: IF (g_debug = 'Y' AND
310: fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) THEN
311: fnd_log.string(fnd_log.level_unexpected,
312: g_module_prefix || l_api_name,
313: 'Exception:' || l_progress || ' ' || SQLERRM );
314: END IF;
307: EXCEPTION
308: WHEN OTHERS THEN
309: IF (g_debug = 'Y' AND
310: fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) THEN
311: fnd_log.string(fnd_log.level_unexpected,
312: g_module_prefix || l_api_name,
313: 'Exception:' || l_progress || ' ' || SQLERRM );
314: END IF;
315: END calculate_amount_diff;
425: po_rate_date, line_location_amount, po_line_amount,
426: PRECISION);
427:
428: IF (g_debug = 'Y' AND
429: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
430: fnd_log.string(fnd_log.level_statement,
431: g_module_prefix || l_api_name,
432: 'Start_Date_Diff:' || to_char(start_date_diff) || ' ' ||
433: 'End_Date_Diff:' || to_char(end_date_diff) || ' ' || 'Amount_Diff:' || to_char(amount_diff));
426: PRECISION);
427:
428: IF (g_debug = 'Y' AND
429: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
430: fnd_log.string(fnd_log.level_statement,
431: g_module_prefix || l_api_name,
432: 'Start_Date_Diff:' || to_char(start_date_diff) || ' ' ||
433: 'End_Date_Diff:' || to_char(end_date_diff) || ' ' || 'Amount_Diff:' || to_char(amount_diff));
434: END IF;
449: po_rate_date, line_location_amount, po_line_amount,
450: PRECISION);
451:
452: IF (g_debug = 'Y' AND
453: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
454: fnd_log.string(fnd_log.level_statement,
455: g_module_prefix || l_api_name,
456: 'Date_Diff:' || to_char(date_diff) || ' ' ||
457: 'Amount_Diff:' || to_char(amount_diff));
450: PRECISION);
451:
452: IF (g_debug = 'Y' AND
453: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
454: fnd_log.string(fnd_log.level_statement,
455: g_module_prefix || l_api_name,
456: 'Date_Diff:' || to_char(date_diff) || ' ' ||
457: 'Amount_Diff:' || to_char(amount_diff));
458: END IF;
471: po_rate_date, line_location_price, po_line_price,
472: ext_precision);
473:
474: IF (g_debug = 'Y' AND
475: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
476: fnd_log.string(fnd_log.level_statement,
477: g_module_prefix || l_api_name,
478: 'Date_Diff:' || to_char(date_diff) || ' ' ||
479: 'Quantity_Diff:' || to_char(quantity_diff) || ' ' ||
472: ext_precision);
473:
474: IF (g_debug = 'Y' AND
475: fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
476: fnd_log.string(fnd_log.level_statement,
477: g_module_prefix || l_api_name,
478: 'Date_Diff:' || to_char(date_diff) || ' ' ||
479: 'Quantity_Diff:' || to_char(quantity_diff) || ' ' ||
480: 'Unit_Price_Diff:' || to_char(unit_price_diff));
492:
493: EXCEPTION
494: WHEN OTHERS THEN
495: IF (g_debug = 'Y' AND
496: fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) THEN
497: fnd_log.string(fnd_log.level_unexpected,
498: g_module_prefix || l_api_name,
499: 'Exception:' || l_progress || ' ' || SQLERRM );
500: END IF;
493: EXCEPTION
494: WHEN OTHERS THEN
495: IF (g_debug = 'Y' AND
496: fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) THEN
497: fnd_log.string(fnd_log.level_unexpected,
498: g_module_prefix || l_api_name,
499: 'Exception:' || l_progress || ' ' || SQLERRM );
500: END IF;
501: RETURN 'N';