eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.FV_DISB_IN_TRANSIT dependencies on FND_LOG

Line 123: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

119:
120: BEGIN
121: l_module_name := g_module_name || 'confirm_treas_payment ';
122:
123: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
124: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'x_treasury_confirmation_id is ' ||
125: x_treasury_confirmation_id);
126: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'starting confirm_treas_payment');
127: END IF;

Line 124: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'x_treasury_confirmation_id is ' ||

120: BEGIN
121: l_module_name := g_module_name || 'confirm_treas_payment ';
122:
123: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
124: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'x_treasury_confirmation_id is ' ||
125: x_treasury_confirmation_id);
126: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'starting confirm_treas_payment');
127: END IF;
128: g_treasury_confirmation_id := x_treasury_confirmation_id;

Line 126: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'starting confirm_treas_payment');

122:
123: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
124: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'x_treasury_confirmation_id is ' ||
125: x_treasury_confirmation_id);
126: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'starting confirm_treas_payment');
127: END IF;
128: g_treasury_confirmation_id := x_treasury_confirmation_id;
129: x_err_code := 0;
130:

Line 137: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

133: INTO v_payment_instruction_id
134: FROM fv_treasury_confirmations ftc
135: WHERE ftc.treasury_confirmation_id = g_treasury_confirmation_id;
136:
137: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
138: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name, 'v_payment_instruction_id is ' || v_payment_instruction_id);
139: END IF;
140:
141: -- initializing table with check_ids

Line 138: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name, 'v_payment_instruction_id is ' || v_payment_instruction_id);

134: FROM fv_treasury_confirmations ftc
135: WHERE ftc.treasury_confirmation_id = g_treasury_confirmation_id;
136:
137: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
138: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name, 'v_payment_instruction_id is ' || v_payment_instruction_id);
139: END IF;
140:
141: -- initializing table with check_ids
142:

Line 160: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

156: v_begin_doc := c_check_range_rec.range_from;
157: v_end_doc := c_check_range_rec.range_to;
158: v_confirm_date := c_check_range_rec.treasury_doc_date;
159:
160: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
161: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_payment_instruction_id is ' || v_payment_instruction_id);
162: END IF;
163:
164: IF (v_begin_doc IS NULL) OR (v_end_doc IS NULL) OR (v_payment_instruction_id IS NULL) OR ( v_confirm_date IS NULL) THEN

Line 161: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_payment_instruction_id is ' || v_payment_instruction_id);

157: v_end_doc := c_check_range_rec.range_to;
158: v_confirm_date := c_check_range_rec.treasury_doc_date;
159:
160: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
161: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_payment_instruction_id is ' || v_payment_instruction_id);
162: END IF;
163:
164: IF (v_begin_doc IS NULL) OR (v_end_doc IS NULL) OR (v_payment_instruction_id IS NULL) OR ( v_confirm_date IS NULL) THEN
165: x_err_code := 20;

Line 172: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

168: END IF;
169:
170: v_diff := v_end_doc - v_begin_doc + 1;
171:
172: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
173: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_diff is ' || v_diff);
174: END IF;
175:
176: FOR i IN 1.. v_diff

Line 173: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_diff is ' || v_diff);

169:
170: v_diff := v_end_doc - v_begin_doc + 1;
171:
172: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
173: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_diff is ' || v_diff);
174: END IF;
175:
176: FOR i IN 1.. v_diff
177: LOOP

Line 179: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

175:
176: FOR i IN 1.. v_diff
177: LOOP
178:
179: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
180: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'l_row_num:'||l_row_num);
181: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'l_check_tbl(l_row_num).check_id:'||
182: l_check_tbl(l_row_num).check_id);
183: END IF;

Line 180: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'l_row_num:'||l_row_num);

176: FOR i IN 1.. v_diff
177: LOOP
178:
179: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
180: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'l_row_num:'||l_row_num);
181: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'l_check_tbl(l_row_num).check_id:'||
182: l_check_tbl(l_row_num).check_id);
183: END IF;
184:

Line 181: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'l_check_tbl(l_row_num).check_id:'||

177: LOOP
178:
179: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
180: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'l_row_num:'||l_row_num);
181: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'l_check_tbl(l_row_num).check_id:'||
182: l_check_tbl(l_row_num).check_id);
183: END IF;
184:
185: UPDATE ap_checks c

Line 206: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

202: LOOP
203: FETCH cur_corr_treas_pay_num INTO v_corr_treas_pay_num, v_offset_check_id;
204: EXIT WHEN cur_corr_treas_pay_num%NOTFOUND;
205:
206: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
207: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name, 'in corrected treasury pay number loop');
208: END IF;
209:
210: IF v_corr_treas_pay_num IS NOT NULL THEN

Line 207: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name, 'in corrected treasury pay number loop');

203: FETCH cur_corr_treas_pay_num INTO v_corr_treas_pay_num, v_offset_check_id;
204: EXIT WHEN cur_corr_treas_pay_num%NOTFOUND;
205:
206: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
207: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name, 'in corrected treasury pay number loop');
208: END IF;
209:
210: IF v_corr_treas_pay_num IS NOT NULL THEN
211: UPDATE ap_checks

