DBA Data[Home] [Help]

APPS.XTR_ORACLE_FIN_INTERFACES_P dependencies on FND_MESSAGE

Line 98: FND_MESSAGE.Set_Name ('XTR','XTR_NO_NEXT_OPEN_PERIOD');

94: Return (l_next_start);
95: Exception
96:
97: When others then
98: FND_MESSAGE.Set_Name ('XTR','XTR_NO_NEXT_OPEN_PERIOD');
99: FND_MESSAGE.Set_Token ('COMPANY_CODE', in_company);
100: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
101: Return to_date(null);
102:

Line 99: FND_MESSAGE.Set_Token ('COMPANY_CODE', in_company);

95: Exception
96:
97: When others then
98: FND_MESSAGE.Set_Name ('XTR','XTR_NO_NEXT_OPEN_PERIOD');
99: FND_MESSAGE.Set_Token ('COMPANY_CODE', in_company);
100: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
101: Return to_date(null);
102:
103: End GET_NEXT_OPEN_START_DATE;

Line 100: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

96:
97: When others then
98: FND_MESSAGE.Set_Name ('XTR','XTR_NO_NEXT_OPEN_PERIOD');
99: FND_MESSAGE.Set_Token ('COMPANY_CODE', in_company);
100: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
101: Return to_date(null);
102:
103: End GET_NEXT_OPEN_START_DATE;
104:

Line 152: FND_MESSAGE.Set_Name ('XTR','XTR_CHK_JRNL_DATE_ERROR');

148: Exception
149: When NO_DATA_FOUND then
150: return FALSE;
151: When OTHERS then
152: FND_MESSAGE.Set_Name ('XTR','XTR_CHK_JRNL_DATE_ERROR');
153: FND_MESSAGE.Set_Token ('JNL_DATE', to_char(in_jrnl_date));
154: FND_MESSAGE.Set_Token ('SOB_NAME', in_sob_name);
155: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
156: return FALSE;

Line 153: FND_MESSAGE.Set_Token ('JNL_DATE', to_char(in_jrnl_date));

149: When NO_DATA_FOUND then
150: return FALSE;
151: When OTHERS then
152: FND_MESSAGE.Set_Name ('XTR','XTR_CHK_JRNL_DATE_ERROR');
153: FND_MESSAGE.Set_Token ('JNL_DATE', to_char(in_jrnl_date));
154: FND_MESSAGE.Set_Token ('SOB_NAME', in_sob_name);
155: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
156: return FALSE;
157: End;

Line 154: FND_MESSAGE.Set_Token ('SOB_NAME', in_sob_name);

150: return FALSE;
151: When OTHERS then
152: FND_MESSAGE.Set_Name ('XTR','XTR_CHK_JRNL_DATE_ERROR');
153: FND_MESSAGE.Set_Token ('JNL_DATE', to_char(in_jrnl_date));
154: FND_MESSAGE.Set_Token ('SOB_NAME', in_sob_name);
155: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
156: return FALSE;
157: End;
158:

Line 155: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

151: When OTHERS then
152: FND_MESSAGE.Set_Name ('XTR','XTR_CHK_JRNL_DATE_ERROR');
153: FND_MESSAGE.Set_Token ('JNL_DATE', to_char(in_jrnl_date));
154: FND_MESSAGE.Set_Token ('SOB_NAME', in_sob_name);
155: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
156: return FALSE;
157: End;
158:
159:

Line 506: FND_MESSAGE.Set_Name ('XTR','XTR_START_XFER_JRNL_BATCH');

502:
503: p_company_code := Upper(in_company_code);
504: G_batch_id := in_batch_id;
505:
506: FND_MESSAGE.Set_Name ('XTR','XTR_START_XFER_JRNL_BATCH');
507: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
508: FND_MESSAGE.Set_Token ('BID', to_char(in_batch_id));
509: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
510:

Line 507: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);

503: p_company_code := Upper(in_company_code);
504: G_batch_id := in_batch_id;
505:
506: FND_MESSAGE.Set_Name ('XTR','XTR_START_XFER_JRNL_BATCH');
507: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
508: FND_MESSAGE.Set_Token ('BID', to_char(in_batch_id));
509: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
510:
511: --

