DBA Data[Home] [Help]

APPS.FV_BE_RPR_PKG dependencies on FND_LOG

Line 62: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN

58: BEGIN
59: l_module_name := g_module_name || 'main';
60: l_error_flag := 'N';
61:
62: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
63: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
64: 'START OF PROCESS');
65: END IF;
66: retcode := 0;

Line 63: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,

59: l_module_name := g_module_name || 'main';
60: l_error_flag := 'N';
61:
62: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
63: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
64: 'START OF PROCESS');
65: END IF;
66: retcode := 0;
67: g_user_id := fnd_global.user_id;

Line 95: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN

91:
92: FOR i IN 1..2
93: LOOP
94:
95: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
96: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
97: 'INSIDE CURSOR LOOP');
98: END IF;
99:

Line 96: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,

92: FOR i IN 1..2
93: LOOP
94:
95: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
96: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
97: 'INSIDE CURSOR LOOP');
98: END IF;
99:
100: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN

Line 100: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN

96: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
97: 'INSIDE CURSOR LOOP');
98: END IF;
99:
100: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
101: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
102: 'SETTING HEADER VARIABLES ');
103: END IF;
104:

Line 101: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,

97: 'INSIDE CURSOR LOOP');
98: END IF;
99:
100: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
101: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
102: 'SETTING HEADER VARIABLES ');
103: END IF;
104:
105: set_hdr_fields(i, l_trx_hdr_rec, l_rpr_rec);

Line 119: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN

115: l_to_doc_id := l_trx_hdr_rec.doc_id;
116: l_to_doc_number := l_trx_hdr_rec.doc_number;
117: END IF;
118:
119: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
120: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
121: 'BEFORE INSERTING RECORD DOC NUMBER '||
122: l_trx_hdr_rec.doc_number);
123: END IF;

Line 120: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,

116: l_to_doc_number := l_trx_hdr_rec.doc_number;
117: END IF;
118:
119: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
120: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
121: 'BEFORE INSERTING RECORD DOC NUMBER '||
122: l_trx_hdr_rec.doc_number);
123: END IF;
124:

Line 131: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN

127: IF (g_retcode = 2) THEN
128: RAISE e_error;
129: END IF;
130:
131: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
132: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
133: 'SETTING DETAIL VARIABLES ');
134: END IF;
135:

Line 132: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,

128: RAISE e_error;
129: END IF;
130:
131: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
132: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
133: 'SETTING DETAIL VARIABLES ');
134: END IF;
135:
136: set_dtl_fields(i, l_trx_dtl_rec, l_rpr_rec);

Line 144: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN

140: END IF;
141:
142: l_trx_dtl_rec.doc_id := l_trx_hdr_rec.doc_id;
143:
144: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
145: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
146: 'BEFORE INSERTING DETAIL RECORD');
147: END IF;
148:

Line 145: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,

141:
142: l_trx_dtl_rec.doc_id := l_trx_hdr_rec.doc_id;
143:
144: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
145: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
146: 'BEFORE INSERTING DETAIL RECORD');
147: END IF;
148:
149: insert_dtl_record(l_trx_dtl_rec);

Line 186: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN

182: -- R12 changes
183: IF ((l_workflow_flag = 'Y') AND (g_user_id <> l_rpr_rec.approved_by_user_id)) THEN
184: --p_approver_id)) then
185:
186: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
187: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
188: 'CALLING WORKFLOW');
189: END IF;
190: --Call workflow procedure

Line 187: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,

183: IF ((l_workflow_flag = 'Y') AND (g_user_id <> l_rpr_rec.approved_by_user_id)) THEN
184: --p_approver_id)) then
185:
186: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
187: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
188: 'CALLING WORKFLOW');
189: END IF;
190: --Call workflow procedure
191: fv_wf_be_approval.Main(errbuf, retcode,p_sob_id,

Line 198: Fv_Utility.Log_Mesg(Fnd_Log.Level_Error, l_module_name,

194: p_note, l_to_doc_id,g_user_id,g_resp_id);
195:
196: IF retcode <> 0 THEN
197: l_log_message := 'Error submitting workflow '||errbuf;
198: Fv_Utility.Log_Mesg(Fnd_Log.Level_Error, l_module_name,
199: L_LOG_MESSAGE);
200: reset_doc_status(l_from_doc_id, l_to_doc_id);
201: l_error_flag := 'Y';
202: ELSE

Line 204: IF ( Fnd_Log.Level_Statement>=

200: reset_doc_status(l_from_doc_id, l_to_doc_id);
201: l_error_flag := 'Y';
202: ELSE
203: l_log_message := 'Document submitted to workflow ';
204: IF ( Fnd_Log.Level_Statement>=
205: Fnd_Log.G_Current_Runtime_Level) THEN
206: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement,
207: l_module_name,L_LOG_MESSAGE);
208: END IF;

Line 205: Fnd_Log.G_Current_Runtime_Level) THEN