Line 263: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,G_errmsg);

259: WHEN OTHERS THEN
260: x_err_code := SQLCODE;
261: x_err_stage := SQLERRM;
262: g_errmsg := SQLERRM;
263: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,G_errmsg);
264: RAISE;
265:
266:
267:

Line 294: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,g_errmsg);

290: x_err_code := SQLCODE;
291: x_err_stage := SQLERRM;
292:
293: g_errmsg := SQLERRM;
294: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,g_errmsg);
295: RAISE;
296: END get_interface_data;
297:
298: ----------------------------------------------------------------------------------------------------------------------------

Line 390: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

386: l_module_name := g_module_name || 'populate_gl_interface ';
387: c_flex_qual_name := 'GL_ACCOUNT';
388: c_reference1 := 'Treasury';
389:
390: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
391: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'starting populate_gl_interface');
392: END IF;
393: x_err_code := 0;
394:

Line 391: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'starting populate_gl_interface');

387: c_flex_qual_name := 'GL_ACCOUNT';
388: c_reference1 := 'Treasury';
389:
390: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
391: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'starting populate_gl_interface');
392: END IF;
393: x_err_code := 0;
394:
395: -- get the data needed to populate the gl_interface table

Line 416: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

412: v_segment_name);
413:
414: v_segment_number := SUBSTR(RTRIM(v_segment_name),8);
415:
416: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
417: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_segment_number = '||v_segment_number);
418: END IF;
419:
420: IF v_boolean = FALSE THEN

Line 417: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_segment_number = '||v_segment_number);

413:
414: v_segment_number := SUBSTR(RTRIM(v_segment_name),8);
415:
416: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
417: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_segment_number = '||v_segment_number);
418: END IF;
419:
420: IF v_boolean = FALSE THEN
421: x_err_code := 20;

Line 428: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

424: END IF;
425:
426:
427: -- Obtain DR/CR account segment values pertaining to transaction code
428: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
429: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_period is = ' || v_period);
430: END IF;
431:
432: SELECT t.treasury_doc_date

Line 429: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_period is = ' || v_period);

425:
426:
427: -- Obtain DR/CR account segment values pertaining to transaction code
428: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
429: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_period is = ' || v_period);
430: END IF;
431:
432: SELECT t.treasury_doc_date
433: INTO v_treasury_doc_date

Line 454: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

450: ELSE
451: v_accounting_date := v_period_end_date;
452: END IF;
453:
454: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
455: FV_UTilitY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_chart_of_accounts_id = '||v_chart_of_accounts_id);
456: END IF;
457:
458: OPEN payment_dists_cur;

Line 455: FV_UTilitY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_chart_of_accounts_id = '||v_chart_of_accounts_id);

451: v_accounting_date := v_period_end_date;
452: END IF;
453:
454: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
455: FV_UTilitY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_chart_of_accounts_id = '||v_chart_of_accounts_id);
456: END IF;
457:
458: OPEN payment_dists_cur;
459: LOOP

Line 476: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR,l_module_name||'.cash_clearing',x_err_stage);

472:
473: IF (v_line_type_code = 'CASH CLEARING') THEN
474: x_err_code := 1;
475: x_err_stage := 'Perform Payment Reconciliation or Cash Management before running Treasury Confirmation';
476: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR,l_module_name||'.cash_clearing',x_err_stage);
477: EXIT;
478: ELSIF (v_line_type_code = 'FUTURE PAYMENT') THEN
479: x_err_code := 1;
480: x_err_stage := 'Create the accounting entries once the payment has matured';

Line 481: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR,l_module_name||'.future_payment', 'The accounting entries have not been created for payment maturity');

477: EXIT;
478: ELSIF (v_line_type_code = 'FUTURE PAYMENT') THEN
479: x_err_code := 1;
480: x_err_stage := 'Create the accounting entries once the payment has matured';
481: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR,l_module_name||'.future_payment', 'The accounting entries have not been created for payment maturity');
482: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR,l_module_name||'.future_payment', 'Create the accounting entries once the payment has matured');
483: EXIT;
484: END IF;
485:

Line 482: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR,l_module_name||'.future_payment', 'Create the accounting entries once the payment has matured');

478: ELSIF (v_line_type_code = 'FUTURE PAYMENT') THEN
479: x_err_code := 1;
480: x_err_stage := 'Create the accounting entries once the payment has matured';
481: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR,l_module_name||'.future_payment', 'The accounting entries have not been created for payment maturity');
482: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR,l_module_name||'.future_payment', 'Create the accounting entries once the payment has matured');
483: EXIT;
484: END IF;
485:
486: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 486: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

482: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR,l_module_name||'.future_payment', 'Create the accounting entries once the payment has matured');
483: EXIT;
484: END IF;
485:
486: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
487: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'in payment_dists_cur cursor loop');
488: END IF;
489:
490:

Line 487: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'in payment_dists_cur cursor loop');

483: EXIT;
484: END IF;
485:
486: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
487: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'in payment_dists_cur cursor loop');
488: END IF;
489:
490:
491: get_segment_values(v_combination_id);