Line 508: FND_MESSAGE.Set_Token ('BID', to_char(in_batch_id));

504: G_batch_id := in_batch_id;
505:
506: FND_MESSAGE.Set_Name ('XTR','XTR_START_XFER_JRNL_BATCH');
507: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
508: FND_MESSAGE.Set_Token ('BID', to_char(in_batch_id));
509: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
510:
511: --
512: Begin

Line 509: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

505:
506: FND_MESSAGE.Set_Name ('XTR','XTR_START_XFER_JRNL_BATCH');
507: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
508: FND_MESSAGE.Set_Token ('BID', to_char(in_batch_id));
509: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
510:
511: --
512: Begin
513: Open SOB_ID;

Line 518: FND_MESSAGE.Set_Name ('XTR','XTR_NO_SOB');

514: Fetch SOB_ID INTO l_set_of_books, l_sob_name;
515: Close SOB_ID;
516: Exception
517: When Others then
518: FND_MESSAGE.Set_Name ('XTR','XTR_NO_SOB');
519: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
520: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
521: retcode := greatest(retcode,2);
522: l_ok_to_xfer := FALSE;

Line 519: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);

515: Close SOB_ID;
516: Exception
517: When Others then
518: FND_MESSAGE.Set_Name ('XTR','XTR_NO_SOB');
519: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
520: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
521: retcode := greatest(retcode,2);
522: l_ok_to_xfer := FALSE;
523: End;

Line 520: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

516: Exception
517: When Others then
518: FND_MESSAGE.Set_Name ('XTR','XTR_NO_SOB');
519: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
520: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
521: retcode := greatest(retcode,2);
522: l_ok_to_xfer := FALSE;
523: End;
524:

Line 530: FND_MESSAGE.Set_Name ('XTR','XTR_NO_UNBAL_JRNL_PARAM');

526: -- If no parameter is found, then any unbalanced batches will NOT be transferred.
527:
528: l_bal_flag := XTR_ORACLE_FIN_INTERFACES_P.Get_Unbalance_Param(p_company_code);
529: If (l_bal_flag is null) then
530: FND_MESSAGE.Set_Name ('XTR','XTR_NO_UNBAL_JRNL_PARAM');
531: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
532: FND_MESSAGE.Set_Token ('BID', in_batch_id);
533: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
534: retcode := greatest(retcode,1);

Line 531: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);

527:
528: l_bal_flag := XTR_ORACLE_FIN_INTERFACES_P.Get_Unbalance_Param(p_company_code);
529: If (l_bal_flag is null) then
530: FND_MESSAGE.Set_Name ('XTR','XTR_NO_UNBAL_JRNL_PARAM');
531: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
532: FND_MESSAGE.Set_Token ('BID', in_batch_id);
533: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
534: retcode := greatest(retcode,1);
535: l_bal_flag := 'N';

Line 532: FND_MESSAGE.Set_Token ('BID', in_batch_id);

528: l_bal_flag := XTR_ORACLE_FIN_INTERFACES_P.Get_Unbalance_Param(p_company_code);
529: If (l_bal_flag is null) then
530: FND_MESSAGE.Set_Name ('XTR','XTR_NO_UNBAL_JRNL_PARAM');
531: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
532: FND_MESSAGE.Set_Token ('BID', in_batch_id);
533: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
534: retcode := greatest(retcode,1);
535: l_bal_flag := 'N';
536: End if;

Line 533: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

529: If (l_bal_flag is null) then
530: FND_MESSAGE.Set_Name ('XTR','XTR_NO_UNBAL_JRNL_PARAM');
531: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
532: FND_MESSAGE.Set_Token ('BID', in_batch_id);
533: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
534: retcode := greatest(retcode,1);
535: l_bal_flag := 'N';
536: End if;
537:

Line 546: FND_MESSAGE.Set_Name ('XTR','XTR_UNBAL_JRNL_ERROR');

542: If (nvl(l_bal_flag, 'N') = 'N') then
543: If (XTR_ORACLE_FIN_INTERFACES_P.Balance_Batch(in_batch_id)) then
544: l_ok_to_xfer := TRUE;
545: Else
546: FND_MESSAGE.Set_Name ('XTR','XTR_UNBAL_JRNL_ERROR');
547: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
548: retcode := greatest(retcode,2);
549: l_ok_to_xfer := FALSE;
550: End If;

