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.PSA_FUNDS_CHECKER_PKG dependencies on FND_LOG

Line 163: --===========================FND_LOG.START=====================================

159: g_session_id NUMBER;
160:
161: g_serial_id NUMBER;
162:
163: --===========================FND_LOG.START=====================================
164: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
165: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
166: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
167: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;

Line 164: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;

160:
161: g_serial_id NUMBER;
162:
163: --===========================FND_LOG.START=====================================
164: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
165: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
166: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
167: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
168: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;

Line 165: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;

161: g_serial_id NUMBER;
162:
163: --===========================FND_LOG.START=====================================
164: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
165: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
166: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
167: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
168: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
169: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;

Line 166: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;

162:
163: --===========================FND_LOG.START=====================================
164: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
165: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
166: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
167: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
168: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
169: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
170: g_path VARCHAR2(50) := 'psa.plsql.psafbcfb.psa_funds_checker_pkg.';

Line 167: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;

163: --===========================FND_LOG.START=====================================
164: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
165: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
166: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
167: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
168: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
169: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
170: g_path VARCHAR2(50) := 'psa.plsql.psafbcfb.psa_funds_checker_pkg.';
171: --===========================FND_LOG.END=======================================

Line 168: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;

164: g_state_level NUMBER := FND_LOG.LEVEL_STATEMENT;
165: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
166: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
167: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
168: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
169: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
170: g_path VARCHAR2(50) := 'psa.plsql.psafbcfb.psa_funds_checker_pkg.';
171: --===========================FND_LOG.END=======================================
172:

Line 169: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;

165: g_proc_level NUMBER := FND_LOG.LEVEL_PROCEDURE;
166: g_event_level NUMBER := FND_LOG.LEVEL_EVENT;
167: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
168: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
169: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
170: g_path VARCHAR2(50) := 'psa.plsql.psafbcfb.psa_funds_checker_pkg.';
171: --===========================FND_LOG.END=======================================
172:
173:

Line 171: --===========================FND_LOG.END=======================================

167: g_excep_level NUMBER := FND_LOG.LEVEL_EXCEPTION;
168: g_error_level NUMBER := FND_LOG.LEVEL_ERROR;
169: g_unexp_level NUMBER := FND_LOG.LEVEL_UNEXPECTED;
170: g_path VARCHAR2(50) := 'psa.plsql.psafbcfb.psa_funds_checker_pkg.';
171: --===========================FND_LOG.END=======================================
172:
173:
174: /*================================+
175: | Private Function Definition |

Line 340: -- ========================= FND LOG ===========================

336: p_unrsv_packet_id OUT NOCOPY NUMBER) RETURN BOOLEAN IS
337:
338: others EXCEPTION;
339:
340: -- ========================= FND LOG ===========================
341: l_full_path VARCHAR2(100);
342: -- ========================= FND LOG ===========================
343: BEGIN
344:

Line 342: -- ========================= FND LOG ===========================

338: others EXCEPTION;
339:
340: -- ========================= FND LOG ===========================
341: l_full_path VARCHAR2(100);
342: -- ========================= FND LOG ===========================
343: BEGIN
344:
345: l_full_path := g_path || 'glxfck - public1';
346:

Line 347: -- ========================= FND LOG ===========================

343: BEGIN
344:
345: l_full_path := g_path || 'glxfck - public1';
346:
347: -- ========================= FND LOG ===========================
348: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_ledgerid -> ' || p_ledgerid);
349: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_packetid -> ' || p_packetid);
350: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_mode -> ' || p_mode);
351: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_override -> ' || p_override);

Line 356: -- ========================= FND LOG ===========================

352: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_conc_flag -> ' || p_conc_flag);
353: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_user_id -> ' || p_user_id);
354: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_calling_prog_flag -> ' || p_calling_prog_flag);
355: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_user_resp_id -> ' || p_user_resp_id);
356: -- ========================= FND LOG ===========================
357:
358: IF NOT glxfck( p_ledgerid ,
359: p_packetid ,
360: p_mode ,

Line 368: -- ========================= FND LOG ===========================

364: p_user_resp_id ,
365: p_calling_prog_flag ,
366: p_return_code ) THEN
367:
368: -- ========================= FND LOG ===========================
369: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfck --> FALSE goto gl_error');
370: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_return_code --> ' || p_return_code);
371: -- ========================= FND LOG ===========================
372: goto gl_error;

Line 371: -- ========================= FND LOG ===========================

367:
368: -- ========================= FND LOG ===========================
369: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfck --> FALSE goto gl_error');
370: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_return_code --> ' || p_return_code);
371: -- ========================= FND LOG ===========================
372: goto gl_error;
373:
374: END IF;
375:

Line 377: -- ========================= FND LOG ===========================

373:
374: END IF;
375:
376: IF (p_return_code = 'O') THEN
377: -- ========================= FND LOG ===========================
378: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_return_code --> O goto normal_exit');
379: -- ========================= FND LOG ===========================
380:
381: goto normal_exit;

Line 379: -- ========================= FND LOG ===========================

375:
376: IF (p_return_code = 'O') THEN
377: -- ========================= FND LOG ===========================
378: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_return_code --> O goto normal_exit');
379: -- ========================= FND LOG ===========================
380:
381: goto normal_exit;
382: END IF;
383:

Line 389: -- ========================= FND LOG ===========================

385: -- and g_requery_flag is not set.
386:
387: IF (p_mode = 'U' AND NOT g_requery_flag) THEN
388: p_unrsv_packet_id := p_packetid;
389: -- ========================= FND LOG ===========================
390: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_unrsv_packet_id --> ' || p_unrsv_packet_id );
391: -- ========================= FND LOG ===========================
392: END IF;
393:

Line 391: -- ========================= FND LOG ===========================

387: IF (p_mode = 'U' AND NOT g_requery_flag) THEN
388: p_unrsv_packet_id := p_packetid;
389: -- ========================= FND LOG ===========================
390: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_unrsv_packet_id --> ' || p_unrsv_packet_id );
391: -- ========================= FND LOG ===========================
392: END IF;
393:
394: -- If g_requery_flag is TRUE set p_return_code = "Q"
395: -- for calling form (MJE) to requery instead of the

Line 400: -- ========================= FND LOG ===========================

396: -- regular commit. [p_return code "Q" => Success/Advisory]
397:
398: IF g_requery_flag THEN
399: p_return_code := 'Q';
400: -- ========================= FND LOG ===========================
401: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_return_code --> Q => Success/Advisory ');
402: -- ========================= FND LOG ===========================
403: END IF;
404:

Line 402: -- ========================= FND LOG ===========================

398: IF g_requery_flag THEN
399: p_return_code := 'Q';
400: -- ========================= FND LOG ===========================
401: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_return_code --> Q => Success/Advisory ');
402: -- ========================= FND LOG ===========================
403: END IF;
404:
405: <>
406:

Line 407: -- ========================= FND LOG ===========================

403: END IF;
404:
405: <>
406:
407: -- ========================= FND LOG ===========================
408: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> TRUE ');
409: -- ========================= FND LOG ===========================
410:
411: RETURN(TRUE);

Line 409: -- ========================= FND LOG ===========================

405: <>
406:
407: -- ========================= FND LOG ===========================
408: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> TRUE ');
409: -- ========================= FND LOG ===========================
410:
411: RETURN(TRUE);
412:
413: <>

Line 415: -- ========================= FND LOG ===========================

411: RETURN(TRUE);
412:
413: <>
414:
415: -- ========================= FND LOG ===========================
416: psa_utils.debug_other_string(g_state_level,l_full_path, ' reached gl_error label ');
417: -- ========================= FND LOG ===========================
418:
419: if not glxfuf then

Line 417: -- ========================= FND LOG ===========================

413: <>
414:
415: -- ========================= FND LOG ===========================
416: psa_utils.debug_other_string(g_state_level,l_full_path, ' reached gl_error label ');
417: -- ========================= FND LOG ===========================
418:
419: if not glxfuf then
420: -- ========================= FND LOG ===========================
421: psa_utils.debug_other_string(g_state_level,l_full_path, ' Raise OTHERS ');

Line 420: -- ========================= FND LOG ===========================

416: psa_utils.debug_other_string(g_state_level,l_full_path, ' reached gl_error label ');
417: -- ========================= FND LOG ===========================
418:
419: if not glxfuf then
420: -- ========================= FND LOG ===========================
421: psa_utils.debug_other_string(g_state_level,l_full_path, ' Raise OTHERS ');
422: -- ========================= FND LOG ===========================
423: raise others;
424: end if;

Line 422: -- ========================= FND LOG ===========================

418:
419: if not glxfuf then
420: -- ========================= FND LOG ===========================
421: psa_utils.debug_other_string(g_state_level,l_full_path, ' Raise OTHERS ');
422: -- ========================= FND LOG ===========================
423: raise others;
424: end if;
425:
426: -- ========================= FND LOG ===========================

Line 426: -- ========================= FND LOG ===========================

422: -- ========================= FND LOG ===========================
423: raise others;
424: end if;
425:
426: -- ========================= FND LOG ===========================
427: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> FALSE ');
428: -- ========================= FND LOG ===========================
429:
430: RETURN(FALSE);

Line 428: -- ========================= FND LOG ===========================

424: end if;
425:
426: -- ========================= FND LOG ===========================
427: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> FALSE ');
428: -- ========================= FND LOG ===========================
429:
430: RETURN(FALSE);
431:
432: EXCEPTION

Line 435: -- ========================= FND LOG ===========================

431:
432: EXCEPTION
433:
434: WHEN OTHERS THEN
435: -- ========================= FND LOG ===========================
436: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
437: -- ========================= FND LOG ===========================
438:
439: message_token('PROCEDURE', 'Funds Checker');

Line 437: -- ========================= FND LOG ===========================

433:
434: WHEN OTHERS THEN
435: -- ========================= FND LOG ===========================
436: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
437: -- ========================= FND LOG ===========================
438:
439: message_token('PROCEDURE', 'Funds Checker');
440: message_token('EVENT', SQLERRM);
441: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');

Line 443: -- ========================= FND LOG ===========================

439: message_token('PROCEDURE', 'Funds Checker');
440: message_token('EVENT', SQLERRM);
441: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
442:
443: -- ========================= FND LOG ===========================
444: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN --> FALSE ');
445: -- ========================= FND LOG ===========================
446:
447: return(FALSE);

Line 445: -- ========================= FND LOG ===========================

441: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
442:
443: -- ========================= FND LOG ===========================
444: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN --> FALSE ');
445: -- ========================= FND LOG ===========================
446:
447: return(FALSE);
448:
449: END glxfck;

Line 508: -- ========================= FND LOG ===========================

504:
505: l_override_reqd VARCHAR2(1);
506: others EXCEPTION;
507:
508: -- ========================= FND LOG ===========================
509: l_full_path VARCHAR2(100);
510: -- ========================= FND LOG ===========================
511:
512: BEGIN

Line 510: -- ========================= FND LOG ===========================

506: others EXCEPTION;
507:
508: -- ========================= FND LOG ===========================
509: l_full_path VARCHAR2(100);
510: -- ========================= FND LOG ===========================
511:
512: BEGIN
513:
514: l_full_path := g_path || 'glxfck - private';

Line 516: -- =========================== FND LOG ===========================

512: BEGIN
513:
514: l_full_path := g_path || 'glxfck - private';
515:
516: -- =========================== FND LOG ===========================
517: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFCK PRIVATE - START' );
518: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_ledgerid -> ' || p_ledgerid);
519: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_packetid -> ' || p_packetid);
520: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_mode -> ' || p_mode);

Line 527: -- ========================= FND LOG =============================

523: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_user_id -> ' || p_user_id);
524: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_user_resp_id -> ' || p_user_resp_id);
525: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_calling_prog_flag -> ' || p_calling_prog_flag);
526: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfin ');
527: -- ========================= FND LOG =============================
528:
529: if (p_calling_prog_flag = 'S' and g_fcmode = 'U') then
530: -- =========================== FND LOG ===========================
531: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling Program = S and mode = Unreservation so return without processing. RETURN -> TRUE.' );

Line 530: -- =========================== FND LOG ===========================

526: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfin ');
527: -- ========================= FND LOG =============================
528:
529: if (p_calling_prog_flag = 'S' and g_fcmode = 'U') then
530: -- =========================== FND LOG ===========================
531: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling Program = S and mode = Unreservation so return without processing. RETURN -> TRUE.' );
532: -- =========================== FND LOG ===========================
533: -- Since we will not be supporting unreservation functionality for SLA
534: -- return back.

Line 532: -- =========================== FND LOG ===========================

528:
529: if (p_calling_prog_flag = 'S' and g_fcmode = 'U') then
530: -- =========================== FND LOG ===========================
531: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling Program = S and mode = Unreservation so return without processing. RETURN -> TRUE.' );
532: -- =========================== FND LOG ===========================
533: -- Since we will not be supporting unreservation functionality for SLA
534: -- return back.
535: return true;
536: end if;

Line 538: -- =========================== FND LOG ===========================

534: -- return back.
535: return true;
536: end if;
537:
538: -- =========================== FND LOG ===========================
539: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfin - initialization ' );
540: -- =========================== FND LOG ===========================
541:
542: -- Initialize Global Variables

Line 540: -- =========================== FND LOG ===========================

536: end if;
537:
538: -- =========================== FND LOG ===========================
539: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfin - initialization ' );
540: -- =========================== FND LOG ===========================
541:
542: -- Initialize Global Variables
543: if not glxfin(p_ledgerid => p_ledgerid,
544: p_packetid => p_packetid,

Line 552: -- =========================== FND LOG ===========================

548: p_user_id => p_user_id,
549: p_user_resp_id => p_user_resp_id,
550: p_calling_prog_flag => p_calling_prog_flag) then
551:
552: -- =========================== FND LOG ===========================
553: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfin --> RETURN FALSE -> goto fatal_error');
554: -- ========================= FND LOG =============================
555:
556: goto fatal_error;

Line 554: -- ========================= FND LOG =============================

550: p_calling_prog_flag => p_calling_prog_flag) then
551:
552: -- =========================== FND LOG ===========================
553: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfin --> RETURN FALSE -> goto fatal_error');
554: -- ========================= FND LOG =============================
555:
556: goto fatal_error;
557: end if;
558:

Line 559: -- =========================== FND LOG ===========================

555:
556: goto fatal_error;
557: end if;
558:
559: -- =========================== FND LOG ===========================
560: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfcp - preprocessor ');
561: -- ========================= FND LOG =============================
562:
563: -- Funds Check Processor

Line 561: -- ========================= FND LOG =============================

557: end if;
558:
559: -- =========================== FND LOG ===========================
560: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfcp - preprocessor ');
561: -- ========================= FND LOG =============================
562:
563: -- Funds Check Processor
564: if not glxfcp then
565: -- =========================== FND LOG ===========================

Line 565: -- =========================== FND LOG ===========================

561: -- ========================= FND LOG =============================
562:
563: -- Funds Check Processor
564: if not glxfcp then
565: -- =========================== FND LOG ===========================
566: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfcp --> RETURN FALSE -> goto fatal_error');
567: -- ========================= FND LOG =============================
568: goto fatal_error;
569: end if;

Line 567: -- ========================= FND LOG =============================

563: -- Funds Check Processor
564: if not glxfcp then
565: -- =========================== FND LOG ===========================
566: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfcp --> RETURN FALSE -> goto fatal_error');
567: -- ========================= FND LOG =============================
568: goto fatal_error;
569: end if;
570:
571:

Line 573: -- =========================== FND LOG ===========================

569: end if;
570:
571:
572: if g_overlapping_budget=TRUE then
573: -- =========================== FND LOG ===========================
574: psa_utils.debug_other_string(g_state_level,l_full_path, ' return_code --> F');
575: -- ========================= FND LOG =============================
576:
577: p_return_code := 'F';

Line 575: -- ========================= FND LOG =============================

571:
572: if g_overlapping_budget=TRUE then
573: -- =========================== FND LOG ===========================
574: psa_utils.debug_other_string(g_state_level,l_full_path, ' return_code --> F');
575: -- ========================= FND LOG =============================
576:
577: p_return_code := 'F';
578:
579: -- =========================== FND LOG ===========================

Line 579: -- =========================== FND LOG ===========================

575: -- ========================= FND LOG =============================
576:
577: p_return_code := 'F';
578:
579: -- =========================== FND LOG ===========================
580: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> TRUE ');
581: -- ========================= FND LOG =============================
582: return(TRUE);
583:

Line 581: -- ========================= FND LOG =============================

577: p_return_code := 'F';
578:
579: -- =========================== FND LOG ===========================
580: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> TRUE ');
581: -- ========================= FND LOG =============================
582: return(TRUE);
583:
584: end if ;
585:

Line 590: -- =========================== FND LOG ===========================

586:
587: -- Override Transactions
588: if g_override_flag and g_calling_prog_flag = 'G' and not g_conc_flag then
589:
590: -- =========================== FND LOG ===========================
591: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_override_flag --> TRUE ');
592: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_calling_prog_flag --> G ');
593: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_conc_flag --> FALSE ');
594: -- ========================= FND LOG =============================

Line 594: -- ========================= FND LOG =============================

590: -- =========================== FND LOG ===========================
591: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_override_flag --> TRUE ');
592: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_calling_prog_flag --> G ');
593: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_conc_flag --> FALSE ');
594: -- ========================= FND LOG =============================
595:
596: open det_override_reqd;
597: fetch det_override_reqd INTO l_override_reqd;
598:

Line 601: -- =========================== FND LOG ===========================

597: fetch det_override_reqd INTO l_override_reqd;
598:
599: if (det_override_reqd%NOTFOUND) then
600:
601: -- =========================== FND LOG ===========================
602: psa_utils.debug_other_string(g_state_level,l_full_path, ' det_override_reqd%NOTFOUND ');
603: -- ========================= FND LOG =============================
604:
605: open ussgl_override_reqd;

Line 603: -- ========================= FND LOG =============================

599: if (det_override_reqd%NOTFOUND) then
600:
601: -- =========================== FND LOG ===========================
602: psa_utils.debug_other_string(g_state_level,l_full_path, ' det_override_reqd%NOTFOUND ');
603: -- ========================= FND LOG =============================
604:
605: open ussgl_override_reqd;
606: fetch ussgl_override_reqd INTO l_override_reqd;
607:

Line 610: -- =========================== FND LOG ===========================

606: fetch ussgl_override_reqd INTO l_override_reqd;
607:
608: if (ussgl_override_reqd%FOUND) then
609:
610: -- =========================== FND LOG ===========================
611: psa_utils.debug_other_string(g_state_level,l_full_path, ' ussgl_override_reqd%FOUND ');
612: -- ========================= FND LOG =============================
613:
614: g_return_code := 'O';

Line 612: -- ========================= FND LOG =============================

608: if (ussgl_override_reqd%FOUND) then
609:
610: -- =========================== FND LOG ===========================
611: psa_utils.debug_other_string(g_state_level,l_full_path, ' ussgl_override_reqd%FOUND ');
612: -- ========================= FND LOG =============================
613:
614: g_return_code := 'O';
615: goto normal_exit;
616: end if;

Line 620: -- =========================== FND LOG ===========================

616: end if;
617:
618: else
619:
620: -- =========================== FND LOG ===========================
621: psa_utils.debug_other_string(g_state_level,l_full_path, ' det_override_reqd%FOUND ');
622: -- ========================= FND LOG =============================
623:
624: g_return_code := 'O';

Line 622: -- ========================= FND LOG =============================

618: else
619:
620: -- =========================== FND LOG ===========================
621: psa_utils.debug_other_string(g_state_level,l_full_path, ' det_override_reqd%FOUND ');
622: -- ========================= FND LOG =============================
623:
624: g_return_code := 'O';
625: goto normal_exit;
626: end if;

Line 630: -- =========================== FND LOG ===========================

626: end if;
627:
628: end if;
629:
630: -- =========================== FND LOG ===========================
631: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxcon ');
632: -- ========================= FND LOG =============================
633:
634: -- Set Result Codes, Return Code, Append Journal Logic

Line 632: -- ========================= FND LOG =============================

628: end if;
629:
630: -- =========================== FND LOG ===========================
631: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxcon ');
632: -- ========================= FND LOG =============================
633:
634: -- Set Result Codes, Return Code, Append Journal Logic
635: if not glxcon then
636: -- =========================== FND LOG ===========================

Line 636: -- =========================== FND LOG ===========================

632: -- ========================= FND LOG =============================
633:
634: -- Set Result Codes, Return Code, Append Journal Logic
635: if not glxcon then
636: -- =========================== FND LOG ===========================
637: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxcon --> RETURN FALSE -> goto fatal_error');
638: -- ========================= FND LOG =============================
639: goto fatal_error;
640: end if;

Line 638: -- ========================= FND LOG =============================

634: -- Set Result Codes, Return Code, Append Journal Logic
635: if not glxcon then
636: -- =========================== FND LOG ===========================
637: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxcon --> RETURN FALSE -> goto fatal_error');
638: -- ========================= FND LOG =============================
639: goto fatal_error;
640: end if;
641:
642: -- =========================== FND LOG ===========================

Line 642: -- =========================== FND LOG ===========================

638: -- ========================= FND LOG =============================
639: goto fatal_error;
640: end if;
641:
642: -- =========================== FND LOG ===========================
643: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glrchk ');
644: -- ========================= FND LOG =============================
645:
646: if not glrchk('X') then

Line 644: -- ========================= FND LOG =============================

640: end if;
641:
642: -- =========================== FND LOG ===========================
643: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glrchk ');
644: -- ========================= FND LOG =============================
645:
646: if not glrchk('X') then
647: -- =========================== FND LOG ===========================
648: psa_utils.debug_other_string(g_state_level,l_full_path, ' glrchk --> RETURN FALSE -> goto fatal_error');

Line 647: -- =========================== FND LOG ===========================

643: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glrchk ');
644: -- ========================= FND LOG =============================
645:
646: if not glrchk('X') then
647: -- =========================== FND LOG ===========================
648: psa_utils.debug_other_string(g_state_level,l_full_path, ' glrchk --> RETURN FALSE -> goto fatal_error');
649: -- ========================= FND LOG =============================
650: goto fatal_error;
651: end if;

Line 649: -- ========================= FND LOG =============================

645:
646: if not glrchk('X') then
647: -- =========================== FND LOG ===========================
648: psa_utils.debug_other_string(g_state_level,l_full_path, ' glrchk --> RETURN FALSE -> goto fatal_error');
649: -- ========================= FND LOG =============================
650: goto fatal_error;
651: end if;
652:
653: <>

Line 663: -- =========================== FND LOG ===========================

659: IF (ussgl_override_reqd%ISOPEN) THEN
660: close ussgl_override_reqd;
661: END IF;
662:
663: -- =========================== FND LOG ===========================
664: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_return_code --> ' || g_return_code);
665: -- ========================= FND LOG =============================
666:
667: p_return_code := g_return_code;

Line 665: -- ========================= FND LOG =============================

661: END IF;
662:
663: -- =========================== FND LOG ===========================
664: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_return_code --> ' || g_return_code);
665: -- ========================= FND LOG =============================
666:
667: p_return_code := g_return_code;
668:
669: -- =========================== FND LOG ===========================

Line 669: -- =========================== FND LOG ===========================

665: -- ========================= FND LOG =============================
666:
667: p_return_code := g_return_code;
668:
669: -- =========================== FND LOG ===========================
670: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> TRUE ');
671: -- ========================= FND LOG =============================
672:
673: return(TRUE);

Line 671: -- ========================= FND LOG =============================

667: p_return_code := g_return_code;
668:
669: -- =========================== FND LOG ===========================
670: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> TRUE ');
671: -- ========================= FND LOG =============================
672:
673: return(TRUE);
674:
675:

Line 678: -- =========================== FND LOG ===========================

674:
675:
676: <>
677:
678: -- =========================== FND LOG ===========================
679: psa_utils.debug_other_string(g_state_level,l_full_path, ' Reached FATAL ERROR LABEL ');
680: -- ========================= FND LOG =============================
681:
682: if not glxfuf then

Line 680: -- ========================= FND LOG =============================

676: <>
677:
678: -- =========================== FND LOG ===========================
679: psa_utils.debug_other_string(g_state_level,l_full_path, ' Reached FATAL ERROR LABEL ');
680: -- ========================= FND LOG =============================
681:
682: if not glxfuf then
683: -- =========================== FND LOG ===========================
684: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfuf --> RETURN FALSE -> RAISE OTHERS');

Line 683: -- =========================== FND LOG ===========================

679: psa_utils.debug_other_string(g_state_level,l_full_path, ' Reached FATAL ERROR LABEL ');
680: -- ========================= FND LOG =============================
681:
682: if not glxfuf then
683: -- =========================== FND LOG ===========================
684: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfuf --> RETURN FALSE -> RAISE OTHERS');
685: -- ========================= FND LOG =============================
686: raise others;
687: end if;

Line 685: -- ========================= FND LOG =============================

681:
682: if not glxfuf then
683: -- =========================== FND LOG ===========================
684: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfuf --> RETURN FALSE -> RAISE OTHERS');
685: -- ========================= FND LOG =============================
686: raise others;
687: end if;
688:
689: -- =========================== FND LOG ===========================

Line 689: -- =========================== FND LOG ===========================

685: -- ========================= FND LOG =============================
686: raise others;
687: end if;
688:
689: -- =========================== FND LOG ===========================
690: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE ');
691: -- ========================= FND LOG =============================
692:
693: return(FALSE);

Line 691: -- ========================= FND LOG =============================

687: end if;
688:
689: -- =========================== FND LOG ===========================
690: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE ');
691: -- ========================= FND LOG =============================
692:
693: return(FALSE);
694:
695: EXCEPTION

Line 698: -- =========================== FND LOG ===========================

694:
695: EXCEPTION
696:
697: WHEN OTHERS THEN
698: -- =========================== FND LOG ===========================
699: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
700: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE ');
701: -- ========================= FND LOG =============================
702:

Line 701: -- ========================= FND LOG =============================

697: WHEN OTHERS THEN
698: -- =========================== FND LOG ===========================
699: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
700: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE ');
701: -- ========================= FND LOG =============================
702:
703: message_token('PROCEDURE', 'Funds Checker');
704: message_token('EVENT', SQLERRM);
705: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');

Line 756: -- ========================= FND LOG ===========================

752: WHERE ledger_id = g_ledger_id;
753:
754: others EXCEPTION;
755:
756: -- ========================= FND LOG ===========================
757: l_full_path VARCHAR2(100);
758: -- ========================= FND LOG ===========================
759: BEGIN
760:

Line 758: -- ========================= FND LOG ===========================

754: others EXCEPTION;
755:
756: -- ========================= FND LOG ===========================
757: l_full_path VARCHAR2(100);
758: -- ========================= FND LOG ===========================
759: BEGIN
760:
761: l_full_path := g_path || 'glxfin';
762:

Line 763: -- =========================== FND LOG ===========================

759: BEGIN
760:
761: l_full_path := g_path || 'glxfin';
762:
763: -- =========================== FND LOG ===========================
764: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFIN - START' );
765: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_ledgerid -> ' || p_ledgerid);
766: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_packetid -> ' || p_packetid);
767: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_mode -> ' || p_mode);

Line 772: -- ========================= FND LOG =============================

768: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_override -> ' || p_override);
769: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_conc_flag -> ' || p_conc_flag);
770: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_user_id -> ' || p_user_id);
771: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_user_resp_id -> ' || p_user_resp_id);
772: -- ========================= FND LOG =============================
773:
774: g_psa_pacheck := FALSE;
775: g_psa_grantcheck := FALSE;
776: g_cbc_enabled := FALSE;

Line 784: -- =========================== FND LOG ===========================

780: g_ussgl_option_flag := FALSE;
781: g_overlapping_budget := FALSE; -- Used When there are multiple overlapping budgets for the account
782:
783:
784: -- =========================== FND LOG ===========================
785: psa_utils.debug_other_string(g_state_level,l_full_path, ' SETTING VARIABLES ' );
786: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_pacheck -> FALSE');
787: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_grantcheck -> FALSE');
788: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_cbc_enabled -> FALSE');

Line 794: -- ========================= FND LOG =============================

790: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_append_je_flag -> FALSE');
791: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_requery_flag -> FALSE');
792: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_ussgl_option_flag -> FALSE');
793: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_overlapping_budget -> FALSE');
794: -- ========================= FND LOG =============================
795:
796: /*===========================================+
797: | Assign Parameters to Global Variables |
798: +===========================================*/

Line 804: -- ========================= FND LOG =============================

800: g_ledger_id := p_ledgerid;
801: g_packet_id := p_packetid;
802: g_fcmode := p_mode;
803:
804: -- ========================= FND LOG =============================
805: psa_utils.debug_other_string(g_state_level,l_full_path, 'Calling Get_Session_Details to fetch session variables');
806: -- ========================= FND LOG =============================
807:
808: Get_Session_Details(g_session_id, g_serial_id);

Line 806: -- ========================= FND LOG =============================

802: g_fcmode := p_mode;
803:
804: -- ========================= FND LOG =============================
805: psa_utils.debug_other_string(g_state_level,l_full_path, 'Calling Get_Session_Details to fetch session variables');
806: -- ========================= FND LOG =============================
807:
808: Get_Session_Details(g_session_id, g_serial_id);
809:
810: -- ========================= FND LOG =============================

Line 810: -- ========================= FND LOG =============================

806: -- ========================= FND LOG =============================
807:
808: Get_Session_Details(g_session_id, g_serial_id);
809:
810: -- ========================= FND LOG =============================
811: psa_utils.debug_other_string(g_state_level,l_full_path, 'Session_Id = '||g_session_id);
812: psa_utils.debug_other_string(g_state_level,l_full_path, 'Serial_Id = '||g_serial_id);
813: -- ========================= FND LOG =============================
814:

Line 813: -- ========================= FND LOG =============================

809:
810: -- ========================= FND LOG =============================
811: psa_utils.debug_other_string(g_state_level,l_full_path, 'Session_Id = '||g_session_id);
812: psa_utils.debug_other_string(g_state_level,l_full_path, 'Serial_Id = '||g_serial_id);
813: -- ========================= FND LOG =============================
814:
815: IF p_calling_prog_flag IN ('P', 'H') THEN
816: -- ========================= FND LOG =============================
817: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_calling_prog_flag = P or H -> g_calling_prog_flag = S');

Line 816: -- ========================= FND LOG =============================

812: psa_utils.debug_other_string(g_state_level,l_full_path, 'Serial_Id = '||g_serial_id);
813: -- ========================= FND LOG =============================
814:
815: IF p_calling_prog_flag IN ('P', 'H') THEN
816: -- ========================= FND LOG =============================
817: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_calling_prog_flag = P or H -> g_calling_prog_flag = S');
818: -- ========================= FND LOG =============================
819:
820: g_calling_prog_flag := 'S';

Line 818: -- ========================= FND LOG =============================

814:
815: IF p_calling_prog_flag IN ('P', 'H') THEN
816: -- ========================= FND LOG =============================
817: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_calling_prog_flag = P or H -> g_calling_prog_flag = S');
818: -- ========================= FND LOG =============================
819:
820: g_calling_prog_flag := 'S';
821: ELSE
822: -- ========================= FND LOG =============================

Line 822: -- ========================= FND LOG =============================

818: -- ========================= FND LOG =============================
819:
820: g_calling_prog_flag := 'S';
821: ELSE
822: -- ========================= FND LOG =============================
823: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_calling_prog_flag != P or H -> g_calling_prog_flag = ' || p_calling_prog_flag);
824: -- ========================= FND LOG =============================
825:
826: g_calling_prog_flag := p_calling_prog_flag;

Line 824: -- ========================= FND LOG =============================

820: g_calling_prog_flag := 'S';
821: ELSE
822: -- ========================= FND LOG =============================
823: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_calling_prog_flag != P or H -> g_calling_prog_flag = ' || p_calling_prog_flag);
824: -- ========================= FND LOG =============================
825:
826: g_calling_prog_flag := p_calling_prog_flag;
827: END IF;
828:

Line 830: -- ========================= FND LOG =====================================

826: g_calling_prog_flag := p_calling_prog_flag;
827: END IF;
828:
829: IF g_fcmode ='C' THEN -- Funds Check Partial Mode Check
830: -- ========================= FND LOG =====================================
831: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = C -> g_partial_resv_flag = Y');
832: -- ========================= FND LOG =====================================
833:
834: g_partial_resv_flag := 'Y';

Line 832: -- ========================= FND LOG =====================================

828:
829: IF g_fcmode ='C' THEN -- Funds Check Partial Mode Check
830: -- ========================= FND LOG =====================================
831: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = C -> g_partial_resv_flag = Y');
832: -- ========================= FND LOG =====================================
833:
834: g_partial_resv_flag := 'Y';
835: ELSIF g_fcmode = 'M' THEN -- Funds Check Full Mode Check
836: -- ========================= FND LOG =====================================

Line 836: -- ========================= FND LOG =====================================

832: -- ========================= FND LOG =====================================
833:
834: g_partial_resv_flag := 'Y';
835: ELSIF g_fcmode = 'M' THEN -- Funds Check Full Mode Check
836: -- ========================= FND LOG =====================================
837: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = M -> g_partial_resv_flag = N');
838: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = M -> g_fcmode = C');
839: -- ========================= FND LOG =====================================
840:

Line 839: -- ========================= FND LOG =====================================

835: ELSIF g_fcmode = 'M' THEN -- Funds Check Full Mode Check
836: -- ========================= FND LOG =====================================
837: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = M -> g_partial_resv_flag = N');
838: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = M -> g_fcmode = C');
839: -- ========================= FND LOG =====================================
840:
841: g_partial_resv_flag := 'N';
842: g_fcmode := 'C';
843: ELSIF g_fcmode = 'P' THEN -- Funds Reserve Partial Mode Check

Line 844: -- ========================= FND LOG =====================================

840:
841: g_partial_resv_flag := 'N';
842: g_fcmode := 'C';
843: ELSIF g_fcmode = 'P' THEN -- Funds Reserve Partial Mode Check
844: -- ========================= FND LOG =====================================
845: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = P -> g_partial_resv_flag = Y');
846: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = P -> g_fcmode = R');
847: -- ========================= FND LOG =====================================
848:

Line 847: -- ========================= FND LOG =====================================

843: ELSIF g_fcmode = 'P' THEN -- Funds Reserve Partial Mode Check
844: -- ========================= FND LOG =====================================
845: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = P -> g_partial_resv_flag = Y');
846: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = P -> g_fcmode = R');
847: -- ========================= FND LOG =====================================
848:
849: g_partial_resv_flag := 'Y';
850: g_fcmode := 'R';
851: ELSE

Line 852: -- ========================= FND LOG =====================================

848:
849: g_partial_resv_flag := 'Y';
850: g_fcmode := 'R';
851: ELSE
852: -- ========================= FND LOG =====================================
853: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode != C, M and P -> g_partial_resv_flag = N');
854: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> '||g_fcmode);
855: -- ========================= FND LOG =====================================
856:

Line 855: -- ========================= FND LOG =====================================

851: ELSE
852: -- ========================= FND LOG =====================================
853: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode != C, M and P -> g_partial_resv_flag = N');
854: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> '||g_fcmode);
855: -- ========================= FND LOG =====================================
856:
857: g_partial_resv_flag := 'N';
858: END IF;
859:

Line 860: -- =========================== FND LOG ===========================

856:
857: g_partial_resv_flag := 'N';
858: END IF;
859:
860: -- =========================== FND LOG ===========================
861: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_ledger_id -> ' || g_ledger_id);
862: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_packet_id -> ' || g_packet_id);
863: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
864: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_partial_resv_flag -> '|| g_partial_resv_flag);

Line 865: -- ========================= FND LOG =============================

861: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_ledger_id -> ' || g_ledger_id);
862: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_packet_id -> ' || g_packet_id);
863: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
864: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_partial_resv_flag -> '|| g_partial_resv_flag);
865: -- ========================= FND LOG =============================
866:
867: /*========================+
868: | Set Overrides Flag |
869: +========================*/

Line 872: -- =========================== FND LOG ===========================

868: | Set Overrides Flag |
869: +========================*/
870:
871: if (p_override = 'N') then
872: -- =========================== FND LOG ===========================
873: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_override = N -> g_override_flag = FALSE');
874: -- =========================== FND LOG ===========================
875:
876: g_override_flag := FALSE;

Line 874: -- =========================== FND LOG ===========================

870:
871: if (p_override = 'N') then
872: -- =========================== FND LOG ===========================
873: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_override = N -> g_override_flag = FALSE');
874: -- =========================== FND LOG ===========================
875:
876: g_override_flag := FALSE;
877: else
878: -- =========================== FND LOG ===========================

Line 878: -- =========================== FND LOG ===========================

874: -- =========================== FND LOG ===========================
875:
876: g_override_flag := FALSE;
877: else
878: -- =========================== FND LOG ===========================
879: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_override != N -> g_override_flag = TRUE');
880: -- =========================== FND LOG ===========================
881:
882: g_override_flag := TRUE;

Line 880: -- =========================== FND LOG ===========================

876: g_override_flag := FALSE;
877: else
878: -- =========================== FND LOG ===========================
879: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_override != N -> g_override_flag = TRUE');
880: -- =========================== FND LOG ===========================
881:
882: g_override_flag := TRUE;
883: end if;
884:

Line 896: -- =========================== FND LOG ===========================

892: else
893: g_user_id := FND_GLOBAL.USER_ID;
894: end if;
895:
896: -- =========================== FND LOG ===========================
897: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_user_id -> ' || g_user_id);
898: -- ========================= FND LOG =============================
899:
900: if g_user_id = -1 then

Line 898: -- ========================= FND LOG =============================

894: end if;
895:
896: -- =========================== FND LOG ===========================
897: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_user_id -> ' || g_user_id);
898: -- ========================= FND LOG =============================
899:
900: if g_user_id = -1 then
901: message_token('PROCEDURE', 'Funds Checker');
902: add_message('SQLGL', 'GL_INVALID_USERID');

Line 903: -- =========================== FND LOG ===========================

899:
900: if g_user_id = -1 then
901: message_token('PROCEDURE', 'Funds Checker');
902: add_message('SQLGL', 'GL_INVALID_USERID');
903: -- =========================== FND LOG ===========================
904: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE');
905: -- ========================= FND LOG =============================
906: g_debug := g_debug||' GLXFIN Failed : G_USER_ID = -1';
907: return(FALSE);

Line 905: -- ========================= FND LOG =============================

901: message_token('PROCEDURE', 'Funds Checker');
902: add_message('SQLGL', 'GL_INVALID_USERID');
903: -- =========================== FND LOG ===========================
904: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE');
905: -- ========================= FND LOG =============================
906: g_debug := g_debug||' GLXFIN Failed : G_USER_ID = -1';
907: return(FALSE);
908: end if;
909:

Line 920: -- =========================== FND LOG ===========================

916: if g_resp_appl_id = -1 then
917: g_resp_appl_id := 101;
918: end if;
919:
920: -- =========================== FND LOG ===========================
921: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_resp_appl_id -> ' || g_resp_appl_id);
922: -- ========================= FND LOG =============================
923:
924: /*=========================+

Line 922: -- ========================= FND LOG =============================

918: end if;
919:
920: -- =========================== FND LOG ===========================
921: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_resp_appl_id -> ' || g_resp_appl_id);
922: -- ========================= FND LOG =============================
923:
924: /*=========================+
925: | Get Responsibility ID |
926: +=========================*/

Line 935: -- =========================== FND LOG ===========================

931: else
932: g_user_resp_id := FND_GLOBAL.RESP_ID;
933: end if;
934:
935: -- =========================== FND LOG ===========================
936: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_user_resp_id -> ' || g_user_resp_id);
937: -- ========================= FND LOG =============================
938:
939: if g_user_resp_id = -1 then

Line 937: -- ========================= FND LOG =============================

933: end if;
934:
935: -- =========================== FND LOG ===========================
936: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_user_resp_id -> ' || g_user_resp_id);
937: -- ========================= FND LOG =============================
938:
939: if g_user_resp_id = -1 then
940: message_token('PROCEDURE', 'Funds Checker');
941: add_message('SQLGL', 'GL_INVALID_RESPID');

Line 942: -- =========================== FND LOG ===========================

938:
939: if g_user_resp_id = -1 then
940: message_token('PROCEDURE', 'Funds Checker');
941: add_message('SQLGL', 'GL_INVALID_RESPID');
942: -- =========================== FND LOG ===========================
943: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE');
944: -- ========================= FND LOG =============================
945: g_debug := g_debug||' GLXFIN Failed : G_USER_RESP_ID = -1';
946: return(FALSE);

Line 944: -- ========================= FND LOG =============================

940: message_token('PROCEDURE', 'Funds Checker');
941: add_message('SQLGL', 'GL_INVALID_RESPID');
942: -- =========================== FND LOG ===========================
943: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE');
944: -- ========================= FND LOG =============================
945: g_debug := g_debug||' GLXFIN Failed : G_USER_RESP_ID = -1';
946: return(FALSE);
947: end if;
948:

Line 960: -- =========================== FND LOG ===========================

956: else
957: g_conc_flag := TRUE;
958: end if;
959:
960: -- =========================== FND LOG ===========================
961: IF (g_conc_flag) THEN
962: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_conc_flag -> TRUE');
963: ELSE
964: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_conc_flag -> FALSE');

Line 966: -- ========================= FND LOG =============================

962: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_conc_flag -> TRUE');
963: ELSE
964: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_conc_flag -> FALSE');
965: END IF;
966: -- ========================= FND LOG =============================
967:
968: IF g_calling_prog_flag = 'G' THEN
969:
970: -- Get GL Installation Info

Line 980: -- =========================== FND LOG ===========================

976: g_resp_appl_id,
977: l_industry,
978: l_defined);
979:
980: -- =========================== FND LOG ===========================
981: psa_utils.debug_other_string(g_state_level,l_full_path, ' Getting INDUSTRY details ');
982: -- ========================= FND LOG =============================
983:
984: if not l_defined then

Line 982: -- ========================= FND LOG =============================

978: l_defined);
979:
980: -- =========================== FND LOG ===========================
981: psa_utils.debug_other_string(g_state_level,l_full_path, ' Getting INDUSTRY details ');
982: -- ========================= FND LOG =============================
983:
984: if not l_defined then
985: if not FND_INSTALLATION.GET(g_resp_appl_id,
986: 101,

Line 992: -- =========================== FND LOG ===========================

988: l_industry) then
989:
990: message_token('ROUTINE', 'Funds Checker');
991: add_message('SQLGL', 'GL_CANT_GET_INSTALL_INDUSTRY');
992: -- =========================== FND LOG ===========================
993: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE');
994: -- ========================= FND LOG =============================
995: g_debug := g_debug||' GLXFIN Failed : Oracle General Ledger
996: was unable to get installation industry from Funds Checker.

Line 994: -- ========================= FND LOG =============================

990: message_token('ROUTINE', 'Funds Checker');
991: add_message('SQLGL', 'GL_CANT_GET_INSTALL_INDUSTRY');
992: -- =========================== FND LOG ===========================
993: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE');
994: -- ========================= FND LOG =============================
995: g_debug := g_debug||' GLXFIN Failed : Oracle General Ledger
996: was unable to get installation industry from Funds Checker.
997: Contact your system administrator.';
998: return(FALSE);

Line 1005: -- =========================== FND LOG ===========================

1001:
1002:
1003: -- Check for Profiles if Government Install
1004:
1005: -- =========================== FND LOG ===========================
1006: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_industry -> ' || l_industry);
1007: -- ========================= FND LOG =============================
1008:
1009: if l_industry = 'G' then

Line 1007: -- ========================= FND LOG =============================

1003: -- Check for Profiles if Government Install
1004:
1005: -- =========================== FND LOG ===========================
1006: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_industry -> ' || l_industry);
1007: -- ========================= FND LOG =============================
1008:
1009: if l_industry = 'G' then
1010:
1011: FND_PROFILE.GET('USSGL_OPTION', l_value);

Line 1014: -- =========================== FND LOG ===========================

1010:
1011: FND_PROFILE.GET('USSGL_OPTION', l_value);
1012:
1013: if l_value is null then
1014: -- =========================== FND LOG ===========================
1015: psa_utils.debug_other_string(g_state_level,l_full_path, ' RAISE OTHERS');
1016: -- ========================= FND LOG =============================
1017: raise others;
1018: end if;

Line 1016: -- ========================= FND LOG =============================

1012:
1013: if l_value is null then
1014: -- =========================== FND LOG ===========================
1015: psa_utils.debug_other_string(g_state_level,l_full_path, ' RAISE OTHERS');
1016: -- ========================= FND LOG =============================
1017: raise others;
1018: end if;
1019:
1020: -- =========================== FND LOG ===========================

Line 1020: -- =========================== FND LOG ===========================

1016: -- ========================= FND LOG =============================
1017: raise others;
1018: end if;
1019:
1020: -- =========================== FND LOG ===========================
1021: psa_utils.debug_other_string(g_state_level,l_full_path, ' USSGL_OPTION, l_value -> ' || l_Value);
1022: -- ========================= FND LOG =============================
1023:
1024: if l_value = 'Y' then

Line 1022: -- ========================= FND LOG =============================

1018: end if;
1019:
1020: -- =========================== FND LOG ===========================
1021: psa_utils.debug_other_string(g_state_level,l_full_path, ' USSGL_OPTION, l_value -> ' || l_Value);
1022: -- ========================= FND LOG =============================
1023:
1024: if l_value = 'Y' then
1025: -- =========================== FND LOG ===========================
1026: psa_utils.debug_other_string(g_state_level,l_full_path, ' G_USSGL_OPTION_FLAG -> TRUE ');

Line 1025: -- =========================== FND LOG ===========================

1021: psa_utils.debug_other_string(g_state_level,l_full_path, ' USSGL_OPTION, l_value -> ' || l_Value);
1022: -- ========================= FND LOG =============================
1023:
1024: if l_value = 'Y' then
1025: -- =========================== FND LOG ===========================
1026: psa_utils.debug_other_string(g_state_level,l_full_path, ' G_USSGL_OPTION_FLAG -> TRUE ');
1027: -- ========================= FND LOG =============================
1028: g_ussgl_option_flag := TRUE;
1029: end if;

Line 1027: -- ========================= FND LOG =============================

1023:
1024: if l_value = 'Y' then
1025: -- =========================== FND LOG ===========================
1026: psa_utils.debug_other_string(g_state_level,l_full_path, ' G_USSGL_OPTION_FLAG -> TRUE ');
1027: -- ========================= FND LOG =============================
1028: g_ussgl_option_flag := TRUE;
1029: end if;
1030:
1031: if g_ussgl_option_flag then

Line 1040: -- =========================== FND LOG ===========================

1036: g_resp_appl_id,
1037: l_fv_prepay_prof,
1038: l_fv_prepay_defined);
1039:
1040: -- =========================== FND LOG ===========================
1041: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_fv_prepay_prof -> ' || l_fv_prepay_prof);
1042: -- ========================= FND LOG =============================
1043:
1044: if l_fv_prepay_prof = 'Y' then

Line 1042: -- ========================= FND LOG =============================

1038: l_fv_prepay_defined);
1039:
1040: -- =========================== FND LOG ===========================
1041: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_fv_prepay_prof -> ' || l_fv_prepay_prof);
1042: -- ========================= FND LOG =============================
1043:
1044: if l_fv_prepay_prof = 'Y' then
1045: g_fv_prepay_prof := TRUE;
1046: else

Line 1050: -- =========================== FND LOG ===========================

1046: else
1047: g_fv_prepay_prof := FALSE;
1048: end if;
1049:
1050: -- =========================== FND LOG ===========================
1051: IF (g_fv_prepay_prof) THEN
1052: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fv_prepay_prof -> TRUE');
1053: ELSE
1054: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fv_prepay_prof -> FALSE');

Line 1056: -- ========================= FND LOG =============================

1052: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fv_prepay_prof -> TRUE');
1053: ELSE
1054: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fv_prepay_prof -> FALSE');
1055: END IF;
1056: -- ========================= FND LOG =============================
1057:
1058: end if;
1059:
1060: -- Bug 678604

Line 1074: -- =========================== FND LOG ===========================

1070: else
1071: g_reverse_tc_flag := l_reverse_tc_flag;
1072: end if;
1073:
1074: -- =========================== FND LOG ===========================
1075: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_reverse_tc_flag -> ' || g_reverse_tc_flag);
1076: -- ========================= FND LOG =============================
1077:
1078: end if; -- l_industry = 'G'

Line 1076: -- ========================= FND LOG =============================

1072: end if;
1073:
1074: -- =========================== FND LOG ===========================
1075: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_reverse_tc_flag -> ' || g_reverse_tc_flag);
1076: -- ========================= FND LOG =============================
1077:
1078: end if; -- l_industry = 'G'
1079:
1080: end if; -- g_calling_prog_flag = 'G'

Line 1086: -- =========================== FND LOG ===========================

1082:
1083: /*
1084: FND_PROFILE.GET('CREATE_BUDGETARY_ENCUMBRANCES', l_value);
1085:
1086: -- =========================== FND LOG ===========================
1087: psa_utils.debug_other_string(g_state_level,l_full_path, ' CBE - l_value -> ' || l_Value);
1088: -- ========================= FND LOG =============================
1089:
1090: if l_value is null then

Line 1088: -- ========================= FND LOG =============================

1084: FND_PROFILE.GET('CREATE_BUDGETARY_ENCUMBRANCES', l_value);
1085:
1086: -- =========================== FND LOG ===========================
1087: psa_utils.debug_other_string(g_state_level,l_full_path, ' CBE - l_value -> ' || l_Value);
1088: -- ========================= FND LOG =============================
1089:
1090: if l_value is null then
1091: -- =========================== FND LOG ===========================
1092: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_value is null -> raise others');

Line 1091: -- =========================== FND LOG ===========================

1087: psa_utils.debug_other_string(g_state_level,l_full_path, ' CBE - l_value -> ' || l_Value);
1088: -- ========================= FND LOG =============================
1089:
1090: if l_value is null then
1091: -- =========================== FND LOG ===========================
1092: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_value is null -> raise others');
1093: -- ========================= FND LOG =============================
1094:
1095: raise others;

Line 1093: -- ========================= FND LOG =============================

1089:
1090: if l_value is null then
1091: -- =========================== FND LOG ===========================
1092: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_value is null -> raise others');
1093: -- ========================= FND LOG =============================
1094:
1095: raise others;
1096: else
1097: -- =========================== FND LOG ===========================

Line 1097: -- =========================== FND LOG ===========================

1093: -- ========================= FND LOG =============================
1094:
1095: raise others;
1096: else
1097: -- =========================== FND LOG ===========================
1098: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_value not null -> g_budgetary_enc_flag = l_value = ' || l_value);
1099: -- ========================= FND LOG =============================
1100:
1101: g_budgetary_enc_flag := l_value;

Line 1099: -- ========================= FND LOG =============================

1095: raise others;
1096: else
1097: -- =========================== FND LOG ===========================
1098: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_value not null -> g_budgetary_enc_flag = l_value = ' || l_value);
1099: -- ========================= FND LOG =============================
1100:
1101: g_budgetary_enc_flag := l_value;
1102: end if;
1103:

Line 1112: -- =========================== FND LOG ===========================

1108:
1109: FND_PROFILE.GET('PSA_DEBUG_MODE', l_value);
1110:
1111: IF l_value = 'Y' THEN
1112: -- =========================== FND LOG ===========================
1113: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_value = Y -> g_xla_debug = TRUE');
1114: -- ========================= FND LOG =============================
1115:
1116: g_xla_debug := TRUE;

Line 1114: -- ========================= FND LOG =============================

1110:
1111: IF l_value = 'Y' THEN
1112: -- =========================== FND LOG ===========================
1113: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_value = Y -> g_xla_debug = TRUE');
1114: -- ========================= FND LOG =============================
1115:
1116: g_xla_debug := TRUE;
1117: ELSE
1118: -- =========================== FND LOG ===========================

Line 1118: -- =========================== FND LOG ===========================

1114: -- ========================= FND LOG =============================
1115:
1116: g_xla_debug := TRUE;
1117: ELSE
1118: -- =========================== FND LOG ===========================
1119: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_value != Y -> g_xla_debug = FALSE');
1120: -- ========================= FND LOG =============================
1121:
1122: g_xla_debug := FALSE;

Line 1120: -- ========================= FND LOG =============================

1116: g_xla_debug := TRUE;
1117: ELSE
1118: -- =========================== FND LOG ===========================
1119: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_value != Y -> g_xla_debug = FALSE');
1120: -- ========================= FND LOG =============================
1121:
1122: g_xla_debug := FALSE;
1123: END IF;
1124:

Line 1144: -- =========================== FND LOG ===========================

1140: end if;
1141:
1142: g_bc_option_id := to_number(l_value);
1143:
1144: -- =========================== FND LOG ===========================
1145: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_bc_option_id -> ' || g_bc_option_id);
1146: -- ========================= FND LOG =============================
1147:
1148: g_return_code := NULL;

Line 1146: -- ========================= FND LOG =============================

1142: g_bc_option_id := to_number(l_value);
1143:
1144: -- =========================== FND LOG ===========================
1145: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_bc_option_id -> ' || g_bc_option_id);
1146: -- ========================= FND LOG =============================
1147:
1148: g_return_code := NULL;
1149:
1150: g_num_segs := 0;

Line 1152: -- =========================== FND LOG ===========================

1148: g_return_code := NULL;
1149:
1150: g_num_segs := 0;
1151:
1152: -- =========================== FND LOG ===========================
1153: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_return_code -> ' || g_return_code);
1154: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_num_segs -> ' || g_num_segs);
1155: -- ========================= FND LOG =============================
1156:

Line 1155: -- ========================= FND LOG =============================

1151:
1152: -- =========================== FND LOG ===========================
1153: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_return_code -> ' || g_return_code);
1154: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_num_segs -> ' || g_num_segs);
1155: -- ========================= FND LOG =============================
1156:
1157: for i in 1..30 loop
1158: seg_name(i) := null;
1159: seg_val(i) := null;

Line 1167: -- =========================== FND LOG ===========================

1163: /*============================+
1164: | Check for PA enabled |
1165: +=============================*/
1166:
1167: -- =========================== FND LOG ===========================
1168: psa_utils.debug_other_string(g_state_level,l_full_path, ' Check PA is enable or not ' );
1169: -- ========================= FND LOG =============================
1170:
1171: BEGIN

Line 1169: -- ========================= FND LOG =============================

1165: +=============================*/
1166:
1167: -- =========================== FND LOG ===========================
1168: psa_utils.debug_other_string(g_state_level,l_full_path, ' Check PA is enable or not ' );
1169: -- ========================= FND LOG =============================
1170:
1171: BEGIN
1172: l_industry := NULL;
1173: l_prepare_stmt := NULL;

Line 1183: -- =========================== FND LOG ===========================

1179:
1180: l_pa_enabled := 0;
1181: l_prepare_stmt := 'BEGIN IF PA_BUDGET_FUND_PKG.IS_PA_BC_ENABLED() THEN'||' :1 := 1; END IF; END;';
1182:
1183: -- =========================== FND LOG ===========================
1184: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_prepare_stmt -> ' || l_prepare_stmt );
1185: -- ========================= FND LOG =============================
1186:
1187: EXECUTE IMMEDIATE l_prepare_stmt USING OUT l_pa_enabled;

Line 1185: -- ========================= FND LOG =============================

1181: l_prepare_stmt := 'BEGIN IF PA_BUDGET_FUND_PKG.IS_PA_BC_ENABLED() THEN'||' :1 := 1; END IF; END;';
1182:
1183: -- =========================== FND LOG ===========================
1184: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_prepare_stmt -> ' || l_prepare_stmt );
1185: -- ========================= FND LOG =============================
1186:
1187: EXECUTE IMMEDIATE l_prepare_stmt USING OUT l_pa_enabled;
1188:
1189: -- =========================== FND LOG ===========================

Line 1189: -- =========================== FND LOG ===========================

1185: -- ========================= FND LOG =============================
1186:
1187: EXECUTE IMMEDIATE l_prepare_stmt USING OUT l_pa_enabled;
1188:
1189: -- =========================== FND LOG ===========================
1190: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_pa_enabled -> ' || l_pa_enabled );
1191: -- ========================= FND LOG =============================
1192:
1193:

Line 1191: -- ========================= FND LOG =============================

1187: EXECUTE IMMEDIATE l_prepare_stmt USING OUT l_pa_enabled;
1188:
1189: -- =========================== FND LOG ===========================
1190: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_pa_enabled -> ' || l_pa_enabled );
1191: -- ========================= FND LOG =============================
1192:
1193:
1194: IF l_pa_enabled = 1 THEN
1195:

Line 1198: -- =========================== FND LOG ===========================

1194: IF l_pa_enabled = 1 THEN
1195:
1196: g_psa_pacheck := TRUE;
1197:
1198: -- =========================== FND LOG ===========================
1199: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_pacheck --> TRUE ' );
1200: -- ========================= FND LOG =============================
1201:
1202: END IF;

Line 1200: -- ========================= FND LOG =============================

1196: g_psa_pacheck := TRUE;
1197:
1198: -- =========================== FND LOG ===========================
1199: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_pacheck --> TRUE ' );
1200: -- ========================= FND LOG =============================
1201:
1202: END IF;
1203: END IF;
1204: END IF;

Line 1210: -- =========================== FND LOG ===========================

1206: EXCEPTION
1207: WHEN OTHERS THEN
1208: g_psa_pacheck := FALSE;
1209:
1210: -- =========================== FND LOG ===========================
1211: psa_utils.debug_other_string(g_excep_level,l_full_path, ' g_psa_pacheck --> FALSE ' );
1212: psa_utils.debug_other_string(g_excep_level,l_full_path, ' ERROR: '||sqlerrm );
1213: -- ========================= FND LOG =============================
1214: END;

Line 1213: -- ========================= FND LOG =============================

1209:
1210: -- =========================== FND LOG ===========================
1211: psa_utils.debug_other_string(g_excep_level,l_full_path, ' g_psa_pacheck --> FALSE ' );
1212: psa_utils.debug_other_string(g_excep_level,l_full_path, ' ERROR: '||sqlerrm );
1213: -- ========================= FND LOG =============================
1214: END;
1215:
1216:
1217: /*============================+

Line 1221: -- =========================== FND LOG ===========================

1217: /*============================+
1218: | Check for GMS enabled |
1219: +=============================*/
1220:
1221: -- =========================== FND LOG ===========================
1222: psa_utils.debug_other_string(g_state_level,l_full_path, ' Check GMS is enable or not ' );
1223: -- ========================= FND LOG =============================
1224: BEGIN
1225: l_industry := NULL;

Line 1223: -- ========================= FND LOG =============================

1219: +=============================*/
1220:
1221: -- =========================== FND LOG ===========================
1222: psa_utils.debug_other_string(g_state_level,l_full_path, ' Check GMS is enable or not ' );
1223: -- ========================= FND LOG =============================
1224: BEGIN
1225: l_industry := NULL;
1226: l_prepare_stmt := NULL;
1227: l_gms_status := 'N';

Line 1236: -- =========================== FND LOG ===========================

1232:
1233: l_gms_enabled := 0;
1234: l_prepare_stmt := 'BEGIN IF GMS_INSTALL.ENABLED() THEN'||' :1 := 1; END IF; END;';
1235:
1236: -- =========================== FND LOG ===========================
1237: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_prepare_stmt -> ' || l_prepare_stmt );
1238: -- ========================= FND LOG =============================
1239:
1240: EXECUTE IMMEDIATE l_prepare_stmt USING OUT l_gms_enabled;

Line 1238: -- ========================= FND LOG =============================

1234: l_prepare_stmt := 'BEGIN IF GMS_INSTALL.ENABLED() THEN'||' :1 := 1; END IF; END;';
1235:
1236: -- =========================== FND LOG ===========================
1237: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_prepare_stmt -> ' || l_prepare_stmt );
1238: -- ========================= FND LOG =============================
1239:
1240: EXECUTE IMMEDIATE l_prepare_stmt USING OUT l_gms_enabled;
1241:
1242: -- =========================== FND LOG ===========================

Line 1242: -- =========================== FND LOG ===========================

1238: -- ========================= FND LOG =============================
1239:
1240: EXECUTE IMMEDIATE l_prepare_stmt USING OUT l_gms_enabled;
1241:
1242: -- =========================== FND LOG ===========================
1243: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_gms_enabled -> ' || l_gms_enabled );
1244: -- ========================= FND LOG =============================
1245:
1246:

Line 1244: -- ========================= FND LOG =============================

1240: EXECUTE IMMEDIATE l_prepare_stmt USING OUT l_gms_enabled;
1241:
1242: -- =========================== FND LOG ===========================
1243: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_gms_enabled -> ' || l_gms_enabled );
1244: -- ========================= FND LOG =============================
1245:
1246:
1247: IF l_gms_enabled = 1 THEN
1248:

Line 1251: -- =========================== FND LOG ===========================

1247: IF l_gms_enabled = 1 THEN
1248:
1249: g_psa_grantcheck := TRUE;
1250:
1251: -- =========================== FND LOG ===========================
1252: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_grantcheck --> TRUE ' );
1253: -- ========================= FND LOG =============================
1254:
1255: END IF;

Line 1253: -- ========================= FND LOG =============================

1249: g_psa_grantcheck := TRUE;
1250:
1251: -- =========================== FND LOG ===========================
1252: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_grantcheck --> TRUE ' );
1253: -- ========================= FND LOG =============================
1254:
1255: END IF;
1256: END IF;
1257: END IF;

Line 1263: -- =========================== FND LOG ===========================

1259: EXCEPTION
1260: WHEN OTHERS THEN
1261: g_psa_grantcheck := FALSE;
1262:
1263: -- =========================== FND LOG ===========================
1264: psa_utils.debug_other_string(g_excep_level,l_full_path, ' g_psa_grantcheck --> FALSE ' );
1265: psa_utils.debug_other_string(g_excep_level,l_full_path, ' ERROR: '||sqlerrm );
1266: -- ========================= FND LOG =============================
1267: END;

Line 1266: -- ========================= FND LOG =============================

1262:
1263: -- =========================== FND LOG ===========================
1264: psa_utils.debug_other_string(g_excep_level,l_full_path, ' g_psa_grantcheck --> FALSE ' );
1265: psa_utils.debug_other_string(g_excep_level,l_full_path, ' ERROR: '||sqlerrm );
1266: -- ========================= FND LOG =============================
1267: END;
1268:
1269:
1270: /*========================+

Line 1274: -- =========================== FND LOG ===========================

1270: /*========================+
1271: | Check CBC Enabled |
1272: +========================*/
1273:
1274: -- =========================== FND LOG ===========================
1275: psa_utils.debug_other_string(g_state_level,l_full_path, ' Check CBC is enabled or not' );
1276: -- ========================= FND LOG =============================
1277:
1278: BEGIN

Line 1276: -- ========================= FND LOG =============================

1272: +========================*/
1273:
1274: -- =========================== FND LOG ===========================
1275: psa_utils.debug_other_string(g_state_level,l_full_path, ' Check CBC is enabled or not' );
1276: -- ========================= FND LOG =============================
1277:
1278: BEGIN
1279:
1280: IF (l_igi_status = 'I') THEN

Line 1283: -- =========================== FND LOG ===========================

1279:
1280: IF (l_igi_status = 'I') THEN
1281:
1282: l_prepare_stmt := 'SELECT cc_bc_enable_flag FROM igc_cc_bc_enable WHERE set_of_books_id = :1';
1283: -- =========================== FND LOG ===========================
1284: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_prepare_stmt -> ' || l_prepare_stmt );
1285: -- ========================= FND LOG =============================
1286:
1287: EXECUTE IMMEDIATE l_prepare_stmt INTO l_cbc_enabled USING g_ledger_id;

Line 1285: -- ========================= FND LOG =============================

1281:
1282: l_prepare_stmt := 'SELECT cc_bc_enable_flag FROM igc_cc_bc_enable WHERE set_of_books_id = :1';
1283: -- =========================== FND LOG ===========================
1284: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_prepare_stmt -> ' || l_prepare_stmt );
1285: -- ========================= FND LOG =============================
1286:
1287: EXECUTE IMMEDIATE l_prepare_stmt INTO l_cbc_enabled USING g_ledger_id;
1288:
1289: IF (l_cbc_enabled = 'Y') THEN

Line 1297: -- =========================== FND LOG ===========================

1293:
1294: EXCEPTION
1295: WHEN OTHERS THEN
1296: g_cbc_enabled := FALSE;
1297: -- =========================== FND LOG ===========================
1298: psa_utils.debug_other_string(g_excep_level,l_full_path, ' g_cbc_enabled --> FALSE ' );
1299: psa_utils.debug_other_string(g_excep_level,l_full_path, ' ERROR: '||sqlerrm );
1300: -- ========================= FND LOG =============================
1301: END;

Line 1300: -- ========================= FND LOG =============================

1296: g_cbc_enabled := FALSE;
1297: -- =========================== FND LOG ===========================
1298: psa_utils.debug_other_string(g_excep_level,l_full_path, ' g_cbc_enabled --> FALSE ' );
1299: psa_utils.debug_other_string(g_excep_level,l_full_path, ' ERROR: '||sqlerrm );
1300: -- ========================= FND LOG =============================
1301: END;
1302:
1303:
1304: IF g_cbc_enabled THEN

Line 1305: -- =========================== FND LOG ===========================

1301: END;
1302:
1303:
1304: IF g_cbc_enabled THEN
1305: -- =========================== FND LOG ===========================
1306: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_cbc_enabled --> TRUE');
1307: -- ========================= FND LOG =============================
1308: ELSE
1309: -- =========================== FND LOG ===========================

Line 1307: -- ========================= FND LOG =============================

1303:
1304: IF g_cbc_enabled THEN
1305: -- =========================== FND LOG ===========================
1306: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_cbc_enabled --> TRUE');
1307: -- ========================= FND LOG =============================
1308: ELSE
1309: -- =========================== FND LOG ===========================
1310: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_cbc_enabled --> FALSE');
1311: -- ========================= FND LOG =============================

Line 1309: -- =========================== FND LOG ===========================

1305: -- =========================== FND LOG ===========================
1306: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_cbc_enabled --> TRUE');
1307: -- ========================= FND LOG =============================
1308: ELSE
1309: -- =========================== FND LOG ===========================
1310: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_cbc_enabled --> FALSE');
1311: -- ========================= FND LOG =============================
1312: END IF;
1313:

Line 1311: -- ========================= FND LOG =============================

1307: -- ========================= FND LOG =============================
1308: ELSE
1309: -- =========================== FND LOG ===========================
1310: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_cbc_enabled --> FALSE');
1311: -- ========================= FND LOG =============================
1312: END IF;
1313:
1314:
1315: /*================================================================================+

Line 1323: -- =========================== FND LOG ===========================

1319: OPEN set_of_books;
1320: FETCH set_of_books INTO g_coa_id, g_func_curr_code;
1321: CLOSE set_of_books;
1322:
1323: -- =========================== FND LOG ===========================
1324: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_coa_id -> ' || g_coa_id);
1325: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_func_curr_code -> ' || g_func_curr_code);
1326: -- ========================= FND LOG =============================
1327:

Line 1326: -- ========================= FND LOG =============================

1322:
1323: -- =========================== FND LOG ===========================
1324: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_coa_id -> ' || g_coa_id);
1325: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_func_curr_code -> ' || g_func_curr_code);
1326: -- ========================= FND LOG =============================
1327:
1328: -- ===============================================================
1329: psa_utils.debug_other_string(g_state_level,l_full_path,'Getting value of Profile PSA_ENABLE_EFC');
1330: -- ===============================================================

Line 1338: -- =========================== FND LOG ===========================

1334: -- ================================================================
1335: psa_utils.debug_other_string(g_state_level,l_full_path,'Value of Profile PSA_ENABLE_EFC' || g_enable_efc_flag);
1336: -- ================================================================
1337:
1338: -- =========================== FND LOG ===========================
1339: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE');
1340: -- ========================= FND LOG =============================
1341:
1342: return(TRUE);

Line 1340: -- ========================= FND LOG =============================

1336: -- ================================================================
1337:
1338: -- =========================== FND LOG ===========================
1339: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE');
1340: -- ========================= FND LOG =============================
1341:
1342: return(TRUE);
1343:
1344:

Line 1348: -- ========================= FND LOG ===========================

1344:
1345: EXCEPTION
1346:
1347: WHEN OTHERS THEN
1348: -- ========================= FND LOG ===========================
1349: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
1350: -- ========================= FND LOG ===========================
1351:
1352: message_token('PROCEDURE', 'Funds Checker');

Line 1350: -- ========================= FND LOG ===========================

1346:
1347: WHEN OTHERS THEN
1348: -- ========================= FND LOG ===========================
1349: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
1350: -- ========================= FND LOG ===========================
1351:
1352: message_token('PROCEDURE', 'Funds Checker');
1353: message_token('EVENT', SQLERRM);
1354: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');

Line 1356: -- ========================= FND LOG ===========================

1352: message_token('PROCEDURE', 'Funds Checker');
1353: message_token('EVENT', SQLERRM);
1354: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
1355:
1356: -- ========================= FND LOG ===========================
1357: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN --> FALSE ');
1358: -- ========================= FND LOG ===========================
1359: g_debug := g_debug||' GLXFIN Failed : '||SQLERRM;
1360:

Line 1358: -- ========================= FND LOG ===========================

1354: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
1355:
1356: -- ========================= FND LOG ===========================
1357: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN --> FALSE ');
1358: -- ========================= FND LOG ===========================
1359: g_debug := g_debug||' GLXFIN Failed : '||SQLERRM;
1360:
1361: return(FALSE);
1362:

Line 1380: -- ========================= FND LOG ===========================

1376: WHERE packet_id = decode(g_fcmode, 'U', g_packet_id_ursvd, g_packet_id);
1377:
1378: l_option_selected NUMBER;
1379:
1380: -- ========================= FND LOG ===========================
1381: l_full_path VARCHAR2(100);
1382: -- ========================= FND LOG ===========================
1383: BEGIN
1384:

Line 1382: -- ========================= FND LOG ===========================

1378: l_option_selected NUMBER;
1379:
1380: -- ========================= FND LOG ===========================
1381: l_full_path VARCHAR2(100);
1382: -- ========================= FND LOG ===========================
1383: BEGIN
1384:
1385: l_full_path := g_path || 'glxfcp';
1386:

Line 1387: -- =========================== FND LOG ===========================

1383: BEGIN
1384:
1385: l_full_path := g_path || 'glxfcp';
1386:
1387: -- =========================== FND LOG ===========================
1388: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFCP - START' );
1389: -- ========================= FND LOG =============================
1390:
1391: --

Line 1389: -- ========================= FND LOG =============================

1385: l_full_path := g_path || 'glxfcp';
1386:
1387: -- =========================== FND LOG ===========================
1388: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFCP - START' );
1389: -- ========================= FND LOG =============================
1390:
1391: --
1392: -- If Mode is Unreservation, assign Packet ID to Unreservation Packet ID
1393: -- and initialize Packet ID to 0. This is done here to prevent the approved

Line 1398: -- =========================== FND LOG ===========================

1394: -- packet from accidentally being updated to status 'Fatal' in case a fatal
1395: -- error occurs before glxfiu()
1396: --
1397:
1398: -- =========================== FND LOG ===========================
1399: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
1400: -- ========================= FND LOG =============================
1401:
1402: if g_fcmode = 'U' then

Line 1400: -- ========================= FND LOG =============================

1396: --
1397:
1398: -- =========================== FND LOG ===========================
1399: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
1400: -- ========================= FND LOG =============================
1401:
1402: if g_fcmode = 'U' then
1403: g_packet_id_ursvd := g_packet_id;
1404: g_packet_id := 0;

Line 1409: -- =========================== FND LOG ===========================

1405: else
1406: g_packet_id_ursvd := 0;
1407: end if;
1408:
1409: -- =========================== FND LOG ===========================
1410: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_packet_id_ursvd -> ' || g_packet_id_ursvd);
1411: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_packet_id -> ' || g_packet_id);
1412: -- ========================= FND LOG =============================
1413:

Line 1412: -- ========================= FND LOG =============================

1408:
1409: -- =========================== FND LOG ===========================
1410: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_packet_id_ursvd -> ' || g_packet_id_ursvd);
1411: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_packet_id -> ' || g_packet_id);
1412: -- ========================= FND LOG =============================
1413:
1414: IF g_cbc_enabled THEN
1415:
1416: -- =========================== FND LOG ===========================

Line 1416: -- =========================== FND LOG ===========================

1412: -- ========================= FND LOG =============================
1413:
1414: IF g_cbc_enabled THEN
1415:
1416: -- =========================== FND LOG ===========================
1417: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling GLZCBC ');
1418: -- ========================= FND LOG =============================
1419:
1420: g_cbc_retcode := glzcbc;

Line 1418: -- ========================= FND LOG =============================

1414: IF g_cbc_enabled THEN
1415:
1416: -- =========================== FND LOG ===========================
1417: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling GLZCBC ');
1418: -- ========================= FND LOG =============================
1419:
1420: g_cbc_retcode := glzcbc;
1421:
1422: -- =========================== FND LOG ===========================

Line 1422: -- =========================== FND LOG ===========================

1418: -- ========================= FND LOG =============================
1419:
1420: g_cbc_retcode := glzcbc;
1421:
1422: -- =========================== FND LOG ===========================
1423: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_cbc_retcode -> ' || g_cbc_retcode);
1424: -- ========================= FND LOG =============================
1425:
1426: IF g_cbc_retcode = -1 THEN

Line 1424: -- ========================= FND LOG =============================

1420: g_cbc_retcode := glzcbc;
1421:
1422: -- =========================== FND LOG ===========================
1423: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_cbc_retcode -> ' || g_cbc_retcode);
1424: -- ========================= FND LOG =============================
1425:
1426: IF g_cbc_retcode = -1 THEN
1427:
1428: -- =========================== FND LOG ===========================

Line 1428: -- =========================== FND LOG ===========================

1424: -- ========================= FND LOG =============================
1425:
1426: IF g_cbc_retcode = -1 THEN
1427:
1428: -- =========================== FND LOG ===========================
1429: psa_utils.debug_other_string(g_state_level,l_full_path, ' glzcbc RETURN -> FALSE');
1430: psa_utils.debug_other_string(g_state_level,l_full_path, ' ERROR: ROLLBACK, RETURN -> FALSE');
1431: -- ========================= FND LOG =============================
1432:

Line 1431: -- ========================= FND LOG =============================

1427:
1428: -- =========================== FND LOG ===========================
1429: psa_utils.debug_other_string(g_state_level,l_full_path, ' glzcbc RETURN -> FALSE');
1430: psa_utils.debug_other_string(g_state_level,l_full_path, ' ERROR: ROLLBACK, RETURN -> FALSE');
1431: -- ========================= FND LOG =============================
1432:
1433: g_debug := g_debug||' GLXFCP Failed : G_CBC_RETOCDE = -1';
1434: -- Bug 3214062
1435: rollback;

Line 1440: -- =========================== FND LOG ===========================

1436: RETURN FALSE;
1437:
1438: ELSIF g_cbc_retcode = 0 THEN
1439:
1440: -- =========================== FND LOG ===========================
1441: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfrc ');
1442: -- ========================= FND LOG =============================
1443:
1444: if not glxfrc then

Line 1442: -- ========================= FND LOG =============================

1438: ELSIF g_cbc_retcode = 0 THEN
1439:
1440: -- =========================== FND LOG ===========================
1441: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfrc ');
1442: -- ========================= FND LOG =============================
1443:
1444: if not glxfrc then
1445: -- =========================== FND LOG ===========================
1446: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfrc RETURN -> FALSE');

Line 1445: -- =========================== FND LOG ===========================

1441: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfrc ');
1442: -- ========================= FND LOG =============================
1443:
1444: if not glxfrc then
1445: -- =========================== FND LOG ===========================
1446: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfrc RETURN -> FALSE');
1447: psa_utils.debug_other_string(g_state_level,l_full_path, ' ERROR: ROLLBACK, RETURN -> FALSE');
1448: -- ========================= FND LOG =============================
1449:

Line 1448: -- ========================= FND LOG =============================

1444: if not glxfrc then
1445: -- =========================== FND LOG ===========================
1446: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfrc RETURN -> FALSE');
1447: psa_utils.debug_other_string(g_state_level,l_full_path, ' ERROR: ROLLBACK, RETURN -> FALSE');
1448: -- ========================= FND LOG =============================
1449:
1450: -- Bug 3214062
1451: rollback;
1452: RETURN FALSE;

Line 1458: -- =========================== FND LOG ===========================

1454:
1455: -- Bug 3214062
1456: commit;
1457:
1458: -- =========================== FND LOG ===========================
1459: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE');
1460: -- ========================= FND LOG =============================
1461:
1462: RETURN TRUE;

Line 1460: -- ========================= FND LOG =============================

1456: commit;
1457:
1458: -- =========================== FND LOG ===========================
1459: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE');
1460: -- ========================= FND LOG =============================
1461:
1462: RETURN TRUE;
1463:
1464: END IF;

Line 1468: -- =========================== FND LOG ===========================

1464: END IF;
1465:
1466: END IF; -- g_cbc_enabled
1467:
1468: -- =========================== FND LOG ===========================
1469: psa_utils.debug_other_string(g_state_level,l_full_path, ' resetting g_append_je_flag to FALSE ');
1470: -- ========================= FND LOG =============================
1471:
1472: -- Reset Append JE Flag

Line 1470: -- ========================= FND LOG =============================

1466: END IF; -- g_cbc_enabled
1467:
1468: -- =========================== FND LOG ===========================
1469: psa_utils.debug_other_string(g_state_level,l_full_path, ' resetting g_append_je_flag to FALSE ');
1470: -- ========================= FND LOG =============================
1471:
1472: -- Reset Append JE Flag
1473: g_append_je_flag := FALSE;
1474:

Line 1482: -- =========================== FND LOG ===========================

1478:
1479: if ((g_ussgl_option_flag) and
1480: (g_fcmode <> 'U')) then
1481:
1482: -- =========================== FND LOG ===========================
1483: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_ussgl_option_flag -> TRUE ');
1484: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode <> U ');
1485: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling fv_prepay_pkg ');
1486: -- ========================= FND LOG =============================

Line 1486: -- ========================= FND LOG =============================

1482: -- =========================== FND LOG ===========================
1483: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_ussgl_option_flag -> TRUE ');
1484: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode <> U ');
1485: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling fv_prepay_pkg ');
1486: -- ========================= FND LOG =============================
1487:
1488: if not fv_prepay_pkg then
1489: -- =========================== FND LOG ===========================
1490: psa_utils.debug_other_string(g_state_level,l_full_path, ' fv_prepay_pkg - RETURN -> FALSE');

Line 1489: -- =========================== FND LOG ===========================

1485: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling fv_prepay_pkg ');
1486: -- ========================= FND LOG =============================
1487:
1488: if not fv_prepay_pkg then
1489: -- =========================== FND LOG ===========================
1490: psa_utils.debug_other_string(g_state_level,l_full_path, ' fv_prepay_pkg - RETURN -> FALSE');
1491: -- ========================= FND LOG =============================
1492: g_debug := g_debug||' GLXFCP Failed : FV_PREPAY_PKG failed';
1493: rollback;

Line 1491: -- ========================= FND LOG =============================

1487:
1488: if not fv_prepay_pkg then
1489: -- =========================== FND LOG ===========================
1490: psa_utils.debug_other_string(g_state_level,l_full_path, ' fv_prepay_pkg - RETURN -> FALSE');
1491: -- ========================= FND LOG =============================
1492: g_debug := g_debug||' GLXFCP Failed : FV_PREPAY_PKG failed';
1493: rollback;
1494: return (FALSE);
1495: end if;

Line 1497: -- =========================== FND LOG ===========================

1493: rollback;
1494: return (FALSE);
1495: end if;
1496:
1497: -- =========================== FND LOG ===========================
1498: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfug ');
1499: -- ========================= FND LOG =============================
1500:
1501: if not glxfug then

Line 1499: -- ========================= FND LOG =============================

1495: end if;
1496:
1497: -- =========================== FND LOG ===========================
1498: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfug ');
1499: -- ========================= FND LOG =============================
1500:
1501: if not glxfug then
1502: -- =========================== FND LOG ===========================
1503: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFUG - RETURN -> FALSE');

Line 1502: -- =========================== FND LOG ===========================

1498: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfug ');
1499: -- ========================= FND LOG =============================
1500:
1501: if not glxfug then
1502: -- =========================== FND LOG ===========================
1503: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFUG - RETURN -> FALSE');
1504: -- ========================= FND LOG =============================
1505: rollback;
1506: return(FALSE);

Line 1504: -- ========================= FND LOG =============================

1500:
1501: if not glxfug then
1502: -- =========================== FND LOG ===========================
1503: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFUG - RETURN -> FALSE');
1504: -- ========================= FND LOG =============================
1505: rollback;
1506: return(FALSE);
1507: end if;
1508:

Line 1515: -- =========================== FND LOG ===========================

1511: -- If Project Accounting Funds Check indicated, callout to allow
1512: -- for proper pre-processing.
1513:
1514: if g_psa_pacheck then
1515: -- =========================== FND LOG ===========================
1516: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_pacheck -> TRUE');
1517: -- ========================= FND LOG =============================
1518:
1519: if not glzpafck then

Line 1517: -- ========================= FND LOG =============================

1513:
1514: if g_psa_pacheck then
1515: -- =========================== FND LOG ===========================
1516: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_pacheck -> TRUE');
1517: -- ========================= FND LOG =============================
1518:
1519: if not glzpafck then
1520: -- =========================== FND LOG ===========================
1521: psa_utils.debug_other_string(g_state_level,l_full_path, ' glzpafck - RETURN -> FALSE');

Line 1520: -- =========================== FND LOG ===========================

1516: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_pacheck -> TRUE');
1517: -- ========================= FND LOG =============================
1518:
1519: if not glzpafck then
1520: -- =========================== FND LOG ===========================
1521: psa_utils.debug_other_string(g_state_level,l_full_path, ' glzpafck - RETURN -> FALSE');
1522: -- ========================= FND LOG =============================
1523: rollback;
1524: return(FALSE);

Line 1522: -- ========================= FND LOG =============================

1518:
1519: if not glzpafck then
1520: -- =========================== FND LOG ===========================
1521: psa_utils.debug_other_string(g_state_level,l_full_path, ' glzpafck - RETURN -> FALSE');
1522: -- ========================= FND LOG =============================
1523: rollback;
1524: return(FALSE);
1525: end if;
1526:

Line 1529: -- =========================== FND LOG ===========================

1525: end if;
1526:
1527: end if;
1528:
1529: -- =========================== FND LOG ===========================
1530: psa_utils.debug_other_string(g_state_level,l_full_path, ' Populating records in PSA_OPTION_DETAILS_GT ');
1531: -- ========================= FND LOG =============================
1532:
1533: FOR indx IN source_cat

Line 1531: -- ========================= FND LOG =============================

1527: end if;
1528:
1529: -- =========================== FND LOG ===========================
1530: psa_utils.debug_other_string(g_state_level,l_full_path, ' Populating records in PSA_OPTION_DETAILS_GT ');
1531: -- ========================= FND LOG =============================
1532:
1533: FOR indx IN source_cat
1534: LOOP
1535: SELECT MIN(CASE) INTO l_option_selected

Line 1550: -- =========================== FND LOG ===========================

1546: END CASE
1547: FROM gl_bc_option_details bc
1548: WHERE bc_option_id = g_bc_option_id);
1549:
1550: -- =========================== FND LOG ===========================
1551: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_option_selected -> '||l_option_selected);
1552: -- ========================= FND LOG =============================
1553:
1554: INSERT INTO psa_option_details_gt

Line 1552: -- ========================= FND LOG =============================

1548: WHERE bc_option_id = g_bc_option_id);
1549:
1550: -- =========================== FND LOG ===========================
1551: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_option_selected -> '||l_option_selected);
1552: -- ========================= FND LOG =============================
1553:
1554: INSERT INTO psa_option_details_gt
1555: ( packet_id,
1556: je_source_name,

Line 1591: -- =========================== FND LOG ===========================

1587: 1, indx.je_category_name,
1588: 3, indx.je_category_name,
1589: 'Other');
1590:
1591: -- =========================== FND LOG ===========================
1592: psa_utils.debug_other_string(g_state_level,l_full_path, sql%rowcount||' Rows Inserted into psa_option_details_gt ');
1593: -- ========================= FND LOG =============================
1594:
1595:

Line 1593: -- ========================= FND LOG =============================

1589: 'Other');
1590:
1591: -- =========================== FND LOG ===========================
1592: psa_utils.debug_other_string(g_state_level,l_full_path, sql%rowcount||' Rows Inserted into psa_option_details_gt ');
1593: -- ========================= FND LOG =============================
1594:
1595:
1596: END LOOP;
1597:

Line 1601: -- =========================== FND LOG ===========================

1597:
1598: -- If Mode is Unreservation, insert Unreservation Packet into the queue
1599: if g_fcmode = 'U' then
1600:
1601: -- =========================== FND LOG ===========================
1602: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = U ');
1603: -- ========================= FND LOG =============================
1604:
1605: if not glxfiu then

Line 1603: -- ========================= FND LOG =============================

1599: if g_fcmode = 'U' then
1600:
1601: -- =========================== FND LOG ===========================
1602: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = U ');
1603: -- ========================= FND LOG =============================
1604:
1605: if not glxfiu then
1606: -- =========================== FND LOG ===========================
1607: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfui - RETURN -> FALSE ');

Line 1606: -- =========================== FND LOG ===========================

1602: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = U ');
1603: -- ========================= FND LOG =============================
1604:
1605: if not glxfiu then
1606: -- =========================== FND LOG ===========================
1607: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfui - RETURN -> FALSE ');
1608: -- ========================= FND LOG =============================
1609: rollback;
1610: return(FALSE);

Line 1608: -- ========================= FND LOG =============================

1604:
1605: if not glxfiu then
1606: -- =========================== FND LOG ===========================
1607: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfui - RETURN -> FALSE ');
1608: -- ========================= FND LOG =============================
1609: rollback;
1610: return(FALSE);
1611: end if;
1612: end if;

Line 1615: -- =========================== FND LOG ===========================

1611: end if;
1612: end if;
1613:
1614: if not glxfss then
1615: -- =========================== FND LOG ===========================
1616: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfss - RETURN -> FALSE ');
1617: -- ========================= FND LOG =============================
1618: rollback;
1619: return(FALSE);

Line 1617: -- ========================= FND LOG =============================

1613:
1614: if not glxfss then
1615: -- =========================== FND LOG ===========================
1616: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfss - RETURN -> FALSE ');
1617: -- ========================= FND LOG =============================
1618: rollback;
1619: return(FALSE);
1620: end if;
1621:

Line 1632: -- =========================== FND LOG ===========================

1628: -- Check Grants, if extension enabled
1629:
1630: gms_retcode := '~';
1631:
1632: -- =========================== FND LOG ===========================
1633: psa_utils.debug_other_string(g_state_level,l_full_path, ' gms_retcode -> ' || gms_retcode);
1634: -- ========================= FND LOG =============================
1635:
1636: if g_psa_grantcheck then

Line 1634: -- ========================= FND LOG =============================

1630: gms_retcode := '~';
1631:
1632: -- =========================== FND LOG ===========================
1633: psa_utils.debug_other_string(g_state_level,l_full_path, ' gms_retcode -> ' || gms_retcode);
1634: -- ========================= FND LOG =============================
1635:
1636: if g_psa_grantcheck then
1637: -- =========================== FND LOG ===========================
1638: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glzgchk');

Line 1637: -- =========================== FND LOG ===========================

1633: psa_utils.debug_other_string(g_state_level,l_full_path, ' gms_retcode -> ' || gms_retcode);
1634: -- ========================= FND LOG =============================
1635:
1636: if g_psa_grantcheck then
1637: -- =========================== FND LOG ===========================
1638: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glzgchk');
1639: -- ========================= FND LOG =============================
1640: g_psa_grantcheck := glzgchk;
1641: end if;

Line 1639: -- ========================= FND LOG =============================

1635:
1636: if g_psa_grantcheck then
1637: -- =========================== FND LOG ===========================
1638: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glzgchk');
1639: -- ========================= FND LOG =============================
1640: g_psa_grantcheck := glzgchk;
1641: end if;
1642:
1643: -- Process Balances

Line 1646: -- =========================== FND LOG ===========================

1642:
1643: -- Process Balances
1644:
1645: if (g_fcmode <> 'F') then
1646: -- =========================== FND LOG ===========================
1647: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode <> F');
1648: -- ========================= FND LOG =============================
1649:
1650: if not glxfgb then

Line 1648: -- ========================= FND LOG =============================

1644:
1645: if (g_fcmode <> 'F') then
1646: -- =========================== FND LOG ===========================
1647: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode <> F');
1648: -- ========================= FND LOG =============================
1649:
1650: if not glxfgb then
1651: -- =========================== FND LOG ===========================
1652: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfgb -> FALSE');

Line 1651: -- =========================== FND LOG ===========================

1647: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode <> F');
1648: -- ========================= FND LOG =============================
1649:
1650: if not glxfgb then
1651: -- =========================== FND LOG ===========================
1652: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfgb -> FALSE');
1653: -- ========================= FND LOG =============================
1654: rollback;
1655: return(FALSE);

Line 1653: -- ========================= FND LOG =============================

1649:
1650: if not glxfgb then
1651: -- =========================== FND LOG ===========================
1652: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfgb -> FALSE');
1653: -- ========================= FND LOG =============================
1654: rollback;
1655: return(FALSE);
1656: end if;
1657:

Line 1666: -- =========================== FND LOG ===========================

1662: -- ## to the Extended Funds Checker V2 and V3 functionality which
1663: -- ## is not supported in 11.5 and beyond.
1664:
1665: if not glxfrc then
1666: -- =========================== FND LOG ===========================
1667: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfrc -> FALSE');
1668: -- ========================= FND LOG =============================
1669: rollback;
1670: return(FALSE);

Line 1668: -- ========================= FND LOG =============================

1664:
1665: if not glxfrc then
1666: -- =========================== FND LOG ===========================
1667: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfrc -> FALSE');
1668: -- ========================= FND LOG =============================
1669: rollback;
1670: return(FALSE);
1671: end if;
1672:

Line 1678: -- =========================== FND LOG ===========================

1674: -- Need to commit as we exit an autonomous function.
1675: --
1676: commit;
1677:
1678: -- =========================== FND LOG ===========================
1679: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE');
1680: -- ========================= FND LOG =============================
1681:
1682: return(TRUE);

Line 1680: -- ========================= FND LOG =============================

1676: commit;
1677:
1678: -- =========================== FND LOG ===========================
1679: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE');
1680: -- ========================= FND LOG =============================
1681:
1682: return(TRUE);
1683:
1684: EXCEPTION

Line 1687: -- =========================== FND LOG ===========================

1683:
1684: EXCEPTION
1685:
1686: WHEN OTHERS THEN
1687: -- =========================== FND LOG ===========================
1688: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
1689: -- ========================= FND LOG =============================
1690:
1691: message_token('PROCEDURE', 'Funds Checker');

Line 1689: -- ========================= FND LOG =============================

1685:
1686: WHEN OTHERS THEN
1687: -- =========================== FND LOG ===========================
1688: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
1689: -- ========================= FND LOG =============================
1690:
1691: message_token('PROCEDURE', 'Funds Checker');
1692: message_token('EVENT', SQLERRM);
1693: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');

Line 1699: -- =========================== FND LOG ===========================

1695: g_debug := g_debug||' GLXFCP Failed : '||SQLERRM;
1696: -- Bug 3214062
1697: rollback;
1698:
1699: -- =========================== FND LOG ===========================
1700: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> TRUE');
1701: -- ========================= FND LOG =============================
1702: return(FALSE);
1703:

Line 1701: -- ========================= FND LOG =============================

1697: rollback;
1698:
1699: -- =========================== FND LOG ===========================
1700: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> TRUE');
1701: -- ========================= FND LOG =============================
1702: return(FALSE);
1703:
1704: END glxfcp;
1705:

Line 1783: -- ========================= FND LOG ===========================

1779: and bp.je_batch_id >= 0
1780: and bp.ussgl_transaction_code is not null
1781: );
1782:
1783: -- ========================= FND LOG ===========================
1784: l_full_path VARCHAR2(100);
1785: -- ========================= FND LOG ===========================
1786: BEGIN
1787:

Line 1785: -- ========================= FND LOG ===========================

1781: );
1782:
1783: -- ========================= FND LOG ===========================
1784: l_full_path VARCHAR2(100);
1785: -- ========================= FND LOG ===========================
1786: BEGIN
1787:
1788: l_full_path := g_path || 'glxfug';
1789:

Line 1790: -- =========================== FND LOG ===========================

1786: BEGIN
1787:
1788: l_full_path := g_path || 'glxfug';
1789:
1790: -- =========================== FND LOG ===========================
1791: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFUG - START' );
1792: -- ========================= FND LOG =============================
1793:
1794: -- Check that USSGL transactions need to be created since the overhead for

Line 1792: -- ========================= FND LOG =============================

1788: l_full_path := g_path || 'glxfug';
1789:
1790: -- =========================== FND LOG ===========================
1791: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFUG - START' );
1792: -- ========================= FND LOG =============================
1793:
1794: -- Check that USSGL transactions need to be created since the overhead for
1795: -- constructing and executing the Dynamic SQL for inserting USSGL
1796: -- Transactions is much higher than this check

Line 1802: -- =========================== FND LOG ===========================

1798: open ussgl;
1799:
1800: fetch ussgl into l_tmpmsg;
1801:
1802: -- =========================== FND LOG ===========================
1803: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_tmpmsg -> ' || l_tmpmsg );
1804: -- ========================= FND LOG =============================
1805:
1806: -- No USSGL Transactions need to be created

Line 1804: -- ========================= FND LOG =============================

1800: fetch ussgl into l_tmpmsg;
1801:
1802: -- =========================== FND LOG ===========================
1803: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_tmpmsg -> ' || l_tmpmsg );
1804: -- ========================= FND LOG =============================
1805:
1806: -- No USSGL Transactions need to be created
1807: if ussgl%NOTFOUND then
1808: -- =========================== FND LOG ===========================

Line 1808: -- =========================== FND LOG ===========================

1804: -- ========================= FND LOG =============================
1805:
1806: -- No USSGL Transactions need to be created
1807: if ussgl%NOTFOUND then
1808: -- =========================== FND LOG ===========================
1809: psa_utils.debug_other_string(g_state_level,l_full_path, ' goto normal_exit label' );
1810: -- ========================= FND LOG =============================
1811: goto normal_exit;
1812: end if;

Line 1810: -- ========================= FND LOG =============================

1806: -- No USSGL Transactions need to be created
1807: if ussgl%NOTFOUND then
1808: -- =========================== FND LOG ===========================
1809: psa_utils.debug_other_string(g_state_level,l_full_path, ' goto normal_exit label' );
1810: -- ========================= FND LOG =============================
1811: goto normal_exit;
1812: end if;
1813:
1814: close ussgl;

Line 1825: -- =========================== FND LOG ===========================

1821: open append_je;
1822: fetch append_je into l_tmpmsg;
1823:
1824: if append_je%FOUND then
1825: -- =========================== FND LOG ===========================
1826: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_append_je_flag -> TRUE');
1827: -- ========================= FND LOG =============================
1828: g_append_je_flag := TRUE;
1829: else

Line 1827: -- ========================= FND LOG =============================

1823:
1824: if append_je%FOUND then
1825: -- =========================== FND LOG ===========================
1826: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_append_je_flag -> TRUE');
1827: -- ========================= FND LOG =============================
1828: g_append_je_flag := TRUE;
1829: else
1830: -- =========================== FND LOG ===========================
1831: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_append_je_flag -> FALSE');

Line 1830: -- =========================== FND LOG ===========================

1826: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_append_je_flag -> TRUE');
1827: -- ========================= FND LOG =============================
1828: g_append_je_flag := TRUE;
1829: else
1830: -- =========================== FND LOG ===========================
1831: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_append_je_flag -> FALSE');
1832: -- ========================= FND LOG =============================
1833: g_append_je_flag := FALSE;
1834: end if;

Line 1832: -- ========================= FND LOG =============================

1828: g_append_je_flag := TRUE;
1829: else
1830: -- =========================== FND LOG ===========================
1831: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_append_je_flag -> FALSE');
1832: -- ========================= FND LOG =============================
1833: g_append_je_flag := FALSE;
1834: end if;
1835:
1836: close append_je;

Line 1845: -- =========================== FND LOG ===========================

1841: WHERE
1842: BP.packet_id = g_packet_id
1843: AND BP.ussgl_transaction_code IS NOT NULL;
1844:
1845: -- =========================== FND LOG ===========================
1846: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets -> ' || SQL%ROWCOUNT );
1847: -- ========================= FND LOG =============================
1848:
1849: if g_append_je_flag then

Line 1847: -- ========================= FND LOG =============================

1843: AND BP.ussgl_transaction_code IS NOT NULL;
1844:
1845: -- =========================== FND LOG ===========================
1846: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets -> ' || SQL%ROWCOUNT );
1847: -- ========================= FND LOG =============================
1848:
1849: if g_append_je_flag then
1850:
1851: -- ## ----------------------------------------------------------+

Line 1888: -- =========================== FND LOG ===========================

1884: AND BP.ussgl_transaction_code IS NOT NULL;
1885:
1886: end if;
1887:
1888: -- =========================== FND LOG ===========================
1889: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets -> ' || SQL%ROWCOUNT );
1890: psa_utils.debug_other_string(g_state_level,l_full_path, 'Calling glxfkf' );
1891: -- ========================= FND LOG =============================
1892:

Line 1891: -- ========================= FND LOG =============================

1887:
1888: -- =========================== FND LOG ===========================
1889: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets -> ' || SQL%ROWCOUNT );
1890: psa_utils.debug_other_string(g_state_level,l_full_path, 'Calling glxfkf' );
1891: -- ========================= FND LOG =============================
1892:
1893: -- Retrieve Flex Info for the Flex Structure
1894: if not glxfkf then
1895: -- =========================== FND LOG ===========================

Line 1895: -- =========================== FND LOG ===========================

1891: -- ========================= FND LOG =============================
1892:
1893: -- Retrieve Flex Info for the Flex Structure
1894: if not glxfkf then
1895: -- =========================== FND LOG ===========================
1896: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfkf ->False --> RETURN FALSE' );
1897: -- ========================= FND LOG =============================
1898: return(FALSE);
1899: end if;

Line 1897: -- ========================= FND LOG =============================

1893: -- Retrieve Flex Info for the Flex Structure
1894: if not glxfkf then
1895: -- =========================== FND LOG ===========================
1896: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfkf ->False --> RETURN FALSE' );
1897: -- ========================= FND LOG =============================
1898: return(FALSE);
1899: end if;
1900:
1901:

Line 2028: -- =========================== FND LOG ===========================

2024: 'bp.status_code, ' ||
2025: 'bp.last_update_date, ' ||
2026: 'bp.last_updated_by, ';
2027:
2028: -- =========================== FND LOG ===========================
2029: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_reverse_tc_flag -> ' || g_reverse_tc_flag );
2030: -- ========================= FND LOG =============================
2031:
2032: if g_reverse_tc_flag = 'N' then

Line 2030: -- ========================= FND LOG =============================

2026: 'bp.last_updated_by, ';
2027:
2028: -- =========================== FND LOG ===========================
2029: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_reverse_tc_flag -> ' || g_reverse_tc_flag );
2030: -- ========================= FND LOG =============================
2031:
2032: if g_reverse_tc_flag = 'N' then
2033:
2034: sql_ussgl := sql_ussgl ||

Line 2236: -- =========================== FND LOG ===========================

2232: 'and cco.code_combination_id = bp.code_combination_id ' ||
2233: 'and bp.packet_id = ' || g_packet_id || ' ' ||
2234: 'and bp.ussgl_transaction_code is not null';
2235:
2236: -- =========================== FND LOG ===========================
2237: psa_utils.debug_other_string(g_state_level,l_full_path, ' sql_ussgl -> ' || SUBSTR(sql_ussgl,1,3500));
2238: psa_utils.debug_other_string(g_state_level,l_full_path, ' sql_ussgl -> ' || SUBSTR(sql_ussgl,3500,7000));
2239: -- ========================= FND LOG =============================
2240:

Line 2239: -- ========================= FND LOG =============================

2235:
2236: -- =========================== FND LOG ===========================
2237: psa_utils.debug_other_string(g_state_level,l_full_path, ' sql_ussgl -> ' || SUBSTR(sql_ussgl,1,3500));
2238: psa_utils.debug_other_string(g_state_level,l_full_path, ' sql_ussgl -> ' || SUBSTR(sql_ussgl,3500,7000));
2239: -- ========================= FND LOG =============================
2240:
2241: execute immediate sql_ussgl;
2242:
2243: -- =========================== FND LOG ===========================

Line 2243: -- =========================== FND LOG ===========================

2239: -- ========================= FND LOG =============================
2240:
2241: execute immediate sql_ussgl;
2242:
2243: -- =========================== FND LOG ===========================
2244: psa_utils.debug_other_string(g_state_level,l_full_path, 'USSGL Rows Inserted: '||sql%rowcount);
2245: -- ========================= FND LOG =============================
2246:
2247: -- Now that the USSGL Transactions have been generated in the queue, we

Line 2245: -- ========================= FND LOG =============================

2241: execute immediate sql_ussgl;
2242:
2243: -- =========================== FND LOG ===========================
2244: psa_utils.debug_other_string(g_state_level,l_full_path, 'USSGL Rows Inserted: '||sql%rowcount);
2245: -- ========================= FND LOG =============================
2246:
2247: -- Now that the USSGL Transactions have been generated in the queue, we
2248: -- pick up the Code Combinations which need to be created in the Code
2249: -- Combinations table

Line 2276: -- =========================== FND LOG ===========================

2272: 'and bp.packet_id = ' || g_packet_id || ' ' ||
2273: 'and bp.code_combination_id < 0 ' ||
2274: 'and bp.account_segment_value is not null';
2275:
2276: -- =========================== FND LOG ===========================
2277: psa_utils.debug_other_string(g_state_level,l_full_path, ' sql_ussgl1 -> ' || SUBSTR(sql_ussgl,1,3500));
2278: psa_utils.debug_other_string(g_state_level,l_full_path, ' sql_ussgl1 -> ' || SUBSTR(sql_ussgl,3500,7000));
2279: -- ========================= FND LOG =============================
2280:

Line 2279: -- ========================= FND LOG =============================

2275:
2276: -- =========================== FND LOG ===========================
2277: psa_utils.debug_other_string(g_state_level,l_full_path, ' sql_ussgl1 -> ' || SUBSTR(sql_ussgl,1,3500));
2278: psa_utils.debug_other_string(g_state_level,l_full_path, ' sql_ussgl1 -> ' || SUBSTR(sql_ussgl,3500,7000));
2279: -- ========================= FND LOG =============================
2280:
2281: cur_ussgl := dbms_sql.open_cursor;
2282: dbms_sql.parse(cur_ussgl, sql_ussgl, dbms_sql.v7);
2283:

Line 2321: -- =========================== FND LOG ===========================

2317: set bp.code_combination_id = l_ccid_out
2318: where bp.code_combination_id = l_ccid
2319: and bp.account_segment_value=seg_val(g_acct_seg_index);
2320:
2321: -- =========================== FND LOG ===========================
2322: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets -> ' || SQL%ROWCOUNT);
2323: -- ========================= FND LOG =============================
2324:
2325: else

Line 2323: -- ========================= FND LOG =============================

2319: and bp.account_segment_value=seg_val(g_acct_seg_index);
2320:
2321: -- =========================== FND LOG ===========================
2322: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets -> ' || SQL%ROWCOUNT);
2323: -- ========================= FND LOG =============================
2324:
2325: else
2326: exit;
2327: end if;

Line 2333: -- =========================== FND LOG ===========================

2329: end loop;
2330:
2331: dbms_sql.close_cursor(cur_ussgl);
2332:
2333: -- =========================== FND LOG ===========================
2334: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
2335: -- ========================= FND LOG =============================
2336:
2337: -- Exit Function if Mode is Check

Line 2335: -- ========================= FND LOG =============================

2331: dbms_sql.close_cursor(cur_ussgl);
2332:
2333: -- =========================== FND LOG ===========================
2334: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
2335: -- ========================= FND LOG =============================
2336:
2337: -- Exit Function if Mode is Check
2338: if g_fcmode = 'C' then
2339: -- =========================== FND LOG ===========================

Line 2339: -- =========================== FND LOG ===========================

2335: -- ========================= FND LOG =============================
2336:
2337: -- Exit Function if Mode is Check
2338: if g_fcmode = 'C' then
2339: -- =========================== FND LOG ===========================
2340: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = C -> goto normal_exit label');
2341: -- ========================= FND LOG =============================
2342: goto normal_exit;
2343: end if;

Line 2341: -- ========================= FND LOG =============================

2337: -- Exit Function if Mode is Check
2338: if g_fcmode = 'C' then
2339: -- =========================== FND LOG ===========================
2340: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = C -> goto normal_exit label');
2341: -- ========================= FND LOG =============================
2342: goto normal_exit;
2343: end if;
2344:
2345: -- =========================== FND LOG ===========================

Line 2345: -- =========================== FND LOG ===========================

2341: -- ========================= FND LOG =============================
2342: goto normal_exit;
2343: end if;
2344:
2345: -- =========================== FND LOG ===========================
2346: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode != C -> RETURN TRUE');
2347: -- ========================= FND LOG =============================
2348:
2349: return(TRUE);

Line 2347: -- ========================= FND LOG =============================

2343: end if;
2344:
2345: -- =========================== FND LOG ===========================
2346: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode != C -> RETURN TRUE');
2347: -- ========================= FND LOG =============================
2348:
2349: return(TRUE);
2350:
2351: <>

Line 2353: -- =========================== FND LOG ===========================

2349: return(TRUE);
2350:
2351: <>
2352:
2353: -- =========================== FND LOG ===========================
2354: psa_utils.debug_other_string(g_state_level,l_full_path, ' reached normal_exit label ');
2355: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE ');
2356: -- ========================= FND LOG =============================
2357:

Line 2356: -- ========================= FND LOG =============================

2352:
2353: -- =========================== FND LOG ===========================
2354: psa_utils.debug_other_string(g_state_level,l_full_path, ' reached normal_exit label ');
2355: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE ');
2356: -- ========================= FND LOG =============================
2357:
2358: if ussgl%ISOPEN then
2359: close ussgl;
2360: end if;

Line 2366: -- =========================== FND LOG ===========================

2362: return(TRUE);
2363:
2364: <>
2365:
2366: -- =========================== FND LOG ===========================
2367: psa_utils.debug_other_string(g_state_level,l_full_path, ' reached return_invalid label ');
2368: -- ========================= FND LOG =============================
2369:
2370: if dbms_sql.is_open(cur_ussgl) then

Line 2368: -- ========================= FND LOG =============================

2364: <>
2365:
2366: -- =========================== FND LOG ===========================
2367: psa_utils.debug_other_string(g_state_level,l_full_path, ' reached return_invalid label ');
2368: -- ========================= FND LOG =============================
2369:
2370: if dbms_sql.is_open(cur_ussgl) then
2371: dbms_sql.close_cursor(cur_ussgl);
2372: end if;

Line 2378: -- =========================== FND LOG ===========================

2374: message_token('PROCEDURE', 'Funds Checker');
2375: message_token('EVENT', FND_MESSAGE.GET_ENCODED);
2376: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
2377:
2378: -- =========================== FND LOG ===========================
2379: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE ');
2380: -- ========================= FND LOG =============================
2381:
2382: g_debug := g_debug||' GLXFUG Failed : FND_FLEX_EXT.GET_COMBINATION_ID returned FALSE';

Line 2380: -- ========================= FND LOG =============================

2376: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
2377:
2378: -- =========================== FND LOG ===========================
2379: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE ');
2380: -- ========================= FND LOG =============================
2381:
2382: g_debug := g_debug||' GLXFUG Failed : FND_FLEX_EXT.GET_COMBINATION_ID returned FALSE';
2383:
2384: return(FALSE);

Line 2391: -- =========================== FND LOG ===========================

2387: EXCEPTION
2388:
2389: WHEN OTHERS THEN
2390:
2391: -- =========================== FND LOG ===========================
2392: psa_utils.debug_other_string(g_excep_level,l_full_path, ' WHEN OTHERS EXCEPTION ' || SQLERRM);
2393: -- ========================= FND LOG =============================
2394:
2395: if ussgl%ISOPEN then

Line 2393: -- ========================= FND LOG =============================

2389: WHEN OTHERS THEN
2390:
2391: -- =========================== FND LOG ===========================
2392: psa_utils.debug_other_string(g_excep_level,l_full_path, ' WHEN OTHERS EXCEPTION ' || SQLERRM);
2393: -- ========================= FND LOG =============================
2394:
2395: if ussgl%ISOPEN then
2396: close ussgl;
2397: end if;

Line 2411: -- =========================== FND LOG ===========================

2407: message_token('PROCEDURE', 'Funds Checker');
2408: message_token('EVENT', SQLERRM);
2409: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
2410:
2411: -- =========================== FND LOG ===========================
2412: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE ');
2413: -- ========================= FND LOG =============================
2414:
2415: g_debug := g_debug||' GLXFUG Failed : '||SQLERRM;

Line 2413: -- ========================= FND LOG =============================

2409: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
2410:
2411: -- =========================== FND LOG ===========================
2412: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE ');
2413: -- ========================= FND LOG =============================
2414:
2415: g_debug := g_debug||' GLXFUG Failed : '||SQLERRM;
2416: return(FALSE);
2417:

Line 2441: -- ========================= FND LOG ===========================

2437: and id_flex_num = flex_num
2438: and enabled_flag = 'Y'
2439: order by segment_num;
2440:
2441: -- ========================= FND LOG ===========================
2442: l_full_path VARCHAR2(100);
2443: -- ========================= FND LOG ===========================
2444: BEGIN
2445:

Line 2443: -- ========================= FND LOG ===========================

2439: order by segment_num;
2440:
2441: -- ========================= FND LOG ===========================
2442: l_full_path VARCHAR2(100);
2443: -- ========================= FND LOG ===========================
2444: BEGIN
2445:
2446: l_full_path := g_path || 'glxfkf';
2447:

Line 2448: -- =========================== FND LOG ===========================

2444: BEGIN
2445:
2446: l_full_path := g_path || 'glxfkf';
2447:
2448: -- =========================== FND LOG ===========================
2449: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFUF - START' );
2450: -- ========================= FND LOG =============================
2451:
2452: -- Retrieve Active Segment Info

Line 2450: -- ========================= FND LOG =============================

2446: l_full_path := g_path || 'glxfkf';
2447:
2448: -- =========================== FND LOG ===========================
2449: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFUF - START' );
2450: -- ========================= FND LOG =============================
2451:
2452: -- Retrieve Active Segment Info
2453: for c_seginfo in seginfo(101, 'GL#', g_coa_id) loop
2454: g_num_segs := g_num_segs + 1;

Line 2466: -- =========================== FND LOG ===========================

2462: 'GL_ACCOUNT',
2463: g_acct_seg_index) then
2464: message_token('ROUTINE', 'GL_FC_PKG');
2465: add_message('FND', 'FLEXGL-NO ACCT SEG');
2466: -- =========================== FND LOG ===========================
2467: psa_utils.debug_other_string(g_state_level,l_full_path, ' RAISE OTHERS ' );
2468: -- ========================= FND LOG =============================
2469: g_debug := g_debug||' GLXFKF Failed : FND_FLEX_APIS.GET_QUALIFIER_SEGNUM returned FALSE';
2470: raise others;

Line 2468: -- ========================= FND LOG =============================

2464: message_token('ROUTINE', 'GL_FC_PKG');
2465: add_message('FND', 'FLEXGL-NO ACCT SEG');
2466: -- =========================== FND LOG ===========================
2467: psa_utils.debug_other_string(g_state_level,l_full_path, ' RAISE OTHERS ' );
2468: -- ========================= FND LOG =============================
2469: g_debug := g_debug||' GLXFKF Failed : FND_FLEX_APIS.GET_QUALIFIER_SEGNUM returned FALSE';
2470: raise others;
2471: end if;
2472:

Line 2473: -- =========================== FND LOG ===========================

2469: g_debug := g_debug||' GLXFKF Failed : FND_FLEX_APIS.GET_QUALIFIER_SEGNUM returned FALSE';
2470: raise others;
2471: end if;
2472:
2473: -- =========================== FND LOG ===========================
2474: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_acct_seg_index -> ' || g_acct_seg_index );
2475: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE ');
2476: -- ========================= FND LOG =============================
2477:

Line 2476: -- ========================= FND LOG =============================

2472:
2473: -- =========================== FND LOG ===========================
2474: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_acct_seg_index -> ' || g_acct_seg_index );
2475: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE ');
2476: -- ========================= FND LOG =============================
2477:
2478: return(TRUE);
2479:
2480:

Line 2484: -- =========================== FND LOG ===========================

2480:
2481: EXCEPTION
2482:
2483: WHEN OTHERS THEN
2484: -- =========================== FND LOG ===========================
2485: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS' || SQLERRM );
2486: -- ========================= FND LOG =============================
2487:
2488: message_token('PROCEDURE', 'Funds Checker');

Line 2486: -- ========================= FND LOG =============================

2482:
2483: WHEN OTHERS THEN
2484: -- =========================== FND LOG ===========================
2485: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS' || SQLERRM );
2486: -- ========================= FND LOG =============================
2487:
2488: message_token('PROCEDURE', 'Funds Checker');
2489: message_token('EVENT', SQLERRM);
2490: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');

Line 2492: -- =========================== FND LOG ===========================

2488: message_token('PROCEDURE', 'Funds Checker');
2489: message_token('EVENT', SQLERRM);
2490: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
2491:
2492: -- =========================== FND LOG ===========================
2493: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE' );
2494: -- ========================= FND LOG =============================
2495:
2496: g_debug := g_debug||' GLXFKF Failed : '||SQLERRM;

Line 2494: -- ========================= FND LOG =============================

2490: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
2491:
2492: -- =========================== FND LOG ===========================
2493: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE' );
2494: -- ========================= FND LOG =============================
2495:
2496: g_debug := g_debug||' GLXFKF Failed : '||SQLERRM;
2497: return(FALSE);
2498:

Line 2539: -- ========================= FND LOG ===========================

2535: from dual;
2536:
2537: l_dummy VARCHAR2(80);
2538:
2539: -- ========================= FND LOG ===========================
2540: l_full_path VARCHAR2(100);
2541: -- ========================= FND LOG ===========================
2542: BEGIN
2543:

Line 2541: -- ========================= FND LOG ===========================

2537: l_dummy VARCHAR2(80);
2538:
2539: -- ========================= FND LOG ===========================
2540: l_full_path VARCHAR2(100);
2541: -- ========================= FND LOG ===========================
2542: BEGIN
2543:
2544: l_full_path := g_path || 'glxfiu.';
2545:

Line 2546: -- =========================== FND LOG ===========================

2542: BEGIN
2543:
2544: l_full_path := g_path || 'glxfiu.';
2545:
2546: -- =========================== FND LOG ===========================
2547: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFUI - START' );
2548: -- ========================= FND LOG =============================
2549:
2550: open pkt_id;

Line 2548: -- ========================= FND LOG =============================

2544: l_full_path := g_path || 'glxfiu.';
2545:
2546: -- =========================== FND LOG ===========================
2547: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFUI - START' );
2548: -- ========================= FND LOG =============================
2549:
2550: open pkt_id;
2551: fetch pkt_id into g_packet_id;
2552: close pkt_id;

Line 2554: -- =========================== FND LOG ===========================

2550: open pkt_id;
2551: fetch pkt_id into g_packet_id;
2552: close pkt_id;
2553:
2554: -- =========================== FND LOG ===========================
2555: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_packet_id -> ' || g_packet_id );
2556: -- ========================= FND LOG =============================
2557:
2558: -- Insert Unreservation Packet into gl_bc_packets

Line 2556: -- ========================= FND LOG =============================

2552: close pkt_id;
2553:
2554: -- =========================== FND LOG ===========================
2555: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_packet_id -> ' || g_packet_id );
2556: -- ========================= FND LOG =============================
2557:
2558: -- Insert Unreservation Packet into gl_bc_packets
2559: insert into gl_bc_packets
2560: (packet_id,

Line 2707: -- =========================== FND LOG ===========================

2703: and bp.packet_id = g_packet_id_ursvd
2704: and bp.template_id is null
2705: and bp.status_code = 'A';
2706:
2707: -- =========================== FND LOG ===========================
2708: psa_utils.debug_other_string(g_state_level,l_full_path, ' Insert gl_bc_packets -> ' || SQL%ROWCOUNT );
2709: -- ========================= FND LOG =============================
2710:
2711: BEGIN

Line 2709: -- ========================= FND LOG =============================

2705: and bp.status_code = 'A';
2706:
2707: -- =========================== FND LOG ===========================
2708: psa_utils.debug_other_string(g_state_level,l_full_path, ' Insert gl_bc_packets -> ' || SQL%ROWCOUNT );
2709: -- ========================= FND LOG =============================
2710:
2711: BEGIN
2712:
2713: SELECT

Line 2732: -- =========================== FND LOG ===========================

2728: );
2729:
2730: g_append_je_flag := TRUE;
2731:
2732: -- =========================== FND LOG ===========================
2733: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_dummy -> ' || l_dummy );
2734: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_append_je_flag -> TRUE');
2735: -- ========================= FND LOG =============================
2736:

Line 2735: -- ========================= FND LOG =============================

2731:
2732: -- =========================== FND LOG ===========================
2733: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_dummy -> ' || l_dummy );
2734: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_append_je_flag -> TRUE');
2735: -- ========================= FND LOG =============================
2736:
2737: EXCEPTION
2738: WHEN OTHERS THEN
2739:

Line 2740: -- =========================== FND LOG ===========================

2736:
2737: EXCEPTION
2738: WHEN OTHERS THEN
2739:
2740: -- =========================== FND LOG ===========================
2741: psa_utils.debug_other_string(g_excep_level,l_full_path, ' g_append_je_flag -> FALSE');
2742: -- ========================= FND LOG =============================
2743:
2744: g_append_je_flag := FALSE;

Line 2742: -- ========================= FND LOG =============================

2738: WHEN OTHERS THEN
2739:
2740: -- =========================== FND LOG ===========================
2741: psa_utils.debug_other_string(g_excep_level,l_full_path, ' g_append_je_flag -> FALSE');
2742: -- ========================= FND LOG =============================
2743:
2744: g_append_je_flag := FALSE;
2745: END;
2746:

Line 2747: -- =========================== FND LOG ===========================

2743:
2744: g_append_je_flag := FALSE;
2745: END;
2746:
2747: -- =========================== FND LOG ===========================
2748: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE ' );
2749: -- ========================= FND LOG =============================
2750:
2751: return(TRUE);

Line 2749: -- ========================= FND LOG =============================

2745: END;
2746:
2747: -- =========================== FND LOG ===========================
2748: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE ' );
2749: -- ========================= FND LOG =============================
2750:
2751: return(TRUE);
2752:
2753: EXCEPTION

Line 2756: -- =========================== FND LOG ===========================

2752:
2753: EXCEPTION
2754:
2755: WHEN OTHERS THEN
2756: -- =========================== FND LOG ===========================
2757: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS - ' || SQLERRM );
2758: -- ========================= FND LOG =============================
2759:
2760: if pkt_id%ISOPEN then

Line 2758: -- ========================= FND LOG =============================

2754:
2755: WHEN OTHERS THEN
2756: -- =========================== FND LOG ===========================
2757: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS - ' || SQLERRM );
2758: -- ========================= FND LOG =============================
2759:
2760: if pkt_id%ISOPEN then
2761: close pkt_id;
2762: end if;

Line 2768: -- =========================== FND LOG ===========================

2764: message_token('PROCEDURE', 'Funds Checker');
2765: message_token('EVENT', SQLERRM);
2766: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
2767:
2768: -- =========================== FND LOG ===========================
2769: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE');
2770: -- ========================= FND LOG =============================
2771:
2772: g_debug := g_debug||'GLXFIU Failed : '||SQLERRM;

Line 2770: -- ========================= FND LOG =============================

2766: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
2767:
2768: -- =========================== FND LOG ===========================
2769: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE');
2770: -- ========================= FND LOG =============================
2771:
2772: g_debug := g_debug||'GLXFIU Failed : '||SQLERRM;
2773:
2774: return(FALSE);

Line 2811: -- ========================= FND LOG ===========================

2807: OVERLAPPING_BUDGET EXCEPTION;
2808: PRAGMA EXCEPTION_INIT(OVERLAPPING_BUDGET,-1427);
2809:
2810:
2811: -- ========================= FND LOG ===========================
2812: l_full_path VARCHAR2(100);
2813: -- ========================= FND LOG ===========================
2814: BEGIN
2815:

Line 2813: -- ========================= FND LOG ===========================

2809:
2810:
2811: -- ========================= FND LOG ===========================
2812: l_full_path VARCHAR2(100);
2813: -- ========================= FND LOG ===========================
2814: BEGIN
2815:
2816: l_full_path := g_path || 'glxfss.';
2817:

Line 2818: -- =========================== FND LOG ===========================

2814: BEGIN
2815:
2816: l_full_path := g_path || 'glxfss.';
2817:
2818: -- =========================== FND LOG ===========================
2819: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFSS - START' );
2820: -- ========================= FND LOG =============================
2821:
2822: -- Denormalized Columns are not updated if mode is Unreservation since

Line 2820: -- ========================= FND LOG =============================

2816: l_full_path := g_path || 'glxfss.';
2817:
2818: -- =========================== FND LOG ===========================
2819: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFSS - START' );
2820: -- ========================= FND LOG =============================
2821:
2822: -- Denormalized Columns are not updated if mode is Unreservation since
2823: -- this is handled in glxfiu()
2824:

Line 2825: -- ========================= FND LOG =============================

2821:
2822: -- Denormalized Columns are not updated if mode is Unreservation since
2823: -- this is handled in glxfiu()
2824:
2825: -- ========================= FND LOG =============================
2826: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
2827: -- ========================= FND LOG =============================
2828:
2829: if g_fcmode <> 'U' then

Line 2827: -- ========================= FND LOG =============================

2823: -- this is handled in glxfiu()
2824:
2825: -- ========================= FND LOG =============================
2826: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
2827: -- ========================= FND LOG =============================
2828:
2829: if g_fcmode <> 'U' then
2830:
2831: -- Update denormalized columns for all detail transactions in the packet

Line 2897: -- =========================== FND LOG ===========================

2893:
2894: EXCEPTION
2895: WHEN OVERLAPPING_BUDGET THEN
2896:
2897: -- =========================== FND LOG ===========================
2898: psa_utils.debug_other_string(g_state_level,l_full_path, ' There are multiple overlapping budgets assigned to account');
2899: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets 1 updated failed');
2900: psa_utils.debug_other_string(g_state_level,l_full_path, ' Updating the status code = F/R based on g_fcmode');
2901: psa_utils.debug_other_string(g_state_level,l_full_path, ' Updating the result code= F77/F80 based on overlapping budget');

Line 2902: -- ========================= FND LOG =============================

2898: psa_utils.debug_other_string(g_state_level,l_full_path, ' There are multiple overlapping budgets assigned to account');
2899: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets 1 updated failed');
2900: psa_utils.debug_other_string(g_state_level,l_full_path, ' Updating the status code = F/R based on g_fcmode');
2901: psa_utils.debug_other_string(g_state_level,l_full_path, ' Updating the result code= F77/F80 based on overlapping budget');
2902: -- ========================= FND LOG =============================
2903:
2904: update gl_bc_packets bp
2905: set STATUS_CODE = DECODE(g_fcmode,'C','F','R'),
2906: RESULT_CODE=

Line 2922: -- =========================== FND LOG ===========================

2918: )
2919: where
2920: bp.packet_id = g_packet_id;
2921:
2922: -- =========================== FND LOG ===========================
2923: psa_utils.debug_other_string(g_state_level,l_full_path, ' Set g_overlapping_budget = TRUE, Return -> TRUE');
2924: -- ========================= FND LOG =============================
2925: g_overlapping_budget:=TRUE;
2926: return(TRUE);

Line 2924: -- ========================= FND LOG =============================

2920: bp.packet_id = g_packet_id;
2921:
2922: -- =========================== FND LOG ===========================
2923: psa_utils.debug_other_string(g_state_level,l_full_path, ' Set g_overlapping_budget = TRUE, Return -> TRUE');
2924: -- ========================= FND LOG =============================
2925: g_overlapping_budget:=TRUE;
2926: return(TRUE);
2927: end;
2928:

Line 2930: -- =========================== FND LOG ===========================

2926: return(TRUE);
2927: end;
2928:
2929:
2930: -- =========================== FND LOG ===========================
2931: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets 1 updated -> ' || SQL%ROWCOUNT || ' rows');
2932: -- ========================= FND LOG =============================
2933:
2934: update gl_bc_packets bp

Line 2932: -- ========================= FND LOG =============================

2928:
2929:
2930: -- =========================== FND LOG ===========================
2931: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets 1 updated -> ' || SQL%ROWCOUNT || ' rows');
2932: -- ========================= FND LOG =============================
2933:
2934: update gl_bc_packets bp
2935: set (bp.automatic_encumbrance_flag,
2936: bp.funds_check_level_code,

Line 3026: -- =========================== FND LOG ===========================

3022: )
3023: where bp.packet_id = g_packet_id
3024: and bp.template_id is null;
3025:
3026: -- =========================== FND LOG ===========================
3027: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets 2 updated -> ' || SQL%ROWCOUNT || ' rows');
3028: -- ========================= FND LOG =============================
3029:
3030: update gl_bc_packets bp

Line 3028: -- ========================= FND LOG =============================

3024: and bp.template_id is null;
3025:
3026: -- =========================== FND LOG ===========================
3027: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets 2 updated -> ' || SQL%ROWCOUNT || ' rows');
3028: -- ========================= FND LOG =============================
3029:
3030: update gl_bc_packets bp
3031: set (funds_check_level_code,
3032: amount_type,

Line 3058: -- =========================== FND LOG ===========================

3054: where bp.packet_id = g_packet_id
3055: and bp.funding_budget_version_id is not null;
3056:
3057:
3058: -- =========================== FND LOG ===========================
3059: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets 3 updated -> ' || SQL%ROWCOUNT || ' rows');
3060: -- ========================= FND LOG =============================
3061:
3062:

Line 3060: -- ========================= FND LOG =============================

3056:
3057:
3058: -- =========================== FND LOG ===========================
3059: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets 3 updated -> ' || SQL%ROWCOUNT || ' rows');
3060: -- ========================= FND LOG =============================
3061:
3062:
3063: /*----------------------------------------------------------------------+
3064: | Bug 5242198 : When an account is assigned with different funds check |

Line 3104: -- =========================== FND LOG ===========================

3100: -- a fatal error
3101:
3102:
3103: if g_conc_flag then
3104: -- =========================== FND LOG ===========================
3105: psa_utils.debug_other_string(g_state_level,l_full_path,
3106: ' Lock gl_bc_dual2 in row share mode' );
3107: -- ========================= FND LOG =============================
3108: LOCK TABLE gl_bc_dual2 IN ROW SHARE MODE;

Line 3107: -- ========================= FND LOG =============================

3103: if g_conc_flag then
3104: -- =========================== FND LOG ===========================
3105: psa_utils.debug_other_string(g_state_level,l_full_path,
3106: ' Lock gl_bc_dual2 in row share mode' );
3107: -- ========================= FND LOG =============================
3108: LOCK TABLE gl_bc_dual2 IN ROW SHARE MODE;
3109: else
3110: -- =========================== FND LOG ===========================
3111: psa_utils.debug_other_string(g_state_level,l_full_path,

Line 3110: -- =========================== FND LOG ===========================

3106: ' Lock gl_bc_dual2 in row share mode' );
3107: -- ========================= FND LOG =============================
3108: LOCK TABLE gl_bc_dual2 IN ROW SHARE MODE;
3109: else
3110: -- =========================== FND LOG ===========================
3111: psa_utils.debug_other_string(g_state_level,l_full_path,
3112: ' Lock gl_bc_dual2 in row share mode nowait' );
3113: -- ========================= FND LOG =============================
3114: LOCK TABLE gl_bc_dual2 IN ROW SHARE MODE NOWAIT;

Line 3113: -- ========================= FND LOG =============================

3109: else
3110: -- =========================== FND LOG ===========================
3111: psa_utils.debug_other_string(g_state_level,l_full_path,
3112: ' Lock gl_bc_dual2 in row share mode nowait' );
3113: -- ========================= FND LOG =============================
3114: LOCK TABLE gl_bc_dual2 IN ROW SHARE MODE NOWAIT;
3115: end if;
3116:
3117:

Line 3280: -- =========================== FND LOG ===========================

3276:
3277: -- Set Summarized Flag if Summary Transactions were inserted into the queue
3278:
3279: if SQL%FOUND then
3280: -- =========================== FND LOG ===========================
3281: psa_utils.debug_other_string(g_state_level,l_full_path,
3282: ' Insert gl_bc_packets - summ trans ' || SQL%ROWCOUNT );
3283:
3284: psa_utils.debug_other_string(g_state_level,l_full_path,

Line 3286: -- ========================= FND LOG =============================

3282: ' Insert gl_bc_packets - summ trans ' || SQL%ROWCOUNT );
3283:
3284: psa_utils.debug_other_string(g_state_level,l_full_path,
3285: ' g_summarized_flag -> TRUE' );
3286: -- ========================= FND LOG =============================
3287: g_summarized_flag := TRUE;
3288: end if;
3289:
3290:

Line 3302: -- =========================== FND LOG ===========================

3298: -- if Funds Checker is invoked from an Online Process, it exits with
3299: -- an error
3300:
3301: if g_conc_flag then
3302: -- =========================== FND LOG ===========================
3303: psa_utils.debug_other_string(g_state_level,l_full_path,
3304: ' g_conc_flag -> TRUE' );
3305: -- ========================= FND LOG =============================
3306:

Line 3305: -- ========================= FND LOG =============================

3301: if g_conc_flag then
3302: -- =========================== FND LOG ===========================
3303: psa_utils.debug_other_string(g_state_level,l_full_path,
3304: ' g_conc_flag -> TRUE' );
3305: -- ========================= FND LOG =============================
3306:
3307: open lock_gl_conc_ctrl;
3308: fetch lock_gl_conc_ctrl into l_dummy;
3309: close lock_gl_conc_ctrl;

Line 3320: -- =========================== FND LOG ===========================

3316: open arrseq;
3317: fetch arrseq into g_arrival_seq;
3318: close arrseq;
3319:
3320: -- =========================== FND LOG ===========================
3321: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_arrival_seq -> ' || g_arrival_seq);
3322: -- ========================= FND LOG =============================
3323:
3324: insert into gl_bc_packet_arrival_order

Line 3322: -- ========================= FND LOG =============================

3318: close arrseq;
3319:
3320: -- =========================== FND LOG ===========================
3321: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_arrival_seq -> ' || g_arrival_seq);
3322: -- ========================= FND LOG =============================
3323:
3324: insert into gl_bc_packet_arrival_order
3325: (packet_id,
3326: ledger_id,

Line 3339: -- =========================== FND LOG ===========================

3335: sysdate,
3336: g_user_id);
3337:
3338:
3339: -- =========================== FND LOG ===========================
3340: psa_utils.debug_other_string(g_state_level,l_full_path,
3341: ' insert gl_bc_packet_arrival_order -> ' || SQL%ROWCOUNT);
3342: -- ========================= FND LOG =============================
3343:

Line 3342: -- ========================= FND LOG =============================

3338:
3339: -- =========================== FND LOG ===========================
3340: psa_utils.debug_other_string(g_state_level,l_full_path,
3341: ' insert gl_bc_packet_arrival_order -> ' || SQL%ROWCOUNT);
3342: -- ========================= FND LOG =============================
3343:
3344: -- Commit to release Lock on gl_concurrency_control
3345: commit;
3346:

Line 3353: -- =========================== FND LOG ===========================

3349: -- need to reestablish the lock to maintain data consistency between the
3350: -- Funds Checker Summarization and the Add/Delete Summary Accounts
3351: -- process
3352:
3353: -- =========================== FND LOG ===========================
3354: psa_utils.debug_other_string(g_state_level,l_full_path,
3355: ' lock table gl_bc_dual2 in row share mode nowait');
3356: -- ========================= FND LOG =============================
3357:

Line 3356: -- ========================= FND LOG =============================

3352:
3353: -- =========================== FND LOG ===========================
3354: psa_utils.debug_other_string(g_state_level,l_full_path,
3355: ' lock table gl_bc_dual2 in row share mode nowait');
3356: -- ========================= FND LOG =============================
3357:
3358: LOCK TABLE gl_bc_dual2 IN ROW SHARE MODE NOWAIT;
3359:
3360: -- =========================== FND LOG ===========================

Line 3360: -- =========================== FND LOG ===========================

3356: -- ========================= FND LOG =============================
3357:
3358: LOCK TABLE gl_bc_dual2 IN ROW SHARE MODE NOWAIT;
3359:
3360: -- =========================== FND LOG ===========================
3361: psa_utils.debug_other_string(g_state_level,l_full_path,
3362: ' RETURN -> TRUE ');
3363: -- ========================= FND LOG =============================
3364:

Line 3363: -- ========================= FND LOG =============================

3359:
3360: -- =========================== FND LOG ===========================
3361: psa_utils.debug_other_string(g_state_level,l_full_path,
3362: ' RETURN -> TRUE ');
3363: -- ========================= FND LOG =============================
3364:
3365: return(TRUE);
3366:
3367: EXCEPTION

Line 3371: -- =========================== FND LOG ===========================

3367: EXCEPTION
3368:
3369: WHEN OTHERS THEN
3370:
3371: -- =========================== FND LOG ===========================
3372: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
3373: -- ========================= FND LOG =============================
3374:
3375: if arrseq%ISOPEN then

Line 3373: -- ========================= FND LOG =============================

3369: WHEN OTHERS THEN
3370:
3371: -- =========================== FND LOG ===========================
3372: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
3373: -- ========================= FND LOG =============================
3374:
3375: if arrseq%ISOPEN then
3376: close arrseq;
3377: end if;

Line 3389: -- =========================== FND LOG ===========================

3385: message_token('EVENT', SQLERRM);
3386: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
3387: end if;
3388:
3389: -- =========================== FND LOG ===========================
3390: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE');
3391: -- ========================= FND LOG =============================
3392: g_debug := g_debug||'GLXFSS Failed : '||SQLERRM;
3393:

Line 3391: -- ========================= FND LOG =============================

3387: end if;
3388:
3389: -- =========================== FND LOG ===========================
3390: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE');
3391: -- ========================= FND LOG =============================
3392: g_debug := g_debug||'GLXFSS Failed : '||SQLERRM;
3393:
3394: return(FALSE);
3395:

Line 3421: -- ========================= FND LOG ===========================

3417: l_period_name gl_period_statuses.period_name%TYPE;
3418: l_quarter_num gl_period_statuses.quarter_num%TYPE;
3419: l_period_year gl_period_statuses.period_year%TYPE;
3420:
3421: -- ========================= FND LOG ===========================
3422: l_full_path VARCHAR2(100);
3423: -- ========================= FND LOG ===========================
3424: BEGIN
3425:

Line 3423: -- ========================= FND LOG ===========================

3419: l_period_year gl_period_statuses.period_year%TYPE;
3420:
3421: -- ========================= FND LOG ===========================
3422: l_full_path VARCHAR2(100);
3423: -- ========================= FND LOG ===========================
3424: BEGIN
3425:
3426: l_full_path := g_path || 'glxfgb';
3427:

Line 3428: -- =========================== FND LOG ===========================

3424: BEGIN
3425:
3426: l_full_path := g_path || 'glxfgb';
3427:
3428: -- =========================== FND LOG ===========================
3429: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFGB - START' );
3430: -- ========================= FND LOG =============================
3431:
3432:

Line 3430: -- ========================= FND LOG =============================

3426: l_full_path := g_path || 'glxfgb';
3427:
3428: -- =========================== FND LOG ===========================
3429: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFGB - START' );
3430: -- ========================= FND LOG =============================
3431:
3432:
3433: -- Bug 3574935 .. Start
3434: -- Obtain the maximum packet_id less than the current arrival sequence from

Line 3455: -- =========================== FND LOG ===========================

3451: -- Bug 4651919 .. End
3452:
3453: -- Bug 3574935 .. End
3454:
3455: -- =========================== FND LOG ===========================
3456: -- psa_utils.debug_other_string(g_state_level,l_full_path, ' l_max_packet_id -> '|| l_max_packet_id );
3457: -- ========================= FND LOG =============================
3458:
3459: -- Lock dummy table gl_bc_dual in Row Share Mode to ensure Read Consistency

Line 3457: -- ========================= FND LOG =============================

3453: -- Bug 3574935 .. End
3454:
3455: -- =========================== FND LOG ===========================
3456: -- psa_utils.debug_other_string(g_state_level,l_full_path, ' l_max_packet_id -> '|| l_max_packet_id );
3457: -- ========================= FND LOG =============================
3458:
3459: -- Lock dummy table gl_bc_dual in Row Share Mode to ensure Read Consistency
3460: -- between gl_bc_packets and gl_balances in the next two balance update
3461: -- SQLs. This scheme requires posting to lock gl_bc_dual in exclusive mode

Line 3477: -- =========================== FND LOG ===========================

3473: -- if Funds Checker is invoked from an Online Process, it exits with
3474: -- a fatal error
3475:
3476: if g_conc_flag then
3477: -- =========================== FND LOG ===========================
3478: psa_utils.debug_other_string(g_state_level,l_full_path,
3479: ' Lock table gl_bc_dual in row share mode' );
3480: -- ========================= FND LOG =============================
3481: LOCK TABLE gl_bc_dual IN ROW SHARE MODE;

Line 3480: -- ========================= FND LOG =============================

3476: if g_conc_flag then
3477: -- =========================== FND LOG ===========================
3478: psa_utils.debug_other_string(g_state_level,l_full_path,
3479: ' Lock table gl_bc_dual in row share mode' );
3480: -- ========================= FND LOG =============================
3481: LOCK TABLE gl_bc_dual IN ROW SHARE MODE;
3482: else
3483: -- =========================== FND LOG ===========================
3484: psa_utils.debug_other_string(g_state_level,l_full_path,

Line 3483: -- =========================== FND LOG ===========================

3479: ' Lock table gl_bc_dual in row share mode' );
3480: -- ========================= FND LOG =============================
3481: LOCK TABLE gl_bc_dual IN ROW SHARE MODE;
3482: else
3483: -- =========================== FND LOG ===========================
3484: psa_utils.debug_other_string(g_state_level,l_full_path,
3485: ' Lock table gl_bc_dual in row share mode NOWAIT' );
3486: -- ========================= FND LOG =============================
3487: LOCK TABLE gl_bc_dual IN ROW SHARE MODE NOWAIT;

Line 3486: -- ========================= FND LOG =============================

3482: else
3483: -- =========================== FND LOG ===========================
3484: psa_utils.debug_other_string(g_state_level,l_full_path,
3485: ' Lock table gl_bc_dual in row share mode NOWAIT' );
3486: -- ========================= FND LOG =============================
3487: LOCK TABLE gl_bc_dual IN ROW SHARE MODE NOWAIT;
3488: end if;
3489:
3490:

Line 3683: -- =========================== FND LOG ===========================

3679: WHERE currency_code = BP.currency_code
3680: AND currency_flag = 'Y');
3681:
3682:
3683: -- =========================== FND LOG ===========================
3684: psa_utils.debug_other_string(g_state_level,l_full_path,
3685: ' Update approved and pending balance in gl_bc_packets ' || SQL%ROWCOUNT );
3686: -- ========================= FND LOG =============================
3687:

Line 3686: -- ========================= FND LOG =============================

3682:
3683: -- =========================== FND LOG ===========================
3684: psa_utils.debug_other_string(g_state_level,l_full_path,
3685: ' Update approved and pending balance in gl_bc_packets ' || SQL%ROWCOUNT );
3686: -- ========================= FND LOG =============================
3687:
3688:
3689: -- Update Posted Balances in gl_bc_packets
3690: --

Line 3743: -- =========================== FND LOG ===========================

3739: l_period_name := NULL;
3740: l_quarter_num := 0;
3741: l_period_year := 0;
3742: END;
3743: -- =========================== FND LOG ===========================
3744: psa_utils.debug_other_string(g_state_level,l_full_path,
3745: ' Picking up the lates OPEN period ' || SQL%ROWCOUNT );
3746: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_effective_period_num -> ' || l_effective_period_num);
3747: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_period_name -> ' || l_period_name);

Line 3750: -- ========================= FND LOG =============================

3746: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_effective_period_num -> ' || l_effective_period_num);
3747: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_period_name -> ' || l_period_name);
3748: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_quarter_num -> ' || l_quarter_num);
3749: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_period_year -> ' || l_period_year);
3750: -- ========================= FND LOG =============================
3751:
3752: -- Bugfix 2231059
3753:
3754: update

Line 3885: -- =========================== FND LOG ===========================

3881: bp.budget_version_id,
3882: bp.funding_budget_version_id);
3883:
3884:
3885: -- =========================== FND LOG ===========================
3886: psa_utils.debug_other_string(g_state_level,l_full_path,
3887: ' Update posted balance in gl_bc_packets ' || SQL%ROWCOUNT );
3888: -- ========================= FND LOG =============================
3889:

Line 3888: -- ========================= FND LOG =============================

3884:
3885: -- =========================== FND LOG ===========================
3886: psa_utils.debug_other_string(g_state_level,l_full_path,
3887: ' Update posted balance in gl_bc_packets ' || SQL%ROWCOUNT );
3888: -- ========================= FND LOG =============================
3889:
3890: -- Commit to release Lock on gl_bc_dual
3891: commit;
3892:

Line 3898: -- =========================== FND LOG ===========================

3894: -- Reestablish the Row Share Lock on gl_bc_dual2 to maintain data
3895: -- consistency between the Funds Checker Summarization and the Add/Delete
3896: -- Summary Accounts program
3897:
3898: -- =========================== FND LOG ===========================
3899: psa_utils.debug_other_string(g_state_level,l_full_path,
3900: ' Lock table gl_bc_dual2 in row share mode nowait' );
3901: -- ========================= FND LOG =============================
3902: LOCK TABLE gl_bc_dual2 IN ROW SHARE MODE NOWAIT;

Line 3901: -- ========================= FND LOG =============================

3897:
3898: -- =========================== FND LOG ===========================
3899: psa_utils.debug_other_string(g_state_level,l_full_path,
3900: ' Lock table gl_bc_dual2 in row share mode nowait' );
3901: -- ========================= FND LOG =============================
3902: LOCK TABLE gl_bc_dual2 IN ROW SHARE MODE NOWAIT;
3903:
3904: -- =========================== FND LOG ===========================
3905: psa_utils.debug_other_string(g_state_level,l_full_path,' RETURN -> TRUE ' );

Line 3904: -- =========================== FND LOG ===========================

3900: ' Lock table gl_bc_dual2 in row share mode nowait' );
3901: -- ========================= FND LOG =============================
3902: LOCK TABLE gl_bc_dual2 IN ROW SHARE MODE NOWAIT;
3903:
3904: -- =========================== FND LOG ===========================
3905: psa_utils.debug_other_string(g_state_level,l_full_path,' RETURN -> TRUE ' );
3906: -- ========================= FND LOG =============================
3907: return(TRUE);
3908:

Line 3906: -- ========================= FND LOG =============================

3902: LOCK TABLE gl_bc_dual2 IN ROW SHARE MODE NOWAIT;
3903:
3904: -- =========================== FND LOG ===========================
3905: psa_utils.debug_other_string(g_state_level,l_full_path,' RETURN -> TRUE ' );
3906: -- ========================= FND LOG =============================
3907: return(TRUE);
3908:
3909:
3910: EXCEPTION

Line 3914: -- =========================== FND LOG ===========================

3910: EXCEPTION
3911:
3912: WHEN OTHERS THEN
3913:
3914: -- =========================== FND LOG ===========================
3915: psa_utils.debug_other_string(g_excep_level,l_full_path,' EXCEPTION WHEN OTHERS '|| SQLERRM );
3916: -- ========================= FND LOG =============================
3917:
3918: if SQLCODE = -54 then

Line 3916: -- ========================= FND LOG =============================

3912: WHEN OTHERS THEN
3913:
3914: -- =========================== FND LOG ===========================
3915: psa_utils.debug_other_string(g_excep_level,l_full_path,' EXCEPTION WHEN OTHERS '|| SQLERRM );
3916: -- ========================= FND LOG =============================
3917:
3918: if SQLCODE = -54 then
3919: message_token('PROCEDURE', 'Funds Checker');
3920: message_token('EVENT', 'Table Locked by another Process');

Line 3928: -- =========================== FND LOG ===========================

3924: message_token('EVENT', SQLERRM);
3925: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
3926: end if;
3927:
3928: -- =========================== FND LOG ===========================
3929: psa_utils.debug_other_string(g_excep_level,l_full_path,' RETURN -> FALSE ' );
3930: -- ========================= FND LOG =============================
3931: g_debug := g_debug||' GLXFGB Failed : '||SQLERRM;
3932:

Line 3930: -- ========================= FND LOG =============================

3926: end if;
3927:
3928: -- =========================== FND LOG ===========================
3929: psa_utils.debug_other_string(g_excep_level,l_full_path,' RETURN -> FALSE ' );
3930: -- ========================= FND LOG =============================
3931: g_debug := g_debug||' GLXFGB Failed : '||SQLERRM;
3932:
3933: return(FALSE);
3934:

Line 4066: -- ========================= FND LOG ===========================

4062: l_source_dist_id_num_1_tbl source_dist_id_num_1_tbl_type;
4063:
4064: -- Bug 5571064 .. End
4065:
4066: -- ========================= FND LOG ===========================
4067: l_full_path VARCHAR2(100);
4068: -- ========================= FND LOG ===========================
4069:
4070: BEGIN

Line 4068: -- ========================= FND LOG ===========================

4064: -- Bug 5571064 .. End
4065:
4066: -- ========================= FND LOG ===========================
4067: l_full_path VARCHAR2(100);
4068: -- ========================= FND LOG ===========================
4069:
4070: BEGIN
4071:
4072: l_full_path := g_path || 'glxfrc';

Line 4074: -- =========================== FND LOG ===========================

4070: BEGIN
4071:
4072: l_full_path := g_path || 'glxfrc';
4073:
4074: -- =========================== FND LOG ===========================
4075: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFRC - START' );
4076: -- ========================= FND LOG =============================
4077:
4078: -- Update Result Code for all transactions in Packet

Line 4076: -- ========================= FND LOG =============================

4072: l_full_path := g_path || 'glxfrc';
4073:
4074: -- =========================== FND LOG ===========================
4075: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFRC - START' );
4076: -- ========================= FND LOG =============================
4077:
4078: -- Update Result Code for all transactions in Packet
4079: update gl_bc_packets bp
4080: set bp.result_code =

Line 4188: -- =========================== FND LOG ===========================

4184: or g_fcmode = 'F' );
4185:
4186:
4187:
4188: -- =========================== FND LOG ===========================
4189: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update Result Code gl_bc_packets 1 updated -> ' || SQL%ROWCOUNT || ' rows');
4190: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
4191: -- ========================= FND LOG =============================
4192:

Line 4191: -- ========================= FND LOG =============================

4187:
4188: -- =========================== FND LOG ===========================
4189: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update Result Code gl_bc_packets 1 updated -> ' || SQL%ROWCOUNT || ' rows');
4190: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
4191: -- ========================= FND LOG =============================
4192:
4193: /* -------------------------------------------------------------------+
4194: | Updating result code to F78 id funds check is failed and absolute|
4195: | Funds checking is done when there were no Budget Assignment |

Line 4213: -- =========================== FND LOG ===========================

4209: -- If Mode is Force Pass, there is no need for detail/summary and
4210: -- originating/generated tie back logic
4211:
4212: if g_fcmode = 'F' then
4213: -- =========================== FND LOG ===========================
4214: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = F -> goto normal_exit');
4215: -- ========================= FND LOG =============================
4216: goto normal_exit;
4217: end if;

Line 4215: -- ========================= FND LOG =============================

4211:
4212: if g_fcmode = 'F' then
4213: -- =========================== FND LOG ===========================
4214: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode = F -> goto normal_exit');
4215: -- ========================= FND LOG =============================
4216: goto normal_exit;
4217: end if;
4218:
4219:

Line 4222: -- =========================== FND LOG ===========================

4218:
4219:
4220: if g_summarized_flag then
4221:
4222: -- =========================== FND LOG ===========================
4223: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_summarized_flag -> TRUE ');
4224: -- ========================= FND LOG =============================
4225:
4226: -- Update Result Code for Detail Transactions when Summary Transactions

Line 4224: -- ========================= FND LOG =============================

4220: if g_summarized_flag then
4221:
4222: -- =========================== FND LOG ===========================
4223: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_summarized_flag -> TRUE ');
4224: -- ========================= FND LOG =============================
4225:
4226: -- Update Result Code for Detail Transactions when Summary Transactions
4227: -- fail Funds Check and Checking is Absolute
4228:

Line 4259: -- =========================== FND LOG ===========================

4255: and pk.funds_check_level_code = 'B'
4256: and pk.result_code in ('F02', 'F12')
4257: );
4258:
4259: -- =========================== FND LOG ===========================
4260: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets 2 updated -> ' || SQL%ROWCOUNT || ' rows');
4261: -- ========================= FND LOG =============================
4262:
4263: -- Update Result Code for Detail Transactions when Summary Transactions

Line 4261: -- ========================= FND LOG =============================

4257: );
4258:
4259: -- =========================== FND LOG ===========================
4260: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets 2 updated -> ' || SQL%ROWCOUNT || ' rows');
4261: -- ========================= FND LOG =============================
4262:
4263: -- Update Result Code for Detail Transactions when Summary Transactions
4264: -- fail Funds Check and Checking is Advisory
4265:

Line 4294: -- =========================== FND LOG ===========================

4290: and pk.funds_check_level_code = 'D'
4291: and pk.result_code in ('P20', 'P25')
4292: );
4293:
4294: -- =========================== FND LOG ===========================
4295: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets 3 updated -> ' || SQL%ROWCOUNT || ' rows');
4296: -- ========================= FND LOG =============================
4297:
4298: end if;

Line 4296: -- ========================= FND LOG =============================

4292: );
4293:
4294: -- =========================== FND LOG ===========================
4295: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets 3 updated -> ' || SQL%ROWCOUNT || ' rows');
4296: -- ========================= FND LOG =============================
4297:
4298: end if;
4299:
4300:

Line 4307: -- =========================== FND LOG ===========================

4303: -- vice versa
4304:
4305: if g_ussgl_option_flag then
4306:
4307: -- =========================== FND LOG ===========================
4308: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_ussgl_option_flag -> TRUE');
4309: -- ========================= FND LOG =============================
4310:
4311: update gl_bc_packets bp

Line 4309: -- ========================= FND LOG =============================

4305: if g_ussgl_option_flag then
4306:
4307: -- =========================== FND LOG ===========================
4308: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_ussgl_option_flag -> TRUE');
4309: -- ========================= FND LOG =============================
4310:
4311: update gl_bc_packets bp
4312: set bp.result_code =
4313: decode(bp.ussgl_transaction_code, null,

Line 4333: -- =========================== FND LOG ===========================

4329: and (pk.ussgl_parent_id = bp.ussgl_link_to_parent_id
4330: or pk.ussgl_link_to_parent_id in (bp.ussgl_link_to_parent_id, bp.ussgl_parent_id))
4331: );
4332:
4333: -- =========================== FND LOG ===========================
4334: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets 4 updated -> ' || SQL%ROWCOUNT || ' rows');
4335: -- ========================= FND LOG =============================
4336:
4337: end if;

Line 4335: -- ========================= FND LOG =============================

4331: );
4332:
4333: -- =========================== FND LOG ===========================
4334: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets 4 updated -> ' || SQL%ROWCOUNT || ' rows');
4335: -- ========================= FND LOG =============================
4336:
4337: end if;
4338:
4339: -- New logic added here for sub-ledger teams to populate full set of

Line 4349: -- =========================== FND LOG ===========================

4345:
4346: IF g_override_flag THEN
4347:
4348: if not glxfor then
4349: -- =========================== FND LOG ===========================
4350: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfor --> RETURN FALSE -> goto fatal_error');
4351: -- ========================= FND LOG =============================
4352: return false;
4353: end if;

Line 4351: -- ========================= FND LOG =============================

4347:
4348: if not glxfor then
4349: -- =========================== FND LOG ===========================
4350: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfor --> RETURN FALSE -> goto fatal_error');
4351: -- ========================= FND LOG =============================
4352: return false;
4353: end if;
4354: END IF;
4355:

Line 4364: -- ========================= FND LOG ===========================

4360: if ((g_fcmode in ('R', 'U', 'A')) and
4361: (g_summarized_flag) and
4362: (l_ret_code in ('S', 'A'))) then
4363:
4364: -- ========================= FND LOG ===========================
4365: psa_utils.debug_other_string(g_state_level,l_full_path, ' inside Ist IF ');
4366: -- ========================= FND LOG ===========================
4367:
4368: update gl_bc_packets bp

Line 4366: -- ========================= FND LOG ===========================

4362: (l_ret_code in ('S', 'A'))) then
4363:
4364: -- ========================= FND LOG ===========================
4365: psa_utils.debug_other_string(g_state_level,l_full_path, ' inside Ist IF ');
4366: -- ========================= FND LOG ===========================
4367:
4368: update gl_bc_packets bp
4369: set bp.result_code = 'P23'
4370: where bp.packet_id = g_packet_id

Line 4374: -- ========================= FND LOG ===========================

4370: where bp.packet_id = g_packet_id
4371: and bp.result_code like 'F%'
4372: and bp.template_id is not null;
4373:
4374: -- ========================= FND LOG ===========================
4375: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets 5 updated -> ' || SQL%ROWCOUNT || ' rows');
4376: -- ========================= FND LOG ===========================
4377:
4378: end if;

Line 4376: -- ========================= FND LOG ===========================

4372: and bp.template_id is not null;
4373:
4374: -- ========================= FND LOG ===========================
4375: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets 5 updated -> ' || SQL%ROWCOUNT || ' rows');
4376: -- ========================= FND LOG ===========================
4377:
4378: end if;
4379:
4380: update gl_bc_packets bp

Line 4392: -- ========================= FND LOG ===========================

4388: ),
4389: bp.last_update_date = sysdate
4390: where bp.packet_id = g_packet_id;
4391:
4392: -- ========================= FND LOG ===========================
4393: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets 6 updated -> ' || SQL%ROWCOUNT || ' rows');
4394: -- ========================= FND LOG ===========================
4395:
4396: END IF;

Line 4394: -- ========================= FND LOG ===========================

4390: where bp.packet_id = g_packet_id;
4391:
4392: -- ========================= FND LOG ===========================
4393: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets 6 updated -> ' || SQL%ROWCOUNT || ' rows');
4394: -- ========================= FND LOG ===========================
4395:
4396: END IF;
4397:
4398: -- Update all lines to failure in same packet and same distribution if any other line fails.

Line 4412: -- ========================= FND LOG ===========================

4408: WHERE pk.packet_id = g_packet_id
4409: AND pk.source_distribution_id_num_1 = l_source_dist_id_num_1_tbl(I)
4410: AND pk.result_code like 'P%';
4411:
4412: -- ========================= FND LOG ===========================
4413: psa_utils.debug_other_string(g_state_level,l_full_path,
4414: ' update gl_bc_packets 6.1, result_code to F77 for same packet and same distribution updated -> ' || SQL%ROWCOUNT || ' rows');
4415: -- ========================= FND LOG ===========================
4416:

Line 4415: -- ========================= FND LOG ===========================

4411:
4412: -- ========================= FND LOG ===========================
4413: psa_utils.debug_other_string(g_state_level,l_full_path,
4414: ' update gl_bc_packets 6.1, result_code to F77 for same packet and same distribution updated -> ' || SQL%ROWCOUNT || ' rows');
4415: -- ========================= FND LOG ===========================
4416:
4417: CLOSE c_get_failed_distributions;
4418:
4419: -- Bug 3553142

Line 4433: -- ========================= FND LOG ===========================

4429: FROM gl_bc_packets bc
4430: WHERE bc.packet_id = pk.packet_id
4431: AND bc.result_code = 'P20');
4432:
4433: -- ========================= FND LOG ===========================
4434: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets 7 updated -> ' || SQL%ROWCOUNT || ' rows');
4435: -- ========================= FND LOG ===========================
4436:
4437:

Line 4435: -- ========================= FND LOG ===========================

4431: AND bc.result_code = 'P20');
4432:
4433: -- ========================= FND LOG ===========================
4434: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets 7 updated -> ' || SQL%ROWCOUNT || ' rows');
4435: -- ========================= FND LOG ===========================
4436:
4437:
4438: UPDATE gl_bc_packets pk
4439: SET result_code = 'P17'

Line 4447: -- ========================= FND LOG ===========================

4443: FROM gl_bc_packets bc
4444: WHERE bc.packet_id = pk.packet_id
4445: AND bc.result_code = 'P25');
4446:
4447: -- ========================= FND LOG ===========================
4448: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets 8 updated -> ' || SQL%ROWCOUNT || ' rows');
4449: -- ========================= FND LOG ===========================
4450:
4451:

Line 4449: -- ========================= FND LOG ===========================

4445: AND bc.result_code = 'P25');
4446:
4447: -- ========================= FND LOG ===========================
4448: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets 8 updated -> ' || SQL%ROWCOUNT || ' rows');
4449: -- ========================= FND LOG ===========================
4450:
4451:
4452: -- =========================== FND LOG ===========================
4453: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE');

Line 4452: -- =========================== FND LOG ===========================

4448: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets 8 updated -> ' || SQL%ROWCOUNT || ' rows');
4449: -- ========================= FND LOG ===========================
4450:
4451:
4452: -- =========================== FND LOG ===========================
4453: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE');
4454: -- ========================= FND LOG =============================
4455:
4456: return(TRUE);

Line 4454: -- ========================= FND LOG =============================

4450:
4451:
4452: -- =========================== FND LOG ===========================
4453: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE');
4454: -- ========================= FND LOG =============================
4455:
4456: return(TRUE);
4457:
4458: <>

Line 4459: -- =========================== FND LOG ===========================

4455:
4456: return(TRUE);
4457:
4458: <>
4459: -- =========================== FND LOG ===========================
4460: psa_utils.debug_other_string(g_state_level,l_full_path, ' Reached label normal exit');
4461: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE');
4462: -- ========================= FND LOG =============================
4463:

Line 4462: -- ========================= FND LOG =============================

4458: <>
4459: -- =========================== FND LOG ===========================
4460: psa_utils.debug_other_string(g_state_level,l_full_path, ' Reached label normal exit');
4461: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE');
4462: -- ========================= FND LOG =============================
4463:
4464: return(TRUE);
4465:
4466: EXCEPTION

Line 4469: -- =========================== FND LOG ===========================

4465:
4466: EXCEPTION
4467:
4468: WHEN OTHERS THEN
4469: -- =========================== FND LOG ===========================
4470: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
4471: -- ========================= FND LOG =============================
4472:
4473: message_token('PROCEDURE', 'Funds Checker');

Line 4471: -- ========================= FND LOG =============================

4467:
4468: WHEN OTHERS THEN
4469: -- =========================== FND LOG ===========================
4470: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
4471: -- ========================= FND LOG =============================
4472:
4473: message_token('PROCEDURE', 'Funds Checker');
4474: message_token('EVENT', SQLERRM);
4475: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');

Line 4477: -- =========================== FND LOG ===========================

4473: message_token('PROCEDURE', 'Funds Checker');
4474: message_token('EVENT', SQLERRM);
4475: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
4476:
4477: -- =========================== FND LOG ===========================
4478: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE');
4479: -- ========================= FND LOG =============================
4480: g_debug := g_debug||' GLXFRC Failed : '||SQLERRM;
4481: return(FALSE);

Line 4479: -- ========================= FND LOG =============================

4475: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
4476:
4477: -- =========================== FND LOG ===========================
4478: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE');
4479: -- ========================= FND LOG =============================
4480: g_debug := g_debug||' GLXFRC Failed : '||SQLERRM;
4481: return(FALSE);
4482:
4483: END glxfrc;

Line 4496: -- ========================= FND LOG ===========================

4492: p_conc_proc VARCHAR2(1);
4493: p_mode VARCHAR2(1);
4494: cbc_code NUMBER(15);
4495:
4496: -- ========================= FND LOG ===========================
4497: l_full_path VARCHAR2(100);
4498: -- ========================= FND LOG ===========================
4499: BEGIN
4500:

Line 4498: -- ========================= FND LOG ===========================

4494: cbc_code NUMBER(15);
4495:
4496: -- ========================= FND LOG ===========================
4497: l_full_path VARCHAR2(100);
4498: -- ========================= FND LOG ===========================
4499: BEGIN
4500:
4501: p_conc_proc := 'F';
4502: l_full_path := g_path || 'glzcbc.';

Line 4504: -- =========================== FND LOG ===========================

4500:
4501: p_conc_proc := 'F';
4502: l_full_path := g_path || 'glzcbc.';
4503:
4504: -- =========================== FND LOG ===========================
4505: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLZCBC - START' );
4506: -- ========================= FND LOG =============================
4507:
4508: cbc_fck_stmt :=

Line 4506: -- ========================= FND LOG =============================

4502: l_full_path := g_path || 'glzcbc.';
4503:
4504: -- =========================== FND LOG ===========================
4505: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLZCBC - START' );
4506: -- ========================= FND LOG =============================
4507:
4508: cbc_fck_stmt :=
4509: 'BEGIN :ret_code := IGC_CBC_GL_FC_PKG.glzcbc(:packet_id,p_ledger_id,:mode,:conc_proc); END;';
4510:

Line 4511: -- =========================== FND LOG ===========================

4507:
4508: cbc_fck_stmt :=
4509: 'BEGIN :ret_code := IGC_CBC_GL_FC_PKG.glzcbc(:packet_id,p_ledger_id,:mode,:conc_proc); END;';
4510:
4511: -- =========================== FND LOG ===========================
4512: psa_utils.debug_other_string(g_state_level,l_full_path, ' cbc_fck_stmt -> ' || cbc_fck_stmt );
4513: -- ========================= FND LOG =============================
4514:
4515: -- Assign parameter values before calling IGC

Line 4513: -- ========================= FND LOG =============================

4509: 'BEGIN :ret_code := IGC_CBC_GL_FC_PKG.glzcbc(:packet_id,p_ledger_id,:mode,:conc_proc); END;';
4510:
4511: -- =========================== FND LOG ===========================
4512: psa_utils.debug_other_string(g_state_level,l_full_path, ' cbc_fck_stmt -> ' || cbc_fck_stmt );
4513: -- ========================= FND LOG =============================
4514:
4515: -- Assign parameter values before calling IGC
4516:
4517: p_ledger_id := g_ledger_id;

Line 4521: -- =========================== FND LOG ===========================

4517: p_ledger_id := g_ledger_id;
4518: p_packet_id := g_packet_id;
4519: p_mode := g_fcmode;
4520:
4521: -- =========================== FND LOG ===========================
4522: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_ledger_id -> ' || g_ledger_id );
4523: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_packet_id -> ' || g_packet_id );
4524: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode );
4525: -- ========================= FND LOG =============================

Line 4525: -- ========================= FND LOG =============================

4521: -- =========================== FND LOG ===========================
4522: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_ledger_id -> ' || g_ledger_id );
4523: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_packet_id -> ' || g_packet_id );
4524: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode );
4525: -- ========================= FND LOG =============================
4526:
4527: execute immediate cbc_fck_stmt
4528: USING IN OUT cbc_code,IN p_packet_id,IN p_ledger_id,IN p_mode,IN p_conc_proc;
4529:

Line 4530: -- =========================== FND LOG ===========================

4526:
4527: execute immediate cbc_fck_stmt
4528: USING IN OUT cbc_code,IN p_packet_id,IN p_ledger_id,IN p_mode,IN p_conc_proc;
4529:
4530: -- =========================== FND LOG ===========================
4531: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN cbc_code -> ' || cbc_code );
4532: -- ========================= FND LOG =============================
4533:
4534: RETURN cbc_code;

Line 4532: -- ========================= FND LOG =============================

4528: USING IN OUT cbc_code,IN p_packet_id,IN p_ledger_id,IN p_mode,IN p_conc_proc;
4529:
4530: -- =========================== FND LOG ===========================
4531: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN cbc_code -> ' || cbc_code );
4532: -- ========================= FND LOG =============================
4533:
4534: RETURN cbc_code;
4535:
4536: EXCEPTION

Line 4539: -- =========================== FND LOG ===========================

4535:
4536: EXCEPTION
4537: WHEN OTHERS THEN
4538:
4539: -- =========================== FND LOG ===========================
4540: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> 1' );
4541: -- ========================= FND LOG =============================
4542:
4543: RETURN 1;

Line 4541: -- ========================= FND LOG =============================

4537: WHEN OTHERS THEN
4538:
4539: -- =========================== FND LOG ===========================
4540: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> 1' );
4541: -- ========================= FND LOG =============================
4542:
4543: RETURN 1;
4544:
4545: END glzcbc;

Line 4557: -- ========================= FND LOG ===========================

4553: FUNCTION glzgchk RETURN BOOLEAN IS
4554:
4555: gms_stmt VARCHAR2(400);
4556:
4557: -- ========================= FND LOG ===========================
4558: l_full_path VARCHAR2(100);
4559: -- ========================= FND LOG ===========================
4560:
4561: BEGIN

Line 4559: -- ========================= FND LOG ===========================

4555: gms_stmt VARCHAR2(400);
4556:
4557: -- ========================= FND LOG ===========================
4558: l_full_path VARCHAR2(100);
4559: -- ========================= FND LOG ===========================
4560:
4561: BEGIN
4562:
4563: l_full_path := g_path || 'glzgchk';

Line 4565: -- =========================== FND LOG ===========================

4561: BEGIN
4562:
4563: l_full_path := g_path || 'glzgchk';
4564:
4565: -- =========================== FND LOG ===========================
4566: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLZGCHK - START' );
4567: -- ========================= FND LOG =============================
4568:
4569: gms_stmt :=

Line 4567: -- ========================= FND LOG =============================

4563: l_full_path := g_path || 'glzgchk';
4564:
4565: -- =========================== FND LOG ===========================
4566: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLZGCHK - START' );
4567: -- ========================= FND LOG =============================
4568:
4569: gms_stmt :=
4570: 'BEGIN '||
4571: ' GMS_UTILITY.GMS_UTIL_PC_FCK('||

Line 4578: -- =========================== FND LOG ===========================

4574: 'FND_GLOBAL.USER_ID, FND_GLOBAL.RESP_ID, '||
4575: '''N'', :gms_retcode); '||
4576: 'END;';
4577:
4578: -- =========================== FND LOG ===========================
4579: psa_utils.debug_other_string(g_state_level,l_full_path, ' gms_stmt -> ' || gms_stmt );
4580: -- ========================= FND LOG =============================
4581:
4582: execute immediate gms_stmt using g_ledger_id, g_packet_id, g_fcmode,

Line 4580: -- ========================= FND LOG =============================

4576: 'END;';
4577:
4578: -- =========================== FND LOG ===========================
4579: psa_utils.debug_other_string(g_state_level,l_full_path, ' gms_stmt -> ' || gms_stmt );
4580: -- ========================= FND LOG =============================
4581:
4582: execute immediate gms_stmt using g_ledger_id, g_packet_id, g_fcmode,
4583: g_partial_resv_flag, in out gms_retcode;
4584:

Line 4585: -- =========================== FND LOG ===========================

4581:
4582: execute immediate gms_stmt using g_ledger_id, g_packet_id, g_fcmode,
4583: g_partial_resv_flag, in out gms_retcode;
4584:
4585: -- =========================== FND LOG ===========================
4586: psa_utils.debug_other_string(g_state_level,l_full_path, ' gms_retcode -> ' || gms_retcode );
4587: -- ========================= FND LOG =============================
4588:
4589: IF NOT gms_retcode = '~'

Line 4587: -- ========================= FND LOG =============================

4583: g_partial_resv_flag, in out gms_retcode;
4584:
4585: -- =========================== FND LOG ===========================
4586: psa_utils.debug_other_string(g_state_level,l_full_path, ' gms_retcode -> ' || gms_retcode );
4587: -- ========================= FND LOG =============================
4588:
4589: IF NOT gms_retcode = '~'
4590: AND gms_retcode IS NOT NULL THEN
4591: -- =========================== FND LOG ===========================

Line 4591: -- =========================== FND LOG ===========================

4587: -- ========================= FND LOG =============================
4588:
4589: IF NOT gms_retcode = '~'
4590: AND gms_retcode IS NOT NULL THEN
4591: -- =========================== FND LOG ===========================
4592: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE' );
4593: -- ========================= FND LOG =============================
4594: RETURN(TRUE);
4595: END IF;

Line 4593: -- ========================= FND LOG =============================

4589: IF NOT gms_retcode = '~'
4590: AND gms_retcode IS NOT NULL THEN
4591: -- =========================== FND LOG ===========================
4592: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE' );
4593: -- ========================= FND LOG =============================
4594: RETURN(TRUE);
4595: END IF;
4596:
4597: -- =========================== FND LOG ===========================

Line 4597: -- =========================== FND LOG ===========================

4593: -- ========================= FND LOG =============================
4594: RETURN(TRUE);
4595: END IF;
4596:
4597: -- =========================== FND LOG ===========================
4598: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE' );
4599: -- ========================= FND LOG =============================
4600: RETURN(FALSE);
4601:

Line 4599: -- ========================= FND LOG =============================

4595: END IF;
4596:
4597: -- =========================== FND LOG ===========================
4598: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE' );
4599: -- ========================= FND LOG =============================
4600: RETURN(FALSE);
4601:
4602: EXCEPTION
4603:

Line 4606: -- =========================== FND LOG ===========================

4602: EXCEPTION
4603:
4604: WHEN OTHERS THEN
4605:
4606: -- =========================== FND LOG ===========================
4607: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHER '|| SQLERRM );
4608: -- ========================= FND LOG =============================
4609:
4610: /* Even when an SQL exception is raised, if the gms_retcode */

Line 4608: -- ========================= FND LOG =============================

4604: WHEN OTHERS THEN
4605:
4606: -- =========================== FND LOG ===========================
4607: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHER '|| SQLERRM );
4608: -- ========================= FND LOG =============================
4609:
4610: /* Even when an SQL exception is raised, if the gms_retcode */
4611: /* has been set, indicate that processing has completed. */
4612: /* This ensures that any cleanup that needs to be done by */

Line 4617: -- =========================== FND LOG ===========================

4613: /* the GMS_RETURN_CODE processor is at least attempted. */
4614:
4615: IF NOT gms_retcode = '~'
4616: AND gms_retcode IS NOT NULL THEN
4617: -- =========================== FND LOG ===========================
4618: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> TRUE' );
4619: -- ========================= FND LOG =============================
4620: RETURN(TRUE);
4621: ELSE

Line 4619: -- ========================= FND LOG =============================

4615: IF NOT gms_retcode = '~'
4616: AND gms_retcode IS NOT NULL THEN
4617: -- =========================== FND LOG ===========================
4618: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> TRUE' );
4619: -- ========================= FND LOG =============================
4620: RETURN(TRUE);
4621: ELSE
4622: -- =========================== FND LOG ===========================
4623: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE' );

Line 4622: -- =========================== FND LOG ===========================

4618: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> TRUE' );
4619: -- ========================= FND LOG =============================
4620: RETURN(TRUE);
4621: ELSE
4622: -- =========================== FND LOG ===========================
4623: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE' );
4624: -- ========================= FND LOG =============================
4625: RETURN(FALSE);
4626: END IF;

Line 4624: -- ========================= FND LOG =============================

4620: RETURN(TRUE);
4621: ELSE
4622: -- =========================== FND LOG ===========================
4623: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE' );
4624: -- ========================= FND LOG =============================
4625: RETURN(FALSE);
4626: END IF;
4627:
4628: END glzgchk;

Line 4646: -- ========================= FND LOG ===========================

4642: pa_retcode gl_bc_packets.result_code%TYPE;
4643: err_msg VARCHAR2(1024);
4644: err_stg VARCHAR2(1024);
4645:
4646: -- ========================= FND LOG ===========================
4647: l_full_path VARCHAR2(100);
4648: -- ========================= FND LOG ===========================
4649: BEGIN
4650:

Line 4648: -- ========================= FND LOG ===========================

4644: err_stg VARCHAR2(1024);
4645:
4646: -- ========================= FND LOG ===========================
4647: l_full_path VARCHAR2(100);
4648: -- ========================= FND LOG ===========================
4649: BEGIN
4650:
4651: l_full_path := g_path || 'glzpafck.';
4652:

Line 4653: -- ========================= FND LOG ===========================

4649: BEGIN
4650:
4651: l_full_path := g_path || 'glzpafck.';
4652:
4653: -- ========================= FND LOG ===========================
4654: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLZPAFCK --> START ');
4655: -- ========================= FND LOG ===========================
4656:
4657: pa_stmt :=

Line 4655: -- ========================= FND LOG ===========================

4651: l_full_path := g_path || 'glzpafck.';
4652:
4653: -- ========================= FND LOG ===========================
4654: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLZPAFCK --> START ');
4655: -- ========================= FND LOG ===========================
4656:
4657: pa_stmt :=
4658: 'BEGIN '||
4659: ' PA_FUNDS_CONTROL_PKG.PA_FUNDS_CHECK(:gl_var, :g_ledger_id_var, :g_packet_id_var, '||

Line 4663: -- ========================= FND LOG ===========================

4659: ' PA_FUNDS_CONTROL_PKG.PA_FUNDS_CHECK(:gl_var, :g_ledger_id_var, :g_packet_id_var, '||
4660: ':g_fcmode_var, :g_partial_resv_flag_var, NULL, NULL,:pa_retcode, :err_msg, :err_stg); '||
4661: 'END;';
4662:
4663: -- ========================= FND LOG ===========================
4664: psa_utils.debug_other_string(g_state_level,l_full_path, ' pa_stmt -> ' || pa_stmt);
4665: -- ========================= FND LOG ===========================
4666:
4667: EXECUTE IMMEDIATE pa_stmt USING 'GL', g_ledger_id, g_packet_id, g_fcmode,

Line 4665: -- ========================= FND LOG ===========================

4661: 'END;';
4662:
4663: -- ========================= FND LOG ===========================
4664: psa_utils.debug_other_string(g_state_level,l_full_path, ' pa_stmt -> ' || pa_stmt);
4665: -- ========================= FND LOG ===========================
4666:
4667: EXECUTE IMMEDIATE pa_stmt USING 'GL', g_ledger_id, g_packet_id, g_fcmode,
4668: g_partial_resv_flag, OUT pa_retcode,
4669: OUT err_msg, OUT err_stg;

Line 4672: -- ========================= FND LOG ===========================

4668: g_partial_resv_flag, OUT pa_retcode,
4669: OUT err_msg, OUT err_stg;
4670:
4671: IF err_msg IS NOT NULL THEN
4672: -- ========================= FND LOG ===========================
4673: psa_utils.debug_other_string(g_state_level,l_full_path, ' pa_retcode -> ' || pa_retcode);
4674: psa_utils.debug_other_string(g_state_level,l_full_path, ' err_msg -> ' || err_msg);
4675: psa_utils.debug_other_string(g_state_level,l_full_path, ' err_stg -> ' || err_stg);
4676: -- ========================= FND LOG ===========================

Line 4676: -- ========================= FND LOG ===========================

4672: -- ========================= FND LOG ===========================
4673: psa_utils.debug_other_string(g_state_level,l_full_path, ' pa_retcode -> ' || pa_retcode);
4674: psa_utils.debug_other_string(g_state_level,l_full_path, ' err_msg -> ' || err_msg);
4675: psa_utils.debug_other_string(g_state_level,l_full_path, ' err_stg -> ' || err_stg);
4676: -- ========================= FND LOG ===========================
4677: END IF;
4678:
4679: IF (pa_retcode IS NULL) OR (pa_retcode = 'T') THEN
4680: -- ========================= FND LOG ===========================

Line 4680: -- ========================= FND LOG ===========================

4676: -- ========================= FND LOG ===========================
4677: END IF;
4678:
4679: IF (pa_retcode IS NULL) OR (pa_retcode = 'T') THEN
4680: -- ========================= FND LOG ===========================
4681: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE ');
4682: -- ========================= FND LOG ===========================
4683: g_debug := g_debug||' GLZPAFCK Failed : (PA_RETCODE IS NULL OR PA_RETCODE = T)';
4684: RETURN(FALSE);

Line 4682: -- ========================= FND LOG ===========================

4678:
4679: IF (pa_retcode IS NULL) OR (pa_retcode = 'T') THEN
4680: -- ========================= FND LOG ===========================
4681: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE ');
4682: -- ========================= FND LOG ===========================
4683: g_debug := g_debug||' GLZPAFCK Failed : (PA_RETCODE IS NULL OR PA_RETCODE = T)';
4684: RETURN(FALSE);
4685: END IF;
4686:

Line 4687: -- ========================= FND LOG ===========================

4683: g_debug := g_debug||' GLZPAFCK Failed : (PA_RETCODE IS NULL OR PA_RETCODE = T)';
4684: RETURN(FALSE);
4685: END IF;
4686:
4687: -- ========================= FND LOG ===========================
4688: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE ');
4689: -- ========================= FND LOG ===========================
4690:
4691: RETURN(TRUE);

Line 4689: -- ========================= FND LOG ===========================

4685: END IF;
4686:
4687: -- ========================= FND LOG ===========================
4688: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE ');
4689: -- ========================= FND LOG ===========================
4690:
4691: RETURN(TRUE);
4692:
4693: EXCEPTION

Line 4696: -- ========================= FND LOG ===========================

4692:
4693: EXCEPTION
4694:
4695: WHEN OTHERS THEN
4696: -- ========================= FND LOG ===========================
4697: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ');
4698: -- ========================= FND LOG ===========================
4699:
4700: /* Even when an SQL exception is raised, if the pa_retcode */

Line 4698: -- ========================= FND LOG ===========================

4694:
4695: WHEN OTHERS THEN
4696: -- ========================= FND LOG ===========================
4697: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ');
4698: -- ========================= FND LOG ===========================
4699:
4700: /* Even when an SQL exception is raised, if the pa_retcode */
4701: /* has been set, indicate that processing has completed. */
4702:

Line 4704: -- ========================= FND LOG ===========================

4700: /* Even when an SQL exception is raised, if the pa_retcode */
4701: /* has been set, indicate that processing has completed. */
4702:
4703: IF pa_retcode = 'T' THEN
4704: -- ========================= FND LOG ===========================
4705: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE ');
4706: -- ========================= FND LOG ===========================
4707: g_debug := g_debug||' GLZPAFCK Failed : PA_RETCODE = T';
4708: RETURN(FALSE);

Line 4706: -- ========================= FND LOG ===========================

4702:
4703: IF pa_retcode = 'T' THEN
4704: -- ========================= FND LOG ===========================
4705: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE ');
4706: -- ========================= FND LOG ===========================
4707: g_debug := g_debug||' GLZPAFCK Failed : PA_RETCODE = T';
4708: RETURN(FALSE);
4709: END IF;
4710:

Line 4711: -- ========================= FND LOG ===========================

4707: g_debug := g_debug||' GLZPAFCK Failed : PA_RETCODE = T';
4708: RETURN(FALSE);
4709: END IF;
4710:
4711: -- ========================= FND LOG ===========================
4712: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE ');
4713: -- ========================= FND LOG ===========================
4714:
4715: RETURN(TRUE);

Line 4713: -- ========================= FND LOG ===========================

4709: END IF;
4710:
4711: -- ========================= FND LOG ===========================
4712: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE ');
4713: -- ========================= FND LOG ===========================
4714:
4715: RETURN(TRUE);
4716:
4717: END glzpafck;

Line 4727: -- ========================= FND LOG ===========================

4723: -- is less than or equal to the Override Amount for the Detail Transaction;
4724: -- Result Codes for Summary Transactions are updated in glxfrs()
4725:
4726: FUNCTION glxfor RETURN BOOLEAN IS
4727: -- ========================= FND LOG ===========================
4728: l_full_path VARCHAR2(100);
4729: -- ========================= FND LOG ===========================
4730: BEGIN
4731:

Line 4729: -- ========================= FND LOG ===========================

4725:
4726: FUNCTION glxfor RETURN BOOLEAN IS
4727: -- ========================= FND LOG ===========================
4728: l_full_path VARCHAR2(100);
4729: -- ========================= FND LOG ===========================
4730: BEGIN
4731:
4732: l_full_path := g_path || 'glxfor';
4733:

Line 4734: -- ========================= FND LOG ===========================

4730: BEGIN
4731:
4732: l_full_path := g_path || 'glxfor';
4733:
4734: -- ========================= FND LOG ===========================
4735: psa_utils.debug_other_string(g_state_level, l_full_path, ' GLXFOR --> START ');
4736: -- ========================= FND LOG ===========================
4737:
4738: -- Update Result Code for Detail Transactions

Line 4736: -- ========================= FND LOG ===========================

4732: l_full_path := g_path || 'glxfor';
4733:
4734: -- ========================= FND LOG ===========================
4735: psa_utils.debug_other_string(g_state_level, l_full_path, ' GLXFOR --> START ');
4736: -- ========================= FND LOG ===========================
4737:
4738: -- Update Result Code for Detail Transactions
4739:
4740: update gl_bc_packets bp

Line 4766: -- ========================= FND LOG ===========================

4762: or (pk.ussgl_link_to_parent_id = bp.ussgl_parent_id
4763: and pk.result_code between 'F20' and 'F29'))
4764: );
4765:
4766: -- ========================= FND LOG ===========================
4767: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets1 -> ' || SQL%ROWCOUNT);
4768: -- ========================= FND LOG ===========================
4769:
4770: -- ========================= FND LOG ===========================

Line 4768: -- ========================= FND LOG ===========================

4764: );
4765:
4766: -- ========================= FND LOG ===========================
4767: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets1 -> ' || SQL%ROWCOUNT);
4768: -- ========================= FND LOG ===========================
4769:
4770: -- ========================= FND LOG ===========================
4771: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_calling_prog_flag -> ' || g_calling_prog_flag);
4772: -- ========================= FND LOG ===========================

Line 4770: -- ========================= FND LOG ===========================

4766: -- ========================= FND LOG ===========================
4767: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets1 -> ' || SQL%ROWCOUNT);
4768: -- ========================= FND LOG ===========================
4769:
4770: -- ========================= FND LOG ===========================
4771: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_calling_prog_flag -> ' || g_calling_prog_flag);
4772: -- ========================= FND LOG ===========================
4773:
4774:

Line 4772: -- ========================= FND LOG ===========================

4768: -- ========================= FND LOG ===========================
4769:
4770: -- ========================= FND LOG ===========================
4771: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_calling_prog_flag -> ' || g_calling_prog_flag);
4772: -- ========================= FND LOG ===========================
4773:
4774:
4775: IF (g_calling_prog_flag = 'G') THEN
4776:

Line 4795: -- ========================= FND LOG ===========================

4791: );
4792:
4793: END IF;
4794:
4795: -- ========================= FND LOG ===========================
4796: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets2 -> ' || SQL%ROWCOUNT);
4797: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE ');
4798: -- ========================= FND LOG ===========================
4799:

Line 4798: -- ========================= FND LOG ===========================

4794:
4795: -- ========================= FND LOG ===========================
4796: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update gl_bc_packets2 -> ' || SQL%ROWCOUNT);
4797: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE ');
4798: -- ========================= FND LOG ===========================
4799:
4800: return(TRUE);
4801:
4802:

Line 4806: -- ========================= FND LOG ===========================

4802:
4803: EXCEPTION
4804:
4805: WHEN OTHERS THEN
4806: -- ========================= FND LOG ===========================
4807: psa_utils.debug_other_string(g_excep_level,l_full_path, ' WHEN OTHERS EXCEPTION ' || SQLERRM);
4808: -- ========================= FND LOG ===========================
4809:
4810: message_token('PROCEDURE', 'Funds Checker');

Line 4808: -- ========================= FND LOG ===========================

4804:
4805: WHEN OTHERS THEN
4806: -- ========================= FND LOG ===========================
4807: psa_utils.debug_other_string(g_excep_level,l_full_path, ' WHEN OTHERS EXCEPTION ' || SQLERRM);
4808: -- ========================= FND LOG ===========================
4809:
4810: message_token('PROCEDURE', 'Funds Checker');
4811: message_token('EVENT', SQLERRM);
4812: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');

Line 4814: -- ========================= FND LOG ===========================

4810: message_token('PROCEDURE', 'Funds Checker');
4811: message_token('EVENT', SQLERRM);
4812: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
4813:
4814: -- ========================= FND LOG ===========================
4815: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE ');
4816: -- ========================= FND LOG ===========================
4817: g_debug := g_debug||' GLXFOR Failed : '||SQLERRM;
4818: return(FALSE);

Line 4816: -- ========================= FND LOG ===========================

4812: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
4813:
4814: -- ========================= FND LOG ===========================
4815: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE ');
4816: -- ========================= FND LOG ===========================
4817: g_debug := g_debug||' GLXFOR Failed : '||SQLERRM;
4818: return(FALSE);
4819:
4820: END glxfor;

Line 4890: -- ========================= FND LOG ===========================

4886: from gl_bc_packets bp
4887: where bp.packet_id = g_packet_id
4888: and bp.template_id is null;
4889:
4890: -- ========================= FND LOG ===========================
4891: l_full_path VARCHAR2(100);
4892: -- ========================= FND LOG ===========================
4893:
4894: BEGIN

Line 4892: -- ========================= FND LOG ===========================

4888: and bp.template_id is null;
4889:
4890: -- ========================= FND LOG ===========================
4891: l_full_path VARCHAR2(100);
4892: -- ========================= FND LOG ===========================
4893:
4894: BEGIN
4895:
4896: l_full_path := g_path || 'glxfrs';

Line 4898: -- ========================= FND LOG ===========================

4894: BEGIN
4895:
4896: l_full_path := g_path || 'glxfrs';
4897:
4898: -- ========================= FND LOG ===========================
4899: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFRS --> START ');
4900: -- ========================= FND LOG ===========================
4901:
4902: -- Return Code for the Packet

Line 4900: -- ========================= FND LOG ===========================

4896: l_full_path := g_path || 'glxfrs';
4897:
4898: -- ========================= FND LOG ===========================
4899: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFRS --> START ');
4900: -- ========================= FND LOG ===========================
4901:
4902: -- Return Code for the Packet
4903:
4904: open retcode;

Line 4908: -- ========================= FND LOG ===========================

4904: open retcode;
4905: fetch retcode into g_return_code;
4906: close retcode;
4907:
4908: -- ========================= FND LOG ===========================
4909: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_return_code --> ' || g_return_code);
4910: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glrchk ');
4911: -- ========================= FND LOG ===========================
4912:

Line 4911: -- ========================= FND LOG ===========================

4907:
4908: -- ========================= FND LOG ===========================
4909: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_return_code --> ' || g_return_code);
4910: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glrchk ');
4911: -- ========================= FND LOG ===========================
4912:
4913: if not glrchk(g_return_code) then
4914: -- ========================= FND LOG ===========================
4915: psa_utils.debug_other_string(g_state_level,l_full_path, ' glrchk --> FALSE ');

Line 4914: -- ========================= FND LOG ===========================

4910: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glrchk ');
4911: -- ========================= FND LOG ===========================
4912:
4913: if not glrchk(g_return_code) then
4914: -- ========================= FND LOG ===========================
4915: psa_utils.debug_other_string(g_state_level,l_full_path, ' glrchk --> FALSE ');
4916: -- ========================= FND LOG ===========================
4917: return(FALSE);
4918: end if;

Line 4916: -- ========================= FND LOG ===========================

4912:
4913: if not glrchk(g_return_code) then
4914: -- ========================= FND LOG ===========================
4915: psa_utils.debug_other_string(g_state_level,l_full_path, ' glrchk --> FALSE ');
4916: -- ========================= FND LOG ===========================
4917: return(FALSE);
4918: end if;
4919:
4920: -- Update Status Code and Last Update Date for all transactions

Line 4972: -- ========================= FND LOG ===========================

4968: bp.last_update_date = sysdate
4969: where bp.packet_id = g_packet_id;
4970: end if;
4971:
4972: -- ========================= FND LOG ===========================
4973: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets --> ' || SQL%ROWCOUNT);
4974: -- ========================= FND LOG ===========================
4975:
4976: -- Update the Result Code of all Summary Transactions that fail Funds

Line 4974: -- ========================= FND LOG ===========================

4970: end if;
4971:
4972: -- ========================= FND LOG ===========================
4973: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets --> ' || SQL%ROWCOUNT);
4974: -- ========================= FND LOG ===========================
4975:
4976: -- Update the Result Code of all Summary Transactions that fail Funds
4977: -- Reservation to 'P23', when each of their corresponding details got
4978: -- overridden in glxfor(). This Module executes this SQL only if

Line 4989: -- ========================= FND LOG ===========================

4985: -- P23 This summary account fails funds check; you overrode
4986: -- the detail(s)
4987: --
4988:
4989: -- ========================= FND LOG ===========================
4990: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode --> ' || g_fcmode);
4991: IF (g_summarized_flag) THEN
4992: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_summarized_flag --> TRUE ');
4993: ELSE

Line 4997: -- ========================= FND LOG ===========================

4993: ELSE
4994: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_summarized_flag --> FALSE ');
4995: END IF;
4996: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_return_code --> ' || g_return_code);
4997: -- ========================= FND LOG ===========================
4998:
4999: if ((g_fcmode in ('R', 'U', 'A')) and
5000: (g_summarized_flag) and
5001: (g_return_code in ('S', 'A'))) then

Line 5003: -- ========================= FND LOG ===========================

4999: if ((g_fcmode in ('R', 'U', 'A')) and
5000: (g_summarized_flag) and
5001: (g_return_code in ('S', 'A'))) then
5002:
5003: -- ========================= FND LOG ===========================
5004: psa_utils.debug_other_string(g_state_level,l_full_path, ' inside Ist IF ');
5005: -- ========================= FND LOG ===========================
5006:
5007: update gl_bc_packets bp

Line 5005: -- ========================= FND LOG ===========================

5001: (g_return_code in ('S', 'A'))) then
5002:
5003: -- ========================= FND LOG ===========================
5004: psa_utils.debug_other_string(g_state_level,l_full_path, ' inside Ist IF ');
5005: -- ========================= FND LOG ===========================
5006:
5007: update gl_bc_packets bp
5008: set bp.result_code = 'P23'
5009: where bp.packet_id = g_packet_id

Line 5013: -- ========================= FND LOG ===========================

5009: where bp.packet_id = g_packet_id
5010: and bp.result_code like 'F%'
5011: and bp.template_id is not null;
5012:
5013: -- ========================= FND LOG ===========================
5014: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets --> ' || SQL%ROWCOUNT);
5015: -- ========================= FND LOG ===========================
5016:
5017: end if;

Line 5015: -- ========================= FND LOG ===========================

5011: and bp.template_id is not null;
5012:
5013: -- ========================= FND LOG ===========================
5014: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets --> ' || SQL%ROWCOUNT);
5015: -- ========================= FND LOG ===========================
5016:
5017: end if;
5018:
5019:

Line 5053: -- ========================= FND LOG ===========================

5049: (g_summarized_flag) and
5050: (g_return_code = 'P')) then
5051: begin
5052:
5053: -- ========================= FND LOG ===========================
5054: psa_utils.debug_other_string(g_state_level,l_full_path, ' inside IInd IF ');
5055: -- ========================= FND LOG ===========================
5056:
5057: update gl_bc_packets bp

Line 5055: -- ========================= FND LOG ===========================

5051: begin
5052:
5053: -- ========================= FND LOG ===========================
5054: psa_utils.debug_other_string(g_state_level,l_full_path, ' inside IInd IF ');
5055: -- ========================= FND LOG ===========================
5056:
5057: update gl_bc_packets bp
5058: set (bp.entered_dr,
5059: bp.entered_cr,

Line 5093: -- ========================= FND LOG ===========================

5089: )
5090: where bp.packet_id = g_packet_id
5091: and bp.template_id is not null;
5092:
5093: -- ========================= FND LOG ===========================
5094: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets --> ' || SQL%ROWCOUNT);
5095: -- ========================= FND LOG ===========================
5096:
5097: end;

Line 5095: -- ========================= FND LOG ===========================

5091: and bp.template_id is not null;
5092:
5093: -- ========================= FND LOG ===========================
5094: psa_utils.debug_other_string(g_state_level,l_full_path, ' update gl_bc_packets --> ' || SQL%ROWCOUNT);
5095: -- ========================= FND LOG ===========================
5096:
5097: end;
5098: end if;
5099:

Line 5100: -- ========================= FND LOG ===========================

5096:
5097: end;
5098: end if;
5099:
5100: -- ========================= FND LOG ===========================
5101: psa_utils.debug_other_string(g_state_level,l_full_path, ' calling glxfar ');
5102: -- ========================= FND LOG ===========================
5103:
5104: if not glxfar then

Line 5102: -- ========================= FND LOG ===========================

5098: end if;
5099:
5100: -- ========================= FND LOG ===========================
5101: psa_utils.debug_other_string(g_state_level,l_full_path, ' calling glxfar ');
5102: -- ========================= FND LOG ===========================
5103:
5104: if not glxfar then
5105: -- ========================= FND LOG ===========================
5106: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> FALSE');

Line 5105: -- ========================= FND LOG ===========================

5101: psa_utils.debug_other_string(g_state_level,l_full_path, ' calling glxfar ');
5102: -- ========================= FND LOG ===========================
5103:
5104: if not glxfar then
5105: -- ========================= FND LOG ===========================
5106: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> FALSE');
5107: -- ========================= FND LOG ===========================
5108: return(FALSE);
5109: end if;

Line 5107: -- ========================= FND LOG ===========================

5103:
5104: if not glxfar then
5105: -- ========================= FND LOG ===========================
5106: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> FALSE');
5107: -- ========================= FND LOG ===========================
5108: return(FALSE);
5109: end if;
5110:
5111: -- ========================= FND LOG ===========================

Line 5111: -- ========================= FND LOG ===========================

5107: -- ========================= FND LOG ===========================
5108: return(FALSE);
5109: end if;
5110:
5111: -- ========================= FND LOG ===========================
5112: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> TRUE ');
5113: -- ========================= FND LOG ===========================
5114:
5115: return(TRUE);

Line 5113: -- ========================= FND LOG ===========================

5109: end if;
5110:
5111: -- ========================= FND LOG ===========================
5112: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> TRUE ');
5113: -- ========================= FND LOG ===========================
5114:
5115: return(TRUE);
5116:
5117: EXCEPTION

Line 5129: -- ========================= FND LOG ===========================

5125: message_token('PROCEDURE', 'Funds Checker');
5126: message_token('EVENT', SQLERRM);
5127: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
5128:
5129: -- ========================= FND LOG ===========================
5130: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEOPTION WHEN OTHERS '|| SQLERRM);
5131: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN --> FALSE ');
5132: -- ========================= FND LOG ===========================
5133: g_debug := g_debug||' GLXFRS Failed : '||SQLERRM;

Line 5132: -- ========================= FND LOG ===========================

5128:
5129: -- ========================= FND LOG ===========================
5130: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEOPTION WHEN OTHERS '|| SQLERRM);
5131: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN --> FALSE ');
5132: -- ========================= FND LOG ===========================
5133: g_debug := g_debug||' GLXFRS Failed : '||SQLERRM;
5134: return(FALSE);
5135:
5136: END glxfrs;

Line 5160: -- ========================= FND LOG ===========================

5156:
5157: FUNCTION glrchk(post_control IN gl_bc_packets.result_code%TYPE)
5158: RETURN BOOLEAN IS
5159:
5160: -- ========================= FND LOG ===========================
5161: l_full_path VARCHAR2(100);
5162: -- ========================= FND LOG ===========================
5163:
5164: BEGIN

Line 5162: -- ========================= FND LOG ===========================

5158: RETURN BOOLEAN IS
5159:
5160: -- ========================= FND LOG ===========================
5161: l_full_path VARCHAR2(100);
5162: -- ========================= FND LOG ===========================
5163:
5164: BEGIN
5165: l_full_path := g_path || 'glrchk.';
5166:

Line 5167: -- ========================= FND LOG ===========================

5163:
5164: BEGIN
5165: l_full_path := g_path || 'glrchk.';
5166:
5167: -- ========================= FND LOG ===========================
5168: psa_utils.debug_other_string(g_state_level,l_full_path, ' glrchk --> START ');
5169: psa_utils.debug_other_string(g_state_level,l_full_path, ' post_control --> ' || post_control);
5170: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_cbc_retcode --> ' || g_cbc_retcode);
5171: -- ========================= FND LOG ===========================

Line 5171: -- ========================= FND LOG ===========================

5167: -- ========================= FND LOG ===========================
5168: psa_utils.debug_other_string(g_state_level,l_full_path, ' glrchk --> START ');
5169: psa_utils.debug_other_string(g_state_level,l_full_path, ' post_control --> ' || post_control);
5170: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_cbc_retcode --> ' || g_cbc_retcode);
5171: -- ========================= FND LOG ===========================
5172:
5173: /*========================+
5174: | CBC Reconcile |
5175: +========================*/

Line 5177: -- ========================= FND LOG ===========================

5173: /*========================+
5174: | CBC Reconcile |
5175: +========================*/
5176:
5177: -- ========================= FND LOG ===========================
5178: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_cbc_retcode-> '||g_cbc_retcode);
5179: -- ========================= FND LOG ===========================
5180:
5181:

Line 5179: -- ========================= FND LOG ===========================

5175: +========================*/
5176:
5177: -- ========================= FND LOG ===========================
5178: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_cbc_retcode-> '||g_cbc_retcode);
5179: -- ========================= FND LOG ===========================
5180:
5181:
5182: IF g_cbc_retcode = 1 then
5183: -- ========================= FND LOG ===========================

Line 5183: -- ========================= FND LOG ===========================

5179: -- ========================= FND LOG ===========================
5180:
5181:
5182: IF g_cbc_retcode = 1 then
5183: -- ========================= FND LOG ===========================
5184: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling CBC Reconcile ');
5185: -- ========================= FND LOG ===========================
5186:
5187: DECLARE

Line 5185: -- ========================= FND LOG ===========================

5181:
5182: IF g_cbc_retcode = 1 then
5183: -- ========================= FND LOG ===========================
5184: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling CBC Reconcile ');
5185: -- ========================= FND LOG ===========================
5186:
5187: DECLARE
5188: cbc_recon_stmt VARCHAR2(2000);
5189: cbc_recon_code NUMBER(15);

Line 5192: -- ========================= FND LOG ===========================

5188: cbc_recon_stmt VARCHAR2(2000);
5189: cbc_recon_code NUMBER(15);
5190:
5191: BEGIN
5192: -- ========================= FND LOG ===========================
5193: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLRCHK(CBCRECONCILE) --> START ');
5194: -- ========================= FND LOG ===========================
5195:
5196: cbc_recon_stmt :=

Line 5194: -- ========================= FND LOG ===========================

5190:
5191: BEGIN
5192: -- ========================= FND LOG ===========================
5193: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLRCHK(CBCRECONCILE) --> START ');
5194: -- ========================= FND LOG ===========================
5195:
5196: cbc_recon_stmt :=
5197: 'BEGIN :ret_code := IGC_CBC_GL_FC_PKG.reconcile_glzcbc(:packet_id,:sob_id,:mode); END;';
5198:

Line 5199: -- ========================= FND LOG ===========================

5195:
5196: cbc_recon_stmt :=
5197: 'BEGIN :ret_code := IGC_CBC_GL_FC_PKG.reconcile_glzcbc(:packet_id,:sob_id,:mode); END;';
5198:
5199: -- ========================= FND LOG ===========================
5200: psa_utils.debug_other_string(g_state_level,l_full_path, ' cbc_recon_stmt --> ' || cbc_recon_stmt);
5201: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_ledger_id --> ' || g_ledger_id);
5202: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_packet_id --> ' || g_packet_id);
5203: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_mode --> ' || g_fcmode);

Line 5204: -- ========================= FND LOG ===========================

5200: psa_utils.debug_other_string(g_state_level,l_full_path, ' cbc_recon_stmt --> ' || cbc_recon_stmt);
5201: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_ledger_id --> ' || g_ledger_id);
5202: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_packet_id --> ' || g_packet_id);
5203: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_mode --> ' || g_fcmode);
5204: -- ========================= FND LOG ===========================
5205:
5206: execute immediate cbc_recon_stmt
5207: USING IN OUT cbc_recon_code,IN g_packet_id,IN g_ledger_id,IN g_fcmode;
5208:

Line 5209: -- ========================= FND LOG ===========================

5205:
5206: execute immediate cbc_recon_stmt
5207: USING IN OUT cbc_recon_code,IN g_packet_id,IN g_ledger_id,IN g_fcmode;
5208:
5209: -- ========================= FND LOG ===========================
5210: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN cbc_recon_code --> ' || cbc_recon_code);
5211: -- ========================= FND LOG ===========================
5212:
5213: IF cbc_recon_code = -1 THEN

Line 5211: -- ========================= FND LOG ===========================

5207: USING IN OUT cbc_recon_code,IN g_packet_id,IN g_ledger_id,IN g_fcmode;
5208:
5209: -- ========================= FND LOG ===========================
5210: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN cbc_recon_code --> ' || cbc_recon_code);
5211: -- ========================= FND LOG ===========================
5212:
5213: IF cbc_recon_code = -1 THEN
5214: g_debug := g_debug||' GLRCHK Failed : CBC_RECONC_CODE = -1';
5215: return false;

Line 5226: -- ========================= FND LOG ===========================

5222: END;
5223:
5224: END IF;
5225:
5226: -- ========================= FND LOG ===========================
5227: IF (g_psa_grantcheck) THEN
5228: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_grantcheck --> TRUE ');
5229: ELSE
5230: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_grantcheck --> FALSE ');

Line 5232: -- ========================= FND LOG ===========================

5228: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_grantcheck --> TRUE ');
5229: ELSE
5230: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_grantcheck --> FALSE ');
5231: END IF;
5232: -- ========================= FND LOG ===========================
5233:
5234: /*========================+
5235: | GMS Reconcile |
5236: +========================*/

Line 5240: -- ========================= FND LOG ===========================

5236: +========================*/
5237:
5238: IF g_psa_grantcheck THEN
5239:
5240: -- ========================= FND LOG ===========================
5241: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling GMS Reconcile ');
5242: -- ========================= FND LOG ===========================
5243:
5244: DECLARE

Line 5242: -- ========================= FND LOG ===========================

5238: IF g_psa_grantcheck THEN
5239:
5240: -- ========================= FND LOG ===========================
5241: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling GMS Reconcile ');
5242: -- ========================= FND LOG ===========================
5243:
5244: DECLARE
5245:
5246: gms_stmt VARCHAR2(400);

Line 5251: -- ========================= FND LOG ===========================

5247: gl_retcode gl_bc_packets.result_code%TYPE;
5248: gms_control gl_bc_packets.result_code%TYPE;
5249:
5250: BEGIN
5251: -- ========================= FND LOG ===========================
5252: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLRCHK(GMS Reconcile) --> START ');
5253: psa_utils.debug_other_string(g_state_level,l_full_path, ' post_control -> ' || post_control);
5254: -- ========================= FND LOG ===========================
5255:

Line 5254: -- ========================= FND LOG ===========================

5250: BEGIN
5251: -- ========================= FND LOG ===========================
5252: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLRCHK(GMS Reconcile) --> START ');
5253: psa_utils.debug_other_string(g_state_level,l_full_path, ' post_control -> ' || post_control);
5254: -- ========================= FND LOG ===========================
5255:
5256: IF post_control = 'X' OR post_control = 'Z' THEN
5257: gl_retcode := g_return_code;
5258: gms_control := post_control;

Line 5264: -- ========================= FND LOG ===========================

5260: gl_retcode := post_control;
5261: gms_control := gms_retcode;
5262: END IF;
5263:
5264: -- ========================= FND LOG ===========================
5265: psa_utils.debug_other_string(g_state_level,l_full_path, ' gl_retcode -> ' || gl_retcode);
5266: psa_utils.debug_other_string(g_state_level,l_full_path, ' gms_control -> ' || gms_control);
5267: -- ========================= FND LOG ===========================
5268:

Line 5267: -- ========================= FND LOG ===========================

5263:
5264: -- ========================= FND LOG ===========================
5265: psa_utils.debug_other_string(g_state_level,l_full_path, ' gl_retcode -> ' || gl_retcode);
5266: psa_utils.debug_other_string(g_state_level,l_full_path, ' gms_control -> ' || gms_control);
5267: -- ========================= FND LOG ===========================
5268:
5269: gms_stmt :=
5270: 'BEGIN '||
5271: ' GMS_UTILITY.GMS_UTIL_GL_RETURN_CODE(:g_packet_id, :g_fcmode, '||

Line 5275: -- ========================= FND LOG ===========================

5271: ' GMS_UTILITY.GMS_UTIL_GL_RETURN_CODE(:g_packet_id, :g_fcmode, '||
5272: ':gl_retcode, :gms_control, :g_partial_resv_flag); '||
5273: 'END;';
5274:
5275: -- ========================= FND LOG ===========================
5276: psa_utils.debug_other_string(g_state_level,l_full_path, ' gms_stmt -> ' || gms_stmt);
5277: -- ========================= FND LOG ===========================
5278:
5279: execute immediate gms_stmt using g_packet_id, g_fcmode, in out gl_retcode,

Line 5277: -- ========================= FND LOG ===========================

5273: 'END;';
5274:
5275: -- ========================= FND LOG ===========================
5276: psa_utils.debug_other_string(g_state_level,l_full_path, ' gms_stmt -> ' || gms_stmt);
5277: -- ========================= FND LOG ===========================
5278:
5279: execute immediate gms_stmt using g_packet_id, g_fcmode, in out gl_retcode,
5280: gms_control, g_partial_resv_flag;
5281:

Line 5287: -- ========================= FND LOG ===========================

5283: -- context's return code with it.
5284:
5285: IF gl_retcode IS NOT NULL AND gl_retcode <> 'Z' THEN
5286:
5287: -- ========================= FND LOG ===========================
5288: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_return_code -> ' || g_return_code);
5289: psa_utils.debug_other_string(g_state_level,l_full_path, ' Goto -> GMS_RECONCILE_EXIT (Normal) ');
5290: -- ========================= FND LOG ===========================
5291:

Line 5290: -- ========================= FND LOG ===========================

5286:
5287: -- ========================= FND LOG ===========================
5288: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_return_code -> ' || g_return_code);
5289: psa_utils.debug_other_string(g_state_level,l_full_path, ' Goto -> GMS_RECONCILE_EXIT (Normal) ');
5290: -- ========================= FND LOG ===========================
5291:
5292: g_return_code := gl_retcode;
5293: goto gms_reconcile_exit;
5294:

Line 5297: -- ========================= FND LOG ===========================

5293: goto gms_reconcile_exit;
5294:
5295: END IF;
5296:
5297: -- ========================= FND LOG ===========================
5298: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE ');
5299: -- ========================= FND LOG ===========================
5300: g_debug := g_debug||' GLRCHK Failed';
5301: RETURN(FALSE);

Line 5299: -- ========================= FND LOG ===========================

5295: END IF;
5296:
5297: -- ========================= FND LOG ===========================
5298: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE ');
5299: -- ========================= FND LOG ===========================
5300: g_debug := g_debug||' GLRCHK Failed';
5301: RETURN(FALSE);
5302:
5303: <>

Line 5309: -- ========================= FND LOG ===========================

5305: EXCEPTION
5306:
5307: WHEN OTHERS THEN
5308:
5309: -- ========================= FND LOG ===========================
5310: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
5311: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE ');
5312: -- ========================= FND LOG ===========================
5313: g_debug := g_debug||' GLRCHK Failed : '||SQLERRM;

Line 5312: -- ========================= FND LOG ===========================

5308:
5309: -- ========================= FND LOG ===========================
5310: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
5311: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE ');
5312: -- ========================= FND LOG ===========================
5313: g_debug := g_debug||' GLRCHK Failed : '||SQLERRM;
5314: RETURN(FALSE);
5315: END;
5316:

Line 5319: -- ========================= FND LOG ===========================

5315: END;
5316:
5317: END IF;
5318:
5319: -- ========================= FND LOG ===========================
5320: IF (g_psa_pacheck) THEN
5321: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_pacheck --> TRUE ');
5322: ELSE
5323: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_pacheck --> FALSE ');

Line 5325: -- ========================= FND LOG ===========================

5321: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_pacheck --> TRUE ');
5322: ELSE
5323: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_psa_pacheck --> FALSE ');
5324: END IF;
5325: -- ========================= FND LOG ===========================
5326:
5327: /*========================+
5328: | PA Reconcile |
5329: +========================*/

Line 5332: -- ========================= FND LOG ===========================

5328: | PA Reconcile |
5329: +========================*/
5330:
5331: IF (g_psa_pacheck) AND (post_control = 'X') THEN
5332: -- ========================= FND LOG ===========================
5333: psa_utils.debug_other_string(g_state_level,l_full_path, ' calling glzpacfm ');
5334: -- ========================= FND LOG ===========================
5335:
5336: DECLARE

Line 5334: -- ========================= FND LOG ===========================

5330:
5331: IF (g_psa_pacheck) AND (post_control = 'X') THEN
5332: -- ========================= FND LOG ===========================
5333: psa_utils.debug_other_string(g_state_level,l_full_path, ' calling glzpacfm ');
5334: -- ========================= FND LOG ===========================
5335:
5336: DECLARE
5337:
5338: pa_stmt VARCHAR2(400);

Line 5342: -- ========================= FND LOG ===========================

5338: pa_stmt VARCHAR2(400);
5339: err_stg VARCHAR2(1024);
5340:
5341: BEGIN
5342: -- ========================= FND LOG ===========================
5343: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLRCHK(GLZPAFCM) --> START ');
5344: -- ========================= FND LOG ===========================
5345:
5346: pa_stmt :=

Line 5344: -- ========================= FND LOG ===========================

5340:
5341: BEGIN
5342: -- ========================= FND LOG ===========================
5343: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLRCHK(GLZPAFCM) --> START ');
5344: -- ========================= FND LOG ===========================
5345:
5346: pa_stmt :=
5347: 'BEGIN '||
5348: ' PA_FUNDS_CONTROL_PKG.PA_GL_CBC_CONFIRMATION(:gl_var, :g_packet_id_var, '||

Line 5352: -- ========================= FND LOG ===========================

5348: ' PA_FUNDS_CONTROL_PKG.PA_GL_CBC_CONFIRMATION(:gl_var, :g_packet_id_var, '||
5349: ':g_fcmode_var, :g_partial_resv_flag_var, NULL, NULL,:gl_retcode, :err_stg); '||
5350: 'END;';
5351:
5352: -- ========================= FND LOG ===========================
5353: psa_utils.debug_other_string(g_state_level,l_full_path, ' pa_stmt -> ' || pa_stmt);
5354: -- ========================= FND LOG ===========================
5355:
5356: -- ========================= FND LOG ===========================

Line 5354: -- ========================= FND LOG ===========================

5350: 'END;';
5351:
5352: -- ========================= FND LOG ===========================
5353: psa_utils.debug_other_string(g_state_level,l_full_path, ' pa_stmt -> ' || pa_stmt);
5354: -- ========================= FND LOG ===========================
5355:
5356: -- ========================= FND LOG ===========================
5357: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
5358: -- ========================= FND LOG ===========================

Line 5356: -- ========================= FND LOG ===========================

5352: -- ========================= FND LOG ===========================
5353: psa_utils.debug_other_string(g_state_level,l_full_path, ' pa_stmt -> ' || pa_stmt);
5354: -- ========================= FND LOG ===========================
5355:
5356: -- ========================= FND LOG ===========================
5357: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
5358: -- ========================= FND LOG ===========================
5359:
5360: IF g_fcmode = 'U' THEN

Line 5358: -- ========================= FND LOG ===========================

5354: -- ========================= FND LOG ===========================
5355:
5356: -- ========================= FND LOG ===========================
5357: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
5358: -- ========================= FND LOG ===========================
5359:
5360: IF g_fcmode = 'U' THEN
5361: EXECUTE IMMEDIATE pa_stmt USING 'GL', g_packet_id_ursvd, g_fcmode,
5362: g_partial_resv_flag, IN OUT g_return_code, OUT err_stg;

Line 5368: -- ========================= FND LOG ===========================

5364: EXECUTE IMMEDIATE pa_stmt USING 'GL', g_packet_id, g_fcmode,
5365: g_partial_resv_flag, IN OUT g_return_code, OUT err_stg;
5366: END IF;
5367:
5368: -- ========================= FND LOG ===========================
5369: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_return_code -> ' || g_return_code);
5370: psa_utils.debug_other_string(g_state_level,l_full_path, ' err_stg -> ' || err_stg);
5371: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE');
5372: -- ========================= FND LOG ===========================

Line 5372: -- ========================= FND LOG ===========================

5368: -- ========================= FND LOG ===========================
5369: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_return_code -> ' || g_return_code);
5370: psa_utils.debug_other_string(g_state_level,l_full_path, ' err_stg -> ' || err_stg);
5371: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE');
5372: -- ========================= FND LOG ===========================
5373:
5374: EXCEPTION
5375:
5376: WHEN OTHERS THEN

Line 5378: -- ========================= FND LOG ===========================

5374: EXCEPTION
5375:
5376: WHEN OTHERS THEN
5377:
5378: -- ========================= FND LOG ===========================
5379: psa_utils.debug_other_string(g_excep_level,l_full_path, ' WHEN OTHERS EXCEPTION' );
5380: -- ========================= FND LOG ===========================
5381:
5382: /* Even when an SQL exception is raised, if the pa_retcode */

Line 5380: -- ========================= FND LOG ===========================

5376: WHEN OTHERS THEN
5377:
5378: -- ========================= FND LOG ===========================
5379: psa_utils.debug_other_string(g_excep_level,l_full_path, ' WHEN OTHERS EXCEPTION' );
5380: -- ========================= FND LOG ===========================
5381:
5382: /* Even when an SQL exception is raised, if the pa_retcode */
5383: /* has been set, indicate that processing has completed. */
5384:

Line 5385: -- ========================= FND LOG ===========================

5381:
5382: /* Even when an SQL exception is raised, if the pa_retcode */
5383: /* has been set, indicate that processing has completed. */
5384:
5385: -- ========================= FND LOG ===========================
5386: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> TRUE ');
5387: -- ========================= FND LOG ===========================
5388:
5389: END;

Line 5387: -- ========================= FND LOG ===========================

5383: /* has been set, indicate that processing has completed. */
5384:
5385: -- ========================= FND LOG ===========================
5386: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> TRUE ');
5387: -- ========================= FND LOG ===========================
5388:
5389: END;
5390:
5391: END IF;

Line 5393: -- ========================= FND LOG ===========================

5389: END;
5390:
5391: END IF;
5392:
5393: -- ========================= FND LOG ===========================
5394: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> TRUE ');
5395: -- ========================= FND LOG ===========================
5396:
5397: RETURN(TRUE);

Line 5395: -- ========================= FND LOG ===========================

5391: END IF;
5392:
5393: -- ========================= FND LOG ===========================
5394: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> TRUE ');
5395: -- ========================= FND LOG ===========================
5396:
5397: RETURN(TRUE);
5398:
5399: END glrchk;

Line 5477: -- ========================= FND LOG ===========================

5473: l_reversal_method VARCHAR2(1);
5474: l_seg_val_ret_code NUMBER;
5475: l_avoid_copying_attr VARCHAR2(1);
5476:
5477: -- ========================= FND LOG ===========================
5478: l_full_path VARCHAR2(100);
5479: -- ========================= FND LOG ===========================
5480:
5481: BEGIN

Line 5479: -- ========================= FND LOG ===========================

5475: l_avoid_copying_attr VARCHAR2(1);
5476:
5477: -- ========================= FND LOG ===========================
5478: l_full_path VARCHAR2(100);
5479: -- ========================= FND LOG ===========================
5480:
5481: BEGIN
5482:
5483: l_full_path := g_path || 'glxfje';

Line 5485: -- ========================= FND LOG ===========================

5481: BEGIN
5482:
5483: l_full_path := g_path || 'glxfje';
5484:
5485: -- ========================= FND LOG ===========================
5486: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFJE --> START ');
5487: -- ========================= FND LOG ===========================
5488:
5489: -- Get Originating Batch ID and Actual Flag

Line 5487: -- ========================= FND LOG ===========================

5483: l_full_path := g_path || 'glxfje';
5484:
5485: -- ========================= FND LOG ===========================
5486: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFJE --> START ');
5487: -- ========================= FND LOG ===========================
5488:
5489: -- Get Originating Batch ID and Actual Flag
5490: open orig_bat;
5491: fetch orig_bat into l_je_batch_id, l_actual_flag, l_max_je_line_num;

Line 5494: -- ========================= FND LOG ===========================

5490: open orig_bat;
5491: fetch orig_bat into l_je_batch_id, l_actual_flag, l_max_je_line_num;
5492: close orig_bat;
5493:
5494: -- ========================= FND LOG ===========================
5495: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_je_batch_id -> ' || l_je_batch_id);
5496: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_actual_flag -> ' || l_actual_flag);
5497: -- ========================= FND LOG ===========================
5498:

Line 5497: -- ========================= FND LOG ===========================

5493:
5494: -- ========================= FND LOG ===========================
5495: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_je_batch_id -> ' || l_je_batch_id);
5496: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_actual_flag -> ' || l_actual_flag);
5497: -- ========================= FND LOG ===========================
5498:
5499: -- Check whether we should avoid copying DFF information
5500: open avoid_copy_dff_attr;
5501: fetch avoid_copy_dff_attr into l_avoid_copying_attr;

Line 5507: -- ========================= FND LOG ===========================

5503: l_avoid_copying_attr := 'N';
5504: end if;
5505: close avoid_copy_dff_attr;
5506:
5507: -- ========================= FND LOG ===========================
5508: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_avoid_copying_attr -> ' || l_avoid_copying_attr);
5509: -- ========================= FND LOG ===========================
5510:
5511: -- Create/Delete separate Actual Batch for the generated transactions

Line 5509: -- ========================= FND LOG ===========================

5505: close avoid_copy_dff_attr;
5506:
5507: -- ========================= FND LOG ===========================
5508: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_avoid_copying_attr -> ' || l_avoid_copying_attr);
5509: -- ========================= FND LOG ===========================
5510:
5511: -- Create/Delete separate Actual Batch for the generated transactions
5512: -- if the Originating Batch is Budget/Encumbrance; else, append/delete
5513: -- the generated transactions to/from the Originating Actual Batch

Line 5516: -- ========================= FND LOG ===========================

5512: -- if the Originating Batch is Budget/Encumbrance; else, append/delete
5513: -- the generated transactions to/from the Originating Actual Batch
5514:
5515: if l_actual_flag <> 'A' then
5516: -- ========================= FND LOG ===========================
5517: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
5518: -- ========================= FND LOG ===========================
5519:
5520: if g_fcmode = 'U' then

Line 5518: -- ========================= FND LOG ===========================

5514:
5515: if l_actual_flag <> 'A' then
5516: -- ========================= FND LOG ===========================
5517: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
5518: -- ========================= FND LOG ===========================
5519:
5520: if g_fcmode = 'U' then
5521: -- ========================= FND LOG ===========================
5522: psa_utils.debug_other_string(g_state_level,l_full_path, ' goto delete_separate_batch label ');

Line 5521: -- ========================= FND LOG ===========================

5517: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
5518: -- ========================= FND LOG ===========================
5519:
5520: if g_fcmode = 'U' then
5521: -- ========================= FND LOG ===========================
5522: psa_utils.debug_other_string(g_state_level,l_full_path, ' goto delete_separate_batch label ');
5523: -- ========================= FND LOG ===========================
5524: goto delete_separate_batch;
5525: else

Line 5523: -- ========================= FND LOG ===========================

5519:
5520: if g_fcmode = 'U' then
5521: -- ========================= FND LOG ===========================
5522: psa_utils.debug_other_string(g_state_level,l_full_path, ' goto delete_separate_batch label ');
5523: -- ========================= FND LOG ===========================
5524: goto delete_separate_batch;
5525: else
5526: -- ========================= FND LOG ===========================
5527: psa_utils.debug_other_string(g_state_level,l_full_path, ' goto create_separate_batch label ');

Line 5526: -- ========================= FND LOG ===========================

5522: psa_utils.debug_other_string(g_state_level,l_full_path, ' goto delete_separate_batch label ');
5523: -- ========================= FND LOG ===========================
5524: goto delete_separate_batch;
5525: else
5526: -- ========================= FND LOG ===========================
5527: psa_utils.debug_other_string(g_state_level,l_full_path, ' goto create_separate_batch label ');
5528: -- ========================= FND LOG ===========================
5529: goto create_separate_batch;
5530: end if;

Line 5528: -- ========================= FND LOG ===========================

5524: goto delete_separate_batch;
5525: else
5526: -- ========================= FND LOG ===========================
5527: psa_utils.debug_other_string(g_state_level,l_full_path, ' goto create_separate_batch label ');
5528: -- ========================= FND LOG ===========================
5529: goto create_separate_batch;
5530: end if;
5531:
5532: end if;

Line 5594: -- ========================= FND LOG ===========================

5590: and jh.je_header_id = bp.je_header_id
5591: and bp.packet_id = g_packet_id
5592: and bp.ussgl_link_to_parent_id is not null;
5593:
5594: -- ========================= FND LOG ===========================
5595: psa_utils.debug_other_string(g_state_level,l_full_path,
5596: ' gl_je_lines for originating batch ' || sql%ROWCOUNT);
5597: -- ========================= FND LOG ===========================
5598:

Line 5597: -- ========================= FND LOG ===========================

5593:
5594: -- ========================= FND LOG ===========================
5595: psa_utils.debug_other_string(g_state_level,l_full_path,
5596: ' gl_je_lines for originating batch ' || sql%ROWCOUNT);
5597: -- ========================= FND LOG ===========================
5598:
5599: else
5600:
5601: INSERT INTO GL_JE_LINES

Line 5701: -- ========================= FND LOG ===========================

5697: AND BP.ussgl_link_to_parent_id IS NOT NULL
5698: AND JL1.je_header_id = BP.je_header_id
5699: AND JL1.je_line_num = BP.je_line_num;
5700:
5701: -- ========================= FND LOG ===========================
5702: psa_utils.debug_other_string(g_state_level,l_full_path,
5703: ' Insert GL_JE_LINES -> ' || sql%ROWCOUNT);
5704: -- ========================= FND LOG ===========================
5705:

Line 5704: -- ========================= FND LOG ===========================

5700:
5701: -- ========================= FND LOG ===========================
5702: psa_utils.debug_other_string(g_state_level,l_full_path,
5703: ' Insert GL_JE_LINES -> ' || sql%ROWCOUNT);
5704: -- ========================= FND LOG ===========================
5705:
5706: end if;
5707: else
5708:

Line 5722: -- ========================= FND LOG ===========================

5718: and bp.ussgl_link_to_parent_id IS NOT NULL
5719: )
5720: and jl.reference_10 = 'glxfje() generated: ' || g_packet_id_ursvd;
5721:
5722: -- ========================= FND LOG ===========================
5723: psa_utils.debug_other_string(g_state_level,l_full_path,
5724: ' delete gl_je_lines - Unreservation ' || sql%ROWCOUNT);
5725: -- ========================= FND LOG ===========================
5726:

Line 5725: -- ========================= FND LOG ===========================

5721:
5722: -- ========================= FND LOG ===========================
5723: psa_utils.debug_other_string(g_state_level,l_full_path,
5724: ' delete gl_je_lines - Unreservation ' || sql%ROWCOUNT);
5725: -- ========================= FND LOG ===========================
5726:
5727: end if;
5728:
5729:

Line 5767: -- ========================= FND LOG ===========================

5763: where bp1.packet_id = g_packet_id
5764: and bp1.ussgl_link_to_parent_id is not null
5765: );
5766:
5767: -- ========================= FND LOG ===========================
5768: psa_utils.debug_other_string(g_state_level,l_full_path,
5769: ' Update Control Total and Running Totals - gl_je_headers ' || SQL%ROWCOUNT);
5770: -- ========================= FND LOG ===========================
5771:

Line 5770: -- ========================= FND LOG ===========================

5766:
5767: -- ========================= FND LOG ===========================
5768: psa_utils.debug_other_string(g_state_level,l_full_path,
5769: ' Update Control Total and Running Totals - gl_je_headers ' || SQL%ROWCOUNT);
5770: -- ========================= FND LOG ===========================
5771:
5772:
5773: -- Update Batch Control Total, Running Totals, Budgetary Control Status and
5774: -- Packet ID

Line 5805: -- ========================= FND LOG ===========================

5801: and bp.ussgl_link_to_parent_id is not null
5802: )
5803: where jb.je_batch_id = l_je_batch_id;
5804:
5805: -- ========================= FND LOG ===========================
5806: psa_utils.debug_other_string(g_state_level,l_full_path,
5807: ' Update gl_je_batches - Batch Control Total, Running Totals, ' ||
5808: ' Budgetary Control Status ' || SQL%ROWCOUNT);
5809: psa_utils.debug_other_string(g_state_level,l_full_path, ' goto normal_exit label ');

Line 5810: -- ========================= FND LOG ===========================

5806: psa_utils.debug_other_string(g_state_level,l_full_path,
5807: ' Update gl_je_batches - Batch Control Total, Running Totals, ' ||
5808: ' Budgetary Control Status ' || SQL%ROWCOUNT);
5809: psa_utils.debug_other_string(g_state_level,l_full_path, ' goto normal_exit label ');
5810: -- ========================= FND LOG ===========================
5811:
5812: -- Invoke GL API to fix the GL_JE_SEGMENT_VALUES table.
5813: -- We invoke this API with batch_id parameter so that it works with both inserts/deletes
5814:

Line 5822: -- ========================= FND LOG ===========================

5818: goto normal_exit;
5819:
5820: <>
5821:
5822: -- ========================= FND LOG ===========================
5823: psa_utils.debug_other_string(g_state_level,l_full_path, ' Reached create_separate_batch label ');
5824: -- ========================= FND LOG ===========================
5825:
5826: -- Get new Batch ID from Sequence

Line 5824: -- ========================= FND LOG ===========================

5820: <>
5821:
5822: -- ========================= FND LOG ===========================
5823: psa_utils.debug_other_string(g_state_level,l_full_path, ' Reached create_separate_batch label ');
5824: -- ========================= FND LOG ===========================
5825:
5826: -- Get new Batch ID from Sequence
5827: open batch_id;
5828: fetch batch_id into l_gen_batch_id;

Line 5835: -- ========================= FND LOG ===========================

5831: open enable_approval;
5832: fetch enable_approval into l_enable_app;
5833: close enable_approval;
5834:
5835: -- ========================= FND LOG ===========================
5836: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_gen_batch_id -> '|| l_gen_batch_id);
5837: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_enable_app -> '|| l_enable_app.enable_je_approval_flag);
5838: -- ========================= FND LOG ===========================
5839:

Line 5838: -- ========================= FND LOG ===========================

5834:
5835: -- ========================= FND LOG ===========================
5836: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_gen_batch_id -> '|| l_gen_batch_id);
5837: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_enable_app -> '|| l_enable_app.enable_je_approval_flag);
5838: -- ========================= FND LOG ===========================
5839:
5840: if l_enable_app.enable_je_approval_flag = 'Y' then
5841:
5842: open je_source(l_je_batch_id);

Line 5846: -- ========================= FND LOG ===========================

5842: open je_source(l_je_batch_id);
5843: fetch je_source into l_je_source;
5844: close je_source;
5845:
5846: -- ========================= FND LOG ===========================
5847: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_je_source -> '|| l_je_source.je_source);
5848: -- ========================= FND LOG ===========================
5849:
5850: open je_approval(l_je_source.je_source);

Line 5848: -- ========================= FND LOG ===========================

5844: close je_source;
5845:
5846: -- ========================= FND LOG ===========================
5847: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_je_source -> '|| l_je_source.je_source);
5848: -- ========================= FND LOG ===========================
5849:
5850: open je_approval(l_je_source.je_source);
5851: fetch je_approval into l_je_approval;
5852: close je_approval;

Line 5854: -- ========================= FND LOG ===========================

5850: open je_approval(l_je_source.je_source);
5851: fetch je_approval into l_je_approval;
5852: close je_approval;
5853:
5854: -- ========================= FND LOG ===========================
5855: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_je_approval -> '|| l_je_approval.journal_approval_flag);
5856: -- ========================= FND LOG ===========================
5857:
5858: if l_je_approval.journal_approval_flag = 'Y' then

Line 5856: -- ========================= FND LOG ===========================

5852: close je_approval;
5853:
5854: -- ========================= FND LOG ===========================
5855: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_je_approval -> '|| l_je_approval.journal_approval_flag);
5856: -- ========================= FND LOG ===========================
5857:
5858: if l_je_approval.journal_approval_flag = 'Y' then
5859: l_approval_status_code := 'R';
5860: else

Line 5868: -- ========================= FND LOG ===========================

5864: else
5865: l_approval_status_code := 'Z';
5866: end if;
5867:
5868: -- ========================= FND LOG ===========================
5869: psa_utils.debug_other_string(g_state_level,l_full_path,
5870: ' l_approval_status_code -> '|| l_approval_status_code);
5871: -- ========================= FND LOG ===========================
5872:

Line 5871: -- ========================= FND LOG ===========================

5867:
5868: -- ========================= FND LOG ===========================
5869: psa_utils.debug_other_string(g_state_level,l_full_path,
5870: ' l_approval_status_code -> '|| l_approval_status_code);
5871: -- ========================= FND LOG ===========================
5872:
5873: -- Create new Actual Batch for the Generated Transactions
5874: insert into gl_je_batches
5875: (je_batch_id,

Line 5940: -- ========================= FND LOG ===========================

5936: and bp.ussgl_link_to_parent_id is not null
5937: and jb.je_batch_id = l_je_batch_id;
5938:
5939:
5940: -- ========================= FND LOG ===========================
5941: psa_utils.debug_other_string(g_state_level,l_full_path,
5942: ' Creating new actual bacth - gl_je_batches -> '|| SQL%ROWCOUNT);
5943: -- ========================= FND LOG ===========================
5944:

Line 5943: -- ========================= FND LOG ===========================

5939:
5940: -- ========================= FND LOG ===========================
5941: psa_utils.debug_other_string(g_state_level,l_full_path,
5942: ' Creating new actual bacth - gl_je_batches -> '|| SQL%ROWCOUNT);
5943: -- ========================= FND LOG ===========================
5944:
5945:
5946: -- ========================= FND LOG ===========================
5947: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glurevd ');

Line 5946: -- ========================= FND LOG ===========================

5942: ' Creating new actual bacth - gl_je_batches -> '|| SQL%ROWCOUNT);
5943: -- ========================= FND LOG ===========================
5944:
5945:
5946: -- ========================= FND LOG ===========================
5947: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glurevd ');
5948: -- ========================= FND LOG ===========================
5949:
5950: DECLARE

Line 5948: -- ========================= FND LOG ===========================

5944:
5945:
5946: -- ========================= FND LOG ===========================
5947: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glurevd ');
5948: -- ========================= FND LOG ===========================
5949:
5950: DECLARE
5951:
5952: CURSOR batch_sources IS

Line 5961: -- ========================= FND LOG ===========================

5957: BEGIN
5958: FOR x IN batch_sources
5959: LOOP
5960:
5961: -- ========================= FND LOG ===========================
5962: psa_utils.debug_other_string(g_state_level,l_full_path, ' x.je_header_id -> '|| x.je_header_id);
5963: psa_utils.debug_other_string(g_state_level,l_full_path, ' x.je_category -> '|| x.je_category);
5964: psa_utils.debug_other_string(g_state_level,l_full_path, ' x.je_source -> '|| x.je_source);
5965: psa_utils.debug_other_string(g_state_level,l_full_path, ' x.period_name -> '|| x.period_name);

Line 5966: -- ========================= FND LOG ===========================

5962: psa_utils.debug_other_string(g_state_level,l_full_path, ' x.je_header_id -> '|| x.je_header_id);
5963: psa_utils.debug_other_string(g_state_level,l_full_path, ' x.je_category -> '|| x.je_category);
5964: psa_utils.debug_other_string(g_state_level,l_full_path, ' x.je_source -> '|| x.je_source);
5965: psa_utils.debug_other_string(g_state_level,l_full_path, ' x.period_name -> '|| x.period_name);
5966: -- ========================= FND LOG ===========================
5967:
5968: IF NOT ( glurevd(p_ledger_id => g_ledger_id,
5969: p_je_category => x.je_category,
5970: p_je_source => x.je_source,

Line 5976: -- ========================= FND LOG ===========================

5972: p_je_date => sysdate,
5973: x_reversal_method => l_reversal_method,
5974: p_balance_type => 'A')) THEN
5975:
5976: -- ========================= FND LOG ===========================
5977: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE ');
5978: -- ========================= FND LOG ===========================
5979: g_debug := g_debug||' GLXFJE Failed : glurevd returned FALSE';
5980: return (FALSE);

Line 5978: -- ========================= FND LOG ===========================

5974: p_balance_type => 'A')) THEN
5975:
5976: -- ========================= FND LOG ===========================
5977: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE ');
5978: -- ========================= FND LOG ===========================
5979: g_debug := g_debug||' GLXFJE Failed : glurevd returned FALSE';
5980: return (FALSE);
5981: END IF;
5982:

Line 6054: -- ========================= FND LOG ===========================

6050: and bp.ussgl_link_to_parent_id is not null
6051: );
6052:
6053:
6054: -- ========================= FND LOG ===========================
6055: psa_utils.debug_other_string(g_state_level,l_full_path,
6056: ' Insert gl_je_headers - Headers for Actual Batches ' || SQL%ROWCOUNT);
6057: -- ========================= FND LOG ===========================
6058: END LOOP;

Line 6057: -- ========================= FND LOG ===========================

6053:
6054: -- ========================= FND LOG ===========================
6055: psa_utils.debug_other_string(g_state_level,l_full_path,
6056: ' Insert gl_je_headers - Headers for Actual Batches ' || SQL%ROWCOUNT);
6057: -- ========================= FND LOG ===========================
6058: END LOOP;
6059: END;
6060:
6061: -- Update running totals of associated headers

Line 6081: -- ========================= FND LOG ===========================

6077: and bp.ussgl_link_to_parent_id is not null
6078: )
6079: where JH.je_batch_id = l_gen_batch_id;
6080:
6081: -- ========================= FND LOG ===========================
6082: psa_utils.debug_other_string(g_state_level,l_full_path,
6083: ' update gl_je_headers - running totals - ' || SQL%ROWCOUNT);
6084: -- ========================= FND LOG ===========================
6085:

Line 6084: -- ========================= FND LOG ===========================

6080:
6081: -- ========================= FND LOG ===========================
6082: psa_utils.debug_other_string(g_state_level,l_full_path,
6083: ' update gl_je_headers - running totals - ' || SQL%ROWCOUNT);
6084: -- ========================= FND LOG ===========================
6085:
6086: -- Insert generated transactions in packet into gl_je_lines
6087: if (l_avoid_copying_attr = 'Y') then
6088:

Line 6225: -- ========================= FND LOG ===========================

6221: GROUP BY BP.rowid;
6222:
6223: end if;
6224:
6225: -- ========================= FND LOG ===========================
6226: psa_utils.debug_other_string(g_state_level,l_full_path,
6227: ' Insert gl_je_lines - ' || SQL%ROWCOUNT);
6228: -- ========================= FND LOG ===========================
6229:

Line 6228: -- ========================= FND LOG ===========================

6224:
6225: -- ========================= FND LOG ===========================
6226: psa_utils.debug_other_string(g_state_level,l_full_path,
6227: ' Insert gl_je_lines - ' || SQL%ROWCOUNT);
6228: -- ========================= FND LOG ===========================
6229:
6230:
6231: -- Update je_batch_id of all associated generated transactions from the
6232: -- ID of the Originating Batch to that of the newly created batch so that

Line 6240: -- ========================= FND LOG ===========================

6236: set bp.je_batch_id = l_gen_batch_id
6237: where bp.packet_id = g_packet_id
6238: and bp.ussgl_link_to_parent_id is not null;
6239:
6240: -- ========================= FND LOG ===========================
6241: psa_utils.debug_other_string(g_state_level,l_full_path,
6242: ' update gl_bc_packets - je_bacth_id - ' || SQL%ROWCOUNT);
6243: -- ========================= FND LOG ===========================
6244:

Line 6243: -- ========================= FND LOG ===========================

6239:
6240: -- ========================= FND LOG ===========================
6241: psa_utils.debug_other_string(g_state_level,l_full_path,
6242: ' update gl_bc_packets - je_bacth_id - ' || SQL%ROWCOUNT);
6243: -- ========================= FND LOG ===========================
6244:
6245: -- Clean up attribute1 in gl_je_headers (contains header id of the
6246: -- originating line)
6247:

Line 6252: -- ========================= FND LOG ===========================

6248: update gl_je_headers jh
6249: set jh.attribute1 = null
6250: where jh.je_batch_id = l_gen_batch_id;
6251:
6252: -- ========================= FND LOG ===========================
6253: psa_utils.debug_other_string(g_state_level,l_full_path,
6254: ' update gl_je_headers -> ' || SQL%ROWCOUNT);
6255: psa_utils.debug_other_string(g_state_level,l_full_path,
6256: ' goto normal_exit label ');

Line 6257: -- ========================= FND LOG ===========================

6253: psa_utils.debug_other_string(g_state_level,l_full_path,
6254: ' update gl_je_headers -> ' || SQL%ROWCOUNT);
6255: psa_utils.debug_other_string(g_state_level,l_full_path,
6256: ' goto normal_exit label ');
6257: -- ========================= FND LOG ===========================
6258:
6259: -- Invoke GL API to fix the GL_JE_SEGMENT_VALUES table.
6260:
6261: l_seg_val_ret_code := gl_je_segment_values_pkg.insert_batch_segment_values(l_gen_batch_id);

Line 6266: -- ========================= FND LOG ===========================

6262:
6263: goto normal_exit;
6264:
6265: <>
6266: -- ========================= FND LOG ===========================
6267: psa_utils.debug_other_string(g_state_level,l_full_path,
6268: ' Reached delete_seperate_batch label ');
6269: -- ========================= FND LOG ===========================
6270:

Line 6269: -- ========================= FND LOG ===========================

6265: <>
6266: -- ========================= FND LOG ===========================
6267: psa_utils.debug_other_string(g_state_level,l_full_path,
6268: ' Reached delete_seperate_batch label ');
6269: -- ========================= FND LOG ===========================
6270:
6271: -- Delete all previously created associated generated transactions from
6272: -- gl_je_lines
6273:

Line 6286: -- ========================= FND LOG ===========================

6282: and bp.ussgl_link_to_parent_id is not null
6283: )
6284: and jl.reference_10 = 'glxfje() generated: ' || g_packet_id_ursvd;
6285:
6286: -- ========================= FND LOG ===========================
6287: psa_utils.debug_other_string(g_state_level,l_full_path,
6288: ' Delete gl_je_lines - ' || SQL%ROWCOUNT);
6289: -- ========================= FND LOG ===========================
6290:

Line 6289: -- ========================= FND LOG ===========================

6285:
6286: -- ========================= FND LOG ===========================
6287: psa_utils.debug_other_string(g_state_level,l_full_path,
6288: ' Delete gl_je_lines - ' || SQL%ROWCOUNT);
6289: -- ========================= FND LOG ===========================
6290:
6291: -- Delete all associated headers of the generated transactions
6292:
6293: delete from gl_je_headers jh

Line 6302: -- ========================= FND LOG ===========================

6298: where bp.packet_id = g_packet_id
6299: and bp.ussgl_link_to_parent_id is not null
6300: );
6301:
6302: -- ========================= FND LOG ===========================
6303: psa_utils.debug_other_string(g_state_level,l_full_path,
6304: ' Delete gl_je_headers - ' || SQL%ROWCOUNT);
6305: -- ========================= FND LOG ===========================
6306:

Line 6305: -- ========================= FND LOG ===========================

6301:
6302: -- ========================= FND LOG ===========================
6303: psa_utils.debug_other_string(g_state_level,l_full_path,
6304: ' Delete gl_je_headers - ' || SQL%ROWCOUNT);
6305: -- ========================= FND LOG ===========================
6306:
6307: -- Delete the associated batch of the generated transactions
6308:
6309: FOR x IN generated_bat

Line 6314: -- ========================= FND LOG ===========================

6310: LOOP
6311: delete from gl_je_batches jb
6312: where jb.je_batch_id = x.je_batch_id;
6313:
6314: -- ========================= FND LOG ===========================
6315: psa_utils.debug_other_string(g_state_level,l_full_path,
6316: ' Delete gl_je_batches - ' || SQL%ROWCOUNT);
6317: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN - TRUE ');
6318: -- ========================= FND LOG ===========================

Line 6318: -- ========================= FND LOG ===========================

6314: -- ========================= FND LOG ===========================
6315: psa_utils.debug_other_string(g_state_level,l_full_path,
6316: ' Delete gl_je_batches - ' || SQL%ROWCOUNT);
6317: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN - TRUE ');
6318: -- ========================= FND LOG ===========================
6319:
6320: -- Invoke the GL API to fix the GL_JE_SEGMENT_VALUES table
6321:
6322: l_seg_val_ret_code := gl_je_segment_values_pkg.insert_batch_segment_values(x.je_batch_id);

Line 6329: -- ========================= FND LOG ===========================

6325:
6326: return(TRUE);
6327:
6328: <>
6329: -- ========================= FND LOG ===========================
6330: psa_utils.debug_other_string(g_state_level,l_full_path,
6331: ' Reached normal_exit label');
6332: -- ========================= FND LOG ===========================
6333:

Line 6332: -- ========================= FND LOG ===========================

6328: <>
6329: -- ========================= FND LOG ===========================
6330: psa_utils.debug_other_string(g_state_level,l_full_path,
6331: ' Reached normal_exit label');
6332: -- ========================= FND LOG ===========================
6333:
6334: if NOT g_conc_flag AND l_actual_flag = 'A' then
6335: COMMIT;
6336: g_requery_flag := TRUE;

Line 6339: -- ========================= FND LOG ===========================

6335: COMMIT;
6336: g_requery_flag := TRUE;
6337: end if;
6338:
6339: -- ========================= FND LOG ===========================
6340: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN - TRUE ');
6341: -- ========================= FND LOG ===========================
6342: return(TRUE);
6343:

Line 6341: -- ========================= FND LOG ===========================

6337: end if;
6338:
6339: -- ========================= FND LOG ===========================
6340: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN - TRUE ');
6341: -- ========================= FND LOG ===========================
6342: return(TRUE);
6343:
6344:
6345: EXCEPTION

Line 6361: -- ========================= FND LOG ===========================

6357: message_token('PROCEDURE', 'Funds Checker');
6358: message_token('EVENT', SQLERRM);
6359: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
6360:
6361: -- ========================= FND LOG ===========================
6362: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
6363: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN - FALSE ');
6364: -- ========================= FND LOG ===========================
6365: g_debug := g_debug||' GLXFJE Failed : '||SQLERRM;

Line 6364: -- ========================= FND LOG ===========================

6360:
6361: -- ========================= FND LOG ===========================
6362: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
6363: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN - FALSE ');
6364: -- ========================= FND LOG ===========================
6365: g_debug := g_debug||' GLXFJE Failed : '||SQLERRM;
6366: return(FALSE);
6367:
6368: END glxfje;

Line 6396: -- ========================= FND LOG ===========================

6392:
6393: PROCEDURE glxfpp(p_packetid IN NUMBER,
6394: p_packetid_ursvd IN NUMBER) IS
6395:
6396: -- ========================= FND LOG ===========================
6397: l_full_path VARCHAR2(100);
6398: -- ========================= FND LOG ===========================
6399:
6400: BEGIN

Line 6398: -- ========================= FND LOG ===========================

6394: p_packetid_ursvd IN NUMBER) IS
6395:
6396: -- ========================= FND LOG ===========================
6397: l_full_path VARCHAR2(100);
6398: -- ========================= FND LOG ===========================
6399:
6400: BEGIN
6401:
6402: l_full_path := g_path || 'glxfpp1';

Line 6404: -- ========================= FND LOG ===========================

6400: BEGIN
6401:
6402: l_full_path := g_path || 'glxfpp1';
6403:
6404: -- ========================= FND LOG ===========================
6405: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFPP1 --> START ');
6406: -- ========================= FND LOG ===========================
6407:
6408: -- Delete Packet Transactions

Line 6406: -- ========================= FND LOG ===========================

6402: l_full_path := g_path || 'glxfpp1';
6403:
6404: -- ========================= FND LOG ===========================
6405: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFPP1 --> START ');
6406: -- ========================= FND LOG ===========================
6407:
6408: -- Delete Packet Transactions
6409: delete from gl_bc_packets bp
6410: where bp.packet_id in (p_packetid, p_packetid_ursvd);

Line 6412: -- ========================= FND LOG ===========================

6408: -- Delete Packet Transactions
6409: delete from gl_bc_packets bp
6410: where bp.packet_id in (p_packetid, p_packetid_ursvd);
6411:
6412: -- ========================= FND LOG ===========================
6413: psa_utils.debug_other_string(g_state_level,l_full_path,
6414: ' delete from gl_bc_packets ' || SQL%ROWCOUNT);
6415: -- ========================= FND LOG ===========================
6416:

Line 6415: -- ========================= FND LOG ===========================

6411:
6412: -- ========================= FND LOG ===========================
6413: psa_utils.debug_other_string(g_state_level,l_full_path,
6414: ' delete from gl_bc_packets ' || SQL%ROWCOUNT);
6415: -- ========================= FND LOG ===========================
6416:
6417: -- Delete Packet Arrival Order Record
6418: delete from gl_bc_packet_arrival_order ao
6419: where ao.packet_id in (p_packetid, p_packetid_ursvd);

Line 6421: -- ========================= FND LOG ===========================

6417: -- Delete Packet Arrival Order Record
6418: delete from gl_bc_packet_arrival_order ao
6419: where ao.packet_id in (p_packetid, p_packetid_ursvd);
6420:
6421: -- ========================= FND LOG ===========================
6422: psa_utils.debug_other_string(g_state_level,l_full_path,
6423: ' delete from gl_bc_packet_arrival_order ' || SQL%ROWCOUNT);
6424: -- ========================= FND LOG ===========================
6425:

Line 6424: -- ========================= FND LOG ===========================

6420:
6421: -- ========================= FND LOG ===========================
6422: psa_utils.debug_other_string(g_state_level,l_full_path,
6423: ' delete from gl_bc_packet_arrival_order ' || SQL%ROWCOUNT);
6424: -- ========================= FND LOG ===========================
6425:
6426: EXCEPTION
6427:
6428: WHEN OTHERS THEN

Line 6434: -- ========================= FND LOG ===========================

6430: message_token('PROCEDURE', 'Funds Checker');
6431: message_token('EVENT', SQLERRM);
6432: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
6433:
6434: -- ========================= FND LOG ===========================
6435: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
6436: -- ========================= FND LOG ===========================
6437:
6438: END glxfpp;

Line 6436: -- ========================= FND LOG ===========================

6432: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
6433:
6434: -- ========================= FND LOG ===========================
6435: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
6436: -- ========================= FND LOG ===========================
6437:
6438: END glxfpp;
6439:
6440: PROCEDURE glxfpp(p_eventid IN NUMBER) IS

Line 6442: -- ========================= FND LOG ===========================

6438: END glxfpp;
6439:
6440: PROCEDURE glxfpp(p_eventid IN NUMBER) IS
6441:
6442: -- ========================= FND LOG ===========================
6443: l_full_path VARCHAR2(100);
6444: -- ========================= FND LOG ===========================
6445:
6446: BEGIN

Line 6444: -- ========================= FND LOG ===========================

6440: PROCEDURE glxfpp(p_eventid IN NUMBER) IS
6441:
6442: -- ========================= FND LOG ===========================
6443: l_full_path VARCHAR2(100);
6444: -- ========================= FND LOG ===========================
6445:
6446: BEGIN
6447:
6448: l_full_path := g_path || 'glxfpp2';

Line 6450: -- ========================= FND LOG ===========================

6446: BEGIN
6447:
6448: l_full_path := g_path || 'glxfpp2';
6449:
6450: -- ========================= FND LOG ===========================
6451: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFPP2 --> START ');
6452: -- ========================= FND LOG ===========================
6453:
6454: -- Delete Packet Transactions

Line 6452: -- ========================= FND LOG ===========================

6448: l_full_path := g_path || 'glxfpp2';
6449:
6450: -- ========================= FND LOG ===========================
6451: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFPP2 --> START ');
6452: -- ========================= FND LOG ===========================
6453:
6454: -- Delete Packet Transactions
6455: delete from gl_bc_packets bp
6456: where bp.event_id = p_eventid;

Line 6458: -- ========================= FND LOG ===========================

6454: -- Delete Packet Transactions
6455: delete from gl_bc_packets bp
6456: where bp.event_id = p_eventid;
6457:
6458: -- ========================= FND LOG ===========================
6459: psa_utils.debug_other_string(g_state_level,l_full_path,
6460: ' delete from gl_bc_packets ' || SQL%ROWCOUNT);
6461: -- ========================= FND LOG ===========================
6462:

Line 6461: -- ========================= FND LOG ===========================

6457:
6458: -- ========================= FND LOG ===========================
6459: psa_utils.debug_other_string(g_state_level,l_full_path,
6460: ' delete from gl_bc_packets ' || SQL%ROWCOUNT);
6461: -- ========================= FND LOG ===========================
6462:
6463: -- Delete Packet Arrival Order Record
6464: delete from gl_bc_packet_arrival_order ao
6465: where ao.packet_id in (select packet_id

Line 6469: -- ========================= FND LOG ===========================

6465: where ao.packet_id in (select packet_id
6466: from gl_bc_packets
6467: where event_id = p_eventid);
6468:
6469: -- ========================= FND LOG ===========================
6470: psa_utils.debug_other_string(g_state_level,l_full_path,
6471: ' delete from gl_bc_packet_arrival_order ' || SQL%ROWCOUNT);
6472: -- ========================= FND LOG ===========================
6473:

Line 6472: -- ========================= FND LOG ===========================

6468:
6469: -- ========================= FND LOG ===========================
6470: psa_utils.debug_other_string(g_state_level,l_full_path,
6471: ' delete from gl_bc_packet_arrival_order ' || SQL%ROWCOUNT);
6472: -- ========================= FND LOG ===========================
6473:
6474: -- Delete History Record
6475: delete from gl_bc_packets_hists bp
6476: where bp.event_id = p_eventid;

Line 6478: -- ========================= FND LOG ===========================

6474: -- Delete History Record
6475: delete from gl_bc_packets_hists bp
6476: where bp.event_id = p_eventid;
6477:
6478: -- ========================= FND LOG ===========================
6479: psa_utils.debug_other_string(g_state_level,l_full_path,
6480: ' delete from gl_bc_packets_hists ' || SQL%ROWCOUNT);
6481: -- ========================= FND LOG ===========================
6482:

Line 6481: -- ========================= FND LOG ===========================

6477:
6478: -- ========================= FND LOG ===========================
6479: psa_utils.debug_other_string(g_state_level,l_full_path,
6480: ' delete from gl_bc_packets_hists ' || SQL%ROWCOUNT);
6481: -- ========================= FND LOG ===========================
6482:
6483: EXCEPTION
6484:
6485: WHEN OTHERS THEN

Line 6491: -- ========================= FND LOG ===========================

6487: message_token('PROCEDURE', 'Funds Checker');
6488: message_token('EVENT', SQLERRM);
6489: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
6490:
6491: -- ========================= FND LOG ===========================
6492: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
6493: -- ========================= FND LOG ===========================
6494:
6495: END glxfpp;

Line 6493: -- ========================= FND LOG ===========================

6489: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
6490:
6491: -- ========================= FND LOG ===========================
6492: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
6493: -- ========================= FND LOG ===========================
6494:
6495: END glxfpp;
6496:
6497: /* ============================ GLXFUF ============================ */

Line 6515: -- ========================= FND LOG ===========================

6511: -- older than a specific (relatively long) time interval. This remedies for
6512: -- cases where the update could not be done in this Module
6513:
6514: FUNCTION glxfuf RETURN BOOLEAN IS
6515: -- ========================= FND LOG ===========================
6516: l_full_path VARCHAR2(100);
6517: -- ========================= FND LOG ===========================
6518: BEGIN
6519:

Line 6517: -- ========================= FND LOG ===========================

6513:
6514: FUNCTION glxfuf RETURN BOOLEAN IS
6515: -- ========================= FND LOG ===========================
6516: l_full_path VARCHAR2(100);
6517: -- ========================= FND LOG ===========================
6518: BEGIN
6519:
6520: l_full_path := g_path || 'glxfuf';
6521:

Line 6522: -- ========================= FND LOG ===========================

6518: BEGIN
6519:
6520: l_full_path := g_path || 'glxfuf';
6521:
6522: -- ========================= FND LOG ===========================
6523: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfuf -> START ');
6524: -- ========================= FND LOG ===========================
6525:
6526: -- Update Status Code for the Packet Transactions

Line 6524: -- ========================= FND LOG ===========================

6520: l_full_path := g_path || 'glxfuf';
6521:
6522: -- ========================= FND LOG ===========================
6523: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfuf -> START ');
6524: -- ========================= FND LOG ===========================
6525:
6526: -- Update Status Code for the Packet Transactions
6527: update gl_bc_packets bp
6528: set bp.status_code = 'T'

Line 6531: -- ========================= FND LOG ===========================

6527: update gl_bc_packets bp
6528: set bp.status_code = 'T'
6529: where bp.packet_id = g_packet_id;
6530:
6531: -- ========================= FND LOG ===========================
6532: psa_utils.debug_other_string(g_state_level,l_full_path,
6533: ' g_packet_id -> ' || g_packet_id );
6534: psa_utils.debug_other_string(g_state_level,l_full_path,
6535: ' update gl_bc_packets with T -> ' || SQL%ROWCOUNT );

Line 6536: -- ========================= FND LOG ===========================

6532: psa_utils.debug_other_string(g_state_level,l_full_path,
6533: ' g_packet_id -> ' || g_packet_id );
6534: psa_utils.debug_other_string(g_state_level,l_full_path,
6535: ' update gl_bc_packets with T -> ' || SQL%ROWCOUNT );
6536: -- ========================= FND LOG ===========================
6537:
6538: -- Update Affect Funds Flag
6539: update gl_bc_packet_arrival_order ao
6540: set ao.affect_funds_flag = 'N'

Line 6543: -- ========================= FND LOG ===========================

6539: update gl_bc_packet_arrival_order ao
6540: set ao.affect_funds_flag = 'N'
6541: where ao.packet_id = g_packet_id;
6542:
6543: -- ========================= FND LOG ===========================
6544: psa_utils.debug_other_string(g_state_level,l_full_path,
6545: ' update gl_bc_packet_arrival_order to N -> ' || SQL%ROWCOUNT );
6546: -- ========================= FND LOG ===========================
6547:

Line 6546: -- ========================= FND LOG ===========================

6542:
6543: -- ========================= FND LOG ===========================
6544: psa_utils.debug_other_string(g_state_level,l_full_path,
6545: ' update gl_bc_packet_arrival_order to N -> ' || SQL%ROWCOUNT );
6546: -- ========================= FND LOG ===========================
6547:
6548: if not glrchk('Z') then
6549: -- ========================= FND LOG ===========================
6550: psa_utils.debug_other_string(g_state_level,l_full_path, ' glrchk(Z) -> FALSE' );

Line 6549: -- ========================= FND LOG ===========================

6545: ' update gl_bc_packet_arrival_order to N -> ' || SQL%ROWCOUNT );
6546: -- ========================= FND LOG ===========================
6547:
6548: if not glrchk('Z') then
6549: -- ========================= FND LOG ===========================
6550: psa_utils.debug_other_string(g_state_level,l_full_path, ' glrchk(Z) -> FALSE' );
6551: -- ========================= FND LOG ===========================
6552: null;
6553: end if;

Line 6551: -- ========================= FND LOG ===========================

6547:
6548: if not glrchk('Z') then
6549: -- ========================= FND LOG ===========================
6550: psa_utils.debug_other_string(g_state_level,l_full_path, ' glrchk(Z) -> FALSE' );
6551: -- ========================= FND LOG ===========================
6552: null;
6553: end if;
6554:
6555: -- ========================= FND LOG ===========================

Line 6555: -- ========================= FND LOG ===========================

6551: -- ========================= FND LOG ===========================
6552: null;
6553: end if;
6554:
6555: -- ========================= FND LOG ===========================
6556: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> TRUE' );
6557: -- ========================= FND LOG ===========================
6558: return(TRUE);
6559:

Line 6557: -- ========================= FND LOG ===========================

6553: end if;
6554:
6555: -- ========================= FND LOG ===========================
6556: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> TRUE' );
6557: -- ========================= FND LOG ===========================
6558: return(TRUE);
6559:
6560: EXCEPTION
6561:

Line 6568: -- ========================= FND LOG ===========================

6564: message_token('PROCEDURE', 'Funds Checker');
6565: message_token('EVENT', SQLERRM);
6566: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
6567:
6568: -- ========================= FND LOG ===========================
6569: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM );
6570: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN --> FALSE' );
6571: -- ========================= FND LOG ===========================
6572: g_debug := g_debug||' GLXFUF Failed : '||SQLERRM;

Line 6571: -- ========================= FND LOG ===========================

6567:
6568: -- ========================= FND LOG ===========================
6569: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM );
6570: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN --> FALSE' );
6571: -- ========================= FND LOG ===========================
6572: g_debug := g_debug||' GLXFUF Failed : '||SQLERRM;
6573: return(FALSE);
6574:
6575: END glxfuf;

Line 6596: -- ========================= FND LOG ===========================

6592: else
6593: g_no_msg_tokens := g_no_msg_tokens + 1;
6594: end if;
6595:
6596: -- ========================= FND LOG ===========================
6597: psa_utils.debug_other_string(g_excep_level,l_full_path, ' g_no_msg_tokens -> ' || g_no_msg_tokens );
6598: -- ========================= FND LOG ===========================
6599:
6600: msg_tok_names(g_no_msg_tokens) := tokname;

Line 6598: -- ========================= FND LOG ===========================

6594: end if;
6595:
6596: -- ========================= FND LOG ===========================
6597: psa_utils.debug_other_string(g_excep_level,l_full_path, ' g_no_msg_tokens -> ' || g_no_msg_tokens );
6598: -- ========================= FND LOG ===========================
6599:
6600: msg_tok_names(g_no_msg_tokens) := tokname;
6601: msg_tok_val(g_no_msg_tokens) := tokval;
6602:

Line 6637: -- ========================= FND LOG ===========================

6633:
6634: -- Clear Message Token stack
6635: g_no_msg_tokens := 0;
6636:
6637: -- ========================= FND LOG ===========================
6638: psa_utils.debug_other_string(g_excep_level,l_full_path, ' g_no_msg_tokens -> ' || g_no_msg_tokens );
6639: -- ========================= FND LOG ===========================
6640:
6641:

Line 6639: -- ========================= FND LOG ===========================

6635: g_no_msg_tokens := 0;
6636:
6637: -- ========================= FND LOG ===========================
6638: psa_utils.debug_other_string(g_excep_level,l_full_path, ' g_no_msg_tokens -> ' || g_no_msg_tokens );
6639: -- ========================= FND LOG ===========================
6640:
6641:
6642: END add_message;
6643:

Line 6696: -- ========================= FND LOG ===========================

6692: fetch c_fv_prepay_pkg
6693: into l_fv_prepay_pkg;
6694: close c_fv_prepay_pkg;
6695:
6696: -- ========================= FND LOG ===========================
6697: psa_utils.debug_other_string(g_excep_level,l_full_path, ' l_fv_prepay_pkg.status -> ' || l_fv_prepay_pkg.status );
6698: -- ========================= FND LOG ===========================
6699:
6700:

Line 6698: -- ========================= FND LOG ===========================

6694: close c_fv_prepay_pkg;
6695:
6696: -- ========================= FND LOG ===========================
6697: psa_utils.debug_other_string(g_excep_level,l_full_path, ' l_fv_prepay_pkg.status -> ' || l_fv_prepay_pkg.status );
6698: -- ========================= FND LOG ===========================
6699:
6700:
6701: if l_fv_prepay_pkg.status = 'Y' then
6702:

Line 6748: -- ========================= FND LOG ===========================

6744: message_token('PROCEDURE', 'FV_AP_PREPAY_PKG.CREATE_PREPAY_LINES Returned Failure');
6745: message_token('EVENT', SQLERRM);
6746: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
6747:
6748: -- ========================= FND LOG ===========================
6749: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
6750: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN FALSE');
6751: -- ========================= FND LOG ===========================
6752:

Line 6751: -- ========================= FND LOG ===========================

6747:
6748: -- ========================= FND LOG ===========================
6749: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
6750: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN FALSE');
6751: -- ========================= FND LOG ===========================
6752:
6753: g_debug := g_debug||' FV_PREPAY_PKG Failed : '||SQLERRM;
6754: return FALSE;
6755:

Line 6770: -- ========================= FND LOG ===========================

6766: --
6767:
6768: FUNCTION glxfar RETURN BOOLEAN IS
6769: PRAGMA AUTONOMOUS_TRANSACTION;
6770: -- ========================= FND LOG ===========================
6771: l_full_path VARCHAR2(100);
6772: -- ========================= FND LOG ===========================
6773:
6774: BEGIN

Line 6772: -- ========================= FND LOG ===========================

6768: FUNCTION glxfar RETURN BOOLEAN IS
6769: PRAGMA AUTONOMOUS_TRANSACTION;
6770: -- ========================= FND LOG ===========================
6771: l_full_path VARCHAR2(100);
6772: -- ========================= FND LOG ===========================
6773:
6774: BEGIN
6775:
6776: l_full_path := g_path || 'glxfar';

Line 6778: -- ========================= FND LOG ===========================

6774: BEGIN
6775:
6776: l_full_path := g_path || 'glxfar';
6777:
6778: -- ========================= FND LOG ===========================
6779: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFAR -> START ');
6780: -- ========================= FND LOG ===========================
6781:
6782: -- Update Affect Funds Flag to 'N' if Mode is Reservation and Return Code

Line 6780: -- ========================= FND LOG ===========================

6776: l_full_path := g_path || 'glxfar';
6777:
6778: -- ========================= FND LOG ===========================
6779: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFAR -> START ');
6780: -- ========================= FND LOG ===========================
6781:
6782: -- Update Affect Funds Flag to 'N' if Mode is Reservation and Return Code
6783: -- is Failure
6784:

Line 6793: -- ========================= FND LOG ===========================

6789: update gl_bc_packet_arrival_order ao
6790: set ao.affect_funds_flag = 'N'
6791: where ao.packet_id = g_packet_id;
6792:
6793: -- ========================= FND LOG ===========================
6794: psa_utils.debug_other_string(g_state_level,l_full_path,
6795: ' update gl_bc_packet_arrival_order -> ' || SQL%ROWCOUNT);
6796: -- ========================= FND LOG ===========================
6797:

Line 6796: -- ========================= FND LOG ===========================

6792:
6793: -- ========================= FND LOG ===========================
6794: psa_utils.debug_other_string(g_state_level,l_full_path,
6795: ' update gl_bc_packet_arrival_order -> ' || SQL%ROWCOUNT);
6796: -- ========================= FND LOG ===========================
6797:
6798: -- Commit so that a later rollback does not reset this flag
6799: commit;
6800:

Line 6801: -- ========================= FND LOG ===========================

6797:
6798: -- Commit so that a later rollback does not reset this flag
6799: commit;
6800:
6801: -- ========================= FND LOG ===========================
6802: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN - TRUE');
6803: -- ========================= FND LOG ===========================
6804: RETURN (TRUE);
6805:

Line 6803: -- ========================= FND LOG ===========================

6799: commit;
6800:
6801: -- ========================= FND LOG ===========================
6802: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN - TRUE');
6803: -- ========================= FND LOG ===========================
6804: RETURN (TRUE);
6805:
6806: end;
6807: end if;

Line 6810: -- ========================= FND LOG ===========================

6806: end;
6807: end if;
6808:
6809: commit;
6810: -- ========================= FND LOG ===========================
6811: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN - TRUE');
6812: -- ========================= FND LOG ===========================
6813: RETURN (TRUE);
6814:

Line 6812: -- ========================= FND LOG ===========================

6808:
6809: commit;
6810: -- ========================= FND LOG ===========================
6811: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN - TRUE');
6812: -- ========================= FND LOG ===========================
6813: RETURN (TRUE);
6814:
6815: EXCEPTION
6816:

Line 6823: -- ========================= FND LOG ===========================

6819: message_token('PROCEDURE', 'Funds Checker : glxfar');
6820: message_token('EVENT', SQLERRM);
6821: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
6822:
6823: -- ========================= FND LOG ===========================
6824: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
6825: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN - FALSE');
6826: -- ========================= FND LOG ===========================
6827:

Line 6826: -- ========================= FND LOG ===========================

6822:
6823: -- ========================= FND LOG ===========================
6824: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
6825: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN - FALSE');
6826: -- ========================= FND LOG ===========================
6827:
6828: g_debug := g_debug||' GLXFAR Failed : '||SQLERRM;
6829: -- bug 3471744
6830: rollback;

Line 6839: -- ========================= FND LOG ===========================

6835: /* =============================== GLXCON ================================ */
6836:
6837: FUNCTION glxcon RETURN BOOLEAN IS
6838: others EXCEPTION;
6839: -- ========================= FND LOG ===========================
6840: l_full_path VARCHAR2(100);
6841: -- ========================= FND LOG ===========================
6842:
6843: BEGIN

Line 6841: -- ========================= FND LOG ===========================

6837: FUNCTION glxcon RETURN BOOLEAN IS
6838: others EXCEPTION;
6839: -- ========================= FND LOG ===========================
6840: l_full_path VARCHAR2(100);
6841: -- ========================= FND LOG ===========================
6842:
6843: BEGIN
6844:
6845: l_full_path := g_path || 'glxcon.';

Line 6847: -- ========================= FND LOG ===========================

6843: BEGIN
6844:
6845: l_full_path := g_path || 'glxcon.';
6846:
6847: -- ========================= FND LOG ===========================
6848: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXCON -> START ');
6849: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfrs .. ');
6850: -- ========================= FND LOG ===========================
6851:

Line 6850: -- ========================= FND LOG ===========================

6846:
6847: -- ========================= FND LOG ===========================
6848: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXCON -> START ');
6849: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfrs .. ');
6850: -- ========================= FND LOG ===========================
6851:
6852: -- Get Return Status
6853: if not glxfrs then
6854: -- ========================= FND LOG ===========================

Line 6854: -- ========================= FND LOG ===========================

6850: -- ========================= FND LOG ===========================
6851:
6852: -- Get Return Status
6853: if not glxfrs then
6854: -- ========================= FND LOG ===========================
6855: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFRS - RETURN FALSE ');
6856: psa_utils.debug_other_string(g_state_level,l_full_path, ' goto fatal_error label ');
6857: -- ========================= FND LOG ===========================
6858: goto fatal_error;

Line 6857: -- ========================= FND LOG ===========================

6853: if not glxfrs then
6854: -- ========================= FND LOG ===========================
6855: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFRS - RETURN FALSE ');
6856: psa_utils.debug_other_string(g_state_level,l_full_path, ' goto fatal_error label ');
6857: -- ========================= FND LOG ===========================
6858: goto fatal_error;
6859: end if;
6860:
6861: -- ========================= FND LOG ===========================

Line 6861: -- ========================= FND LOG ===========================

6857: -- ========================= FND LOG ===========================
6858: goto fatal_error;
6859: end if;
6860:
6861: -- ========================= FND LOG ===========================
6862: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
6863: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_return_code -> '|| g_return_code);
6864: -- ========================= FND LOG ===========================
6865:

Line 6864: -- ========================= FND LOG ===========================

6860:
6861: -- ========================= FND LOG ===========================
6862: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_fcmode -> ' || g_fcmode);
6863: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_return_code -> '|| g_return_code);
6864: -- ========================= FND LOG ===========================
6865:
6866: -- Process Journal Entries Module if all transactions pass Funds
6867: -- (Un)Reservation and Append JE Flag is set
6868:

Line 6873: -- ========================= FND LOG ===========================

6869: if ((g_fcmode in ('R', 'U', 'A', 'F')) and
6870: (g_return_code in ('S', 'A'))) then
6871:
6872: if g_append_je_flag then
6873: -- ========================= FND LOG ===========================
6874: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_append_je_flag -> TRUE');
6875: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfje ..');
6876: -- ========================= FND LOG ===========================
6877:

Line 6876: -- ========================= FND LOG ===========================

6872: if g_append_je_flag then
6873: -- ========================= FND LOG ===========================
6874: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_append_je_flag -> TRUE');
6875: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfje ..');
6876: -- ========================= FND LOG ===========================
6877:
6878: if not glxfje then
6879: -- ========================= FND LOG ===========================
6880: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFJE RETURN FALSE ');

Line 6879: -- ========================= FND LOG ===========================

6875: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfje ..');
6876: -- ========================= FND LOG ===========================
6877:
6878: if not glxfje then
6879: -- ========================= FND LOG ===========================
6880: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFJE RETURN FALSE ');
6881: psa_utils.debug_other_string(g_state_level,l_full_path, ' goto fatal_error label ');
6882: -- ========================= FND LOG ===========================
6883: goto fatal_error;

Line 6882: -- ========================= FND LOG ===========================

6878: if not glxfje then
6879: -- ========================= FND LOG ===========================
6880: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFJE RETURN FALSE ');
6881: psa_utils.debug_other_string(g_state_level,l_full_path, ' goto fatal_error label ');
6882: -- ========================= FND LOG ===========================
6883: goto fatal_error;
6884: end if;
6885:
6886: end if;

Line 6893: -- ========================= FND LOG ===========================

6889: -- Packet if it passes Funds Unreservation
6890:
6891: if g_fcmode = 'U' then
6892:
6893: -- ========================= FND LOG ===========================
6894: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfpp .. ');
6895: -- ========================= FND LOG ===========================
6896: glxfpp(g_packet_id, g_packet_id_ursvd);
6897:

Line 6895: -- ========================= FND LOG ===========================

6891: if g_fcmode = 'U' then
6892:
6893: -- ========================= FND LOG ===========================
6894: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfpp .. ');
6895: -- ========================= FND LOG ===========================
6896: glxfpp(g_packet_id, g_packet_id_ursvd);
6897:
6898: -- If Journal Entries were deleted then Commit
6899: if g_append_je_flag then

Line 6900: -- ========================= FND LOG ===========================

6896: glxfpp(g_packet_id, g_packet_id_ursvd);
6897:
6898: -- If Journal Entries were deleted then Commit
6899: if g_append_je_flag then
6900: -- ========================= FND LOG ===========================
6901: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_append_je_flag -> TRUE ');
6902: psa_utils.debug_other_string(g_state_level,l_full_path, ' COMMIT ');
6903: -- ========================= FND LOG ===========================
6904: commit;

Line 6903: -- ========================= FND LOG ===========================

6899: if g_append_je_flag then
6900: -- ========================= FND LOG ===========================
6901: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_append_je_flag -> TRUE ');
6902: psa_utils.debug_other_string(g_state_level,l_full_path, ' COMMIT ');
6903: -- ========================= FND LOG ===========================
6904: commit;
6905: end if;
6906:
6907: end if;

Line 6910: -- ========================= FND LOG ===========================

6906:
6907: end if;
6908: end if;
6909:
6910: -- ========================= FND LOG ===========================
6911: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE ');
6912: -- ========================= FND LOG ===========================
6913: return(TRUE);
6914:

Line 6912: -- ========================= FND LOG ===========================

6908: end if;
6909:
6910: -- ========================= FND LOG ===========================
6911: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> TRUE ');
6912: -- ========================= FND LOG ===========================
6913: return(TRUE);
6914:
6915: <>
6916: -- ========================= FND LOG ===========================

Line 6916: -- ========================= FND LOG ===========================

6912: -- ========================= FND LOG ===========================
6913: return(TRUE);
6914:
6915: <>
6916: -- ========================= FND LOG ===========================
6917: psa_utils.debug_other_string(g_state_level,l_full_path, ' Reached fatal_error label ');
6918: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfuf .. ');
6919: -- ========================= FND LOG ===========================
6920:

Line 6919: -- ========================= FND LOG ===========================

6915: <>
6916: -- ========================= FND LOG ===========================
6917: psa_utils.debug_other_string(g_state_level,l_full_path, ' Reached fatal_error label ');
6918: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfuf .. ');
6919: -- ========================= FND LOG ===========================
6920:
6921: if not glxfuf then
6922: -- ========================= FND LOG ===========================
6923: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFUF - RETURN FALSE ');

Line 6922: -- ========================= FND LOG ===========================

6918: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxfuf .. ');
6919: -- ========================= FND LOG ===========================
6920:
6921: if not glxfuf then
6922: -- ========================= FND LOG ===========================
6923: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFUF - RETURN FALSE ');
6924: psa_utils.debug_other_string(g_state_level,l_full_path, ' RASIE OTHERS ');
6925: -- ========================= FND LOG ===========================
6926: raise others;

Line 6925: -- ========================= FND LOG ===========================

6921: if not glxfuf then
6922: -- ========================= FND LOG ===========================
6923: psa_utils.debug_other_string(g_state_level,l_full_path, ' GLXFUF - RETURN FALSE ');
6924: psa_utils.debug_other_string(g_state_level,l_full_path, ' RASIE OTHERS ');
6925: -- ========================= FND LOG ===========================
6926: raise others;
6927: end if;
6928:
6929: -- ========================= FND LOG ===========================

Line 6929: -- ========================= FND LOG ===========================

6925: -- ========================= FND LOG ===========================
6926: raise others;
6927: end if;
6928:
6929: -- ========================= FND LOG ===========================
6930: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE ');
6931: -- ========================= FND LOG ===========================
6932: g_debug := g_debug||' GLXCON Failed';
6933: return(FALSE);

Line 6931: -- ========================= FND LOG ===========================

6927: end if;
6928:
6929: -- ========================= FND LOG ===========================
6930: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE ');
6931: -- ========================= FND LOG ===========================
6932: g_debug := g_debug||' GLXCON Failed';
6933: return(FALSE);
6934:
6935: EXCEPTION

Line 6943: -- ========================= FND LOG ===========================

6939: message_token('PROCEDURE', 'Funds Checker');
6940: message_token('EVENT', SQLERRM);
6941: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');
6942:
6943: -- ========================= FND LOG ===========================
6944: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
6945: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE ');
6946: -- ========================= FND LOG ===========================
6947: g_debug := g_debug||' GLXCON Failed : '||SQLERRM;

Line 6946: -- ========================= FND LOG ===========================

6942:
6943: -- ========================= FND LOG ===========================
6944: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
6945: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE ');
6946: -- ========================= FND LOG ===========================
6947: g_debug := g_debug||' GLXCON Failed : '||SQLERRM;
6948: return(FALSE);
6949:
6950: END glxcon;

Line 6970: -- ========================= FND LOG ===========================

6966: l_je_reversal_date DATE;
6967: l_reversal_method VARCHAR2(1);
6968: l_reversal_period VARCHAR2(15);
6969: l_reversal_date DATE;
6970: -- ========================= FND LOG ===========================
6971: l_full_path VARCHAR2(100);
6972: -- ========================= FND LOG ===========================
6973: BEGIN
6974:

Line 6972: -- ========================= FND LOG ===========================

6968: l_reversal_period VARCHAR2(15);
6969: l_reversal_date DATE;
6970: -- ========================= FND LOG ===========================
6971: l_full_path VARCHAR2(100);
6972: -- ========================= FND LOG ===========================
6973: BEGIN
6974:
6975: l_full_path := g_path || 'glurevd';
6976:

Line 6977: -- ========================= FND LOG ===========================

6973: BEGIN
6974:
6975: l_full_path := g_path || 'glurevd';
6976:
6977: -- ========================= FND LOG ===========================
6978: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_ledger_id -> ' || p_ledger_id);
6979: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_je_category -> ' || p_je_category);
6980: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_je_source -> ' || p_je_source);
6981: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_je_period -> ' || p_je_period);

Line 6985: -- ========================= FND LOG ===========================

6981: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_je_period -> ' || p_je_period);
6982: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_je_date -> '
6983: || to_char(p_je_date, 'DD-MON-YYYY'));
6984: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_balance_type -> ' || p_balance_type);
6985: -- ========================= FND LOG ===========================
6986:
6987: IF (p_balance_type = 'A') THEN
6988: BEGIN
6989: GL_AUTOREVERSE_DATE_PKG.GET_REVERSAL_PERIOD_DATE(

Line 7000: -- ========================= FND LOG ===========================

6996: x_reversal_period => l_reversal_period,
6997: x_reversal_date => l_reversal_date);
6998: EXCEPTION
6999: WHEN OTHERS THEN
7000: -- ========================= FND LOG ===========================
7001: psa_utils.debug_other_string(g_excep_level,l_full_path,
7002: 'Call to GL_AUTOREVERSE_DATE_PKG raised unhandled exception - '
7003: ||sqlcode||' - '||sqlerrm);
7004: psa_utils.debug_unexpected_msg(l_full_path);

Line 7005: -- ========================= FND LOG ===========================

7001: psa_utils.debug_other_string(g_excep_level,l_full_path,
7002: 'Call to GL_AUTOREVERSE_DATE_PKG raised unhandled exception - '
7003: ||sqlcode||' - '||sqlerrm);
7004: psa_utils.debug_unexpected_msg(l_full_path);
7005: -- ========================= FND LOG ===========================
7006:
7007: GL_AUTOREVERSE_DATE_PKG.get_default_reversal_method(
7008: g_ledger_id, p_je_category, l_reversal_method);
7009:

Line 7010: -- ========================= FND LOG ===========================

7006:
7007: GL_AUTOREVERSE_DATE_PKG.get_default_reversal_method(
7008: g_ledger_id, p_je_category, l_reversal_method);
7009:
7010: -- ========================= FND LOG ===========================
7011: psa_utils.debug_other_string(g_excep_level,l_full_path,
7012: 'l_reversal_method value returned by get_default_reversal_method : '||l_reversal_method);
7013: -- ========================= FND LOG ===========================
7014:

Line 7013: -- ========================= FND LOG ===========================

7009:
7010: -- ========================= FND LOG ===========================
7011: psa_utils.debug_other_string(g_excep_level,l_full_path,
7012: 'l_reversal_method value returned by get_default_reversal_method : '||l_reversal_method);
7013: -- ========================= FND LOG ===========================
7014:
7015: END;
7016:
7017: ELSE

Line 7022: -- ========================= FND LOG ===========================

7018:
7019: GL_AUTOREVERSE_DATE_PKG.get_default_reversal_method(
7020: g_ledger_id, p_je_category, l_reversal_method);
7021:
7022: -- ========================= FND LOG ===========================
7023: psa_utils.debug_other_string(g_excep_level,l_full_path,
7024: 'l_reversal_method value returned by get_default_reversal_method : '||l_reversal_method);
7025: -- ========================= FND LOG ===========================
7026:

Line 7025: -- ========================= FND LOG ===========================

7021:
7022: -- ========================= FND LOG ===========================
7023: psa_utils.debug_other_string(g_excep_level,l_full_path,
7024: 'l_reversal_method value returned by get_default_reversal_method : '||l_reversal_method);
7025: -- ========================= FND LOG ===========================
7026:
7027: END IF;
7028:
7029: IF (l_reversal_method IS NOT NULL) THEN

Line 7031: -- ========================= FND LOG ===========================

7027: END IF;
7028:
7029: IF (l_reversal_method IS NOT NULL) THEN
7030:
7031: -- ========================= FND LOG ===========================
7032: psa_utils.debug_other_string(g_excep_level,l_full_path,'x_reversal_method -> l_reversal_method');
7033: psa_utils.debug_other_string(g_excep_level,l_full_path,'Return -> True');
7034: -- ========================= FND LOG ===========================
7035:

Line 7034: -- ========================= FND LOG ===========================

7030:
7031: -- ========================= FND LOG ===========================
7032: psa_utils.debug_other_string(g_excep_level,l_full_path,'x_reversal_method -> l_reversal_method');
7033: psa_utils.debug_other_string(g_excep_level,l_full_path,'Return -> True');
7034: -- ========================= FND LOG ===========================
7035:
7036: x_reversal_method := l_reversal_method;
7037: return TRUE;
7038: ELSE

Line 7039: -- ========================= FND LOG ===========================

7035:
7036: x_reversal_method := l_reversal_method;
7037: return TRUE;
7038: ELSE
7039: -- ========================= FND LOG ===========================
7040: psa_utils.debug_other_string(g_excep_level,l_full_path,'Return -> False');
7041: -- ========================= FND LOG ===========================
7042:
7043: return FALSE;

Line 7041: -- ========================= FND LOG ===========================

7037: return TRUE;
7038: ELSE
7039: -- ========================= FND LOG ===========================
7040: psa_utils.debug_other_string(g_excep_level,l_full_path,'Return -> False');
7041: -- ========================= FND LOG ===========================
7042:
7043: return FALSE;
7044: END IF;
7045:

Line 7048: -- ========================= FND LOG ===========================

7044: END IF;
7045:
7046: EXCEPTION
7047: WHEN OTHERS THEN
7048: -- ========================= FND LOG ===========================
7049: psa_utils.debug_other_string(g_excep_level,l_full_path,
7050: 'Exception raised in main body execution - '||sqlcode||' - '||sqlerrm);
7051: psa_utils.debug_unexpected_msg(l_full_path);
7052: -- ========================= FND LOG ===========================

Line 7052: -- ========================= FND LOG ===========================

7048: -- ========================= FND LOG ===========================
7049: psa_utils.debug_other_string(g_excep_level,l_full_path,
7050: 'Exception raised in main body execution - '||sqlcode||' - '||sqlerrm);
7051: psa_utils.debug_unexpected_msg(l_full_path);
7052: -- ========================= FND LOG ===========================
7053: g_debug := g_debug||' GLUREVD Failed : '||SQLERRM;
7054: x_reversal_method := NULL;
7055: return FALSE;
7056:

Line 7095: -- ========================= FND LOG ===========================

7091: );
7092:
7093: OTHERS EXCEPTION;
7094: l_dummy VARCHAR2(100);
7095: -- ========================= FND LOG ===========================
7096: l_full_path VARCHAR2(100);
7097: -- ========================= FND LOG ===========================
7098: BEGIN
7099: l_full_path := g_path || 'gl_confirm_override';

Line 7097: -- ========================= FND LOG ===========================

7093: OTHERS EXCEPTION;
7094: l_dummy VARCHAR2(100);
7095: -- ========================= FND LOG ===========================
7096: l_full_path VARCHAR2(100);
7097: -- ========================= FND LOG ===========================
7098: BEGIN
7099: l_full_path := g_path || 'gl_confirm_override';
7100:
7101: -- ========================= FND LOG ===========================

Line 7101: -- ========================= FND LOG ===========================

7097: -- ========================= FND LOG ===========================
7098: BEGIN
7099: l_full_path := g_path || 'gl_confirm_override';
7100:
7101: -- ========================= FND LOG ===========================
7102: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_ledgerid -> ' || p_ledgerid);
7103: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_packetid -> ' || p_packetid);
7104: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_mode -> ' || p_mode);
7105: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_override -> ' || p_override);

Line 7111: -- ========================= FND LOG ===========================

7107: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_user_id -> ' || p_user_id);
7108: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_calling_prog_flag -> ' || p_calling_prog_flag);
7109: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_confirm_override -> ' || p_confirm_override);
7110: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_user_resp_id -> ' || p_user_resp_id);
7111: -- ========================= FND LOG ===========================
7112:
7113: if p_calling_prog_flag <> 'G' then
7114:
7115: -- =========================== FND LOG ===========================

Line 7115: -- =========================== FND LOG ===========================

7111: -- ========================= FND LOG ===========================
7112:
7113: if p_calling_prog_flag <> 'G' then
7114:
7115: -- =========================== FND LOG ===========================
7116: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_calling_prog_flag <> G -> raise others');
7117: -- ========================= FND LOG =============================
7118:
7119: raise others;

Line 7117: -- ========================= FND LOG =============================

7113: if p_calling_prog_flag <> 'G' then
7114:
7115: -- =========================== FND LOG ===========================
7116: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_calling_prog_flag <> G -> raise others');
7117: -- ========================= FND LOG =============================
7118:
7119: raise others;
7120: end if;
7121:

Line 7132: -- =========================== FND LOG ===========================

7128: p_user_id => p_user_id,
7129: p_user_resp_id => p_user_resp_id,
7130: p_calling_prog_flag => p_calling_prog_flag) then
7131:
7132: -- =========================== FND LOG ===========================
7133: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfin --> RETURN FALSE -> goto fatal_error');
7134: -- ========================= FND LOG =============================
7135:
7136: goto fatal_error;

Line 7134: -- ========================= FND LOG =============================

7130: p_calling_prog_flag => p_calling_prog_flag) then
7131:
7132: -- =========================== FND LOG ===========================
7133: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfin --> RETURN FALSE -> goto fatal_error');
7134: -- ========================= FND LOG =============================
7135:
7136: goto fatal_error;
7137: end if;
7138:

Line 7141: -- =========================== FND LOG ===========================

7137: end if;
7138:
7139: -- Override Transactions
7140: if (g_override_flag) and (p_confirm_override = 'Y') then
7141: -- =========================== FND LOG ===========================
7142: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_override_flag --> TRUE ');
7143: -- ========================= FND LOG =============================
7144:
7145: if not glxfor then

Line 7143: -- ========================= FND LOG =============================

7139: -- Override Transactions
7140: if (g_override_flag) and (p_confirm_override = 'Y') then
7141: -- =========================== FND LOG ===========================
7142: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_override_flag --> TRUE ');
7143: -- ========================= FND LOG =============================
7144:
7145: if not glxfor then
7146: -- =========================== FND LOG ===========================
7147: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfor --> RETURN FALSE -> goto fatal_error');

Line 7146: -- =========================== FND LOG ===========================

7142: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_override_flag --> TRUE ');
7143: -- ========================= FND LOG =============================
7144:
7145: if not glxfor then
7146: -- =========================== FND LOG ===========================
7147: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfor --> RETURN FALSE -> goto fatal_error');
7148: -- ========================= FND LOG =============================
7149: goto fatal_error;
7150: end if;

Line 7148: -- ========================= FND LOG =============================

7144:
7145: if not glxfor then
7146: -- =========================== FND LOG ===========================
7147: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfor --> RETURN FALSE -> goto fatal_error');
7148: -- ========================= FND LOG =============================
7149: goto fatal_error;
7150: end if;
7151:
7152: else

Line 7153: -- =========================== FND LOG ===========================

7149: goto fatal_error;
7150: end if;
7151:
7152: else
7153: -- =========================== FND LOG ===========================
7154: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_override_flag --> FALSE ');
7155: -- ========================= FND LOG =============================
7156: end if;
7157:

Line 7155: -- ========================= FND LOG =============================

7151:
7152: else
7153: -- =========================== FND LOG ===========================
7154: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_override_flag --> FALSE ');
7155: -- ========================= FND LOG =============================
7156: end if;
7157:
7158: -- =========================== FND LOG ===========================
7159: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxcon ');

Line 7158: -- =========================== FND LOG ===========================

7154: psa_utils.debug_other_string(g_state_level,l_full_path, ' g_override_flag --> FALSE ');
7155: -- ========================= FND LOG =============================
7156: end if;
7157:
7158: -- =========================== FND LOG ===========================
7159: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxcon ');
7160: -- ========================= FND LOG =============================
7161:
7162: open append_je;

Line 7160: -- ========================= FND LOG =============================

7156: end if;
7157:
7158: -- =========================== FND LOG ===========================
7159: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glxcon ');
7160: -- ========================= FND LOG =============================
7161:
7162: open append_je;
7163: fetch append_je into l_dummy;
7164: if (append_je%found) then

Line 7173: -- =========================== FND LOG ===========================

7169: close append_je;
7170:
7171: -- Set Result Codes, Return Code, Append Journal Logic
7172: if not glxcon then
7173: -- =========================== FND LOG ===========================
7174: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxcon --> RETURN FALSE -> goto fatal_error');
7175: -- ========================= FND LOG =============================
7176: goto fatal_error;
7177: end if;

Line 7175: -- ========================= FND LOG =============================

7171: -- Set Result Codes, Return Code, Append Journal Logic
7172: if not glxcon then
7173: -- =========================== FND LOG ===========================
7174: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxcon --> RETURN FALSE -> goto fatal_error');
7175: -- ========================= FND LOG =============================
7176: goto fatal_error;
7177: end if;
7178:
7179: -- =========================== FND LOG ===========================

Line 7179: -- =========================== FND LOG ===========================

7175: -- ========================= FND LOG =============================
7176: goto fatal_error;
7177: end if;
7178:
7179: -- =========================== FND LOG ===========================
7180: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glrchk ');
7181: -- ========================= FND LOG =============================
7182:
7183: if not glrchk('X') then

Line 7181: -- ========================= FND LOG =============================

7177: end if;
7178:
7179: -- =========================== FND LOG ===========================
7180: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glrchk ');
7181: -- ========================= FND LOG =============================
7182:
7183: if not glrchk('X') then
7184: -- =========================== FND LOG ===========================
7185: psa_utils.debug_other_string(g_state_level,l_full_path, ' glrchk(X) --> RETURN FALSE -> goto fatal_error');

Line 7184: -- =========================== FND LOG ===========================

7180: psa_utils.debug_other_string(g_state_level,l_full_path, ' Calling glrchk ');
7181: -- ========================= FND LOG =============================
7182:
7183: if not glrchk('X') then
7184: -- =========================== FND LOG ===========================
7185: psa_utils.debug_other_string(g_state_level,l_full_path, ' glrchk(X) --> RETURN FALSE -> goto fatal_error');
7186: -- ========================= FND LOG =============================
7187: goto fatal_error;
7188: end if;

Line 7186: -- ========================= FND LOG =============================

7182:
7183: if not glrchk('X') then
7184: -- =========================== FND LOG ===========================
7185: psa_utils.debug_other_string(g_state_level,l_full_path, ' glrchk(X) --> RETURN FALSE -> goto fatal_error');
7186: -- ========================= FND LOG =============================
7187: goto fatal_error;
7188: end if;
7189:
7190: -- =========================== FND LOG ===========================

Line 7190: -- =========================== FND LOG ===========================

7186: -- ========================= FND LOG =============================
7187: goto fatal_error;
7188: end if;
7189:
7190: -- =========================== FND LOG ===========================
7191: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_return_code = g_return_code --> ' || g_return_code);
7192: -- ========================= FND LOG =============================
7193:
7194: p_return_code := g_return_code;

Line 7192: -- ========================= FND LOG =============================

7188: end if;
7189:
7190: -- =========================== FND LOG ===========================
7191: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_return_code = g_return_code --> ' || g_return_code);
7192: -- ========================= FND LOG =============================
7193:
7194: p_return_code := g_return_code;
7195:
7196: -- =========================== FND LOG ===========================

Line 7196: -- =========================== FND LOG ===========================

7192: -- ========================= FND LOG =============================
7193:
7194: p_return_code := g_return_code;
7195:
7196: -- =========================== FND LOG ===========================
7197: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> TRUE ');
7198: -- ========================= FND LOG =============================
7199:
7200: IF (p_mode = 'U' AND NOT g_requery_flag) THEN

Line 7198: -- ========================= FND LOG =============================

7194: p_return_code := g_return_code;
7195:
7196: -- =========================== FND LOG ===========================
7197: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN --> TRUE ');
7198: -- ========================= FND LOG =============================
7199:
7200: IF (p_mode = 'U' AND NOT g_requery_flag) THEN
7201: p_unrsv_packet_id := p_packetid;
7202: -- ========================= FND LOG ===========================

Line 7202: -- ========================= FND LOG ===========================

7198: -- ========================= FND LOG =============================
7199:
7200: IF (p_mode = 'U' AND NOT g_requery_flag) THEN
7201: p_unrsv_packet_id := p_packetid;
7202: -- ========================= FND LOG ===========================
7203: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_unrsv_packet_id --> ' || p_unrsv_packet_id );
7204: -- ========================= FND LOG ===========================
7205: END IF;
7206:

Line 7204: -- ========================= FND LOG ===========================

7200: IF (p_mode = 'U' AND NOT g_requery_flag) THEN
7201: p_unrsv_packet_id := p_packetid;
7202: -- ========================= FND LOG ===========================
7203: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_unrsv_packet_id --> ' || p_unrsv_packet_id );
7204: -- ========================= FND LOG ===========================
7205: END IF;
7206:
7207: -- If g_requery_flag is TRUE set p_return_code = "Q"
7208: -- for calling form (MJE) to requery instead of the

Line 7213: -- ========================= FND LOG ===========================

7209: -- regular commit. [p_return code "Q" => Success/Advisory]
7210:
7211: IF g_requery_flag THEN
7212: p_return_code := 'Q';
7213: -- ========================= FND LOG ===========================
7214: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_return_code --> Q => Success/Advisory ');
7215: -- ========================= FND LOG ===========================
7216: END IF;
7217:

Line 7215: -- ========================= FND LOG ===========================

7211: IF g_requery_flag THEN
7212: p_return_code := 'Q';
7213: -- ========================= FND LOG ===========================
7214: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_return_code --> Q => Success/Advisory ');
7215: -- ========================= FND LOG ===========================
7216: END IF;
7217:
7218: -- ========================= FND LOG ===========================
7219: psa_utils.debug_other_string(g_state_level,l_full_path, ' Return -> True');

Line 7218: -- ========================= FND LOG ===========================

7214: psa_utils.debug_other_string(g_state_level,l_full_path, ' p_return_code --> Q => Success/Advisory ');
7215: -- ========================= FND LOG ===========================
7216: END IF;
7217:
7218: -- ========================= FND LOG ===========================
7219: psa_utils.debug_other_string(g_state_level,l_full_path, ' Return -> True');
7220: -- ========================= FND LOG ===========================
7221:
7222: return(TRUE);

Line 7220: -- ========================= FND LOG ===========================

7216: END IF;
7217:
7218: -- ========================= FND LOG ===========================
7219: psa_utils.debug_other_string(g_state_level,l_full_path, ' Return -> True');
7220: -- ========================= FND LOG ===========================
7221:
7222: return(TRUE);
7223:
7224: <>

Line 7226: -- =========================== FND LOG ===========================

7222: return(TRUE);
7223:
7224: <>
7225:
7226: -- =========================== FND LOG ===========================
7227: psa_utils.debug_other_string(g_state_level,l_full_path, ' Reached FATAL ERROR LABEL ');
7228: -- ========================= FND LOG =============================
7229:
7230: if not glxfuf then

Line 7228: -- ========================= FND LOG =============================

7224: <>
7225:
7226: -- =========================== FND LOG ===========================
7227: psa_utils.debug_other_string(g_state_level,l_full_path, ' Reached FATAL ERROR LABEL ');
7228: -- ========================= FND LOG =============================
7229:
7230: if not glxfuf then
7231: -- =========================== FND LOG ===========================
7232: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfuf --> RETURN FALSE -> RAISE OTHERS');

Line 7231: -- =========================== FND LOG ===========================

7227: psa_utils.debug_other_string(g_state_level,l_full_path, ' Reached FATAL ERROR LABEL ');
7228: -- ========================= FND LOG =============================
7229:
7230: if not glxfuf then
7231: -- =========================== FND LOG ===========================
7232: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfuf --> RETURN FALSE -> RAISE OTHERS');
7233: -- ========================= FND LOG =============================
7234: raise others;
7235: end if;

Line 7233: -- ========================= FND LOG =============================

7229:
7230: if not glxfuf then
7231: -- =========================== FND LOG ===========================
7232: psa_utils.debug_other_string(g_state_level,l_full_path, ' glxfuf --> RETURN FALSE -> RAISE OTHERS');
7233: -- ========================= FND LOG =============================
7234: raise others;
7235: end if;
7236:
7237: -- =========================== FND LOG ===========================

Line 7237: -- =========================== FND LOG ===========================

7233: -- ========================= FND LOG =============================
7234: raise others;
7235: end if;
7236:
7237: -- =========================== FND LOG ===========================
7238: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE ');
7239: -- ========================= FND LOG =============================
7240:
7241: g_debug := g_debug||' GL_CONFIRM_OVERRIDE Failed';

Line 7239: -- ========================= FND LOG =============================

7235: end if;
7236:
7237: -- =========================== FND LOG ===========================
7238: psa_utils.debug_other_string(g_state_level,l_full_path, ' RETURN -> FALSE ');
7239: -- ========================= FND LOG =============================
7240:
7241: g_debug := g_debug||' GL_CONFIRM_OVERRIDE Failed';
7242: return(FALSE);
7243:

Line 7247: -- =========================== FND LOG ===========================

7243:
7244: EXCEPTION
7245:
7246: WHEN OTHERS THEN
7247: -- =========================== FND LOG ===========================
7248: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
7249: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE ');
7250: -- ========================= FND LOG =============================
7251:

Line 7250: -- ========================= FND LOG =============================

7246: WHEN OTHERS THEN
7247: -- =========================== FND LOG ===========================
7248: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
7249: psa_utils.debug_other_string(g_excep_level,l_full_path, ' RETURN -> FALSE ');
7250: -- ========================= FND LOG =============================
7251:
7252: message_token('PROCEDURE', 'Funds Checker');
7253: message_token('EVENT', SQLERRM);
7254: add_message('SQLGL', 'GL_UNHANDLED_EXCEPTION');

Line 7298: -- =========================== FND LOG ===========================

7294: FROM v$session
7295: WHERE audsid = Q.session_id
7296: and Serial# = Q.serial_id)));
7297:
7298: -- =========================== FND LOG ===========================
7299: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete gl_bc_packets 1 deleted ' || SQL%ROWCOUNT || ' rows');
7300: -- ========================= FND LOG =============================
7301:
7302:

Line 7300: -- ========================= FND LOG =============================

7296: and Serial# = Q.serial_id)));
7297:
7298: -- =========================== FND LOG ===========================
7299: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete gl_bc_packets 1 deleted ' || SQL%ROWCOUNT || ' rows');
7300: -- ========================= FND LOG =============================
7301:
7302:
7303: DELETE from gl_bc_packets Q
7304: where

Line 7398: -- =========================== FND LOG ===========================

7394: ENTITY_ID,
7395: GROUP_ID
7396: bulk collect into g_bc_pkts_hist;
7397:
7398: -- =========================== FND LOG ===========================
7399: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete gl_bc_packets 2 deleted ' || SQL%ROWCOUNT || ' rows');
7400: -- ========================= FND LOG =============================
7401:
7402:

Line 7400: -- ========================= FND LOG =============================

7396: bulk collect into g_bc_pkts_hist;
7397:
7398: -- =========================== FND LOG ===========================
7399: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete gl_bc_packets 2 deleted ' || SQL%ROWCOUNT || ' rows');
7400: -- ========================= FND LOG =============================
7401:
7402:
7403: FORALL i IN 1..g_bc_pkts_hist.count
7404: insert into gl_bc_packets_hists

Line 7412: -- =========================== FND LOG ===========================

7408:
7409: DELETE from psa_bc_accounting_errors
7410: where (sysdate - creation_date) >= p_purge_days;
7411:
7412: -- =========================== FND LOG ===========================
7413: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete psa_bc_accounting_errors deleted ' || SQL%ROWCOUNT || ' rows');
7414: -- ========================= FND LOG =============================
7415:
7416: DELETE from psa_xla_validation_lines_logs

Line 7414: -- ========================= FND LOG =============================

7410: where (sysdate - creation_date) >= p_purge_days;
7411:
7412: -- =========================== FND LOG ===========================
7413: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete psa_bc_accounting_errors deleted ' || SQL%ROWCOUNT || ' rows');
7414: -- ========================= FND LOG =============================
7415:
7416: DELETE from psa_xla_validation_lines_logs
7417: where (sysdate - creation_date) >= p_purge_days;
7418:

Line 7419: -- =========================== FND LOG ===========================

7415:
7416: DELETE from psa_xla_validation_lines_logs
7417: where (sysdate - creation_date) >= p_purge_days;
7418:
7419: -- =========================== FND LOG ===========================
7420: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete psa_xla_validation_lines_logs deleted ' || SQL%ROWCOUNT || ' rows');
7421: -- ========================= FND LOG =============================
7422:
7423: DELETE from psa_xla_events_logs

Line 7421: -- ========================= FND LOG =============================

7417: where (sysdate - creation_date) >= p_purge_days;
7418:
7419: -- =========================== FND LOG ===========================
7420: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete psa_xla_validation_lines_logs deleted ' || SQL%ROWCOUNT || ' rows');
7421: -- ========================= FND LOG =============================
7422:
7423: DELETE from psa_xla_events_logs
7424: where (sysdate - creation_date) >= p_purge_days;
7425:

Line 7426: -- =========================== FND LOG ===========================

7422:
7423: DELETE from psa_xla_events_logs
7424: where (sysdate - creation_date) >= p_purge_days;
7425:
7426: -- =========================== FND LOG ===========================
7427: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete psa_xla_events_logs deleted ' || SQL%ROWCOUNT || ' rows');
7428: -- ========================= FND LOG =============================
7429:
7430: DELETE from psa_xla_ae_lines_logs

Line 7428: -- ========================= FND LOG =============================

7424: where (sysdate - creation_date) >= p_purge_days;
7425:
7426: -- =========================== FND LOG ===========================
7427: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete psa_xla_events_logs deleted ' || SQL%ROWCOUNT || ' rows');
7428: -- ========================= FND LOG =============================
7429:
7430: DELETE from psa_xla_ae_lines_logs
7431: where (sysdate - creation_date) >= p_purge_days;
7432:

Line 7433: -- =========================== FND LOG ===========================

7429:
7430: DELETE from psa_xla_ae_lines_logs
7431: where (sysdate - creation_date) >= p_purge_days;
7432:
7433: -- =========================== FND LOG ===========================
7434: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete psa_xla_ae_lines_logs deleted ' || SQL%ROWCOUNT || ' rows');
7435: -- ========================= FND LOG =============================
7436:
7437: DELETE from psa_xla_ae_headers_logs

Line 7435: -- ========================= FND LOG =============================

7431: where (sysdate - creation_date) >= p_purge_days;
7432:
7433: -- =========================== FND LOG ===========================
7434: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete psa_xla_ae_lines_logs deleted ' || SQL%ROWCOUNT || ' rows');
7435: -- ========================= FND LOG =============================
7436:
7437: DELETE from psa_xla_ae_headers_logs
7438: where (sysdate - creation_date) >= p_purge_days;
7439:

Line 7440: -- =========================== FND LOG ===========================

7436:
7437: DELETE from psa_xla_ae_headers_logs
7438: where (sysdate - creation_date) >= p_purge_days;
7439:
7440: -- =========================== FND LOG ===========================
7441: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete psa_xla_ae_header_logs deleted ' || SQL%ROWCOUNT || ' rows');
7442: -- ========================= FND LOG =============================
7443:
7444: -- ========================= FND LOG =============================

Line 7442: -- ========================= FND LOG =============================

7438: where (sysdate - creation_date) >= p_purge_days;
7439:
7440: -- =========================== FND LOG ===========================
7441: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete psa_xla_ae_header_logs deleted ' || SQL%ROWCOUNT || ' rows');
7442: -- ========================= FND LOG =============================
7443:
7444: -- ========================= FND LOG =============================
7445:
7446: DELETE from psa_xla_dist_links_logs

Line 7444: -- ========================= FND LOG =============================

7440: -- =========================== FND LOG ===========================
7441: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete psa_xla_ae_header_logs deleted ' || SQL%ROWCOUNT || ' rows');
7442: -- ========================= FND LOG =============================
7443:
7444: -- ========================= FND LOG =============================
7445:
7446: DELETE from psa_xla_dist_links_logs
7447: where (sysdate - creation_date) >= p_purge_days;
7448:

Line 7449: -- =========================== FND LOG ===========================

7445:
7446: DELETE from psa_xla_dist_links_logs
7447: where (sysdate - creation_date) >= p_purge_days;
7448:
7449: -- =========================== FND LOG ===========================
7450: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete psa_xla_dist_links_logs deleted ' || SQL%ROWCOUNT || ' rows');
7451: -- ========================= FND LOG =============================
7452:
7453: end if;

Line 7451: -- ========================= FND LOG =============================

7447: where (sysdate - creation_date) >= p_purge_days;
7448:
7449: -- =========================== FND LOG ===========================
7450: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete psa_xla_dist_links_logs deleted ' || SQL%ROWCOUNT || ' rows');
7451: -- ========================= FND LOG =============================
7452:
7453: end if;
7454:
7455: END optimize_packets;

Line 7500: -- =========================== FND LOG ===========================

7496: optimize_packets(p_ledger_id, 0);
7497:
7498: l_purge_date := TO_DATE(p_purge_date, 'YYYY/MM/DD HH24:MI:SS');
7499:
7500: -- =========================== FND LOG ===========================
7501: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_purge_date -> ' || TO_CHAR(l_purge_date, 'DD-MON-YYYY HH24:MI:SS'));
7502: -- ========================= FND LOG =============================
7503:
7504:

Line 7502: -- ========================= FND LOG =============================

7498: l_purge_date := TO_DATE(p_purge_date, 'YYYY/MM/DD HH24:MI:SS');
7499:
7500: -- =========================== FND LOG ===========================
7501: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_purge_date -> ' || TO_CHAR(l_purge_date, 'DD-MON-YYYY HH24:MI:SS'));
7502: -- ========================= FND LOG =============================
7503:
7504:
7505: l_stmt := 'delete from gl_bc_packets_hists '||
7506: 'where (last_update_date < :purge_date) '||

Line 7526: -- =========================== FND LOG ===========================

7522: END;
7523:
7524: l_stmt := l_stmt ||'and status_code IN ('||l_status_code||')';
7525:
7526: -- =========================== FND LOG ===========================
7527: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_stmt -> ' || l_stmt);
7528: -- ========================= FND LOG =============================
7529:
7530:

Line 7528: -- ========================= FND LOG =============================

7524: l_stmt := l_stmt ||'and status_code IN ('||l_status_code||')';
7525:
7526: -- =========================== FND LOG ===========================
7527: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_stmt -> ' || l_stmt);
7528: -- ========================= FND LOG =============================
7529:
7530:
7531: execute immediate l_stmt using l_purge_date, p_ledger_id;
7532:

Line 7552: -- =========================== FND LOG ===========================

7548:
7549: select gl_bc_packets_s.nextval into l_pkt_id
7550: from dual;
7551:
7552: -- =========================== FND LOG ===========================
7553: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_pkt_id -> ' || l_pkt_id);
7554: -- ========================= FND LOG =============================
7555:
7556: return l_pkt_id;

Line 7554: -- ========================= FND LOG =============================

7550: from dual;
7551:
7552: -- =========================== FND LOG ===========================
7553: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_pkt_id -> ' || l_pkt_id);
7554: -- ========================= FND LOG =============================
7555:
7556: return l_pkt_id;
7557: END get_packet_id;
7558:

Line 7567: -- ========================= FND LOG ===========================

7563: +=======================================================================*/
7564:
7565: FUNCTION populate_bc_pkts (p_bc_pkts IN BC_PKTS_REC) RETURN BOOLEAN IS
7566:
7567: -- ========================= FND LOG ===========================
7568: l_full_path VARCHAR2(100);
7569: -- ========================= FND LOG ===========================
7570: pragma autonomous_transaction;
7571:

Line 7569: -- ========================= FND LOG ===========================

7565: FUNCTION populate_bc_pkts (p_bc_pkts IN BC_PKTS_REC) RETURN BOOLEAN IS
7566:
7567: -- ========================= FND LOG ===========================
7568: l_full_path VARCHAR2(100);
7569: -- ========================= FND LOG ===========================
7570: pragma autonomous_transaction;
7571:
7572: BEGIN
7573:

Line 7874: -- =========================== FND LOG ===========================

7870: WHERE
7871: set_of_books_id = p_ledger_id;
7872: EXCEPTION
7873: WHEN OTHERS THEN
7874: -- =========================== FND LOG ===========================
7875: fnd_file.put_line(fnd_file.log, 'Funds C/R: Failed to fetch data from gl_sets_of_books');
7876: psa_utils.debug_other_string(g_excep_level,l_full_path,
7877: 'Funds C/R: Failed to fetch data from gl_sets_of_books');
7878: -- ========================= FND LOG =============================

Line 7878: -- ========================= FND LOG =============================

7874: -- =========================== FND LOG ===========================
7875: fnd_file.put_line(fnd_file.log, 'Funds C/R: Failed to fetch data from gl_sets_of_books');
7876: psa_utils.debug_other_string(g_excep_level,l_full_path,
7877: 'Funds C/R: Failed to fetch data from gl_sets_of_books');
7878: -- ========================= FND LOG =============================
7879: END;
7880:
7881: -- =========================== FND LOG ===========================
7882: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_sob_name -> '||l_sob_name);

Line 7881: -- =========================== FND LOG ===========================

7877: 'Funds C/R: Failed to fetch data from gl_sets_of_books');
7878: -- ========================= FND LOG =============================
7879: END;
7880:
7881: -- =========================== FND LOG ===========================
7882: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_sob_name -> '||l_sob_name);
7883: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_budgetary_control_flag -> '||l_budgetary_control_flag);
7884: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_automatic_tax_flag -> '||l_automatic_tax_flag);
7885: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_coa_id -> '||l_coa_id);

Line 7894: -- =========================== FND LOG =============================

7890: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_automatic_tax_flag -> '||l_automatic_tax_flag);
7891: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_coa_id -> '||l_coa_id);
7892: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_currency_code -> '||l_currency_code);
7893: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_check_flag -> '||l_check_flag);
7894: -- =========================== FND LOG =============================
7895:
7896: IF (l_budgetary_control_flag = 'N') THEN
7897: FND_MESSAGE.SET_NAME('PSA', 'R_FCMA0037');
7898: l_bc_not_enabled_msg := FND_MESSAGE.GET();

Line 7899: -- =========================== FND LOG ===========================

7895:
7896: IF (l_budgetary_control_flag = 'N') THEN
7897: FND_MESSAGE.SET_NAME('PSA', 'R_FCMA0037');
7898: l_bc_not_enabled_msg := FND_MESSAGE.GET();
7899: -- =========================== FND LOG ===========================
7900: psa_utils.debug_other_string(g_state_level, l_full_path,
7901: 'Funds C/R: l_budgetary_control_flag -> '||l_budgetary_control_flag); --Need to finalize the debug level
7902: fnd_file.put_line(fnd_file.log, 'Funds C/R: '||l_bc_not_enabled_msg);
7903: -- ========================= FND LOG =============================

Line 7903: -- ========================= FND LOG =============================

7899: -- =========================== FND LOG ===========================
7900: psa_utils.debug_other_string(g_state_level, l_full_path,
7901: 'Funds C/R: l_budgetary_control_flag -> '||l_budgetary_control_flag); --Need to finalize the debug level
7902: fnd_file.put_line(fnd_file.log, 'Funds C/R: '||l_bc_not_enabled_msg);
7903: -- ========================= FND LOG =============================
7904:
7905: -- =========================== XML OUT =============================
7906: fnd_file.put_line(fnd_file.output, ''||l_bc_not_enabled_msg||'');
7907: -- =========================== XML OUT =============================

Line 7922: -- =========================== FND LOG ===========================

7918: WHERE
7919: autopost_set_id = p_autopost_set_id;
7920: EXCEPTION
7921: WHEN OTHERS THEN
7922: -- =========================== FND LOG ===========================
7923: psa_utils.debug_other_string(g_excep_level,l_full_path,
7924: 'Funds C/R: Failed to fetch autopost_set_name from gl_automatic_posting_sets');
7925: fnd_file.put_line(fnd_file.log, 'Funds C/R: Failed to fetch autopost_set_name from gl_automatic_posting_sets');
7926: -- ========================= FND LOG =============================

Line 7926: -- ========================= FND LOG =============================

7922: -- =========================== FND LOG ===========================
7923: psa_utils.debug_other_string(g_excep_level,l_full_path,
7924: 'Funds C/R: Failed to fetch autopost_set_name from gl_automatic_posting_sets');
7925: fnd_file.put_line(fnd_file.log, 'Funds C/R: Failed to fetch autopost_set_name from gl_automatic_posting_sets');
7926: -- ========================= FND LOG =============================
7927: END;
7928:
7929: l_appl_id := 101;
7930: l_resp_id := FND_GLOBAL.resp_id;

Line 7933: -- =========================== FND LOG ===========================

7929: l_appl_id := 101;
7930: l_resp_id := FND_GLOBAL.resp_id;
7931: l_user_id := FND_GLOBAL.user_id;
7932:
7933: -- =========================== FND LOG ===========================
7934: fnd_file.put_line(fnd_file.log, 'Funds C/R: p_autopost_set_id -> '||p_autopost_set_id);
7935: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_autopost_set_name -> '||l_autopost_set_name);
7936: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_appl_id -> '||l_appl_id);
7937: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_resp_id -> '||l_resp_id);

Line 7944: -- =========================== FND LOG =============================

7940: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_autopost_set_name -> '||l_autopost_set_name);
7941: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_appl_id -> '||l_appl_id);
7942: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_resp_id -> '||l_resp_id);
7943: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_user_id -> '||l_user_id);
7944: -- =========================== FND LOG =============================
7945:
7946: IF (l_automatic_tax_flag = 'Y') AND (p_check_flag = 'R') THEN
7947:
7948: OPEN sel1;

Line 7990: -- =========================== FND LOG ===========================

7986: END IF;
7987:
7988: l_packet_id := get_packet_id;
7989:
7990: -- =========================== FND LOG ===========================
7991: fnd_file.put_line(fnd_file.log, 'Funds C/R: -------------------------------');
7992: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_period_name -> '||l_period_name);
7993: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_actual_flag -> '||l_actual_flag);
7994: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_je_batch_id -> '||l_je_batch_id);

Line 8005: -- =========================== FND LOG =============================

8001: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_je_batch_id -> '||l_je_batch_id);
8002: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_packet_id -> '||l_packet_id);
8003: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_batch_name -> '||l_batch_name);
8004: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_source_name -> '||l_source_name);
8005: -- =========================== FND LOG =============================
8006:
8007: -- =========================== XML OUT =============================
8008: IF (l_xml_b_header <> FALSE) THEN
8009: fnd_file.put_line(fnd_file.output, ' ');

Line 8018: -- ====== FND LOG ======

8014:
8015: -- Get the session_id and serial# for the current session
8016: -- These columns will then be inserted in gl_bc_packets.
8017:
8018: -- ====== FND LOG ======
8019: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Invoking get_session_details() ');
8020: -- ====== FND LOG ======
8021:
8022: get_session_details(l_session_id, l_serial_id);

Line 8020: -- ====== FND LOG ======

8016: -- These columns will then be inserted in gl_bc_packets.
8017:
8018: -- ====== FND LOG ======
8019: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Invoking get_session_details() ');
8020: -- ====== FND LOG ======
8021:
8022: get_session_details(l_session_id, l_serial_id);
8023:
8024: -- ====== FND LOG ======

Line 8024: -- ====== FND LOG ======

8020: -- ====== FND LOG ======
8021:
8022: get_session_details(l_session_id, l_serial_id);
8023:
8024: -- ====== FND LOG ======
8025: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Session_Id = '||l_session_id);
8026: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Serial_Id = '||l_serial_id);
8027: -- ====== FND LOG ======
8028:

Line 8027: -- ====== FND LOG ======

8023:
8024: -- ====== FND LOG ======
8025: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Session_Id = '||l_session_id);
8026: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Serial_Id = '||l_serial_id);
8027: -- ====== FND LOG ======
8028:
8029: l_main_stmt := '';
8030:
8031: -- =========================== FND LOG ===========================

Line 8031: -- =========================== FND LOG ===========================

8027: -- ====== FND LOG ======
8028:
8029: l_main_stmt := '';
8030:
8031: -- =========================== FND LOG ===========================
8032: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_main_stmt -> '||l_main_stmt);
8033: psa_utils.debug_other_string(g_state_level,l_full_path, 'Funds C/R: l_main_stmt -> '||l_main_stmt);
8034: -- =========================== FND LOG =============================
8035:

Line 8034: -- =========================== FND LOG =============================

8030:
8031: -- =========================== FND LOG ===========================
8032: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_main_stmt -> '||l_main_stmt);
8033: psa_utils.debug_other_string(g_state_level,l_full_path, 'Funds C/R: l_main_stmt -> '||l_main_stmt);
8034: -- =========================== FND LOG =============================
8035:
8036: l_tmp_stmt := 'SELECT '||
8037: l_packet_id||', '||
8038: l_ledger_id||', '||''''||

Line 8068: -- =========================== FND LOG ===========================

8064: 'NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, '||
8065: l_session_id||', '||l_serial_id||', '||l_appl_id||', '||
8066: 'NULL, NULL';
8067:
8068: -- =========================== FND LOG ===========================
8069: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_tmp_stmt -> '||l_tmp_stmt);
8070: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_tmp_stmt -> '||l_tmp_stmt);
8071: -- =========================== FND LOG =============================
8072:

Line 8071: -- =========================== FND LOG =============================

8067:
8068: -- =========================== FND LOG ===========================
8069: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_tmp_stmt -> '||l_tmp_stmt);
8070: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_tmp_stmt -> '||l_tmp_stmt);
8071: -- =========================== FND LOG =============================
8072:
8073: l_tmp_stmt := l_tmp_stmt || ' FROM gl_je_lines l, gl_je_headers h, ';
8074:
8075: IF (l_actual_flag = 'B') THEN

Line 8092: -- =========================== FND LOG ===========================

8088: END;
8089:
8090: l_tmp_stmt := l_tmp_stmt || l_action_stmt;
8091:
8092: -- =========================== FND LOG ===========================
8093: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_tmp_stmt -> '||l_tmp_stmt);
8094: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_tmp_stmt -> '||l_tmp_stmt);
8095: -- =========================== FND LOG =============================
8096:

Line 8095: -- =========================== FND LOG =============================

8091:
8092: -- =========================== FND LOG ===========================
8093: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_tmp_stmt -> '||l_tmp_stmt);
8094: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_tmp_stmt -> '||l_tmp_stmt);
8095: -- =========================== FND LOG =============================
8096:
8097: l_main_stmt := l_main_stmt || l_tmp_stmt;
8098:
8099: -- =========================== FND LOG ===========================

Line 8099: -- =========================== FND LOG ===========================

8095: -- =========================== FND LOG =============================
8096:
8097: l_main_stmt := l_main_stmt || l_tmp_stmt;
8098:
8099: -- =========================== FND LOG ===========================
8100: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_main_stmt -> '||l_main_stmt);
8101: fnd_file.put_line(fnd_file.log, 'Funds C/R: Executing l_main_stmt -> '||l_main_stmt||' using EXECUTE IMMEDIATE');
8102: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_main_stmt -> '||l_main_stmt);
8103: psa_utils.debug_other_string(g_state_level, l_full_path,

Line 8105: -- =========================== FND LOG =============================

8101: fnd_file.put_line(fnd_file.log, 'Funds C/R: Executing l_main_stmt -> '||l_main_stmt||' using EXECUTE IMMEDIATE');
8102: psa_utils.debug_other_string(g_state_level, l_full_path, 'Funds C/R: l_main_stmt -> '||l_main_stmt);
8103: psa_utils.debug_other_string(g_state_level, l_full_path,
8104: 'Funds C/R: Executing l_main_stmt -> '||l_main_stmt||' using EXECUTE IMMEDIATE');
8105: -- =========================== FND LOG =============================
8106:
8107: EXECUTE IMMEDIATE l_main_stmt BULK COLLECT INTO l_tmp_bc_pkts;
8108:
8109: l_bc_pkts.extend(l_tmp_bc_pkts.count);

Line 8121: -- ====== FND LOG ======

8117:
8118: END LOOP; --End of loop for all the batches
8119:
8120: IF NOT populate_bc_pkts (l_bc_pkts) THEN
8121: -- ====== FND LOG ======
8122: psa_utils.debug_other_string(g_error_level,l_full_path, 'Funds C/R: BCTRL -> populate_bc_pkts() failed. ');
8123: psa_utils.debug_other_string(g_error_level,l_full_path, 'Funds C/R: BCTRL -> ERROR: FATAL. ');
8124: -- ====== FND LOG ======
8125: END IF;

Line 8124: -- ====== FND LOG ======

8120: IF NOT populate_bc_pkts (l_bc_pkts) THEN
8121: -- ====== FND LOG ======
8122: psa_utils.debug_other_string(g_error_level,l_full_path, 'Funds C/R: BCTRL -> populate_bc_pkts() failed. ');
8123: psa_utils.debug_other_string(g_error_level,l_full_path, 'Funds C/R: BCTRL -> ERROR: FATAL. ');
8124: -- ====== FND LOG ======
8125: END IF;
8126:
8127: -- Invoke funds checker per packet_id
8128:

Line 8129: -- ====== FND LOG ======

8125: END IF;
8126:
8127: -- Invoke funds checker per packet_id
8128:
8129: -- ====== FND LOG ======
8130: fnd_file.put_line(fnd_file.log, 'Funds C/R: BCTRL -> Invoking glxfck() per packet.');
8131: psa_utils.debug_other_string(g_state_level,l_full_path, 'Funds C/R: BCTRL -> Invoking glxfck() per packet.');
8132: -- ====== FND LOG ======
8133:

Line 8132: -- ====== FND LOG ======

8128:
8129: -- ====== FND LOG ======
8130: fnd_file.put_line(fnd_file.log, 'Funds C/R: BCTRL -> Invoking glxfck() per packet.');
8131: psa_utils.debug_other_string(g_state_level,l_full_path, 'Funds C/R: BCTRL -> Invoking glxfck() per packet.');
8132: -- ====== FND LOG ======
8133:
8134: FOR x in 1..l_bc_pkts.count
8135: LOOP
8136: IF (x = 1 OR (l_bc_pkts(x).packet_id <> l_bc_pkts(x-1).packet_id)) THEN

Line 8138: -- ====== FND LOG ======

8134: FOR x in 1..l_bc_pkts.count
8135: LOOP
8136: IF (x = 1 OR (l_bc_pkts(x).packet_id <> l_bc_pkts(x-1).packet_id)) THEN
8137:
8138: -- ====== FND LOG ======
8139: fnd_file.put_line(fnd_file.log, 'Funds C/R: BCTRL -> Invoking glxfck() for packet_id '||l_bc_pkts(x).packet_id);
8140: psa_utils.debug_other_string(g_state_level,l_full_path,
8141: 'Funds C/R: BCTRL -> Invoking glxfck() for packet_id '||l_bc_pkts(x).packet_id);
8142: -- ====== FND LOG ======

Line 8142: -- ====== FND LOG ======

8138: -- ====== FND LOG ======
8139: fnd_file.put_line(fnd_file.log, 'Funds C/R: BCTRL -> Invoking glxfck() for packet_id '||l_bc_pkts(x).packet_id);
8140: psa_utils.debug_other_string(g_state_level,l_full_path,
8141: 'Funds C/R: BCTRL -> Invoking glxfck() for packet_id '||l_bc_pkts(x).packet_id);
8142: -- ====== FND LOG ======
8143:
8144: IF NOT glxfck(p_ledgerid => l_ledger_id,
8145: p_packetid => l_bc_pkts(x).packet_id,
8146: p_mode => l_check_flag,

Line 8153: -- ====== FND LOG ======

8149: p_user_id => l_user_id,
8150: p_user_resp_id => l_resp_id,
8151: p_calling_prog_flag => 'G',
8152: p_return_code => l_glxfck_return_code) THEN
8153: -- ====== FND LOG ======
8154: fnd_file.put_line(fnd_file.log, 'Funds C/R: BCTRL -> glxfck() failed ');
8155: psa_utils.debug_other_string(g_error_level,l_full_path, 'Funds C/R: BCTRL -> glxfck() failed ');
8156: -- ====== FND LOG ======
8157:

Line 8156: -- ====== FND LOG ======

8152: p_return_code => l_glxfck_return_code) THEN
8153: -- ====== FND LOG ======
8154: fnd_file.put_line(fnd_file.log, 'Funds C/R: BCTRL -> glxfck() failed ');
8155: psa_utils.debug_other_string(g_error_level,l_full_path, 'Funds C/R: BCTRL -> glxfck() failed ');
8156: -- ====== FND LOG ======
8157:
8158: -- ============================== FND LOG =========================
8159: fnd_file.put_line(fnd_file.log, 'Funds C/R: BCTRL l_glxfck_return_code -> T ');
8160: psa_utils.debug_other_string(g_state_level,l_full_path, 'Funds C/R: BCTRL l_glxfck_return_code -> T ');

Line 8158: -- ============================== FND LOG =========================

8154: fnd_file.put_line(fnd_file.log, 'Funds C/R: BCTRL -> glxfck() failed ');
8155: psa_utils.debug_other_string(g_error_level,l_full_path, 'Funds C/R: BCTRL -> glxfck() failed ');
8156: -- ====== FND LOG ======
8157:
8158: -- ============================== FND LOG =========================
8159: fnd_file.put_line(fnd_file.log, 'Funds C/R: BCTRL l_glxfck_return_code -> T ');
8160: psa_utils.debug_other_string(g_state_level,l_full_path, 'Funds C/R: BCTRL l_glxfck_return_code -> T ');
8161: -- ============================== FND LOG =========================
8162:

Line 8161: -- ============================== FND LOG =========================

8157:
8158: -- ============================== FND LOG =========================
8159: fnd_file.put_line(fnd_file.log, 'Funds C/R: BCTRL l_glxfck_return_code -> T ');
8160: psa_utils.debug_other_string(g_state_level,l_full_path, 'Funds C/R: BCTRL l_glxfck_return_code -> T ');
8161: -- ============================== FND LOG =========================
8162:
8163: l_glxfck_return_code := 'T';
8164:
8165: END IF;

Line 8172: -- ============================== FND LOG =========================

8168: -- If the return code for this packet is Advisory, Failure, Partial,
8169: -- Fatal, we insert into failed packets table type.
8170: IF (l_glxfck_return_code <> 'S') THEN
8171:
8172: -- ============================== FND LOG =========================
8173: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_glxfck_return_code ->'||l_glxfck_return_code);
8174: fnd_file.put_line(fnd_file.log, 'Funds C/R: Inserting into l_failed_bc_pkts for packet_id->'||l_bc_pkts(x).packet_id);
8175: psa_utils.debug_other_string(g_state_level,l_full_path,
8176: 'Funds C/R: l_glxfck_return_code ->'||l_glxfck_return_code);

Line 8179: -- ============================== FND LOG =========================

8175: psa_utils.debug_other_string(g_state_level,l_full_path,
8176: 'Funds C/R: l_glxfck_return_code ->'||l_glxfck_return_code);
8177: psa_utils.debug_other_string(g_state_level,l_full_path,
8178: 'Funds C/R: Inserting into l_failed_bc_pkts for packet_id->'||l_bc_pkts(x).packet_id);
8179: -- ============================== FND LOG =========================
8180:
8181: l_failed_bc_pkts.extend(1);
8182: l_failed_bc_pkts_cnt := l_failed_bc_pkts_cnt + 1;
8183: l_failed_bc_pkts(l_failed_bc_pkts_cnt) := l_bc_pkts(x);

Line 8187: -- =========================== FND LOG ===========================

8183: l_failed_bc_pkts(l_failed_bc_pkts_cnt) := l_bc_pkts(x);
8184:
8185: END IF;
8186:
8187: -- =========================== FND LOG ===========================
8188: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_glxfck_return_code -> '||l_glxfck_return_code);
8189: psa_utils.debug_other_string(g_state_level,l_full_path, 'Funds C/R: l_glxfck_return_code -> '||l_glxfck_return_code);
8190: -- =========================== FND LOG =============================
8191: BEGIN

Line 8190: -- =========================== FND LOG =============================

8186:
8187: -- =========================== FND LOG ===========================
8188: fnd_file.put_line(fnd_file.log, 'Funds C/R: l_glxfck_return_code -> '||l_glxfck_return_code);
8189: psa_utils.debug_other_string(g_state_level,l_full_path, 'Funds C/R: l_glxfck_return_code -> '||l_glxfck_return_code);
8190: -- =========================== FND LOG =============================
8191: BEGIN
8192: UPDATE
8193: gl_je_batches
8194: SET

Line 8215: -- =========================== FND LOG ===========================

8211: WHERE
8212: je_batch_id = l_bc_pkts(x).je_batch_id;
8213: EXCEPTION
8214: WHEN OTHERS THEN
8215: -- =========================== FND LOG ===========================
8216: psa_utils.debug_other_string(g_excep_level,l_full_path,
8217: 'Funds C/R: Failed to update budgetary_control_status for gl_je_batches');
8218: fnd_file.put_line(fnd_file.log,
8219: 'Funds C/R: Failed to update budgetary_control_status for gl_je_batches');

Line 8220: -- ========================= FND LOG =============================

8216: psa_utils.debug_other_string(g_excep_level,l_full_path,
8217: 'Funds C/R: Failed to update budgetary_control_status for gl_je_batches');
8218: fnd_file.put_line(fnd_file.log,
8219: 'Funds C/R: Failed to update budgetary_control_status for gl_je_batches');
8220: -- ========================= FND LOG =============================
8221: END;
8222:
8223: BEGIN
8224: SELECT

Line 8235: -- =========================== FND LOG ===========================

8231: lookup_code = l_glxfck_return_code
8232: AND lookup_type = 'FUNDS_CHECK_RETURN_CODE';
8233: EXCEPTION
8234: WHEN OTHERS THEN
8235: -- =========================== FND LOG ===========================
8236: psa_utils.debug_other_string(g_excep_level,l_full_path,
8237: 'Funds C/R: Failed to fetch meaning from gl_lookups');
8238: fnd_file.put_line(fnd_file.log,
8239: 'Funds C/R: Failed to fetch meaning from gl_lookups');

Line 8240: -- ========================= FND LOG =============================

8236: psa_utils.debug_other_string(g_excep_level,l_full_path,
8237: 'Funds C/R: Failed to fetch meaning from gl_lookups');
8238: fnd_file.put_line(fnd_file.log,
8239: 'Funds C/R: Failed to fetch meaning from gl_lookups');
8240: -- ========================= FND LOG =============================
8241: END;
8242:
8243: -- =========================== FND LOG ===========================
8244: fnd_file.put_line(fnd_file.log, 'Funds C/R: Return Code F Meaning l_fmeaning -> '||l_fmeaning);

Line 8243: -- =========================== FND LOG ===========================

8239: 'Funds C/R: Failed to fetch meaning from gl_lookups');
8240: -- ========================= FND LOG =============================
8241: END;
8242:
8243: -- =========================== FND LOG ===========================
8244: fnd_file.put_line(fnd_file.log, 'Funds C/R: Return Code F Meaning l_fmeaning -> '||l_fmeaning);
8245: psa_utils.debug_other_string(g_state_level,l_full_path, 'Funds C/R: Return Code F Meaning l_fmeaning -> '||l_fmeaning);
8246: -- =========================== FND LOG =============================
8247:

Line 8246: -- =========================== FND LOG =============================

8242:
8243: -- =========================== FND LOG ===========================
8244: fnd_file.put_line(fnd_file.log, 'Funds C/R: Return Code F Meaning l_fmeaning -> '||l_fmeaning);
8245: psa_utils.debug_other_string(g_state_level,l_full_path, 'Funds C/R: Return Code F Meaning l_fmeaning -> '||l_fmeaning);
8246: -- =========================== FND LOG =============================
8247:
8248: BEGIN
8249: SELECT
8250: l.meaning

Line 8262: -- =========================== FND LOG ===========================

8258: AND b.je_batch_id = l_bc_pkts(x).je_batch_id;
8259:
8260: EXCEPTION
8261: WHEN OTHERS THEN
8262: -- =========================== FND LOG ===========================
8263: psa_utils.debug_other_string(g_excep_level,l_full_path,
8264: 'Funds C/R: Failed to fetch meaning from gl_je_batches');
8265: fnd_file.put_line(fnd_file.log,
8266: 'Funds C/R: Failed to fetch meaning from gl_be_batches');

Line 8267: -- ========================= FND LOG =============================

8263: psa_utils.debug_other_string(g_excep_level,l_full_path,
8264: 'Funds C/R: Failed to fetch meaning from gl_je_batches');
8265: fnd_file.put_line(fnd_file.log,
8266: 'Funds C/R: Failed to fetch meaning from gl_be_batches');
8267: -- ========================= FND LOG =============================
8268: END;
8269:
8270: -- =========================== FND LOG ===========================
8271: fnd_file.put_line(fnd_file.log, 'Funds C/R: Return Code J Meaning l_jmeaning -> '||l_jmeaning);

Line 8270: -- =========================== FND LOG ===========================

8266: 'Funds C/R: Failed to fetch meaning from gl_be_batches');
8267: -- ========================= FND LOG =============================
8268: END;
8269:
8270: -- =========================== FND LOG ===========================
8271: fnd_file.put_line(fnd_file.log, 'Funds C/R: Return Code J Meaning l_jmeaning -> '||l_jmeaning);
8272: psa_utils.debug_other_string(g_state_level,l_full_path, 'Funds C/R: Return Code J Meaning l_jmeaning -> '||l_jmeaning);
8273: -- =========================== FND LOG =============================
8274:

Line 8273: -- =========================== FND LOG =============================

8269:
8270: -- =========================== FND LOG ===========================
8271: fnd_file.put_line(fnd_file.log, 'Funds C/R: Return Code J Meaning l_jmeaning -> '||l_jmeaning);
8272: psa_utils.debug_other_string(g_state_level,l_full_path, 'Funds C/R: Return Code J Meaning l_jmeaning -> '||l_jmeaning);
8273: -- =========================== FND LOG =============================
8274:
8275: -- =========================== XML OUT =============================
8276: fnd_file.put_line(fnd_file.output, ' ');
8277: fnd_file.put_line(fnd_file.output, ' '||l_bc_pkts(x).je_batch_name||'');

Line 8294: -- =========================== FND LOG ===========================

8290: fnd_file.put_line(fnd_file.output, ' ');
8291: END IF;
8292: -- =========================== XML OUT =============================
8293:
8294: -- =========================== FND LOG ===========================
8295: fnd_file.put_line(fnd_file.log, 'Funds C/R: -------------------------------');
8296: -- =========================== FND LOG ===========================
8297:
8298: --Now processing failed batches/packets.

Line 8296: -- =========================== FND LOG ===========================

8292: -- =========================== XML OUT =============================
8293:
8294: -- =========================== FND LOG ===========================
8295: fnd_file.put_line(fnd_file.log, 'Funds C/R: -------------------------------');
8296: -- =========================== FND LOG ===========================
8297:
8298: --Now processing failed batches/packets.
8299: FOR x in 1..l_failed_bc_pkts.count
8300: LOOP

Line 8367: -- =========================== FND LOG ===========================

8363: LOOP
8364: FETCH l_je_lines INTO l_seg_ccid, l_je_header_name, l_je_header_id, l_je_line_num, l_entered_dr,
8365: l_entered_cr, l_line_description, l_line_result_code, l_ccid, l_rowid;
8366:
8367: -- =========================== FND LOG ===========================
8368: fnd_file.put_line(fnd_file.log, 'Funds C/R: '|| l_seg_ccid||' '||l_je_header_name||' '||l_je_header_id
8369: ||' '||l_je_line_num||' '||l_entered_dr||' '||l_entered_cr||
8370: ' '||l_line_description||' '||l_line_result_code||' '||l_ccid||
8371: ' '||l_rowid);

Line 8372: -- =========================== FND LOG ===========================

8368: fnd_file.put_line(fnd_file.log, 'Funds C/R: '|| l_seg_ccid||' '||l_je_header_name||' '||l_je_header_id
8369: ||' '||l_je_line_num||' '||l_entered_dr||' '||l_entered_cr||
8370: ' '||l_line_description||' '||l_line_result_code||' '||l_ccid||
8371: ' '||l_rowid);
8372: -- =========================== FND LOG ===========================
8373: EXIT WHEN l_je_lines%NOTFOUND;
8374:
8375: BEGIN
8376: SELECT

Line 8388: -- =========================== FND LOG ===========================

8384: AND l.lookup_code = upper(substr(l_line_result_code,1,1));
8385:
8386: EXCEPTION
8387: WHEN OTHERS THEN
8388: -- =========================== FND LOG ===========================
8389: psa_utils.debug_other_string(g_excep_level,l_full_path, 'Funds C/R: Failed to fetch meaning from gl_lookups');
8390: fnd_file.put_line(fnd_file.log, 'Funds C/R: Failed to fetch meaning from gl_lookups');
8391: -- ========================= FND LOG =============================
8392: END;

Line 8391: -- ========================= FND LOG =============================

8387: WHEN OTHERS THEN
8388: -- =========================== FND LOG ===========================
8389: psa_utils.debug_other_string(g_excep_level,l_full_path, 'Funds C/R: Failed to fetch meaning from gl_lookups');
8390: fnd_file.put_line(fnd_file.log, 'Funds C/R: Failed to fetch meaning from gl_lookups');
8391: -- ========================= FND LOG =============================
8392: END;
8393:
8394:
8395: -- =========================== FND LOG ===========================

Line 8395: -- =========================== FND LOG ===========================

8391: -- ========================= FND LOG =============================
8392: END;
8393:
8394:
8395: -- =========================== FND LOG ===========================
8396: fnd_file.put_line(fnd_file.log, 'Funds C/R: '||l_failed_bc_pkts(x).je_batch_name||
8397: l_je_header_name||' '||l_seg_ccid||' '||
8398: l_entered_dr||' '||l_entered_cr||
8399: ' '||l_priority);

Line 8400: -- =========================== FND LOG ===========================

8396: fnd_file.put_line(fnd_file.log, 'Funds C/R: '||l_failed_bc_pkts(x).je_batch_name||
8397: l_je_header_name||' '||l_seg_ccid||' '||
8398: l_entered_dr||' '||l_entered_cr||
8399: ' '||l_priority);
8400: -- =========================== FND LOG ===========================
8401:
8402: -- =========================== XML OUT =============================
8403: IF (l_xml_je_lines_header <> FALSE) THEN
8404: fnd_file.put_line(fnd_file.output, ' '||l_je_header_name||'');

Line 8513: -- =========================== FND LOG ===========================

8509: WHERE
8510: rowid = l_rowid;
8511: EXCEPTION
8512: WHEN OTHERS THEN
8513: -- =========================== FND LOG ===========================
8514: psa_utils.debug_other_string(g_excep_level,l_full_path, 'Funds C/R: Failed to fetch ussgl_parent_id from gl_bc_packets');
8515: fnd_file.put_line(fnd_file.log, 'Funds C/R: Failed to fetch ussgl_parent_id from gl_bc_packets');
8516: -- ========================= FND LOG =============================
8517: END;

Line 8516: -- ========================= FND LOG =============================

8512: WHEN OTHERS THEN
8513: -- =========================== FND LOG ===========================
8514: psa_utils.debug_other_string(g_excep_level,l_full_path, 'Funds C/R: Failed to fetch ussgl_parent_id from gl_bc_packets');
8515: fnd_file.put_line(fnd_file.log, 'Funds C/R: Failed to fetch ussgl_parent_id from gl_bc_packets');
8516: -- ========================= FND LOG =============================
8517: END;
8518:
8519: l_je_bud_stmt := l_je_bud_stmt||' , p.entered_dr, p.entered_cr, p.result_code, l.description, '||
8520: ' c.code_combination_id FROM gl_code_combinations c, gl_bc_packets p, '||

Line 8839: -- =========================== FND LOG ===========================

8835: SB.dr_cr_code
8836: HAVING
8837: sum(nvl(BP.accounted_dr,0)-nvl(BP.accounted_cr,0)) <> 0;
8838:
8839: -- =========================== FND LOG ===========================
8840: psa_utils.debug_other_string(g_state_level,l_full_path, ' Insert GL_BC_PACKETS -> ' || SQL%ROWCOUNT);
8841: -- ========================= FND LOG =============================
8842:
8843: END glsibc;

Line 8841: -- ========================= FND LOG =============================

8837: sum(nvl(BP.accounted_dr,0)-nvl(BP.accounted_cr,0)) <> 0;
8838:
8839: -- =========================== FND LOG ===========================
8840: psa_utils.debug_other_string(g_state_level,l_full_path, ' Insert GL_BC_PACKETS -> ' || SQL%ROWCOUNT);
8841: -- ========================= FND LOG =============================
8842:
8843: END glsibc;
8844:
8845: /*=======================================================================+

Line 8858: -- =========================== FND LOG ===========================

8854: l_full_path VARCHAR2(100);
8855: BEGIN
8856: l_full_path := g_path||'Glsfbc';
8857:
8858: -- =========================== FND LOG ===========================
8859: fnd_file.put_line(fnd_file.log, 'p_curr_temp_id = '||p_curr_temp_id);
8860: fnd_file.put_line(fnd_file.log, 'p_ledger_id = '||p_ledger_id);
8861: fnd_file.put_line(fnd_file.log, 'SHRD0114 ' || '1 ' || 'stmt ' || 'Inserting into GL_BC_PACKETS ...');
8862: -- =========================== FND LOG =============================

Line 8862: -- =========================== FND LOG =============================

8858: -- =========================== FND LOG ===========================
8859: fnd_file.put_line(fnd_file.log, 'p_curr_temp_id = '||p_curr_temp_id);
8860: fnd_file.put_line(fnd_file.log, 'p_ledger_id = '||p_ledger_id);
8861: fnd_file.put_line(fnd_file.log, 'SHRD0114 ' || '1 ' || 'stmt ' || 'Inserting into GL_BC_PACKETS ...');
8862: -- =========================== FND LOG =============================
8863:
8864: INSERT INTO GL_BC_PACKETS
8865: (packet_id,
8866: ledger_id,

Line 9004: -- =========================== FND LOG ===========================

9000:
9001: HAVING
9002: sum(nvl(BP.accounted_dr,0)-nvl(BP.accounted_cr,0)) <> 0;
9003:
9004: -- =========================== FND LOG ===========================
9005: psa_utils.debug_other_string(g_state_level,l_full_path, ' Insert GL_BC_PACKETS -> ' || SQL%ROWCOUNT);
9006: -- ========================= FND LOG =============================
9007:
9008:

Line 9006: -- ========================= FND LOG =============================

9002: sum(nvl(BP.accounted_dr,0)-nvl(BP.accounted_cr,0)) <> 0;
9003:
9004: -- =========================== FND LOG ===========================
9005: psa_utils.debug_other_string(g_state_level,l_full_path, ' Insert GL_BC_PACKETS -> ' || SQL%ROWCOUNT);
9006: -- ========================= FND LOG =============================
9007:
9008:
9009: -- =========================== FND LOG ===========================
9010: fnd_file.put_line(fnd_file.log, 'GL_BC_PACKETS');

Line 9009: -- =========================== FND LOG ===========================

9005: psa_utils.debug_other_string(g_state_level,l_full_path, ' Insert GL_BC_PACKETS -> ' || SQL%ROWCOUNT);
9006: -- ========================= FND LOG =============================
9007:
9008:
9009: -- =========================== FND LOG ===========================
9010: fnd_file.put_line(fnd_file.log, 'GL_BC_PACKETS');
9011: fnd_file.put_line(fnd_file.log, 'SHRD0114 ' || '1 ' || 'stmt ' || 'Updating GL_BC_PACKETS ...');
9012: -- =========================== FND LOG =============================
9013:

Line 9012: -- =========================== FND LOG =============================

9008:
9009: -- =========================== FND LOG ===========================
9010: fnd_file.put_line(fnd_file.log, 'GL_BC_PACKETS');
9011: fnd_file.put_line(fnd_file.log, 'SHRD0114 ' || '1 ' || 'stmt ' || 'Updating GL_BC_PACKETS ...');
9012: -- =========================== FND LOG =============================
9013:
9014: UPDATE gl_bc_packets bp2
9015: SET (entered_dr, entered_cr, accounted_dr, accounted_cr,
9016: effect_on_funds_code) =

Line 9103: -- =========================== FND LOG ===========================

9099: AND bp2.code_combination_id IN (SELECT code_combination_id
9100: FROM gl_code_combinations
9101: WHERE template_id = p_curr_temp_id);
9102:
9103: -- =========================== FND LOG ===========================
9104: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update GL_BC_PACKETS -> ' || SQL%ROWCOUNT);
9105: -- ========================= FND LOG =============================
9106:
9107:

Line 9105: -- ========================= FND LOG =============================

9101: WHERE template_id = p_curr_temp_id);
9102:
9103: -- =========================== FND LOG ===========================
9104: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update GL_BC_PACKETS -> ' || SQL%ROWCOUNT);
9105: -- ========================= FND LOG =============================
9106:
9107:
9108:
9109: /*---------------------------------------------------+

Line 9113: -- =========================== FND LOG ===========================

9109: /*---------------------------------------------------+
9110: | The Delete statement will be executed here ALWAYS |
9111: +---------------------------------------------------*/
9112:
9113: -- =========================== FND LOG ===========================
9114: fnd_file.put_line(fnd_file.log, 'SHRD0114 ' || '1 ' || 'stmt ' || 'Deleting from GL_BC_PACKETS ...');
9115: -- =========================== FND LOG =============================
9116:
9117:

Line 9115: -- =========================== FND LOG =============================

9111: +---------------------------------------------------*/
9112:
9113: -- =========================== FND LOG ===========================
9114: fnd_file.put_line(fnd_file.log, 'SHRD0114 ' || '1 ' || 'stmt ' || 'Deleting from GL_BC_PACKETS ...');
9115: -- =========================== FND LOG =============================
9116:
9117:
9118: DELETE FROM gl_bc_packets bp
9119: WHERE bp.ledger_id = p_ledger_id

Line 9133: -- =========================== FND LOG ===========================

9129: WHERE ah.ledger_id = p_ledger_id
9130: AND ah.template_id = p_curr_temp_id
9131: AND ah.summary_code_combination_id = bp.code_combination_id);
9132:
9133: -- =========================== FND LOG ===========================
9134: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete GL_BC_PACKETS -> ' || SQL%ROWCOUNT);
9135: -- ========================= FND LOG =============================
9136:
9137: -- =========================== FND LOG ===========================

Line 9135: -- ========================= FND LOG =============================

9131: AND ah.summary_code_combination_id = bp.code_combination_id);
9132:
9133: -- =========================== FND LOG ===========================
9134: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete GL_BC_PACKETS -> ' || SQL%ROWCOUNT);
9135: -- ========================= FND LOG =============================
9136:
9137: -- =========================== FND LOG ===========================
9138: fnd_file.put_line(fnd_file.log, 'GL_BC_PACKETS');
9139: -- =========================== FND LOG =============================

Line 9137: -- =========================== FND LOG ===========================

9133: -- =========================== FND LOG ===========================
9134: psa_utils.debug_other_string(g_state_level,l_full_path, ' Delete GL_BC_PACKETS -> ' || SQL%ROWCOUNT);
9135: -- ========================= FND LOG =============================
9136:
9137: -- =========================== FND LOG ===========================
9138: fnd_file.put_line(fnd_file.log, 'GL_BC_PACKETS');
9139: -- =========================== FND LOG =============================
9140:
9141: END glsfbc;

Line 9139: -- =========================== FND LOG =============================

9135: -- ========================= FND LOG =============================
9136:
9137: -- =========================== FND LOG ===========================
9138: fnd_file.put_line(fnd_file.log, 'GL_BC_PACKETS');
9139: -- =========================== FND LOG =============================
9140:
9141: END glsfbc;
9142:
9143: /*=======================================================================+

Line 9161: -- =========================== FND LOG ===========================

9157: from v$session s, v$process p
9158: where s.paddr = p.addr
9159: and s.audsid = USERENV('SESSIONID');
9160:
9161: -- =========================== FND LOG ===========================
9162: psa_utils.debug_other_string(g_state_level,l_full_path, ' x_session_id -> ' || x_session_id);
9163: psa_utils.debug_other_string(g_state_level,l_full_path, ' x_serial_id -> ' || x_serial_id);
9164: -- ========================= FND LOG =============================
9165:

Line 9164: -- ========================= FND LOG =============================

9160:
9161: -- =========================== FND LOG ===========================
9162: psa_utils.debug_other_string(g_state_level,l_full_path, ' x_session_id -> ' || x_session_id);
9163: psa_utils.debug_other_string(g_state_level,l_full_path, ' x_serial_id -> ' || x_serial_id);
9164: -- ========================= FND LOG =============================
9165:
9166: EXCEPTION
9167: WHEN others THEN
9168: -- ========================= FND LOG ===========================

Line 9168: -- ========================= FND LOG ===========================

9164: -- ========================= FND LOG =============================
9165:
9166: EXCEPTION
9167: WHEN others THEN
9168: -- ========================= FND LOG ===========================
9169: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
9170: psa_utils.debug_other_string(g_excep_level,l_full_path, ' raise');
9171: -- ========================= FND LOG ===========================
9172:

Line 9171: -- ========================= FND LOG ===========================

9167: WHEN others THEN
9168: -- ========================= FND LOG ===========================
9169: psa_utils.debug_other_string(g_excep_level,l_full_path, ' EXCEPTION WHEN OTHERS ' || SQLERRM);
9170: psa_utils.debug_other_string(g_excep_level,l_full_path, ' raise');
9171: -- ========================= FND LOG ===========================
9172:
9173: raise;
9174: END get_session_details;
9175:

Line 9197: -- =========================== FND LOG ===========================

9193: FROM xla_ae_headers
9194: WHERE group_id = p_grp_id
9195: and application_id = p_application_id);
9196:
9197: -- =========================== FND LOG ===========================
9198: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update GL_BC_PACKETS -> ' || SQL%ROWCOUNT);
9199: -- ========================= FND LOG =============================
9200:
9201: END populate_group_id;

Line 9199: -- ========================= FND LOG =============================

9195: and application_id = p_application_id);
9196:
9197: -- =========================== FND LOG ===========================
9198: psa_utils.debug_other_string(g_state_level,l_full_path, ' Update GL_BC_PACKETS -> ' || SQL%ROWCOUNT);
9199: -- ========================= FND LOG =============================
9200:
9201: END populate_group_id;
9202:
9203:

Line 9502: -- ========================= FND LOG ===========================

9498: l_je_source_name xla_subledgers.je_source_name%type;
9499: invalid_je_source_name EXCEPTION;
9500: gl_bc_packets_empty EXCEPTION;
9501:
9502: -- ========================= FND LOG ===========================
9503: l_full_path VARCHAR2(100);
9504: -- ========================= FND LOG ===========================
9505:
9506: CURSOR get_je_source_name (p_application_id IN NUMBER) IS

Line 9504: -- ========================= FND LOG ===========================

9500: gl_bc_packets_empty EXCEPTION;
9501:
9502: -- ========================= FND LOG ===========================
9503: l_full_path VARCHAR2(100);
9504: -- ========================= FND LOG ===========================
9505:
9506: CURSOR get_je_source_name (p_application_id IN NUMBER) IS
9507: SELECT je_source_name
9508: FROM xla_subledgers

Line 9843: -- ====== FND LOG ======

9839: BEGIN
9840:
9841: l_full_path := g_path || 'budgetary_control';
9842:
9843: -- ====== FND LOG ======
9844: psa_utils.debug_other_string(g_state_level,l_full_path,
9845: ' BCTRL -> P_LEDGERID = '||p_ledgerid);
9846: psa_utils.debug_other_string(g_state_level,l_full_path,
9847: ' BCTRL -> MODE = '||PSA_BC_XLA_PVT.G_BC_MODE);

Line 9854: -- ====== FND LOG ======

9850: psa_utils.debug_other_string(g_state_level,l_full_path,
9851: ' BCTRL -> USER_ID = '||PSA_BC_XLA_PVT.G_USER_ID);
9852: psa_utils.debug_other_string(g_state_level,l_full_path,
9853: ' BCTRL -> RESP_ID = '||PSA_BC_XLA_PVT.G_USER_RESP_ID);
9854: -- ====== FND LOG ======
9855:
9856: -- First invoke GLXFIN and assign values to global variables.
9857:
9858: -- ====== FND LOG ======

Line 9858: -- ====== FND LOG ======

9854: -- ====== FND LOG ======
9855:
9856: -- First invoke GLXFIN and assign values to global variables.
9857:
9858: -- ====== FND LOG ======
9859: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Invoking glxfin() ');
9860: -- ====== FND LOG ======
9861:
9862: if not glxfin (p_ledgerid => p_ledgerid,

Line 9860: -- ====== FND LOG ======

9856: -- First invoke GLXFIN and assign values to global variables.
9857:
9858: -- ====== FND LOG ======
9859: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Invoking glxfin() ');
9860: -- ====== FND LOG ======
9861:
9862: if not glxfin (p_ledgerid => p_ledgerid,
9863: p_packetid => 0,
9864: p_mode => PSA_BC_XLA_PVT.G_BC_MODE,

Line 9871: -- ====== FND LOG ======

9867: p_user_id => PSA_BC_XLA_PVT.G_USER_ID,
9868: p_user_resp_id => PSA_BC_XLA_PVT.G_USER_RESP_ID,
9869: p_calling_prog_flag => 'S') then
9870:
9871: -- ====== FND LOG ======
9872: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> glxfin failed ');
9873: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> ERROR: FATAL ');
9874: -- ====== FND LOG ======
9875:

Line 9874: -- ====== FND LOG ======

9870:
9871: -- ====== FND LOG ======
9872: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> glxfin failed ');
9873: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> ERROR: FATAL ');
9874: -- ====== FND LOG ======
9875:
9876: p_return_code := 'T';
9877: return FALSE;
9878: end if;

Line 9895: -- ====== FND LOG ======

9891: OPEN c_cnt_events;
9892: FETCH c_cnt_events INTO l_event_cnt, l_ae_event_cnt;
9893: CLOSE c_cnt_events;
9894:
9895: -- ====== FND LOG ======
9896: psa_utils.debug_other_string(g_error_level,l_full_path,
9897: ' BCTRL -> Count of events in XLA_EVENTS_GT: '||l_event_cnt);
9898: psa_utils.debug_other_string(g_error_level,l_full_path,
9899: ' BCTRL -> Count of events in XLA_AE_LINES_GT: '||l_ae_event_cnt);

Line 9900: -- ====== FND LOG ======

9896: psa_utils.debug_other_string(g_error_level,l_full_path,
9897: ' BCTRL -> Count of events in XLA_EVENTS_GT: '||l_event_cnt);
9898: psa_utils.debug_other_string(g_error_level,l_full_path,
9899: ' BCTRL -> Count of events in XLA_AE_LINES_GT: '||l_ae_event_cnt);
9900: -- ====== FND LOG ======
9901:
9902: fnd_file.put_line(fnd_file.log,'The following are the invalid accounting errrors');
9903: fnd_file.put_line(fnd_file.log,'=============================================== ');
9904: for acc_error in ( select document_reference , encoded_message

Line 9913: -- ====== FND LOG ======

9909: fnd_file.put_line(fnd_file.log , acc_error.encoded_message);
9910: End loop;
9911:
9912: IF NOT(NVL(l_ae_event_cnt, 0) = l_event_cnt) THEN
9913: -- ====== FND LOG ======
9914: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> Budgetary_Control failed ');
9915: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> ERROR: FATAL ');
9916: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL p_return_code -> T');
9917: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL Return False ');

Line 9931: -- ====== FND LOG ======

9927: fnd_file.put_line(fnd_file.log , ' BC_Event_id ' || missing_entity.event_id || ' Transaction Number ' || missing_entity.transaction_number || ' Distribution id ' || missing_entity.source_id_int_2 );
9928: end loop;
9929:
9930:
9931: -- ====== FND LOG ======
9932:
9933: p_return_code := 'T';
9934: return FALSE;
9935: END IF;

Line 9939: -- ====== FND LOG ======

9935: END IF;
9936:
9937: -- Initialize the collection variables
9938:
9939: -- ====== FND LOG ======
9940: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Initializing collection ');
9941: -- ====== FND LOG ======
9942:
9943: l_packets := num_rec();

Line 9941: -- ====== FND LOG ======

9937: -- Initialize the collection variables
9938:
9939: -- ====== FND LOG ======
9940: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Initializing collection ');
9941: -- ====== FND LOG ======
9942:
9943: l_packets := num_rec();
9944:
9945: -- Get the session_id and serial# for the current session

Line 9948: -- ====== FND LOG ======

9944:
9945: -- Get the session_id and serial# for the current session
9946: -- These columns will then be inserted in gl_bc_packets.
9947:
9948: -- ====== FND LOG ======
9949: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Invoking get_session_details() ');
9950: -- ====== FND LOG ======
9951:
9952: get_session_details(l_session_id, l_serial_id);

Line 9950: -- ====== FND LOG ======

9946: -- These columns will then be inserted in gl_bc_packets.
9947:
9948: -- ====== FND LOG ======
9949: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Invoking get_session_details() ');
9950: -- ====== FND LOG ======
9951:
9952: get_session_details(l_session_id, l_serial_id);
9953:
9954: -- ====== FND LOG ======

Line 9954: -- ====== FND LOG ======

9950: -- ====== FND LOG ======
9951:
9952: get_session_details(l_session_id, l_serial_id);
9953:
9954: -- ====== FND LOG ======
9955: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Session_Id = '||l_session_id);
9956: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Serial_Id = '||l_serial_id);
9957: -- ====== FND LOG ======
9958:

Line 9957: -- ====== FND LOG ======

9953:
9954: -- ====== FND LOG ======
9955: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Session_Id = '||l_session_id);
9956: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Serial_Id = '||l_serial_id);
9957: -- ====== FND LOG ======
9958:
9959: -- Get the JE_SOURCE_NAME for current application
9960:
9961: -- ====== FND LOG ======

Line 9961: -- ====== FND LOG ======

9957: -- ====== FND LOG ======
9958:
9959: -- Get the JE_SOURCE_NAME for current application
9960:
9961: -- ====== FND LOG ======
9962: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Get Je_Source_name ');
9963: -- ====== FND LOG ======
9964:
9965: open get_je_source_name(PSA_BC_XLA_PVT.G_APPLICATION_ID);

Line 9963: -- ====== FND LOG ======

9959: -- Get the JE_SOURCE_NAME for current application
9960:
9961: -- ====== FND LOG ======
9962: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Get Je_Source_name ');
9963: -- ====== FND LOG ======
9964:
9965: open get_je_source_name(PSA_BC_XLA_PVT.G_APPLICATION_ID);
9966: fetch get_je_source_name into l_je_source_name;
9967: if get_je_source_name%notfound then

Line 9973: -- ====== FND LOG ======

9969: end if;
9970: close get_je_source_name;
9971:
9972:
9973: -- ====== FND LOG ======
9974: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> JE_SOURCE_NAME = '||l_je_source_name);
9975: -- ====== FND LOG ======
9976:
9977: --================== Allocation Attributes first level of validation Logic Start ======================

Line 9975: -- ====== FND LOG ======

9971:
9972:
9973: -- ====== FND LOG ======
9974: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> JE_SOURCE_NAME = '||l_je_source_name);
9975: -- ====== FND LOG ======
9976:
9977: --================== Allocation Attributes first level of validation Logic Start ======================
9978: /* First level of validation for allocation attributes is two fold:
9979: 1) We check whether transaction lines are related with allocation attributes or not.

Line 9998: -- ====== FND LOG ======

9994: CLOSE c_chk_alloc_used;
9995: l_alloc_used := 'N';
9996: END IF;
9997:
9998: -- ====== FND LOG ======
9999: psa_utils.debug_other_string(g_state_level,l_full_path,
10000: ' BCTRL -> Allocation Attributes used (Y/N) = '||l_alloc_used);
10001: -- ====== FND LOG ======
10002:

Line 10001: -- ====== FND LOG ======

9997:
9998: -- ====== FND LOG ======
9999: psa_utils.debug_other_string(g_state_level,l_full_path,
10000: ' BCTRL -> Allocation Attributes used (Y/N) = '||l_alloc_used);
10001: -- ====== FND LOG ======
10002:
10003: IF (l_alloc_used = 'Y') THEN
10004: -- Initialize Parent counter;
10005: l_parent_cnt := 1;

Line 10070: -- ======================== FND LOG =============================

10066: INTO l_alloc_event_cnt
10067: FROM psa_bc_alloc_gt
10068: WHERE hierarchy_id = h.hierarchy_id;
10069:
10070: -- ======================== FND LOG =============================
10071: psa_utils.debug_other_string(g_state_level, l_full_path, ' l_alloc_event_cnt -> '||l_alloc_event_cnt);
10072: -- ======================== FND LOG =============================
10073:
10074: SELECT

Line 10072: -- ======================== FND LOG =============================

10068: WHERE hierarchy_id = h.hierarchy_id;
10069:
10070: -- ======================== FND LOG =============================
10071: psa_utils.debug_other_string(g_state_level, l_full_path, ' l_alloc_event_cnt -> '||l_alloc_event_cnt);
10072: -- ======================== FND LOG =============================
10073:
10074: SELECT
10075: COUNT(DISTINCT(xv.event_id))
10076: INTO l_xla_event_cnt

Line 10096: -- ======================== FND LOG =============================

10092: AND pa2.status_code = 'F'
10093: )
10094: );
10095:
10096: -- ======================== FND LOG =============================
10097: psa_utils.debug_other_string(g_state_level, l_full_path, ' l_xla_event_cnt -> '||l_xla_event_cnt);
10098: -- ======================== FND LOG =============================
10099:
10100: -- Compare both the counts. if they are equal

Line 10098: -- ======================== FND LOG =============================

10094: );
10095:
10096: -- ======================== FND LOG =============================
10097: psa_utils.debug_other_string(g_state_level, l_full_path, ' l_xla_event_cnt -> '||l_xla_event_cnt);
10098: -- ======================== FND LOG =============================
10099:
10100: -- Compare both the counts. if they are equal
10101: -- then the hierarchy events are eligible for funds check
10102: IF (l_alloc_event_cnt = NVL(l_xla_event_cnt, 0)) THEN

Line 10107: -- ====== FND LOG ======

10103: UPDATE
10104: psa_bc_alloc_gt
10105: SET status_code = 'P'
10106: WHERE hierarchy_id = h.hierarchy_id;
10107: -- ====== FND LOG ======
10108: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated '||sql%rowcount||
10109: ' rows.');
10110: -- ====== FND LOG ======
10111: ELSE

Line 10110: -- ====== FND LOG ======

10106: WHERE hierarchy_id = h.hierarchy_id;
10107: -- ====== FND LOG ======
10108: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated '||sql%rowcount||
10109: ' rows.');
10110: -- ====== FND LOG ======
10111: ELSE
10112: UPDATE
10113: psa_bc_alloc_gt
10114: SET status_code = 'F'

Line 10116: -- ====== FND LOG ======

10112: UPDATE
10113: psa_bc_alloc_gt
10114: SET status_code = 'F'
10115: WHERE hierarchy_id = h.hierarchy_id;
10116: -- ====== FND LOG ======
10117: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated '||sql%rowcount||
10118: ' rows.');
10119: -- ====== FND LOG ======
10120: END IF;

Line 10119: -- ====== FND LOG ======

10115: WHERE hierarchy_id = h.hierarchy_id;
10116: -- ====== FND LOG ======
10117: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated '||sql%rowcount||
10118: ' rows.');
10119: -- ====== FND LOG ======
10120: END IF;
10121: END LOOP;
10122: END IF;
10123: --=================== Allocation Attributes first level of validation Logic End ===========================

Line 10133: -- ====== FND LOG ======

10129: -- from gl_bc_packets and put NULL for columns which should not be populated. This is to
10130: -- overcome a limitation with FORALL clause later in the code.
10131:
10132:
10133: -- ====== FND LOG ======
10134: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Populate l_bc_pkts pl/sql table ');
10135: -- ====== FND LOG ======
10136:
10137: SELECT NULL, -- Packet_id is initially NULL. Populated later in the code

Line 10135: -- ====== FND LOG ======

10131:
10132:
10133: -- ====== FND LOG ======
10134: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Populate l_bc_pkts pl/sql table ');
10135: -- ====== FND LOG ======
10136:
10137: SELECT NULL, -- Packet_id is initially NULL. Populated later in the code
10138: p_ledgerid, -- Since XLA view does not provide this column, use parameter
10139: nvl(l_je_source_name, 'Manual'),

Line 10253: -- ====== FND LOG ======

10249: OPEN get_ledger_category(p_ledgerid);
10250: FETCH get_ledger_category INTO l_ledger_category;
10251: CLOSE get_ledger_category;
10252:
10253: -- ====== FND LOG ======
10254: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Ledger Category: '||l_ledger_category);
10255: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Application Id: '||psa_bc_xla_pvt.g_application_id);
10256: -- ====== FND LOG ======
10257:

Line 10256: -- ====== FND LOG ======

10252:
10253: -- ====== FND LOG ======
10254: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Ledger Category: '||l_ledger_category);
10255: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Application Id: '||psa_bc_xla_pvt.g_application_id);
10256: -- ====== FND LOG ======
10257:
10258: IF (l_ledger_category = 'PRIMARY') OR (psa_bc_xla_pvt.g_application_id = 602) THEN
10259: -- ==================== FND LOG ===========================
10260: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_ledger_category = PRIMARY OR (psa_bc_xla_pvt.g_application_id = 602 --> raise gl_bc_packets_empty');

Line 10259: -- ==================== FND LOG ===========================

10255: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Application Id: '||psa_bc_xla_pvt.g_application_id);
10256: -- ====== FND LOG ======
10257:
10258: IF (l_ledger_category = 'PRIMARY') OR (psa_bc_xla_pvt.g_application_id = 602) THEN
10259: -- ==================== FND LOG ===========================
10260: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_ledger_category = PRIMARY OR (psa_bc_xla_pvt.g_application_id = 602 --> raise gl_bc_packets_empty');
10261: -- ==================== FND LOG ===========================
10262:
10263: raise gl_bc_packets_empty;

Line 10261: -- ==================== FND LOG ===========================

10257:
10258: IF (l_ledger_category = 'PRIMARY') OR (psa_bc_xla_pvt.g_application_id = 602) THEN
10259: -- ==================== FND LOG ===========================
10260: psa_utils.debug_other_string(g_state_level,l_full_path, ' l_ledger_category = PRIMARY OR (psa_bc_xla_pvt.g_application_id = 602 --> raise gl_bc_packets_empty');
10261: -- ==================== FND LOG ===========================
10262:
10263: raise gl_bc_packets_empty;
10264: ELSE
10265:

Line 10266: -- ====== FND LOG ======

10262:
10263: raise gl_bc_packets_empty;
10264: ELSE
10265:
10266: -- ====== FND LOG ======
10267: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Do not process for Secondary Ledger ');
10268: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Return True');
10269: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL p_return_code -> S ');
10270: -- ====== FND LOG ======

Line 10270: -- ====== FND LOG ======

10266: -- ====== FND LOG ======
10267: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Do not process for Secondary Ledger ');
10268: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Return True');
10269: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL p_return_code -> S ');
10270: -- ====== FND LOG ======
10271: p_return_code := 'S';
10272: return true;
10273: END IF;
10274:

Line 10277: -- ====== FND LOG ======

10273: END IF;
10274:
10275: ELSE
10276:
10277: -- ====== FND LOG ======
10278: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Populated '||sql%rowcount||' rows. ');
10279: -- ====== FND LOG ======
10280: END IF;
10281:

Line 10279: -- ====== FND LOG ======

10275: ELSE
10276:
10277: -- ====== FND LOG ======
10278: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Populated '||sql%rowcount||' rows. ');
10279: -- ====== FND LOG ======
10280: END IF;
10281:
10282: -- Note above that the packet_id column was assigned a NULL value.
10283: -- Since packet_id will be unique per entity_id, we will use the

Line 10305: -- ====== FND LOG ======

10301: end if;
10302:
10303: l_bc_pkts(x).packet_id := l_packet_id;
10304:
10305: -- ====== FND LOG ======
10306: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Row '||x||' assigned packet_id '||l_packet_id);
10307: -- ====== FND LOG ======
10308:
10309: END LOOP;

Line 10307: -- ====== FND LOG ======

10303: l_bc_pkts(x).packet_id := l_packet_id;
10304:
10305: -- ====== FND LOG ======
10306: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Row '||x||' assigned packet_id '||l_packet_id);
10307: -- ====== FND LOG ======
10308:
10309: END LOOP;
10310:
10311: -- Insert autonomous procedure populate_bc_pkts to insert data in gl_bc_packets

Line 10313: -- ====== FND LOG ======

10309: END LOOP;
10310:
10311: -- Insert autonomous procedure populate_bc_pkts to insert data in gl_bc_packets
10312:
10313: -- ====== FND LOG ======
10314: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Invoking populate_bc_pkts() ');
10315: -- ====== FND LOG ======
10316:
10317: IF NOT populate_bc_pkts (l_bc_pkts) THEN

Line 10315: -- ====== FND LOG ======

10311: -- Insert autonomous procedure populate_bc_pkts to insert data in gl_bc_packets
10312:
10313: -- ====== FND LOG ======
10314: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Invoking populate_bc_pkts() ');
10315: -- ====== FND LOG ======
10316:
10317: IF NOT populate_bc_pkts (l_bc_pkts) THEN
10318: -- ====== FND LOG ======
10319: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> populate_bc_pkts() failed. ');

Line 10318: -- ====== FND LOG ======

10314: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Invoking populate_bc_pkts() ');
10315: -- ====== FND LOG ======
10316:
10317: IF NOT populate_bc_pkts (l_bc_pkts) THEN
10318: -- ====== FND LOG ======
10319: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> populate_bc_pkts() failed. ');
10320: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> ERROR: FATAL. ');
10321: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> p_return_code -> T');
10322: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> Return false ');

Line 10323: -- ====== FND LOG ======

10319: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> populate_bc_pkts() failed. ');
10320: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> ERROR: FATAL. ');
10321: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> p_return_code -> T');
10322: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> Return false ');
10323: -- ====== FND LOG ======
10324: p_return_code := 'T';
10325: return FALSE;
10326: END IF;
10327:

Line 10330: -- ====== FND LOG ======

10326: END IF;
10327:
10328: -- Invoke funds checker per packet_id. Update the relevant SLA tables.
10329:
10330: -- ====== FND LOG ======
10331: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Invoking glxfck() per packet.');
10332: -- ====== FND LOG ======
10333:
10334: FOR i IN 1..l_packets.count

Line 10332: -- ====== FND LOG ======

10328: -- Invoke funds checker per packet_id. Update the relevant SLA tables.
10329:
10330: -- ====== FND LOG ======
10331: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Invoking glxfck() per packet.');
10332: -- ====== FND LOG ======
10333:
10334: FOR i IN 1..l_packets.count
10335: LOOP
10336:

Line 10337: -- ====== FND LOG ======

10333:
10334: FOR i IN 1..l_packets.count
10335: LOOP
10336:
10337: -- ====== FND LOG ======
10338: psa_utils.debug_other_string(g_state_level,l_full_path,
10339: ' BCTRL -> Invoking glxfck() for packet_id '||l_packets(i));
10340: -- ====== FND LOG ======
10341:

Line 10340: -- ====== FND LOG ======

10336:
10337: -- ====== FND LOG ======
10338: psa_utils.debug_other_string(g_state_level,l_full_path,
10339: ' BCTRL -> Invoking glxfck() for packet_id '||l_packets(i));
10340: -- ====== FND LOG ======
10341:
10342: IF NOT glxfck( p_ledgerid ,
10343: l_packets(i) ,
10344: PSA_BC_XLA_PVT.G_BC_MODE ,

Line 10352: -- ====== FND LOG ======

10348: PSA_BC_XLA_PVT.G_USER_RESP_ID ,
10349: 'S' ,
10350: l_ret_code ) THEN
10351:
10352: -- ====== FND LOG ======
10353: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> glxfck() failed ');
10354: -- ====== FND LOG ======
10355:
10356: -- ============================== FND LOG =========================

Line 10354: -- ====== FND LOG ======

10350: l_ret_code ) THEN
10351:
10352: -- ====== FND LOG ======
10353: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> glxfck() failed ');
10354: -- ====== FND LOG ======
10355:
10356: -- ============================== FND LOG =========================
10357: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL l_ret_code -> T ');
10358: -- ============================== FND LOG =========================

Line 10356: -- ============================== FND LOG =========================

10352: -- ====== FND LOG ======
10353: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> glxfck() failed ');
10354: -- ====== FND LOG ======
10355:
10356: -- ============================== FND LOG =========================
10357: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL l_ret_code -> T ');
10358: -- ============================== FND LOG =========================
10359:
10360: l_ret_code := 'T';

Line 10358: -- ============================== FND LOG =========================

10354: -- ====== FND LOG ======
10355:
10356: -- ============================== FND LOG =========================
10357: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL l_ret_code -> T ');
10358: -- ============================== FND LOG =========================
10359:
10360: l_ret_code := 'T';
10361: END IF;
10362:

Line 10365: -- ====== FND LOG ======

10361: END IF;
10362:
10363: -- Update Funds_Status_Code column in XLA_AE_HEADERS_GT
10364:
10365: -- ====== FND LOG ======
10366: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Update funds_status_code '||
10367: 'of xla_ae_headers_gt ');
10368: -- ====== FND LOG ======
10369:

Line 10368: -- ====== FND LOG ======

10364:
10365: -- ====== FND LOG ======
10366: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Update funds_status_code '||
10367: 'of xla_ae_headers_gt ');
10368: -- ====== FND LOG ======
10369:
10370: IF (PSA_BC_XLA_PVT.G_BC_MODE = 'P') AND (l_ret_code <> 'T') THEN
10371: FOR y IN get_status_per_header(l_packets(i))
10372: LOOP

Line 10373: -- ====== FND LOG ======

10369:
10370: IF (PSA_BC_XLA_PVT.G_BC_MODE = 'P') AND (l_ret_code <> 'T') THEN
10371: FOR y IN get_status_per_header(l_packets(i))
10372: LOOP
10373: -- ====== FND LOG ======
10374: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> GET_STATUS_PER_HEADER DETAILS ');
10375: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> ----------------------------- ');
10376: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Y.AE_HEADER_ID = '||y.ae_header_id);
10377: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Y.SUCCESS_CNT = '||y.success_cnt);

Line 10382: -- ====== FND LOG ======

10378: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Y.APPROVED_CNT = '||y.approved_cnt);
10379: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Y.FAILED_CNT = '||y.failed_cnt);
10380: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Y.REJECTED_CNT = '||y.rejected_cnt);
10381: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Y.TOTAL_CNT = '||y.total_cnt);
10382: -- ====== FND LOG ======
10383:
10384: IF (y.success_cnt = y.total_cnt) OR (y.approved_cnt = y.total_cnt) THEN
10385: SELECT nvl(min('A'), 'S') into l_xla_hdr_status
10386: FROM gl_bc_packets

Line 10397: -- ============================== FND LOG =========================

10393: ELSE
10394: l_xla_hdr_status := 'P';
10395: END IF;
10396:
10397: -- ============================== FND LOG =========================
10398: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL l_xla_hdr_status -> '||l_xla_hdr_status);
10399: -- ============================== FND LOG =========================
10400:
10401: UPDATE xla_ae_headers_gt

Line 10399: -- ============================== FND LOG =========================

10395: END IF;
10396:
10397: -- ============================== FND LOG =========================
10398: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL l_xla_hdr_status -> '||l_xla_hdr_status);
10399: -- ============================== FND LOG =========================
10400:
10401: UPDATE xla_ae_headers_gt
10402: SET funds_status_code = l_xla_hdr_status
10403: WHERE ae_header_id = y.ae_header_id and

Line 10407: -- ====== FND LOG ======

10403: WHERE ae_header_id = y.ae_header_id and
10404: ledger_id = p_ledgerid;
10405:
10406: IF SQL%FOUND THEN
10407: -- ====== FND LOG ======
10408: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> XLA Header '||y.ae_header_id||
10409: ', Status updated to '||l_xla_hdr_status);
10410: -- ====== FND LOG ======
10411: END IF;

Line 10410: -- ====== FND LOG ======

10406: IF SQL%FOUND THEN
10407: -- ====== FND LOG ======
10408: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> XLA Header '||y.ae_header_id||
10409: ', Status updated to '||l_xla_hdr_status);
10410: -- ====== FND LOG ======
10411: END IF;
10412:
10413: END LOOP;
10414: ELSE

Line 10422: -- ====== FND LOG ======

10418: FROM gl_bc_packets
10419: WHERE packet_id = l_packets(i)) and
10420: ledger_id = p_ledgerid;
10421:
10422: -- ====== FND LOG ======
10423: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated funds_status_code of '||
10424: sql%rowcount||' rows successfully. ');
10425: -- ====== FND LOG ======
10426: END IF;

Line 10425: -- ====== FND LOG ======

10421:
10422: -- ====== FND LOG ======
10423: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated funds_status_code of '||
10424: sql%rowcount||' rows successfully. ');
10425: -- ====== FND LOG ======
10426: END IF;
10427:
10428: -- Update the l_*_status_cnt variables.
10429:

Line 10444: -- ====== FND LOG ======

10440: END LOOP;
10441:
10442: -- Update Funds_Status_Code column in XLA_VALIDATION_LINES_GT
10443:
10444: -- ====== FND LOG ======
10445: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Update funds_status_code '||
10446: 'of xla_validation_lines_gt');
10447: -- ====== FND LOG ======
10448:

Line 10447: -- ====== FND LOG ======

10443:
10444: -- ====== FND LOG ======
10445: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Update funds_status_code '||
10446: 'of xla_validation_lines_gt');
10447: -- ====== FND LOG ======
10448:
10449: -- Bug 5397349 .. Start
10450:
10451: FOR i IN 1..l_packets.count

Line 10466: -- ====== FND LOG ======

10462: WHERE vl.ae_header_id = l_xla_hdr_tbl(x) AND
10463: vl.ae_line_num = l_xla_line_tbl(x) AND
10464: vl.ledger_id = p_ledgerid;
10465:
10466: -- ====== FND LOG ======
10467: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated '||sql%rowcount||
10468: ' rows.');
10469: -- ====== FND LOG ======
10470:

Line 10469: -- ====== FND LOG ======

10465:
10466: -- ====== FND LOG ======
10467: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated '||sql%rowcount||
10468: ' rows.');
10469: -- ====== FND LOG ======
10470:
10471: EXIT when c_get_result_codes%notfound;
10472: END LOOP;
10473:

Line 10481: -- ====== FND LOG ======

10477: -- Bug 5397349 .. End
10478:
10479: -- Update PSA_BC_XLA_EVENTS_GT table with result_code
10480:
10481: -- ====== FND LOG ======
10482: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Update result_code '||
10483: 'of psa_bc_xla_events_gt');
10484: -- ====== FND LOG ======
10485:

Line 10484: -- ====== FND LOG ======

10480:
10481: -- ====== FND LOG ======
10482: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Update result_code '||
10483: 'of psa_bc_xla_events_gt');
10484: -- ====== FND LOG ======
10485:
10486: -- this update will ensure that only valid xla events
10487: -- provided for FUNDS CHECK (meant xla_ae_headers rows updated with funds_status_code)
10488: -- are updated with appropiate status. Events NOT picked by funds checker will be updated with XLA_ERROR.

Line 10501: -- ====== FND LOG ======

10497: FROM xla_ae_headers_gt hg
10498: WHERE hg.event_id = eg.event_id)
10499: where eg.event_id in (select event_id from xla_ae_headers_gt);
10500:
10501: -- ====== FND LOG ======
10502: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated valid funds check '||sql%rowcount||
10503: ' rows.');
10504: -- ====== FND LOG ======
10505:

Line 10504: -- ====== FND LOG ======

10500:
10501: -- ====== FND LOG ======
10502: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated valid funds check '||sql%rowcount||
10503: ' rows.');
10504: -- ====== FND LOG ======
10505:
10506: -- Update global variable for packet_id to the first packet_id
10507:
10508: PSA_BC_XLA_PVT.G_PACKET_ID := l_packets(1);

Line 10510: -- ====== FND LOG ======

10506: -- Update global variable for packet_id to the first packet_id
10507:
10508: PSA_BC_XLA_PVT.G_PACKET_ID := l_packets(1);
10509:
10510: -- ====== FND LOG ======
10511: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated '||
10512: ' PSA_BC_XLA_PVT.G_PACKET_ID to '||PSA_BC_XLA_PVT.G_PACKET_ID);
10513: -- ====== FND LOG ======
10514:

Line 10513: -- ====== FND LOG ======

10509:
10510: -- ====== FND LOG ======
10511: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated '||
10512: ' PSA_BC_XLA_PVT.G_PACKET_ID to '||PSA_BC_XLA_PVT.G_PACKET_ID);
10513: -- ====== FND LOG ======
10514:
10515: -- ====== FND LOG ======
10516: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> l_t_status_cnt = '||l_t_status_cnt);
10517: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> l_s_status_cnt = '||l_s_status_cnt);

Line 10515: -- ====== FND LOG ======

10511: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated '||
10512: ' PSA_BC_XLA_PVT.G_PACKET_ID to '||PSA_BC_XLA_PVT.G_PACKET_ID);
10513: -- ====== FND LOG ======
10514:
10515: -- ====== FND LOG ======
10516: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> l_t_status_cnt = '||l_t_status_cnt);
10517: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> l_s_status_cnt = '||l_s_status_cnt);
10518: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> l_a_status_cnt = '||l_a_status_cnt);
10519: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> l_f_status_cnt = '||l_f_status_cnt);

Line 10521: -- ====== FND LOG ======

10517: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> l_s_status_cnt = '||l_s_status_cnt);
10518: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> l_a_status_cnt = '||l_a_status_cnt);
10519: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> l_f_status_cnt = '||l_f_status_cnt);
10520: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> l_p_status_cnt = '||l_p_status_cnt);
10521: -- ====== FND LOG ======
10522:
10523: -- Bug 4918234
10524: /* We need to update the related events stauses which were NOT picked up by funds checker.
10525: e.g. PA BURDEN lines failed XLA validation but corresponding PO RAW passed XLA validation

Line 10538: -- ====== FND LOG ======

10534: FROM psa_bc_alloc_gt
10535: WHERE status_code <> 'P');
10536:
10537: IF(SQL%ROWCOUNT<> 0) THEN
10538: -- ====== FND LOG ======
10539: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Updated '||sql%rowcount||' rows of XLA_AE_HEADERS_GT with fail status.');
10540: -- ====== FND LOG ======
10541: END IF;
10542:

Line 10540: -- ====== FND LOG ======

10536:
10537: IF(SQL%ROWCOUNT<> 0) THEN
10538: -- ====== FND LOG ======
10539: psa_utils.debug_other_string(g_state_level,l_full_path, ' BCTRL -> Updated '||sql%rowcount||' rows of XLA_AE_HEADERS_GT with fail status.');
10540: -- ====== FND LOG ======
10541: END IF;
10542:
10543: -- Update Funds_Status_Code column in XLA_VALIDATION_LINES_GT
10544: UPDATE xla_validation_lines_gt vl

Line 10552: -- ====== FND LOG ======

10548: FROM psa_bc_alloc_gt
10549: WHERE status_code <> 'P');
10550:
10551: IF(SQL%ROWCOUNT<> 0) THEN
10552: -- ====== FND LOG ======
10553: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated ' ||sql%rowcount||' rows of XLA_VALIDATION_LINES_GT with F76 status code.');
10554: -- ====== FND LOG ======
10555: END IF;
10556:

Line 10554: -- ====== FND LOG ======

10550:
10551: IF(SQL%ROWCOUNT<> 0) THEN
10552: -- ====== FND LOG ======
10553: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated ' ||sql%rowcount||' rows of XLA_VALIDATION_LINES_GT with F76 status code.');
10554: -- ====== FND LOG ======
10555: END IF;
10556:
10557: --================== Allocation Attributes second level of validation Logic start =================
10558: /* Now we need to check that the transaction rows which are put for funds operation,

Line 10588: -- ====== FND LOG ======

10584: )
10585: AND status_code NOT IN ('F', 'R')
10586: AND session_id = l_session_id
10587: AND serial_id = l_serial_id;
10588: -- ====== FND LOG ======
10589: psa_utils.debug_other_string(g_state_level, l_full_path, 'BCTRL -> Updated '
10590: ||sql%rowcount||' rows of GL_BC_PACKETS with F77 status.');
10591: -- ====== FND LOG ======
10592:

Line 10591: -- ====== FND LOG ======

10587: AND serial_id = l_serial_id;
10588: -- ====== FND LOG ======
10589: psa_utils.debug_other_string(g_state_level, l_full_path, 'BCTRL -> Updated '
10590: ||sql%rowcount||' rows of GL_BC_PACKETS with F77 status.');
10591: -- ====== FND LOG ======
10592:
10593: ELSE
10594: CLOSE c_chk_funds_hier;
10595: END IF;

Line 10609: -- ====== FND LOG ======

10605: WHERE result_code = 'F77'
10606: AND session_id = l_session_id
10607: AND serial_id = l_serial_id) and
10608: ledger_id = p_ledgerid;
10609: -- ====== FND LOG ======
10610: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated funds_status_code of '||
10611: sql%rowcount||' rows successfully of XLA_AE_HEADERS_GT. ');
10612: -- ====== FND LOG ======
10613:

Line 10612: -- ====== FND LOG ======

10608: ledger_id = p_ledgerid;
10609: -- ====== FND LOG ======
10610: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated funds_status_code of '||
10611: sql%rowcount||' rows successfully of XLA_AE_HEADERS_GT. ');
10612: -- ====== FND LOG ======
10613:
10614: UPDATE xla_validation_lines_gt vl
10615: SET vl.funds_status_code = 'F77'
10616: WHERE vl.ae_header_id IN (SELECT ae_header_id

Line 10622: -- ====== FND LOG ======

10618: WHERE result_code = 'F77'
10619: AND session_id = l_session_id
10620: AND serial_id = l_serial_id) and
10621: vl.ledger_id = p_ledgerid;
10622: -- ====== FND LOG ======
10623: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated '||sql%rowcount||
10624: ' rows of XLA_VALIDATION_LINES_GT with F77 status.');
10625: -- ====== FND LOG ======
10626:

Line 10625: -- ====== FND LOG ======

10621: vl.ledger_id = p_ledgerid;
10622: -- ====== FND LOG ======
10623: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated '||sql%rowcount||
10624: ' rows of XLA_VALIDATION_LINES_GT with F77 status.');
10625: -- ====== FND LOG ======
10626:
10627: -- Reinitialize all the count variables
10628: l_s_status_cnt := 0;
10629: l_a_status_cnt := 0;

Line 10668: -- ====== FND LOG ======

10664: ELSE
10665: p_return_code := 'S';
10666: END IF;
10667:
10668: -- ====== FND LOG ======
10669: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Return_code = '||p_return_code);
10670: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Return TRUE');
10671: -- ====== FND LOG ======
10672:

Line 10671: -- ====== FND LOG ======

10667:
10668: -- ====== FND LOG ======
10669: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Return_code = '||p_return_code);
10670: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Return TRUE');
10671: -- ====== FND LOG ======
10672:
10673: -- Invoke the DEBUG_XLA procedure to transfer data from XLA global temporary tables to
10674: -- PSA regular tables.
10675:

Line 10687: -- ====== FND LOG ======

10683:
10684: EXCEPTION
10685: WHEN GL_BC_PACKETS_EMPTY THEN
10686: IF (NOT g_xla_debug) THEN
10687: -- ====== FND LOG ======
10688: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> XLA_AE_HEADERS_GT DUMP');
10689: psa_utils.debug_other_string(g_error_level,l_full_path, ' -------------------- ');
10690:
10691: -- ====== FND LOG ======

Line 10691: -- ====== FND LOG ======

10687: -- ====== FND LOG ======
10688: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> XLA_AE_HEADERS_GT DUMP');
10689: psa_utils.debug_other_string(g_error_level,l_full_path, ' -------------------- ');
10690:
10691: -- ====== FND LOG ======
10692: FOR h IN debug_xla_ae_headers_gt
10693: LOOP
10694: -- ====== FND LOG ======
10695: psa_utils.debug_other_string(g_error_level,l_full_path, ' EVENT_ID = '||h.event_id||' , '||

Line 10694: -- ====== FND LOG ======

10690:
10691: -- ====== FND LOG ======
10692: FOR h IN debug_xla_ae_headers_gt
10693: LOOP
10694: -- ====== FND LOG ======
10695: psa_utils.debug_other_string(g_error_level,l_full_path, ' EVENT_ID = '||h.event_id||' , '||
10696: ' AE_HEADER_ID = '||h.ae_header_id||' , '||
10697: ' LEDGER_ID = '||h.ledger_id||' , '||
10698: ' EVENT_TYPE_CODE = '||h.event_type_code||' , '||

Line 10702: -- ====== FND LOG ======

10698: ' EVENT_TYPE_CODE = '||h.event_type_code||' , '||
10699: ' FUNDS_STATUS_CODE = '||h.funds_status_code||' , '||
10700: ' ACCOUNTING_ENTRY_STATUS_CODE = '||h.accounting_entry_status_code||' , '||
10701: ' BALANCE_TYPE_CODE = '||h.balance_type_code);
10702: -- ====== FND LOG ======
10703: END LOOP;
10704: -- ====== FND LOG ======
10705: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> XLA_AE_LINES_GT DUMP');
10706: psa_utils.debug_other_string(g_error_level,l_full_path, ' -------------------- ');

Line 10704: -- ====== FND LOG ======

10700: ' ACCOUNTING_ENTRY_STATUS_CODE = '||h.accounting_entry_status_code||' , '||
10701: ' BALANCE_TYPE_CODE = '||h.balance_type_code);
10702: -- ====== FND LOG ======
10703: END LOOP;
10704: -- ====== FND LOG ======
10705: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> XLA_AE_LINES_GT DUMP');
10706: psa_utils.debug_other_string(g_error_level,l_full_path, ' -------------------- ');
10707:
10708:

Line 10709: -- ====== FND LOG ======

10705: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> XLA_AE_LINES_GT DUMP');
10706: psa_utils.debug_other_string(g_error_level,l_full_path, ' -------------------- ');
10707:
10708:
10709: -- ====== FND LOG ======
10710: FOR x IN debug_xla_ae_lines_gt
10711: LOOP
10712: -- ====== FND LOG ======
10713: psa_utils.debug_other_string(g_error_level,l_full_path, ' EVENT_ID = '||x.event_id||' , '||

Line 10712: -- ====== FND LOG ======

10708:
10709: -- ====== FND LOG ======
10710: FOR x IN debug_xla_ae_lines_gt
10711: LOOP
10712: -- ====== FND LOG ======
10713: psa_utils.debug_other_string(g_error_level,l_full_path, ' EVENT_ID = '||x.event_id||' , '||
10714: ' AE_HEADER_ID = '||x.ae_header_id||' , '||
10715: ' AE_LINE_NUM = '||x.ae_line_num);
10716: -- ====== FND LOG ======

Line 10716: -- ====== FND LOG ======

10712: -- ====== FND LOG ======
10713: psa_utils.debug_other_string(g_error_level,l_full_path, ' EVENT_ID = '||x.event_id||' , '||
10714: ' AE_HEADER_ID = '||x.ae_header_id||' , '||
10715: ' AE_LINE_NUM = '||x.ae_line_num);
10716: -- ====== FND LOG ======
10717: END LOOP;
10718:
10719: -- ====== FND LOG ======
10720: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> XLA_VALIDATION_LINES_GT DUMP');

Line 10719: -- ====== FND LOG ======

10715: ' AE_LINE_NUM = '||x.ae_line_num);
10716: -- ====== FND LOG ======
10717: END LOOP;
10718:
10719: -- ====== FND LOG ======
10720: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> XLA_VALIDATION_LINES_GT DUMP');
10721: psa_utils.debug_other_string(g_error_level,l_full_path, ' ---------------------------- ');
10722: -- ====== FND LOG ======
10723: FOR y IN debug_xla_val_lines_gt

Line 10722: -- ====== FND LOG ======

10718:
10719: -- ====== FND LOG ======
10720: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> XLA_VALIDATION_LINES_GT DUMP');
10721: psa_utils.debug_other_string(g_error_level,l_full_path, ' ---------------------------- ');
10722: -- ====== FND LOG ======
10723: FOR y IN debug_xla_val_lines_gt
10724: LOOP
10725: -- ====== FND LOG ======
10726: psa_utils.debug_other_string(g_error_level,l_full_path, ' AE_HEADER_ID = '||y.ae_header_id||' , '||

Line 10725: -- ====== FND LOG ======

10721: psa_utils.debug_other_string(g_error_level,l_full_path, ' ---------------------------- ');
10722: -- ====== FND LOG ======
10723: FOR y IN debug_xla_val_lines_gt
10724: LOOP
10725: -- ====== FND LOG ======
10726: psa_utils.debug_other_string(g_error_level,l_full_path, ' AE_HEADER_ID = '||y.ae_header_id||' , '||
10727: ' AE_LINE_NUM = '||y.ae_line_num||' , '||
10728: ' PERIOD_NAME = '||y.period_name||' , '||
10729: ' ACCOUNTING_ENTRY_STATUS_CODE = '||y.accounting_entry_status_code||' , '||

Line 10731: -- ====== FND LOG ======

10727: ' AE_LINE_NUM = '||y.ae_line_num||' , '||
10728: ' PERIOD_NAME = '||y.period_name||' , '||
10729: ' ACCOUNTING_ENTRY_STATUS_CODE = '||y.accounting_entry_status_code||' , '||
10730: ' BALANCING_LINE_TYPE = '||y.balancing_line_type);
10731: -- ====== FND LOG ======
10732: END LOOP;
10733:
10734: -- ====== FND LOG ======
10735: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> XLA_EVENTS_GT DUMP');

Line 10734: -- ====== FND LOG ======

10730: ' BALANCING_LINE_TYPE = '||y.balancing_line_type);
10731: -- ====== FND LOG ======
10732: END LOOP;
10733:
10734: -- ====== FND LOG ======
10735: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> XLA_EVENTS_GT DUMP');
10736: psa_utils.debug_other_string(g_error_level,l_full_path, ' ---------------------------- ');
10737: -- ====== FND LOG ======
10738: FOR z in debug_xla_events_gt

Line 10737: -- ====== FND LOG ======

10733:
10734: -- ====== FND LOG ======
10735: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> XLA_EVENTS_GT DUMP');
10736: psa_utils.debug_other_string(g_error_level,l_full_path, ' ---------------------------- ');
10737: -- ====== FND LOG ======
10738: FOR z in debug_xla_events_gt
10739: LOOP
10740: -- ====== FND LOG ======
10741: psa_utils.debug_other_string(g_error_level,l_full_path, ' APPLICATION_ID = '||z.application_id||' , '||

Line 10740: -- ====== FND LOG ======

10736: psa_utils.debug_other_string(g_error_level,l_full_path, ' ---------------------------- ');
10737: -- ====== FND LOG ======
10738: FOR z in debug_xla_events_gt
10739: LOOP
10740: -- ====== FND LOG ======
10741: psa_utils.debug_other_string(g_error_level,l_full_path, ' APPLICATION_ID = '||z.application_id||' , '||
10742: ' EVENT_ID = '||z.event_id||' , '||
10743: ' EVENT_DATE = '||z.event_date||' , '||
10744: ' EVENT_TYPE_CODE = '||z.event_type_code||' , '||

Line 10746: -- ====== FND LOG ======

10742: ' EVENT_ID = '||z.event_id||' , '||
10743: ' EVENT_DATE = '||z.event_date||' , '||
10744: ' EVENT_TYPE_CODE = '||z.event_type_code||' , '||
10745: ' REFERENCE_NUM_1 = '||z.reference_num_1);
10746: -- ====== FND LOG ======
10747: END LOOP;
10748: -- ====== FND LOG ======
10749: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> XLA_PSA_BC_LINES_V DUMP');
10750: psa_utils.debug_other_string(g_error_level,l_full_path,' --------------------------------------- ');

Line 10748: -- ====== FND LOG ======

10744: ' EVENT_TYPE_CODE = '||z.event_type_code||' , '||
10745: ' REFERENCE_NUM_1 = '||z.reference_num_1);
10746: -- ====== FND LOG ======
10747: END LOOP;
10748: -- ====== FND LOG ======
10749: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> XLA_PSA_BC_LINES_V DUMP');
10750: psa_utils.debug_other_string(g_error_level,l_full_path,' --------------------------------------- ');
10751: -- ====== FND LOG ======
10752: FOR v in debug_xla_psa_bc_v

Line 10751: -- ====== FND LOG ======

10747: END LOOP;
10748: -- ====== FND LOG ======
10749: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> XLA_PSA_BC_LINES_V DUMP');
10750: psa_utils.debug_other_string(g_error_level,l_full_path,' --------------------------------------- ');
10751: -- ====== FND LOG ======
10752: FOR v in debug_xla_psa_bc_v
10753: LOOP
10754: -- ====== FND LOG ======
10755: psa_utils.debug_other_string(g_error_level,l_full_path, ' EVENT_ID = '||v.event_id||' , '||

Line 10754: -- ====== FND LOG ======

10750: psa_utils.debug_other_string(g_error_level,l_full_path,' --------------------------------------- ');
10751: -- ====== FND LOG ======
10752: FOR v in debug_xla_psa_bc_v
10753: LOOP
10754: -- ====== FND LOG ======
10755: psa_utils.debug_other_string(g_error_level,l_full_path, ' EVENT_ID = '||v.event_id||' , '||
10756: ' AE_HEADER_ID = '||v.ae_header_id||' , '||
10757: ' AE_LINE_NUM = '||v.ae_line_num||' , '||
10758: ' ENTITY_ID = '||v.entity_id||' , '||

Line 10760: -- ====== FND LOG ======

10756: ' AE_HEADER_ID = '||v.ae_header_id||' , '||
10757: ' AE_LINE_NUM = '||v.ae_line_num||' , '||
10758: ' ENTITY_ID = '||v.entity_id||' , '||
10759: ' PERIOD_NAME = '||v.period_name);
10760: -- ====== FND LOG ======
10761: END LOOP;
10762:
10763: -- ====== FND LOG ======
10764: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> PSA_BC_ALLOC_GT DUMP');

Line 10763: -- ====== FND LOG ======

10759: ' PERIOD_NAME = '||v.period_name);
10760: -- ====== FND LOG ======
10761: END LOOP;
10762:
10763: -- ====== FND LOG ======
10764: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> PSA_BC_ALLOC_GT DUMP');
10765: psa_utils.debug_other_string(g_error_level,l_full_path,' --------------------------------------- ');
10766: -- ====== FND LOG ======
10767: FOR p in debug_psa_bc_alloc_gt

Line 10766: -- ====== FND LOG ======

10762:
10763: -- ====== FND LOG ======
10764: psa_utils.debug_other_string(g_error_level,l_full_path, ' BCTRL -> PSA_BC_ALLOC_GT DUMP');
10765: psa_utils.debug_other_string(g_error_level,l_full_path,' --------------------------------------- ');
10766: -- ====== FND LOG ======
10767: FOR p in debug_psa_bc_alloc_gt
10768: LOOP
10769: -- ====== FND LOG ======
10770: psa_utils.debug_other_string(g_error_level,l_full_path, ' HIERARCHY_ID = '||p.hierarchy_id||' , '||

Line 10769: -- ====== FND LOG ======

10765: psa_utils.debug_other_string(g_error_level,l_full_path,' --------------------------------------- ');
10766: -- ====== FND LOG ======
10767: FOR p in debug_psa_bc_alloc_gt
10768: LOOP
10769: -- ====== FND LOG ======
10770: psa_utils.debug_other_string(g_error_level,l_full_path, ' HIERARCHY_ID = '||p.hierarchy_id||' , '||
10771: ' EVENT_ID = '||p.event_id||' , '||
10772: ' AE_HEADER_ID = '||p.ae_header_id||' , '||
10773: ' AE_LINE_NUM = '||p.ae_line_num||' , '||

Line 10775: -- ====== FND LOG ======

10771: ' EVENT_ID = '||p.event_id||' , '||
10772: ' AE_HEADER_ID = '||p.ae_header_id||' , '||
10773: ' AE_LINE_NUM = '||p.ae_line_num||' , '||
10774: ' STATUS_CODE = '||p.status_code);
10775: -- ====== FND LOG ======
10776: END LOOP;
10777:
10778:
10779: select count(*) into l_var_1

Line 10781: -- ====== FND LOG ======

10777:
10778:
10779: select count(*) into l_var_1
10780: from xla_psa_bc_lines_v;
10781: -- ====== FND LOG ======
10782: psa_utils.debug_other_string(g_error_level,l_full_path, ' XLA_PSA_BC_LINES_V returns '||l_var_1||' rows. ');
10783: psa_utils.debug_other_string(g_error_level,l_full_path, ' Error: Populated 0 rows in gl_bc_packets.');
10784: psa_utils.debug_other_string(g_error_level,l_full_path, ' RETURN -> FALSE');
10785: -- ====== FND LOG ======

Line 10785: -- ====== FND LOG ======

10781: -- ====== FND LOG ======
10782: psa_utils.debug_other_string(g_error_level,l_full_path, ' XLA_PSA_BC_LINES_V returns '||l_var_1||' rows. ');
10783: psa_utils.debug_other_string(g_error_level,l_full_path, ' Error: Populated 0 rows in gl_bc_packets.');
10784: psa_utils.debug_other_string(g_error_level,l_full_path, ' RETURN -> FALSE');
10785: -- ====== FND LOG ======
10786: p_return_code := 'T';
10787: return FALSE;
10788: END IF;
10789: WHEN OTHERS THEN

Line 10790: -- ====== FND LOG ======

10786: p_return_code := 'T';
10787: return FALSE;
10788: END IF;
10789: WHEN OTHERS THEN
10790: -- ====== FND LOG ======
10791: psa_utils.debug_other_string(g_excep_level, l_full_path, ' BCTRL -> Exception Raised: '||sqlerrm);
10792: psa_utils.debug_other_string(g_excep_level, l_full_path, ' BCTRL -> Return_code = T');
10793: psa_utils.debug_other_string(g_excep_level, l_full_path, ' BCTRL -> Return FALSE');
10794: -- ====== FND LOG ======

Line 10794: -- ====== FND LOG ======

10790: -- ====== FND LOG ======
10791: psa_utils.debug_other_string(g_excep_level, l_full_path, ' BCTRL -> Exception Raised: '||sqlerrm);
10792: psa_utils.debug_other_string(g_excep_level, l_full_path, ' BCTRL -> Return_code = T');
10793: psa_utils.debug_other_string(g_excep_level, l_full_path, ' BCTRL -> Return FALSE');
10794: -- ====== FND LOG ======
10795: p_return_code := 'T';
10796: return FALSE;
10797:
10798: END budgetary_control;

Line 10826: -- ========================= FND LOG ===========================

10822: l_success_evt_exist VARCHAR2(1);
10823: l_f81_cnt NUMBER;
10824: l_f82_cnt NUMBER;
10825:
10826: -- ========================= FND LOG ===========================
10827: l_full_path VARCHAR2(100);
10828: -- ========================= FND LOG ===========================
10829:
10830: BEGIN

Line 10828: -- ========================= FND LOG ===========================

10824: l_f82_cnt NUMBER;
10825:
10826: -- ========================= FND LOG ===========================
10827: l_full_path VARCHAR2(100);
10828: -- ========================= FND LOG ===========================
10829:
10830: BEGIN
10831:
10832: l_f81_cnt := 0;

Line 10836: -- ====== FND LOG ======

10832: l_f81_cnt := 0;
10833: l_f82_cnt := 0;
10834: l_full_path := g_path || 'sync_xla_errors';
10835:
10836: -- ====== FND LOG ======
10837: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> p_failed_ldgr_array.COUNT: '|| p_failed_ldgr_array.COUNT);
10838: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> p_failed_evnt_array.COUNT: '|| p_failed_evnt_array.COUNT);
10839: -- ====== FND LOG ======
10840:

Line 10839: -- ====== FND LOG ======

10835:
10836: -- ====== FND LOG ======
10837: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> p_failed_ldgr_array.COUNT: '|| p_failed_ldgr_array.COUNT);
10838: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> p_failed_evnt_array.COUNT: '|| p_failed_evnt_array.COUNT);
10839: -- ====== FND LOG ======
10840:
10841: FORALL i IN 1..p_failed_ldgr_array.COUNT
10842: UPDATE gl_bc_packets
10843: SET status_code = decode(PSA_BC_XLA_PVT.G_BC_MODE, 'C', 'F',

Line 10855: -- ====== FND LOG ======

10851: AND status_code NOT IN ('F', 'R');
10852:
10853: l_f81_cnt := SQL%ROWCOUNT;
10854:
10855: -- ====== FND LOG ======
10856: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated GL_BC_PACKETS '||l_f81_cnt||
10857: ' rows to F81 status.');
10858: -- ====== FND LOG ======
10859:

Line 10858: -- ====== FND LOG ======

10854:
10855: -- ====== FND LOG ======
10856: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated GL_BC_PACKETS '||l_f81_cnt||
10857: ' rows to F81 status.');
10858: -- ====== FND LOG ======
10859:
10860:
10861: FORALL j IN 1..p_failed_evnt_array.COUNT
10862: UPDATE gl_bc_packets

Line 10874: -- ====== FND LOG ======

10870: AND status_code NOT IN ('F', 'R');
10871:
10872: l_f82_cnt := SQL%ROWCOUNT;
10873:
10874: -- ====== FND LOG ======
10875: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated GL_BC_PACKETS '||l_f82_cnt||
10876: ' rows to F82 status.');
10877: -- ====== FND LOG ======
10878:

Line 10877: -- ====== FND LOG ======

10873:
10874: -- ====== FND LOG ======
10875: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated GL_BC_PACKETS '||l_f82_cnt||
10876: ' rows to F82 status.');
10877: -- ====== FND LOG ======
10878:
10879: -- This check is to ensure that if we have not updated any GL_BC_PACKETS
10880: -- row/s to failure then there was a genuine failure in GL_BC_PACKETS
10881: -- and we should not overwrite that failure with XLA_ERROR for the event.

Line 10892: -- ====== FND LOG ======

10888: SET result_code = 'XLA_ERROR'
10889: WHERE event_id = p_failed_evnt_array(k)
10890: AND result_code <> 'XLA_ERROR';
10891:
10892: -- ====== FND LOG ======
10893: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated PSA_BC_XLA_EVENTS_GT '||sql%rowcount||
10894: ' rows to XLA_ERROR status.');
10895: -- ====== FND LOG ======
10896:

Line 10895: -- ====== FND LOG ======

10891:
10892: -- ====== FND LOG ======
10893: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated PSA_BC_XLA_EVENTS_GT '||sql%rowcount||
10894: ' rows to XLA_ERROR status.');
10895: -- ====== FND LOG ======
10896:
10897: END IF;
10898:
10899: OPEN c_success_evt_exists;

Line 10923: -- ====== FND LOG ======

10919: AND application_id = PSA_BC_XLA_PVT.g_application_id
10920: AND result_code IN ('F81', 'F82')
10921: ) ;
10922:
10923: -- ====== FND LOG ======
10924: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated GL_BC_PACKET_ARRIVAL_ORDER '||sql%rowcount||
10925: ' rows.');
10926: -- ====== FND LOG ======
10927:

Line 10926: -- ====== FND LOG ======

10922:
10923: -- ====== FND LOG ======
10924: psa_utils.debug_other_string(g_state_level, l_full_path, ' BCTRL -> Updated GL_BC_PACKET_ARRIVAL_ORDER '||sql%rowcount||
10925: ' rows.');
10926: -- ====== FND LOG ======
10927:
10928:
10929: END IF;
10930:

Line 10934: -- ====== FND LOG ======

10930:
10931:
10932: EXCEPTION
10933: WHEN OTHERS THEN
10934: -- ====== FND LOG ======
10935: psa_utils.debug_other_string(g_excep_level, l_full_path, ' BCTRL -> Exception Raised: '||sqlerrm);
10936: -- ====== FND LOG ======
10937: IF (c_success_evt_exists%ISOPEN) THEN
10938: CLOSE c_success_evt_exists;

Line 10936: -- ====== FND LOG ======

10932: EXCEPTION
10933: WHEN OTHERS THEN
10934: -- ====== FND LOG ======
10935: psa_utils.debug_other_string(g_excep_level, l_full_path, ' BCTRL -> Exception Raised: '||sqlerrm);
10936: -- ====== FND LOG ======
10937: IF (c_success_evt_exists%ISOPEN) THEN
10938: CLOSE c_success_evt_exists;
10939: END IF;
10940: APP_EXCEPTION.RAISE_EXCEPTION;