Line 512: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

508: v_amount := v_dr_amount;
509: v_amount_acct := v_dr_acct_amt; -- capture functional amount
510: END IF;
511:
512: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
513: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'inserting into gl_interface');
514: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'Amount is '||TO_CHAR(v_amount));
515: END IF;
516:

Line 513: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'inserting into gl_interface');

509: v_amount_acct := v_dr_acct_amt; -- capture functional amount
510: END IF;
511:
512: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
513: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'inserting into gl_interface');
514: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'Amount is '||TO_CHAR(v_amount));
515: END IF;
516:
517: INSERT INTO gl_interface(status, set_of_books_id,

Line 514: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'Amount is '||TO_CHAR(v_amount));

510: END IF;
511:
512: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
513: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'inserting into gl_interface');
514: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'Amount is '||TO_CHAR(v_amount));
515: END IF;
516:
517: INSERT INTO gl_interface(status, set_of_books_id,
518: accounting_date, currency_code,

Line 645: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

641: x_group_id);
642: END LOOP;
643: CLOSE payment_dists_cur;
644:
645: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
646: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'insert into gl_interface');
647: END IF;
648: EXCEPTION
649: WHEN OTHERS THEN

Line 646: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'insert into gl_interface');

642: END LOOP;
643: CLOSE payment_dists_cur;
644:
645: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
646: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'insert into gl_interface');
647: END IF;
648: EXCEPTION
649: WHEN OTHERS THEN
650: g_errmsg := SQLERRM;

Line 651: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,g_errmsg);

647: END IF;
648: EXCEPTION
649: WHEN OTHERS THEN
650: g_errmsg := SQLERRM;
651: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,g_errmsg);
652: RAISE;
653: END populate_gl_interface;
654:
655: ----------------------------------------------------------------------------------------------------------------------------

Line 667: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'An error has occurred during Journal Import. Please review Journal Import Execution Report.');

663: BEGIN
664: l_module_name := g_module_name || 'cleanup_gl_interface ';
665: x_err_code := 0;
666:
667: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'An error has occurred during Journal Import. Please review Journal Import Execution Report.');
668: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'The journal has been removed from the Interface table.');
669: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'After correcting error please reselect Confirm or Back OUT NOCOPY from Treasury Confirmation or resubmit Disbursements in Transit Voided Checks.');
670: -- Delete records from GL-INTERFACE for a particular group id
671: -- and update the confirmation status flag to 'N'

Line 668: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'The journal has been removed from the Interface table.');

664: l_module_name := g_module_name || 'cleanup_gl_interface ';
665: x_err_code := 0;
666:
667: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'An error has occurred during Journal Import. Please review Journal Import Execution Report.');
668: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'The journal has been removed from the Interface table.');
669: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'After correcting error please reselect Confirm or Back OUT NOCOPY from Treasury Confirmation or resubmit Disbursements in Transit Voided Checks.');
670: -- Delete records from GL-INTERFACE for a particular group id
671: -- and update the confirmation status flag to 'N'
672: DELETE FROM GL_INTERFACE

Line 669: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'After correcting error please reselect Confirm or Back OUT NOCOPY from Treasury Confirmation or resubmit Disbursements in Transit Voided Checks.');

665: x_err_code := 0;
666:
667: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'An error has occurred during Journal Import. Please review Journal Import Execution Report.');
668: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'The journal has been removed from the Interface table.');
669: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'After correcting error please reselect Confirm or Back OUT NOCOPY from Treasury Confirmation or resubmit Disbursements in Transit Voided Checks.');
670: -- Delete records from GL-INTERFACE for a particular group id
671: -- and update the confirmation status flag to 'N'
672: DELETE FROM GL_INTERFACE
673: WHERE user_je_source_name = 'Payables'

Line 711: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

707: l_module_name VARCHAR2(200);
708: v_dit_flag fv_operating_units.dit_flag%TYPE;
709: BEGIN
710: l_module_name := g_module_name || 'do_confirm_process ';
711: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
712: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'starting do_confirm_process');
713: END IF;
714:
715: -- initialize variables

Line 712: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'starting do_confirm_process');

708: v_dit_flag fv_operating_units.dit_flag%TYPE;
709: BEGIN
710: l_module_name := g_module_name || 'do_confirm_process ';
711: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
712: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'starting do_confirm_process');
713: END IF;
714:
715: -- initialize variables
716: x_err_code := 0;

Line 727: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

723: x_err_code,
724: x_err_stage,
725: v_period);
726:
727: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
728: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'x_err_code is ' || x_err_code);
729: END IF;
730:
731: IF (x_err_code <> 0) THEN

Line 728: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'x_err_code is ' || x_err_code);

724: x_err_stage,
725: v_period);
726:
727: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
728: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'x_err_code is ' || x_err_code);
729: END IF;
730:
731: IF (x_err_code <> 0) THEN
732: RETURN;

Line 740: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

736: SELECT gl_interface_control_s.NEXTVAL
737: INTO x_group_id
738: FROM dual;
739:
740: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
741: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'x_group_id = '||x_group_id);
742: END IF;
743:
744: -- Assign the dit_flag from fv_operating_units_all table