Line 547: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

543: If (XTR_ORACLE_FIN_INTERFACES_P.Balance_Batch(in_batch_id)) then
544: l_ok_to_xfer := TRUE;
545: Else
546: FND_MESSAGE.Set_Name ('XTR','XTR_UNBAL_JRNL_ERROR');
547: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
548: retcode := greatest(retcode,2);
549: l_ok_to_xfer := FALSE;
550: End If;
551: Else

Line 622: FND_MESSAGE.Set_Name ('XTR','XTR_XFER_NO_CLOSE_PER_PARAM');

618: -- bug 4504734
619: l_next_open_start := GET_NEXT_OPEN_START_DATE (l_set_of_books,in_company_code, jnl_rec.journal_date);
620:
621: If (in_closed_periods is null) then
622: FND_MESSAGE.Set_Name ('XTR','XTR_XFER_NO_CLOSE_PER_PARAM');
623: FND_MESSAGE.Set_Token ('JNL_DATE', to_char(JNL_REC.journal_date,'DD-MON-YYYY'));
624: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
625: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
626: retcode := greatest(retcode,2);

Line 623: FND_MESSAGE.Set_Token ('JNL_DATE', to_char(JNL_REC.journal_date,'DD-MON-YYYY'));

619: l_next_open_start := GET_NEXT_OPEN_START_DATE (l_set_of_books,in_company_code, jnl_rec.journal_date);
620:
621: If (in_closed_periods is null) then
622: FND_MESSAGE.Set_Name ('XTR','XTR_XFER_NO_CLOSE_PER_PARAM');
623: FND_MESSAGE.Set_Token ('JNL_DATE', to_char(JNL_REC.journal_date,'DD-MON-YYYY'));
624: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
625: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
626: retcode := greatest(retcode,2);
627: l_ok_to_xfer := FALSE;

Line 624: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);

620:
621: If (in_closed_periods is null) then
622: FND_MESSAGE.Set_Name ('XTR','XTR_XFER_NO_CLOSE_PER_PARAM');
623: FND_MESSAGE.Set_Token ('JNL_DATE', to_char(JNL_REC.journal_date,'DD-MON-YYYY'));
624: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
625: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
626: retcode := greatest(retcode,2);
627: l_ok_to_xfer := FALSE;
628:

Line 625: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

621: If (in_closed_periods is null) then
622: FND_MESSAGE.Set_Name ('XTR','XTR_XFER_NO_CLOSE_PER_PARAM');
623: FND_MESSAGE.Set_Token ('JNL_DATE', to_char(JNL_REC.journal_date,'DD-MON-YYYY'));
624: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
625: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
626: retcode := greatest(retcode,2);
627: l_ok_to_xfer := FALSE;
628:
629: Elsif (l_next_open_start is null) then

Line 630: FND_MESSAGE.Set_Name ('XTR','XTR_XFER_NO_NEXT_PERIOD');

626: retcode := greatest(retcode,2);
627: l_ok_to_xfer := FALSE;
628:
629: Elsif (l_next_open_start is null) then
630: FND_MESSAGE.Set_Name ('XTR','XTR_XFER_NO_NEXT_PERIOD');
631: FND_MESSAGE.Set_Token ('JNL_DATE', to_char(JNL_REC.journal_date,'DD-MON-YYYY'));
632: FND_MESSAGE.Set_Token ('SOB_NAME', l_sob_name);
633: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
634: retcode := greatest(retcode,2);

Line 631: FND_MESSAGE.Set_Token ('JNL_DATE', to_char(JNL_REC.journal_date,'DD-MON-YYYY'));

627: l_ok_to_xfer := FALSE;
628:
629: Elsif (l_next_open_start is null) then
630: FND_MESSAGE.Set_Name ('XTR','XTR_XFER_NO_NEXT_PERIOD');
631: FND_MESSAGE.Set_Token ('JNL_DATE', to_char(JNL_REC.journal_date,'DD-MON-YYYY'));
632: FND_MESSAGE.Set_Token ('SOB_NAME', l_sob_name);
633: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
634: retcode := greatest(retcode,2);
635: l_ok_to_xfer := FALSE;