201: l_error_flag := 'Y';
202: ELSE
203: l_log_message := 'Document submitted to workflow ';
204: IF ( Fnd_Log.Level_Statement>=
205: Fnd_Log.G_Current_Runtime_Level) THEN
206: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement,
207: l_module_name,L_LOG_MESSAGE);
208: END IF;
209: END IF;

Line 206: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement,

202: ELSE
203: l_log_message := 'Document submitted to workflow ';
204: IF ( Fnd_Log.Level_Statement>=
205: Fnd_Log.G_Current_Runtime_Level) THEN
206: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement,
207: l_module_name,L_LOG_MESSAGE);
208: END IF;
209: END IF;
210:

Line 213: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN

209: END IF;
210:
211: ELSE
212:
213: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
214: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
215: 'CALLING FUNDS RESERVATION');
216: END IF;
217:

Line 214: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,

210:
211: ELSE
212:
213: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
214: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
215: 'CALLING FUNDS RESERVATION');
216: END IF;
217:
218: -- R12 changes

Line 238: IF ( Fnd_Log.Level_Error >= Fnd_Log.G_Current_Runtime_Level)THEN

234:
235: -- R12 changes
236: IF retcode = 2 THEN
237: l_log_message := 'Error in Fund Reservation process '||errbuf;
238: IF ( Fnd_Log.Level_Error >= Fnd_Log.G_Current_Runtime_Level)THEN
239: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Error, l_module_name,
240: L_LOG_MESSAGE);
241: END IF;
242: reset_doc_status(l_from_doc_id, l_to_doc_id);

Line 239: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Error, l_module_name,

235: -- R12 changes
236: IF retcode = 2 THEN
237: l_log_message := 'Error in Fund Reservation process '||errbuf;
238: IF ( Fnd_Log.Level_Error >= Fnd_Log.G_Current_Runtime_Level)THEN
239: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Error, l_module_name,
240: L_LOG_MESSAGE);
241: END IF;
242: reset_doc_status(l_from_doc_id, l_to_doc_id);
243: l_error_flag := 'Y';

Line 246: Fv_Utility.Log_Mesg(Fnd_Log.Level_Error, l_module_name,

242: reset_doc_status(l_from_doc_id, l_to_doc_id);
243: l_error_flag := 'Y';
244: ELSIF retcode = 1 THEN
245: l_log_message := 'Unable to Reserve Funds, no documents created';
246: Fv_Utility.Log_Mesg(Fnd_Log.Level_Error, l_module_name,
247: L_LOG_MESSAGE);
248: ELSE
249: l_log_message := 'Fund Reservation Successful ';
250: IF ( Fnd_Log.Level_Statement>=

Line 250: IF ( Fnd_Log.Level_Statement>=

246: Fv_Utility.Log_Mesg(Fnd_Log.Level_Error, l_module_name,
247: L_LOG_MESSAGE);
248: ELSE
249: l_log_message := 'Fund Reservation Successful ';
250: IF ( Fnd_Log.Level_Statement>=
251: Fnd_Log.G_Current_Runtime_Level) THEN
252: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
253: L_LOG_MESSAGE);
254: END IF;

Line 251: Fnd_Log.G_Current_Runtime_Level) THEN

247: L_LOG_MESSAGE);
248: ELSE
249: l_log_message := 'Fund Reservation Successful ';
250: IF ( Fnd_Log.Level_Statement>=
251: Fnd_Log.G_Current_Runtime_Level) THEN
252: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
253: L_LOG_MESSAGE);
254: END IF;
255: END IF;

Line 252: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,

248: ELSE
249: l_log_message := 'Fund Reservation Successful ';
250: IF ( Fnd_Log.Level_Statement>=
251: Fnd_Log.G_Current_Runtime_Level) THEN
252: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
253: L_LOG_MESSAGE);
254: END IF;
255: END IF;
256:

Line 259: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN

255: END IF;
256:
257: END IF; --workflow flag
258:
259: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
260: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
261: 'BEFORE AMOUNT');
262: END IF;
263: l_amount := TO_CHAR(l_trx_dtl_rec.amount,'999,999,999,999.99');

Line 260: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,

256:
257: END IF; --workflow flag
258:
259: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
260: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
261: 'BEFORE AMOUNT');
262: END IF;
263: l_amount := TO_CHAR(l_trx_dtl_rec.amount,'999,999,999,999.99');
264: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN

Line 264: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN

260: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
261: 'BEFORE AMOUNT');
262: END IF;
263: l_amount := TO_CHAR(l_trx_dtl_rec.amount,'999,999,999,999.99');
264: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
265: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
266: 'AFTER AMOUNT');
267: END IF;
268: l_gl_date := TO_CHAR(l_trx_dtl_rec.gl_date,'DD-MON-YYYY');