Line 741: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'x_group_id = '||x_group_id);

737: INTO x_group_id
738: FROM dual;
739:
740: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
741: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'x_group_id = '||x_group_id);
742: END IF;
743:
744: -- Assign the dit_flag from fv_operating_units_all table
745: SELECT dit_flag

Line 749: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

745: SELECT dit_flag
746: INTO v_dit_flag
747: FROM fv_operating_units;
748:
749: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
750: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'dit flag = '||v_dit_flag);
751: END IF;
752: IF v_dit_flag = 'Y' THEN
753: -- If dit_flag = 'Y' then populate the gl_interface table

Line 750: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'dit flag = '||v_dit_flag);

746: INTO v_dit_flag
747: FROM fv_operating_units;
748:
749: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
750: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'dit flag = '||v_dit_flag);
751: END IF;
752: IF v_dit_flag = 'Y' THEN
753: -- If dit_flag = 'Y' then populate the gl_interface table
754: -- otherwise do not do anything.

Line 760: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

756: fv_disb_in_transit.populate_gl_interface(
757: v_treasury_confirmation_id,
758: x_group_id, v_period, x_err_code,x_err_stage);
759:
760: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
761: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'called populate gl_interface from do confirm process');
762: END IF;
763:
764: IF x_err_code <> 0 THEN

Line 761: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'called populate gl_interface from do confirm process');

757: v_treasury_confirmation_id,
758: x_group_id, v_period, x_err_code,x_err_stage);
759:
760: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
761: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'called populate gl_interface from do confirm process');
762: END IF;
763:
764: IF x_err_code <> 0 THEN
765: RETURN;

Line 775: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,g_errmsg);

771: WHEN OTHERS THEN
772: x_err_code := SQLCODE;
773: x_err_stage := SQLERRM;
774: g_errmsg := SQLERRM;
775: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,g_errmsg);
776: RAISE;
777: END do_confirm_process;
778:
779: ----------------------------------------------------------------------------------------------------------------------------

Line 819: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

815: c_reference1 := 'Treasury';
816: x_err_code := 0;
817: x_group_id := NULL;
818:
819: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
820: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,
821: 'starting do_back_out_process');
822: END IF;
823:

Line 820: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,

816: x_err_code := 0;
817: x_group_id := NULL;
818:
819: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
820: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,
821: 'starting do_back_out_process');
822: END IF;
823:
824: SELECT treasury_doc_date

Line 896: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

892:
893: -- Find the gl_je_lines records that are associated with the
894: -- treasury_confirmation_id that is being backed out.
895:
896: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
897: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,
898: 'starting je_lines loop for backout');
899: END IF;
900:

Line 897: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,

893: -- Find the gl_je_lines records that are associated with the
894: -- treasury_confirmation_id that is being backed out.
895:
896: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
897: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,
898: 'starting je_lines loop for backout');
899: END IF;
900:
901: v_credit_amount := NULL;

Line 926: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

922: get_segment_values(v_cc_id);
923:
924: v_tc_id := TO_CHAR(v_treasury_confirmation_id);
925:
926: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
927: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'starting insert');
928: END IF;
929:
930:

Line 927: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'starting insert');

923:
924: v_tc_id := TO_CHAR(v_treasury_confirmation_id);
925:
926: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
927: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'starting insert');
928: END IF;
929:
930:
931:

Line 1007: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,g_errmsg);

1003:
1004: EXCEPTION
1005: WHEN OTHERS THEN
1006: g_errmsg := SQLERRM;
1007: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,g_errmsg);
1008: RAISE;
1009: END do_back_out_process;
1010: ----------------------------------------------------------------------------------------------------------------------------
1011: PROCEDURE void

Line 1138: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1134: retcode := '0';
1135:
1136: l_org_id := mo_global.get_current_org_id;
1137:
1138: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1139: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'org id = '|| l_org_id);
1140: END IF;
1141:
1142: mo_utils.get_ledger_info(l_org_id,v_set_of_books_id,l_set_of_books_name);

Line 1139: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'org id = '|| l_org_id);

1135:
1136: l_org_id := mo_global.get_current_org_id;
1137:
1138: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1139: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'org id = '|| l_org_id);
1140: END IF;
1141:
1142: mo_utils.get_ledger_info(l_org_id,v_set_of_books_id,l_set_of_books_name);
1143: -- v_set_of_books_id := TO_NUMBER(fnd_profile.value('GL_SET_OF_BKS_ID')); --;>--

Line 1145: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1141:
1142: mo_utils.get_ledger_info(l_org_id,v_set_of_books_id,l_set_of_books_name);
1143: -- v_set_of_books_id := TO_NUMBER(fnd_profile.value('GL_SET_OF_BKS_ID')); --;>--
1144:
1145: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1146: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'set of books id = '||v_set_of_books_id);
1147: END IF;
1148:
1149: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

Line 1146: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'set of books id = '||v_set_of_books_id);