Line 632: FND_MESSAGE.Set_Token ('SOB_NAME', l_sob_name);

628:
629: Elsif (l_next_open_start is null) then
630: FND_MESSAGE.Set_Name ('XTR','XTR_XFER_NO_NEXT_PERIOD');
631: FND_MESSAGE.Set_Token ('JNL_DATE', to_char(JNL_REC.journal_date,'DD-MON-YYYY'));
632: FND_MESSAGE.Set_Token ('SOB_NAME', l_sob_name);
633: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
634: retcode := greatest(retcode,2);
635: l_ok_to_xfer := FALSE;
636:

Line 633: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

629: Elsif (l_next_open_start is null) then
630: FND_MESSAGE.Set_Name ('XTR','XTR_XFER_NO_NEXT_PERIOD');
631: FND_MESSAGE.Set_Token ('JNL_DATE', to_char(JNL_REC.journal_date,'DD-MON-YYYY'));
632: FND_MESSAGE.Set_Token ('SOB_NAME', l_sob_name);
633: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
634: retcode := greatest(retcode,2);
635: l_ok_to_xfer := FALSE;
636:
637: Elsif (l_next_open_start is not null) then

Line 778: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL_BATCH');

774: If (NOT l_ok_to_xfer) then
775: ROLLBACK TO SAVEPOINT sp_transfer;
776: End If;
777:
778: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL_BATCH');
779: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
780: FND_MESSAGE.Set_Token ('BID', to_char(in_batch_id));
781: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
782:

Line 779: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);

775: ROLLBACK TO SAVEPOINT sp_transfer;
776: End If;
777:
778: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL_BATCH');
779: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
780: FND_MESSAGE.Set_Token ('BID', to_char(in_batch_id));
781: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
782:
783: Exception

Line 780: FND_MESSAGE.Set_Token ('BID', to_char(in_batch_id));

776: End If;
777:
778: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL_BATCH');
779: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
780: FND_MESSAGE.Set_Token ('BID', to_char(in_batch_id));
781: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
782:
783: Exception
784: When Others then

Line 781: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

777:
778: FND_MESSAGE.Set_Name ('XTR','XTR_END_XFER_JRNL_BATCH');
779: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
780: FND_MESSAGE.Set_Token ('BID', to_char(in_batch_id));
781: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
782:
783: Exception
784: When Others then
785: FND_MESSAGE.Set_Name ('XTR','XTR_XFER_UNHANDLED_ERROR');

Line 785: FND_MESSAGE.Set_Name ('XTR','XTR_XFER_UNHANDLED_ERROR');

781: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
782:
783: Exception
784: When Others then
785: FND_MESSAGE.Set_Name ('XTR','XTR_XFER_UNHANDLED_ERROR');
786: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
787: FND_MESSAGE.Set_Token ('BID', to_char(in_batch_id));
788: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
789:

Line 786: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);

782:
783: Exception
784: When Others then
785: FND_MESSAGE.Set_Name ('XTR','XTR_XFER_UNHANDLED_ERROR');
786: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
787: FND_MESSAGE.Set_Token ('BID', to_char(in_batch_id));
788: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
789:
790: ROLLBACK TO SAVEPOINT sp_transfer;

Line 787: FND_MESSAGE.Set_Token ('BID', to_char(in_batch_id));

783: Exception
784: When Others then
785: FND_MESSAGE.Set_Name ('XTR','XTR_XFER_UNHANDLED_ERROR');
786: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
787: FND_MESSAGE.Set_Token ('BID', to_char(in_batch_id));
788: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
789:
790: ROLLBACK TO SAVEPOINT sp_transfer;
791: retcode := 2;

Line 788: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);

784: When Others then
785: FND_MESSAGE.Set_Name ('XTR','XTR_XFER_UNHANDLED_ERROR');
786: FND_MESSAGE.Set_Token ('COMPANY_CODE', p_company_code);
787: FND_MESSAGE.Set_Token ('BID', to_char(in_batch_id));
788: FND_FILE.Put_Line (FND_FILE.LOG, FND_MESSAGE.Get);
789:
790: ROLLBACK TO SAVEPOINT sp_transfer;
791: retcode := 2;
792: END TRANSFER_JNLS;