Line 265: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,

261: 'BEFORE AMOUNT');
262: END IF;
263: l_amount := TO_CHAR(l_trx_dtl_rec.amount,'999,999,999,999.99');
264: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
265: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
266: 'AFTER AMOUNT');
267: END IF;
268: l_gl_date := TO_CHAR(l_trx_dtl_rec.gl_date,'DD-MON-YYYY');
269:

Line 281: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN

277:
278: IF (l_error_flag = 'Y') THEN
279: retcode := 2;
280: END IF;
281: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
282: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
283: 'PROCESS END');
284: END IF;
285:

Line 282: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,

278: IF (l_error_flag = 'Y') THEN
279: retcode := 2;
280: END IF;
281: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
282: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
283: 'PROCESS END');
284: END IF;
285:
286: EXCEPTION WHEN e_error THEN

Line 288: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN

284: END IF;
285:
286: EXCEPTION WHEN e_error THEN
287:
288: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
289: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
290: 'EXCEPTION ENCOUNTERED IN MAIN ');
291: END IF;
292:

Line 289: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,

285:
286: EXCEPTION WHEN e_error THEN
287:
288: IF ( Fnd_Log.Level_Statement>= Fnd_Log.G_Current_Runtime_Level) THEN
289: Fv_Utility.Debug_Mesg(Fnd_Log.Level_Statement, l_module_name,
290: 'EXCEPTION ENCOUNTERED IN MAIN ');
291: END IF;
292:
293: -- Rolling back the row created in fv_be_trx_hdrs.

Line 312: Fv_Utility.Log_Mesg(FND_LOG.LEVEL_UNEXPECTED, l_module_name||

308:
309: EXCEPTION WHEN OTHERS THEN
310: retcode := 2;
311: errbuf := 'Error in main procedure '|| SQLERRM;
312: Fv_Utility.Log_Mesg(FND_LOG.LEVEL_UNEXPECTED, l_module_name||
313: '.final_exception',errbuf);
314: RETURN;
315:
316: END ; --procedure main

Line 520: Fv_Utility.Log_Mesg(FND_LOG.LEVEL_UNEXPECTED, l_module_name||

516:
517: EXCEPTION WHEN OTHERS THEN
518: g_retcode := 2;
519: g_errbuf := 'Error in set_hdr_fields procedure '|| SQLERRM;
520: Fv_Utility.Log_Mesg(FND_LOG.LEVEL_UNEXPECTED, l_module_name||
521: '.final_exception',g_errbuf);
522: END; --procedure set_hdr_fields
523:
524: PROCEDURE set_dtl_fields (p_count NUMBER,

Line 654: Fv_Utility.Log_Mesg(FND_LOG.LEVEL_UNEXPECTED, l_module_name||

650:
651: EXCEPTION WHEN OTHERS THEN
652: g_retcode := 2;
653: g_errbuf := 'Error in set_dtl_fields procedure '|| SQLERRM;
654: Fv_Utility.Log_Mesg(FND_LOG.LEVEL_UNEXPECTED, l_module_name||
655: '.final_exception',g_errbuf);
656:
657: END; --procedure set_dtl_fields
658:

Line 777: Fv_Utility.Log_Mesg(FND_LOG.LEVEL_UNEXPECTED, l_module_name||

773:
774: EXCEPTION WHEN OTHERS THEN
775: g_retcode := 2;
776: g_errbuf := 'Error in insert_hdr_record procedure '||SQLERRM;
777: Fv_Utility.Log_Mesg(FND_LOG.LEVEL_UNEXPECTED, l_module_name||
778: '.final_exception',g_errbuf);
779:
780: END; --procedure insert_hdr_record
781:

Line 903: Fv_Utility.Log_Mesg(FND_LOG.LEVEL_UNEXPECTED, l_module_name||

899:
900: EXCEPTION WHEN OTHERS THEN
901: g_retcode := 2;
902: g_errbuf := 'Error in insert_dtl_record procedure '||SQLERRM;
903: Fv_Utility.Log_Mesg(FND_LOG.LEVEL_UNEXPECTED, l_module_name||
904: '.final_exception',g_errbuf);
905:
906: END; --procedure insert_dtl_record
907:

Line 927: Fv_Utility.Log_Mesg(FND_LOG.LEVEL_UNEXPECTED, l_module_name||

923:
924: EXCEPTION WHEN OTHERS THEN
925: g_retcode := 2;
926: g_errbuf := 'Error in reset_doc_status procedure '||SQLERRM;
927: Fv_Utility.Log_Mesg(FND_LOG.LEVEL_UNEXPECTED, l_module_name||
928: '.final_exception',g_errbuf);
929: END;
930: BEGIN
931: g_module_name := 'fv.plsql.fv_be_rpr_pkg.';