1142: mo_utils.get_ledger_info(l_org_id,v_set_of_books_id,l_set_of_books_name);
1143: -- v_set_of_books_id := TO_NUMBER(fnd_profile.value('GL_SET_OF_BKS_ID')); --;>--
1144:
1145: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1146: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'set of books id = '||v_set_of_books_id);
1147: END IF;
1148:
1149: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1150: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'INSERT INTO fv_voided_checks');

Line 1149: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1145: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1146: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'set of books id = '||v_set_of_books_id);
1147: END IF;
1148:
1149: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1150: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'INSERT INTO fv_voided_checks');
1151: END IF;
1152:
1153: BEGIN

Line 1150: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'INSERT INTO fv_voided_checks');

1146: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'set of books id = '||v_set_of_books_id);
1147: END IF;
1148:
1149: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1150: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'INSERT INTO fv_voided_checks');
1151: END IF;
1152:
1153: BEGIN
1154: INSERT INTO fv_voided_checks

Line 1191: fv_utility.log_mesg(fnd_log.level_exception,l_module_name||'insert fv_voided_checks1',l_err_stage);

1187: WHEN OTHERS THEN
1188: l_err_code := SQLCODE;
1189: l_err_stage := SQLERRM;
1190: retcode := '2';
1191: fv_utility.log_mesg(fnd_log.level_exception,l_module_name||'insert fv_voided_checks1',l_err_stage);
1192: END;
1193:
1194:
1195: IF (retcode = '0') THEN

Line 1205: fv_utility.debug_mesg(fnd_log.level_error,l_module_name,'Error '||l_err_code||' at '||l_err_stage);

1201: x_err_stage => l_err_stage
1202: );
1203:
1204: IF l_err_code <> 0 THEN
1205: fv_utility.debug_mesg(fnd_log.level_error,l_module_name,'Error '||l_err_code||' at '||l_err_stage);
1206: retcode := '2';
1207: errbuf := 'Error in get_interface_data';
1208: END IF;
1209: END IF;

Line 1216: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1212: SELECT gl_interface_control_s.NEXTVAL
1213: INTO l_group_id
1214: FROM dual;
1215:
1216: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1217: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'l_group_id is ' || l_group_id);
1218: END IF;
1219: END IF;
1220:

Line 1217: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'l_group_id is ' || l_group_id);

1213: INTO l_group_id
1214: FROM dual;
1215:
1216: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1217: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'l_group_id is ' || l_group_id);
1218: END IF;
1219: END IF;
1220:
1221: -- Find the gl_je_lines records that are associated with the

Line 1225: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1221: -- Find the gl_je_lines records that are associated with the
1222: -- check_id that is being backed out.
1223:
1224: IF (retcode = '0') THEN
1225: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1226: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'starting je_lines loop for voided checks');
1227: END IF;
1228:
1229: FOR voided_checks_list_rec IN voided_checks_list_cursor (v_set_of_books_id, l_org_id) LOOP

Line 1226: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'starting je_lines loop for voided checks');

1222: -- check_id that is being backed out.
1223:
1224: IF (retcode = '0') THEN
1225: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1226: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'starting je_lines loop for voided checks');
1227: END IF;
1228:
1229: FOR voided_checks_list_rec IN voided_checks_list_cursor (v_set_of_books_id, l_org_id) LOOP
1230: FOR cur_process_void_check_rec IN cur_process_void_check (v_set_of_books_id,

Line 1234: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1230: FOR cur_process_void_check_rec IN cur_process_void_check (v_set_of_books_id,
1231: voided_checks_list_rec.check_id,
1232: voided_checks_list_rec.treasury_confirmation_id) LOOP
1233:
1234: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1235: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name, 'Fetched check id is = '||voided_checks_list_rec.check_id);
1236: END IF;
1237:
1238: select accounting_date into v_accounting_date

Line 1235: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name, 'Fetched check id is = '||voided_checks_list_rec.check_id);

1231: voided_checks_list_rec.check_id,
1232: voided_checks_list_rec.treasury_confirmation_id) LOOP
1233:
1234: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1235: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name, 'Fetched check id is = '||voided_checks_list_rec.check_id);
1236: END IF;
1237:
1238: select accounting_date into v_accounting_date
1239: from ap_invoice_payments_all

Line 1284: fv_utility.log_mesg(fnd_log.level_exception,l_module_name||'No open or future period after voiding check date',l_err_stage);

1280: l_err_code := SQLCODE;
1281: l_err_stage := SQLERRM;
1282: retcode := '2';
1283: errbuf := l_err_stage;
1284: fv_utility.log_mesg(fnd_log.level_exception,l_module_name||'No open or future period after voiding check date',l_err_stage);
1285:
1286: --fnd_file.put_line (fnd_file.log ,'No open or future period after voiding check date');
1287:
1288: EXIT;

Line 1359: fv_utility.log_mesg(fnd_log.level_exception,l_module_name||'insert gl_interface',l_err_stage);

1355: WHEN OTHERS THEN
1356: l_err_code := SQLCODE;
1357: l_err_stage := SQLERRM;
1358: retcode := '2';
1359: fv_utility.log_mesg(fnd_log.level_exception,l_module_name||'insert gl_interface',l_err_stage);
1360: EXIT;
1361: END;
1362:
1363: IF (retcode = '0') THEN

Line 1376: fv_utility.log_mesg(fnd_log.level_exception,l_module_name||'update fv_voided_checks1',l_err_stage);

1372: WHEN OTHERS THEN
1373: l_err_code := SQLCODE;
1374: l_err_stage := SQLERRM;
1375: retcode := '2';
1376: fv_utility.log_mesg(fnd_log.level_exception,l_module_name||'update fv_voided_checks1',l_err_stage);
1377: EXIT;
1378: END;
1379: END IF;
1380: IF (retcode <> '0') THEN

Line 1392: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1388: IF ((retcode = '0') AND (l_count_void > 0)) THEN
1389: -- Obtain the interface run id
1390: l_interface_run_id := gl_interface_control_pkg.get_unique_run_id;
1391:
1392: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1393: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'interface_run_id = '||l_interface_run_id);
1394: END IF;
1395: END IF;
1396:

Line 1393: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'interface_run_id = '||l_interface_run_id);

1389: -- Obtain the interface run id
1390: l_interface_run_id := gl_interface_control_pkg.get_unique_run_id;
1391:
1392: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1393: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'interface_run_id = '||l_interface_run_id);
1394: END IF;
1395: END IF;
1396:
1397:

Line 1423: fv_utility.log_mesg(fnd_log.level_exception,l_module_name||'insert gl_interface_control',l_err_stage);

1419: WHEN OTHERS THEN
1420: l_err_code := SQLCODE;
1421: l_err_stage := SQLERRM;
1422: retcode := '2';
1423: fv_utility.log_mesg(fnd_log.level_exception,l_module_name||'insert gl_interface_control',l_err_stage);
1424: END;
1425: END IF;
1426:
1427: IF ((retcode = '0') AND (l_count_void > 0)) THEN

Line 1429: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1425: END IF;
1426:
1427: IF ((retcode = '0') AND (l_count_void > 0)) THEN
1428:
1429: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1430: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'submitting a request');
1431: END IF;
1432:
1433: l_req_id := fnd_request.submit_request

Line 1430: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'submitting a request');

1426:
1427: IF ((retcode = '0') AND (l_count_void > 0)) THEN
1428:
1429: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1430: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'submitting a request');
1431: END IF;
1432:
1433: l_req_id := fnd_request.submit_request
1434: (

Line 1445: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1441: TO_CHAR(v_set_of_books_id),
1442: 'N', '', '', 'N', 'N');
1443:
1444: -- if concurrent request submission failed then abort process
1445: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1446: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'req_id = '||l_req_id);
1447: END IF;
1448:
1449: IF (l_req_id = 0) THEN

Line 1446: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'req_id = '||l_req_id);

1442: 'N', '', '', 'N', 'N');
1443:
1444: -- if concurrent request submission failed then abort process
1445: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1446: fv_utility.debug_mesg(fnd_log.level_statement,l_module_name,'req_id = '||l_req_id);
1447: END IF;
1448:
1449: IF (l_req_id = 0) THEN
1450: errbuf := 'Can not submit journal import program';

Line 1452: fv_utility.log_mesg(fnd_log.level_statement,l_module_name,errbuf);

1448:
1449: IF (l_req_id = 0) THEN
1450: errbuf := 'Can not submit journal import program';
1451: retcode := '2';
1452: fv_utility.log_mesg(fnd_log.level_statement,l_module_name,errbuf);
1453: END IF;
1454: END IF;
1455:
1456: IF (retcode = '0') THEN

Line 1480: fv_utility.log_mesg(fnd_log.level_exception,l_module_name,errbuf);

1476:
1477: IF (l_call_status = FALSE) THEN
1478: errbuf := 'Can not wait for the status of journal import';
1479: retcode := '2';
1480: fv_utility.log_mesg(fnd_log.level_exception,l_module_name,errbuf);
1481: END IF;
1482: END IF;
1483:
1484: IF ((retcode = '0') AND (l_count_void > 0)) THEN

Line 1518: fv_utility.log_mesg(fnd_log.level_exception,l_module_name||'update fv_voided_checks2',l_err_stage);

1514: l_err_code := SQLCODE;
1515: l_err_stage := SQLERRM;
1516: retcode := '2';
1517: errbuf := l_err_stage;
1518: fv_utility.log_mesg(fnd_log.level_exception,l_module_name||'update fv_voided_checks2',l_err_stage);
1519: END;
1520: BEGIN
1521: UPDATE fv_voided_checks
1522: SET processed_flag = 'X'

Line 1531: fv_utility.log_mesg(fnd_log.level_exception,l_module_name||'update fv_voided_checks2',l_err_stage);

1527: l_err_code := SQLCODE;
1528: l_err_stage := SQLERRM;
1529: retcode := '2';
1530: errbuf := l_err_stage;
1531: fv_utility.log_mesg(fnd_log.level_exception,l_module_name||'update fv_voided_checks2',l_err_stage);
1532: END;
1533: END IF;
1534: END IF;
1535:

Line 1539: fv_utility.log_mesg(fnd_log.level_exception,l_module_name,errbuf);

1535:
1536: IF ((retcode = '0') AND (l_count_void = 0)) THEN
1537: retcode := '1';
1538: errbuf := 'There are no void transactions to be submitted for DIT';
1539: fv_utility.log_mesg(fnd_log.level_exception,l_module_name,errbuf);
1540: END IF;
1541: COMMIT;
1542: EXCEPTION
1543: WHEN OTHERS THEN

Line 1546: fv_utility.log_mesg(fnd_log.level_unexpected, l_module_name||'.final_exception',errbuf);

1542: EXCEPTION
1543: WHEN OTHERS THEN
1544: errbuf := SQLERRM;
1545: retcode := '2';
1546: fv_utility.log_mesg(fnd_log.level_unexpected, l_module_name||'.final_exception',errbuf);
1547: END;
1548:
1549: ---------------------------------------------------------------------------------------------------------------------------
1550: PROCEDURE get_segment_values

Line 1557: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

1553: ) IS
1554: l_module_name VARCHAR2(200);
1555: BEGIN
1556: l_module_name := g_module_name || 'get_segment_values ';
1557: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1558: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'in get_segment_values proc with v_gs_ccid'||v_gs_ccid);
1559: END IF;
1560:
1561: FOR i IN 1..30 LOOP

Line 1558: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'in get_segment_values proc with v_gs_ccid'||v_gs_ccid);

1554: l_module_name VARCHAR2(200);
1555: BEGIN
1556: l_module_name := g_module_name || 'get_segment_values ';
1557: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1558: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'in get_segment_values proc with v_gs_ccid'||v_gs_ccid);
1559: END IF;
1560:
1561: FOR i IN 1..30 LOOP
1562: a_segments(i) := NULL;

Line 1636: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,g_errmsg);

1632: END;
1633: EXCEPTION
1634: WHEN OTHERS THEN
1635: g_errmsg := SQLERRM;
1636: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,g_errmsg);
1637: RAISE;
1638: END get_segment_values;
1639:
1640: ----------------------------------------------------------------------------------------------------------------------------

Line 1686: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1682: -- v_set_of_books_id := TO_NUMBER(FND_PROFILE.VALUE('GL_SET_OF_BKS_ID'));--;>--
1683:
1684:
1685:
1686: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1687: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'set of books id = '||v_set_of_books_id);
1688: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'org id = '||v_org_id);
1689: END IF;
1690:

Line 1687: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'set of books id = '||v_set_of_books_id);

1683:
1684:
1685:
1686: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1687: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'set of books id = '||v_set_of_books_id);
1688: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'org id = '||v_org_id);
1689: END IF;
1690:
1691: --Fix for bug 1715321: LG

Line 1688: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'org id = '||v_org_id);

1684:
1685:
1686: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1687: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'set of books id = '||v_set_of_books_id);
1688: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'org id = '||v_org_id);
1689: END IF;
1690:
1691: --Fix for bug 1715321: LG
1692: BEGIN

Line 1707: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1703:
1704: IF (v_dummy = 0) THEN
1705: retcode := 2;
1706: errbuf := 'The Treasury Confirmation journal category has not been seeded';
1707: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1708: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_button_name = '||v_button_name);
1709: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_treasury_confirmation_id = '||TO_CHAR(v_treasury_confirmation_id));
1710: END IF;
1711: UPDATE fv_treasury_confirmations

Line 1708: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_button_name = '||v_button_name);

1704: IF (v_dummy = 0) THEN
1705: retcode := 2;
1706: errbuf := 'The Treasury Confirmation journal category has not been seeded';
1707: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1708: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_button_name = '||v_button_name);
1709: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_treasury_confirmation_id = '||TO_CHAR(v_treasury_confirmation_id));
1710: END IF;
1711: UPDATE fv_treasury_confirmations
1712: SET confirmation_status_flag = DECODE(v_button_name, 'TREASURY_CONFIRMATION.CONFIRM', 'N', 'TREASURY_CONFIRMATION.BACK_OUT', 'Y')

Line 1709: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_treasury_confirmation_id = '||TO_CHAR(v_treasury_confirmation_id));

1705: retcode := 2;
1706: errbuf := 'The Treasury Confirmation journal category has not been seeded';
1707: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1708: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_button_name = '||v_button_name);
1709: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_treasury_confirmation_id = '||TO_CHAR(v_treasury_confirmation_id));
1710: END IF;
1711: UPDATE fv_treasury_confirmations
1712: SET confirmation_status_flag = DECODE(v_button_name, 'TREASURY_CONFIRMATION.CONFIRM', 'N', 'TREASURY_CONFIRMATION.BACK_OUT', 'Y')
1713: WHERE treasury_confirmation_id = v_treasury_confirmation_id;

Line 1724: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1720:
1721: v_process_job := 'C'; -- this is so main will know a concurrent
1722: -- process needs to be submitted for the confirm process
1723:
1724: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1725: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_process_job is = ' || v_process_job);
1726: END IF;
1727:
1728: fv_disb_in_transit.do_confirm_process

Line 1725: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_process_job is = ' || v_process_job);

1721: v_process_job := 'C'; -- this is so main will know a concurrent
1722: -- process needs to be submitted for the confirm process
1723:
1724: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1725: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_process_job is = ' || v_process_job);
1726: END IF;
1727:
1728: fv_disb_in_transit.do_confirm_process
1729: ( v_treasury_confirmation_id,

Line 1770: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1766:
1767: END IF;
1768: END IF;
1769:
1770: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1771: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_process_job is = ' || v_process_job);
1772: END IF;
1773:
1774: IF v_process_job IN ('C','B') THEN

Line 1771: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_process_job is = ' || v_process_job);

1767: END IF;
1768: END IF;
1769:
1770: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1771: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'v_process_job is = ' || v_process_job);
1772: END IF;
1773:
1774: IF v_process_job IN ('C','B') THEN
1775: -- if the v_process_job is 'C' or 'B' then there is a concurrent process

Line 1780: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1776: -- to be submitted (c = confirm, b = back out)
1777:
1778: -- Obtain the interface run id
1779: x_interface_run_id :=gl_interface_control_pkg.get_unique_run_id;
1780: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1781: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'interface_run_id = '||x_interface_run_id);
1782: END IF;
1783:
1784: -- Insert a control record in Gl_INTERFACE record for the Gl

Line 1781: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'interface_run_id = '||x_interface_run_id);

1777:
1778: -- Obtain the interface run id
1779: x_interface_run_id :=gl_interface_control_pkg.get_unique_run_id;
1780: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1781: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'interface_run_id = '||x_interface_run_id);
1782: END IF;
1783:
1784: -- Insert a control record in Gl_INTERFACE record for the Gl
1785: -- Import to work

Line 1792: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1788: VALUES ('Payables', 'S', x_interface_run_id, x_group_id,
1789: v_set_of_books_id);
1790:
1791: -- Submit a Concurrent request to invoke journal import
1792: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1793: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'submitting a request');
1794: END IF;
1795: req_id := FND_REQUEST.SUBMIT_REQUEST( 'SQLGL',
1796: 'GLLEZL',

Line 1793: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'submitting a request');

1789: v_set_of_books_id);
1790:
1791: -- Submit a Concurrent request to invoke journal import
1792: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1793: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'submitting a request');
1794: END IF;
1795: req_id := FND_REQUEST.SUBMIT_REQUEST( 'SQLGL',
1796: 'GLLEZL',
1797: '',

Line 1805: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1801: TO_CHAR(v_set_of_books_id),
1802: 'N', '', '', 'N', 'N');
1803:
1804: -- if concurrent request submission failed then abort process
1805: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1806: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'req_id = '||req_id);
1807: END IF;
1808:
1809: IF req_id = 0 THEN

Line 1806: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'req_id = '||req_id);

1802: 'N', '', '', 'N', 'N');
1803:
1804: -- if concurrent request submission failed then abort process
1805: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1806: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'req_id = '||req_id);
1807: END IF;
1808:
1809: IF req_id = 0 THEN
1810: errbuf := 'Can not submit journal import program';

Line 1864: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1860: ELSE
1861:
1862: IF v_button_name = 'TREASURY_CONFIRMATION.BACK_OUT' THEN
1863:
1864: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1865: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'Cleaning up Back OUT NOCOPY data');
1866: END IF;
1867:
1868: -- back_out the info in ap_checks

Line 1865: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'Cleaning up Back OUT NOCOPY data');

1861:
1862: IF v_button_name = 'TREASURY_CONFIRMATION.BACK_OUT' THEN
1863:
1864: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1865: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'Cleaning up Back OUT NOCOPY data');
1866: END IF;
1867:
1868: -- back_out the info in ap_checks
1869: UPDATE AP_CHECKS

Line 1904: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1900:
1901:
1902: ELSIF v_button_name = 'TREASURY_CONFIRMATION.CONFIRM' THEN
1903:
1904: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1905: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'Updating confirm status');
1906: END IF;
1907: UPDATE fv_treasury_confirmations
1908: SET confirmation_status_flag = 'Y',

Line 1905: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'Updating confirm status');

1901:
1902: ELSIF v_button_name = 'TREASURY_CONFIRMATION.CONFIRM' THEN
1903:
1904: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1905: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'Updating confirm status');
1906: END IF;
1907: UPDATE fv_treasury_confirmations
1908: SET confirmation_status_flag = 'Y',
1909: gl_period = v_period,

Line 1930: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1926: END IF;
1927:
1928: COMMIT;
1929:
1930: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1931: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'Process Complete');
1932: END IF;
1933: EXCEPTION
1934: WHEN OTHERS THEN

Line 1931: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'Process Complete');

1927:
1928: COMMIT;
1929:
1930: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1931: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT,l_module_name,'Process Complete');
1932: END IF;
1933: EXCEPTION
1934: WHEN OTHERS THEN
1935: g_errmsg := SQLERRM;

Line 1936: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,g_errmsg);

1932: END IF;
1933: EXCEPTION
1934: WHEN OTHERS THEN
1935: g_errmsg := SQLERRM;
1936: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,g_errmsg);
1937: RAISE;
1938: END main;
1939: BEGIN
1940: g_module_name := 'fv.plsql.fv_disb_in_transit.';