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

APPS.FV_BE_INT_PKG dependencies on FND_LOG

Line 272: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

268: AND status IN ('NEW', 'REJECTED','ACCEPTED');
269:
270: IF v_interface_count > 0
271: THEN
272: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
273: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'THERE ARE '||TO_CHAR(V_INTERFACE_COUNT)||
274: ' record(s) for Import process');
275: END IF;
276: END IF;

Line 273: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'THERE ARE '||TO_CHAR(V_INTERFACE_COUNT)||

269:
270: IF v_interface_count > 0
271: THEN
272: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
273: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'THERE ARE '||TO_CHAR(V_INTERFACE_COUNT)||
274: ' record(s) for Import process');
275: END IF;
276: END IF;
277:

Line 284: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message1_1',errbuf);

280: errbuf := 'No records found for source: '||parm_source||
281: ' and Group ID: '||parm_group_id||
282: ' in the interface table!.';
283: retcode := -1;
284: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message1_1',errbuf);
285: reset_control_status;
286: p_retcode := retcode;
287: p_errbuf := errbuf;
288: RETURN;

Line 324: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

320: segs_array.DELETE;
321: val_set_id_array.DELETE;
322:
323: --------------------------------------------------------------------------------
324: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
325: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'------------------------------------------------');
326: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'START VALIDATING REC#: '||INT_REC.RECORD_NUMBER);
327: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SET OF BOOKS ID: '||
328: int_rec.set_of_books_id);

Line 325: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'------------------------------------------------');

321: val_set_id_array.DELETE;
322:
323: --------------------------------------------------------------------------------
324: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
325: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'------------------------------------------------');
326: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'START VALIDATING REC#: '||INT_REC.RECORD_NUMBER);
327: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SET OF BOOKS ID: '||
328: int_rec.set_of_books_id);
329: END IF;

Line 326: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'START VALIDATING REC#: '||INT_REC.RECORD_NUMBER);

322:
323: --------------------------------------------------------------------------------
324: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
325: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'------------------------------------------------');
326: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'START VALIDATING REC#: '||INT_REC.RECORD_NUMBER);
327: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SET OF BOOKS ID: '||
328: int_rec.set_of_books_id);
329: END IF;
330: validate_sob(int_rec.set_of_books_id);

Line 327: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SET OF BOOKS ID: '||

323: --------------------------------------------------------------------------------
324: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
325: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'------------------------------------------------');
326: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'START VALIDATING REC#: '||INT_REC.RECORD_NUMBER);
327: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SET OF BOOKS ID: '||
328: int_rec.set_of_books_id);
329: END IF;
330: validate_sob(int_rec.set_of_books_id);
331: IF retcode <> 0 THEN

Line 345: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

341: -- record
342: EXIT;
343: END IF;
344: --------------------------------------------------------------------------------
345: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
346: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING GL DATE: '||
347: int_rec.gl_date);
348: END IF;
349: validate_gl_date(int_rec.gl_date,

Line 346: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING GL DATE: '||

342: EXIT;
343: END IF;
344: --------------------------------------------------------------------------------
345: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
346: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING GL DATE: '||
347: int_rec.gl_date);
348: END IF;
349: validate_gl_date(int_rec.gl_date,
350: int_rec.set_of_books_id,

Line 363: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

359: update_err_code(int_rec.rowid,'EP06', 'Invalid GL Date');
360: EXIT;
361: END IF;
362: --------------------------------------------------------------------------------
363: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
364: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING BUDGET LEVEL ID: '||
365: int_rec.budget_level_id);
366: END IF;
367: validate_budget_level(int_rec.set_of_books_id,

Line 364: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING BUDGET LEVEL ID: '||

360: EXIT;
361: END IF;
362: --------------------------------------------------------------------------------
363: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
364: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING BUDGET LEVEL ID: '||
365: int_rec.budget_level_id);
366: END IF;
367: validate_budget_level(int_rec.set_of_books_id,
368: int_rec.budget_level_id);

Line 381: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

377: 'Invalid Budget Level');
378: EXIT;
379: END IF;
380: -----------------------------------------------------------------------------------------------
381: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
382: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING BUDGET USER: '||
383: int_rec.budget_user_id);
384: END IF;
385: validate_budget_user( int_rec.set_of_books_id,

Line 382: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING BUDGET USER: '||

378: EXIT;
379: END IF;
380: -----------------------------------------------------------------------------------------------
381: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
382: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING BUDGET USER: '||
383: int_rec.budget_user_id);
384: END IF;
385: validate_budget_user( int_rec.set_of_books_id,
386: int_rec.budget_user_id);

Line 399: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

395: 'Invalid Budget User');
396: EXIT;
397: END IF;
398: -----------------------------------------------------------------------------------------------
399: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
400: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING BUDGET USER ACCESS : '||
401: int_rec.budget_user_id || ' Budget Level Id => ' ||int_rec.budget_level_id );
402: END IF;
403: validate_bu_access_level( int_rec.set_of_books_id,

Line 400: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING BUDGET USER ACCESS : '||

396: EXIT;
397: END IF;
398: -----------------------------------------------------------------------------------------------
399: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
400: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING BUDGET USER ACCESS : '||
401: int_rec.budget_user_id || ' Budget Level Id => ' ||int_rec.budget_level_id );
402: END IF;
403: validate_bu_access_level( int_rec.set_of_books_id,
404: int_rec.budget_user_id,

Line 420: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

416: END IF;
417:
418:
419: --------------------------------------------------------------------------------
420: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
421: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING FUND VALUE: '||
422: int_rec.fund_value);
423: END IF;
424: validate_fund_value(int_rec.set_of_books_id,

Line 421: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING FUND VALUE: '||

417:
418:
419: --------------------------------------------------------------------------------
420: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
421: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING FUND VALUE: '||
422: int_rec.fund_value);
423: END IF;
424: validate_fund_value(int_rec.set_of_books_id,
425: int_rec.fund_value, int_rec.budget_level_id);

Line 438: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

434: 'Fund Value not defined in Budget Distributions');
435: EXIT;
436: END IF;
437: --------------------------------------------------------------------------------
438: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
439: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
440: 'Validating Treasury Symbol date for fund value: '||
441: int_rec.fund_value);
442: END IF;

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

435: EXIT;
436: END IF;
437: --------------------------------------------------------------------------------
438: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
439: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
440: 'Validating Treasury Symbol date for fund value: '||
441: int_rec.fund_value);
442: END IF;
443: validate_tsymbol_date(int_rec.set_of_books_id,

Line 458: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

454: 'Cancelled or Expired Treasury Symbol');
455: EXIT;
456: END IF;
457: --------------------------------------------------------------------------------
458: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
459: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING INCREASE/DECREASE FLAG: '||
460: int_rec.increase_decrease_flag);
461: END IF;
462:

Line 459: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING INCREASE/DECREASE FLAG: '||

455: EXIT;
456: END IF;
457: --------------------------------------------------------------------------------
458: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
459: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING INCREASE/DECREASE FLAG: '||
460: int_rec.increase_decrease_flag);
461: END IF;
462:
463: IF nvl(int_rec.increase_decrease_flag,' ') NOT IN ('I','D')

Line 470: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

466: 'Invalid Increase / Decrease Flag');
467: EXIT;
468: END IF;
469: --------------------------------------------------------------------------------
470: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
471: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING AMOUNT: '||INT_REC.AMOUNT);
472: END IF;
473: IF int_rec.amount < 0 THEN
474: update_err_code(int_rec.rowid, 'EM36',

Line 471: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING AMOUNT: '||INT_REC.AMOUNT);

467: EXIT;
468: END IF;
469: --------------------------------------------------------------------------------
470: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
471: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING AMOUNT: '||INT_REC.AMOUNT);
472: END IF;
473: IF int_rec.amount < 0 THEN
474: update_err_code(int_rec.rowid, 'EM36',
475: 'Amount must be equal to or greater than zero');

Line 479: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

475: 'Amount must be equal to or greater than zero');
476: EXIT;
477: END IF;
478: --------------------------------------------------------------------------------
479: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
480: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING TRANSACTION TYPE: '||
481: int_rec.transaction_type);
482: END IF;
483: validate_trx_type_attribs(int_rec.set_of_books_id,

Line 480: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING TRANSACTION TYPE: '||

476: EXIT;
477: END IF;
478: --------------------------------------------------------------------------------
479: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
480: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING TRANSACTION TYPE: '||
481: int_rec.transaction_type);
482: END IF;
483: validate_trx_type_attribs(int_rec.set_of_books_id,
484: int_rec.budget_level_id,

Line 519: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

515: 'Invalid Sub Type');
516: EXIT;
517: END IF;
518: --------------------------------------------------------------------------------
519: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
520: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SUB TYPE: '||
521: int_rec.sub_type);
522: END IF;
523: VALIDATE_SUB_TYPE(int_rec.set_of_books_id,

Line 520: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SUB TYPE: '||

516: EXIT;
517: END IF;
518: --------------------------------------------------------------------------------
519: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
520: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SUB TYPE: '||
521: int_rec.sub_type);
522: END IF;
523: VALIDATE_SUB_TYPE(int_rec.set_of_books_id,
524: int_rec.transaction_type,

Line 540: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

536: 'Invalid Sub Type');
537: EXIT;
538: END IF;
539: --------------------------------------------------------------------------------
540: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
541: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING DOCUMENT NUMBER: '||
542: int_rec.doc_number);
543: END IF;
544: validate_doc_number(int_rec.doc_number,

Line 541: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING DOCUMENT NUMBER: '||

537: EXIT;
538: END IF;
539: --------------------------------------------------------------------------------
540: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
541: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING DOCUMENT NUMBER: '||
542: int_rec.doc_number);
543: END IF;
544: validate_doc_number(int_rec.doc_number,
545: int_rec.set_of_books_id,

Line 574: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

570: END IF;
571: EXIT;
572: END IF;
573: --------------------------------------------------------------------------------
574: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
575: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING DFFs');
576: END IF;
577: IF (validation = 'W') THEN
578: validate_dff

Line 575: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING DFFs');

571: EXIT;
572: END IF;
573: --------------------------------------------------------------------------------
574: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
575: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING DFFs');
576: END IF;
577: IF (validation = 'W') THEN
578: validate_dff
579: (

Line 678: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message1',errbuf);

674: EXCEPTION
675: WHEN NO_DATA_FOUND THEN
676: errbuf := 'No Data Found error occurred while copying
677: default segment values';
678: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message1',errbuf);
679: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND ERROR OCCURRED
680: while copying default segment values');
681: retcode := -1;
682: p_retcode := retcode;

Line 679: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND ERROR OCCURRED

675: WHEN NO_DATA_FOUND THEN
676: errbuf := 'No Data Found error occurred while copying
677: default segment values';
678: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message1',errbuf);
679: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND ERROR OCCURRED
680: while copying default segment values');
681: retcode := -1;
682: p_retcode := retcode;
683: p_errbuf := errbuf;

Line 690: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message2',errbuf);

686: RETURN;
687: WHEN OTHERS THEN
688: errbuf := substr(sqlerrm,1,100)||':When others error occurred
689: while copying default segment values';
690: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message2',errbuf);
691: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,SUBSTR(SQLERRM,1,100)||':WHEN OTHERS ERROR
692: occurred while copying default segment values');
693: retcode := -1;
694: p_retcode := retcode;

Line 691: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,SUBSTR(SQLERRM,1,100)||':WHEN OTHERS ERROR

687: WHEN OTHERS THEN
688: errbuf := substr(sqlerrm,1,100)||':When others error occurred
689: while copying default segment values';
690: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message2',errbuf);
691: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,SUBSTR(SQLERRM,1,100)||':WHEN OTHERS ERROR
692: occurred while copying default segment values');
693: retcode := -1;
694: p_retcode := retcode;
695: p_errbuf := errbuf;

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

708: -- Validate mandatory segments. Check if the segment values,
709: -- for segments which have segment type of Y, are provided
710: -- in the interface record.
711:
712: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
713: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING MANDATORY SEGMENTS');
714: END IF;
715: BEGIN
716: FOR app_col_rec IN app_col(int_rec.set_of_books_id)

Line 713: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING MANDATORY SEGMENTS');

709: -- for segments which have segment type of Y, are provided
710: -- in the interface record.
711:
712: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
713: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING MANDATORY SEGMENTS');
714: END IF;
715: BEGIN
716: FOR app_col_rec IN app_col(int_rec.set_of_books_id)
717: LOOP

Line 756: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message3',errbuf);

752: END IF;
753: END LOOP;
754: EXCEPTION WHEN OTHERS THEN
755: errbuf := 'When others error while validating mandatory segments.'||SQLERRM;
756: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message3',errbuf);
757: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
758: mandatory segments');
759: retcode := -1;
760: p_retcode := retcode;

Line 757: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING

753: END LOOP;
754: EXCEPTION WHEN OTHERS THEN
755: errbuf := 'When others error while validating mandatory segments.'||SQLERRM;
756: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message3',errbuf);
757: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
758: mandatory segments');
759: retcode := -1;
760: p_retcode := retcode;
761: p_errbuf := errbuf;

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

773: -- Validate segment values where the segment type is 'Y' (need not validate
774: -- segment values where segment type is 'N' since default values are copied
775: -- which already exist in the fv tables and hence have been validated) i.e.,
776: -- check whether the values exist in fnd_flex_values before cross validation.
777: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
778: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SEGMENT VALUES');
779: END IF;
780:
781: BEGIN

Line 778: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SEGMENT VALUES');

774: -- segment values where segment type is 'N' since default values are copied
775: -- which already exist in the fv tables and hence have been validated) i.e.,
776: -- check whether the values exist in fnd_flex_values before cross validation.
777: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
778: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SEGMENT VALUES');
779: END IF;
780:
781: BEGIN
782: FOR app_col_rec IN app_col(int_rec.set_of_books_id)

Line 844: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message3_1',errbuf);

840: -- record
841: EXIT;
842: WHEN OTHERS THEN
843: errbuf := 'When others error while validating segment values.'||SQLERRM;
844: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message3_1',errbuf);
845: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
846: segment values');
847: retcode := -1;
848: p_retcode := retcode;

Line 845: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING

841: EXIT;
842: WHEN OTHERS THEN
843: errbuf := 'When others error while validating segment values.'||SQLERRM;
844: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message3_1',errbuf);
845: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
846: segment values');
847: retcode := -1;
848: p_retcode := retcode;
849: p_errbuf := errbuf;

Line 880: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message4',errbuf);

876:
877: IF v_err_code THEN
878: retcode := -1;
879: errbuf := 'Error when getting accounting segment';
880: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message4',errbuf);
881: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'ERROR WHEN GETTING ACCOUNTING SEGMENT');
882: p_retcode := retcode;
883: p_errbuf := errbuf;
884: ROLLBACK;

Line 881: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'ERROR WHEN GETTING ACCOUNTING SEGMENT');

877: IF v_err_code THEN
878: retcode := -1;
879: errbuf := 'Error when getting accounting segment';
880: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message4',errbuf);
881: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'ERROR WHEN GETTING ACCOUNTING SEGMENT');
882: p_retcode := retcode;
883: p_errbuf := errbuf;
884: ROLLBACK;
885: reset_control_status;

Line 896: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,

892:
893: FOR trans_code IN accounts_cur(int_rec.sub_type,
894: int_rec.set_of_books_id)
895: LOOP
896: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,
897: l_module_name,'dr account: '||trans_code.dr_account_segment_value);
898: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,
899: l_module_name,'cr account: '||trans_code.cr_account_segment_value);
900:

Line 898: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,

894: int_rec.set_of_books_id)
895: LOOP
896: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,
897: l_module_name,'dr account: '||trans_code.dr_account_segment_value);
898: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT,
899: l_module_name,'cr account: '||trans_code.cr_account_segment_value);
900:
901: l_account_count := l_account_count + 1;
902:

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

914:
915: segs_array(substr(acc_seg_name,8,2)) := v_temp_seg_val;
916:
917: -- Checking cross-validation
918: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
919: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'CHECKING CROSS VALIDATION');
920: END IF;
921: FV_BE_UTIL_PKG.check_cross_validation(l_val_errbuf,
922: l_val_retcode,v_coa_id, segs_array, segs_array,

Line 919: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'CHECKING CROSS VALIDATION');

915: segs_array(substr(acc_seg_name,8,2)) := v_temp_seg_val;
916:
917: -- Checking cross-validation
918: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
919: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'CHECKING CROSS VALIDATION');
920: END IF;
921: FV_BE_UTIL_PKG.check_cross_validation(l_val_errbuf,
922: l_val_retcode,v_coa_id, segs_array, segs_array,
923: int_rec.budget_level_id, v_tt_id,int_rec.sub_type,

Line 967: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN NO DATA FOUND EXCEPTION WHILE GETTING

963: END LOOP;
964:
965: EXCEPTION
966: WHEN NO_DATA_FOUND THEN
967: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN NO DATA FOUND EXCEPTION WHILE GETTING
968: delimiter');
969: errbuf := 'When no data found while getting delimiter';
970: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message5',errbuf);
971: retcode := -1;

Line 970: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message5',errbuf);

966: WHEN NO_DATA_FOUND THEN
967: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN NO DATA FOUND EXCEPTION WHILE GETTING
968: delimiter');
969: errbuf := 'When no data found while getting delimiter';
970: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message5',errbuf);
971: retcode := -1;
972: p_retcode := retcode;
973: p_errbuf := errbuf;
974: reset_control_status;

Line 979: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS EXCEPTION WHILE GETTING

975: ROLLBACK;
976: RETURN;
977: WHEN OTHERS THEN
978: errbuf := 'When others exception while getting delimiter'||SQLERRM;
979: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS EXCEPTION WHILE GETTING
980: delimiter');
981: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message6',errbuf);
982: retcode := -1;
983: p_retcode := retcode;

Line 981: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message6',errbuf);

977: WHEN OTHERS THEN
978: errbuf := 'When others exception while getting delimiter'||SQLERRM;
979: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS EXCEPTION WHILE GETTING
980: delimiter');
981: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message6',errbuf);
982: retcode := -1;
983: p_retcode := retcode;
984: p_errbuf := errbuf;
985: reset_control_status;

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

1021:
1022: IF l_seg_type = 'E' THEN
1023: IF hdr_segs_array(substr(rtrim(app_col_rec.application_column_name),8)) IS NULL
1024: THEN
1025: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1026: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'MISSING BUDGETARY SEGMENT');
1027: END IF;
1028: missing_bud_segs := TRUE;
1029: EXIT;

Line 1026: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'MISSING BUDGETARY SEGMENT');

1022: IF l_seg_type = 'E' THEN
1023: IF hdr_segs_array(substr(rtrim(app_col_rec.application_column_name),8)) IS NULL
1024: THEN
1025: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1026: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'MISSING BUDGETARY SEGMENT');
1027: END IF;
1028: missing_bud_segs := TRUE;
1029: EXIT;
1030: END IF;

Line 1086: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR,

1082: IF l_account_count = 0 THEN
1083: retcode := -1;
1084: errbuf :=
1085: 'Budget transaction sub type must have dr and cr accounts!';
1086: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR,
1087: l_module_name||'message4',errbuf);
1088: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR,
1089: l_module_name,'ERROR GETTING Dr AND Cr ACCOUNTING SEGMENTS');
1090: p_retcode := retcode;

Line 1088: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR,

1084: errbuf :=
1085: 'Budget transaction sub type must have dr and cr accounts!';
1086: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR,
1087: l_module_name||'message4',errbuf);
1088: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR,
1089: l_module_name,'ERROR GETTING Dr AND Cr ACCOUNTING SEGMENTS');
1090: p_retcode := retcode;
1091: p_errbuf := errbuf;
1092: ROLLBACK;

Line 1127: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

1123:
1124: END LOOP; -- Second
1125: END LOOP; -- First
1126:
1127: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1128: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'****** VALIDATION COMPLETE ******');
1129: END IF;
1130: --------------------------------------------------------------------------------
1131: -- Validation of all records are complete

Line 1128: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' VALIDATION COMPLETE ');

1124: END LOOP; -- Second
1125: END LOOP; -- First
1126:
1127: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1128: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'****** VALIDATION COMPLETE ******');
1129: END IF;
1130: --------------------------------------------------------------------------------
1131: -- Validation of all records are complete
1132: -- If any records are rejected, update the control table

Line 1145: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

1141: AND source = parm_source
1142: AND set_of_books_id = parm_ledger_id
1143: AND status = 'REJECTED';
1144:
1145: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1146: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'****** RECORDS REJECTED :'||
1147: v_rej_rec_count||' ******');
1148: END IF;
1149:

Line 1146: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'****** RECORDS REJECTED :'||

1142: AND set_of_books_id = parm_ledger_id
1143: AND status = 'REJECTED';
1144:
1145: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1146: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'****** RECORDS REJECTED :'||
1147: v_rej_rec_count||' ******');
1148: END IF;
1149:
1150: IF v_rej_rec_count > 0

Line 1154: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

1150: IF v_rej_rec_count > 0
1151: THEN
1152: reset_control_status;
1153:
1154: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1155: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SUBMITTING BE TRANSACTIONS IMPORT REPORT');
1156: END IF;
1157:
1158: v_req_id := FND_REQUEST.SUBMIT_REQUEST

Line 1155: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SUBMITTING BE TRANSACTIONS IMPORT REPORT');

1151: THEN
1152: reset_control_status;
1153:
1154: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1155: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SUBMITTING BE TRANSACTIONS IMPORT REPORT');
1156: END IF;
1157:
1158: v_req_id := FND_REQUEST.SUBMIT_REQUEST
1159: ('FV','FVBEINTR','','',FALSE, parm_ledger_id, parm_source, parm_group_id);

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

1158: v_req_id := FND_REQUEST.SUBMIT_REQUEST
1159: ('FV','FVBEINTR','','',FALSE, parm_ledger_id, parm_source, parm_group_id);
1160:
1161: -- If the request submission fails, then abort process
1162: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1163: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REQEST ID FOR REPORT = '||
1164: to_char(v_req_id)) ;
1165: END IF;
1166:

Line 1163: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REQEST ID FOR REPORT = '||

1159: ('FV','FVBEINTR','','',FALSE, parm_ledger_id, parm_source, parm_group_id);
1160:
1161: -- If the request submission fails, then abort process
1162: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1163: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REQEST ID FOR REPORT = '||
1164: to_char(v_req_id)) ;
1165: END IF;
1166:
1167: IF (v_req_id = 0)

Line 1173: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message7',errbuf);

1169: errbuf := 'Unable to submit BE Transactions Import Report';
1170: retcode := -1;
1171: p_retcode := retcode;
1172: p_errbuf := errbuf;
1173: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message7',errbuf);
1174: ROLLBACK;
1175: reset_control_status;
1176: RETURN;
1177: END IF;

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

1239: end;
1240:
1241: -- Replace segment values having segment type 'N' with
1242: -- default segment values for that budget level
1243: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1244: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REPLACING SEGMENT VALUES WITH DEFAULT
1245: segment values before inserting');
1246: END IF;
1247: BEGIN

Line 1244: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REPLACING SEGMENT VALUES WITH DEFAULT

1240:
1241: -- Replace segment values having segment type 'N' with
1242: -- default segment values for that budget level
1243: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1244: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REPLACING SEGMENT VALUES WITH DEFAULT
1245: segment values before inserting');
1246: END IF;
1247: BEGIN
1248: FOR app_col_name IN app_col(valid_rec.set_of_books_id)

Line 1278: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message8',errbuf);

1274: END LOOP;
1275: EXCEPTION
1276: WHEN NO_DATA_FOUND THEN
1277: errbuf := 'No Data Found error occurred while copying default segment values';
1278: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message8',errbuf);
1279: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND ERROR OCCURRED
1280: while copying default segment values');
1281: retcode := -1;
1282: p_retcode := retcode;

Line 1279: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND ERROR OCCURRED

1275: EXCEPTION
1276: WHEN NO_DATA_FOUND THEN
1277: errbuf := 'No Data Found error occurred while copying default segment values';
1278: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message8',errbuf);
1279: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND ERROR OCCURRED
1280: while copying default segment values');
1281: retcode := -1;
1282: p_retcode := retcode;
1283: p_errbuf := errbuf;

Line 1290: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message9',errbuf);

1286: RETURN;
1287:
1288: WHEN OTHERS THEN
1289: errbuf := substr(sqlerrm,1,100)||':When others error occurred while copying default segment values';
1290: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message9',errbuf);
1291: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,SUBSTR(SQLERRM,1,100)||':WHEN OTHERS ERROR
1292: occurred while copying default segment values');
1293: retcode := -1;
1294: p_retcode := retcode;

Line 1291: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,SUBSTR(SQLERRM,1,100)||':WHEN OTHERS ERROR

1287:
1288: WHEN OTHERS THEN
1289: errbuf := substr(sqlerrm,1,100)||':When others error occurred while copying default segment values';
1290: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message9',errbuf);
1291: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,SUBSTR(SQLERRM,1,100)||':WHEN OTHERS ERROR
1292: occurred while copying default segment values');
1293: retcode := -1;
1294: p_retcode := retcode;
1295: p_errbuf := errbuf;

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

1314: AND budget_level_id = valid_rec.budget_level_id
1315: AND apprn_transaction_type = valid_rec.transaction_type;
1316:
1317: -- check if document number exists
1318: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1319: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'CHECKING IF DOC :'||VALID_REC.DOC_NUMBER||
1320: ' exists for fund '||valid_rec.fund_value||
1321: ' and budget level id: '||valid_rec.budget_level_id);
1322: END IF;

Line 1319: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'CHECKING IF DOC :'||VALID_REC.DOC_NUMBER||

1315: AND apprn_transaction_type = valid_rec.transaction_type;
1316:
1317: -- check if document number exists
1318: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1319: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'CHECKING IF DOC :'||VALID_REC.DOC_NUMBER||
1320: ' exists for fund '||valid_rec.fund_value||
1321: ' and budget level id: '||valid_rec.budget_level_id);
1322: END IF;
1323: BEGIN

Line 1356: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

1352: WHERE fund_value = valid_rec.fund_value
1353: AND set_of_books_id = valid_rec.set_of_books_id;
1354:
1355: IF valid_rec.budget_level_id = 1 THEN
1356: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1357: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'INSERTING NEW HEADER RECORD');
1358: END IF;
1359: -- Select the budget group id for the User
1360: BEGIN

Line 1357: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'INSERTING NEW HEADER RECORD');

1353: AND set_of_books_id = valid_rec.set_of_books_id;
1354:
1355: IF valid_rec.budget_level_id = 1 THEN
1356: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1357: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'INSERTING NEW HEADER RECORD');
1358: END IF;
1359: -- Select the budget group id for the User
1360: BEGIN
1361: SELECT bu_group_id

Line 1371: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,errbuf);

1367: EXCEPTION
1368: WHEN OTHERS THEN
1369: retcode := -1;
1370: errbuf := 'Invalid budget user or Access level';
1371: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,errbuf);
1372: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'Error in getting the Group ID'
1373: || ' for the user user id => '||valid_rec.budget_user_id
1374: || ' budget level id ' || valid_rec.budget_level_id );
1375: p_retcode := retcode;

Line 1372: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'Error in getting the Group ID'

1368: WHEN OTHERS THEN
1369: retcode := -1;
1370: errbuf := 'Invalid budget user or Access level';
1371: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,errbuf);
1372: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'Error in getting the Group ID'
1373: || ' for the user user id => '||valid_rec.budget_user_id
1374: || ' budget level id ' || valid_rec.budget_level_id );
1375: p_retcode := retcode;
1376: p_errbuf := errbuf;

Line 1443: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message10',errbuf);

1439: IF v_num_segs = 0
1440: THEN
1441: retcode := -1;
1442: errbuf := 'No segments found in budgeting_segments';
1443: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message10',errbuf);
1444: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO SEGMENTS FOUND IN BUDGETING SEGMENTS');
1445: reset_control_status;
1446: p_retcode := retcode;
1447: p_errbuf := errbuf;

Line 1444: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO SEGMENTS FOUND IN BUDGETING SEGMENTS');

1440: THEN
1441: retcode := -1;
1442: errbuf := 'No segments found in budgeting_segments';
1443: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message10',errbuf);
1444: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO SEGMENTS FOUND IN BUDGETING SEGMENTS');
1445: reset_control_status;
1446: p_retcode := retcode;
1447: p_errbuf := errbuf;
1448: ROLLBACK;

Line 1552: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message11',errbuf);

1548: retcode := -1;
1549: p_retcode := retcode;
1550: p_errbuf := errbuf;
1551: errbuf := 'No records found with the same segments for the previous budget level';
1552: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message11',errbuf);
1553: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'NO RECORDS FOUND WITH THE SAME SEGMENTS
1554: for the previous budget level');
1555: -- reset_control_status;
1556: -- ROLLBACK;

Line 1553: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'NO RECORDS FOUND WITH THE SAME SEGMENTS

1549: p_retcode := retcode;
1550: p_errbuf := errbuf;
1551: errbuf := 'No records found with the same segments for the previous budget level';
1552: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message11',errbuf);
1553: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'NO RECORDS FOUND WITH THE SAME SEGMENTS
1554: for the previous budget level');
1555: -- reset_control_status;
1556: -- ROLLBACK;
1557: update_err_rec(valid_rec.record_number);

Line 1562: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message12',errbuf);

1558: RETURN;
1559: WHEN OTHERS THEN
1560: retcode := -1;
1561: errbuf := 'When others error while checking for segments in the previous budget level.'||SQLERRM;
1562: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message12',errbuf);
1563: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'WHEN OTHERS ERROR WHILE CHECKING FOR
1564: segments in the previous budget level');
1565: p_retcode := retcode;
1566: p_errbuf := errbuf;

Line 1563: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'WHEN OTHERS ERROR WHILE CHECKING FOR

1559: WHEN OTHERS THEN
1560: retcode := -1;
1561: errbuf := 'When others error while checking for segments in the previous budget level.'||SQLERRM;
1562: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message12',errbuf);
1563: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'WHEN OTHERS ERROR WHILE CHECKING FOR
1564: segments in the previous budget level');
1565: p_retcode := retcode;
1566: p_errbuf := errbuf;
1567: reset_control_status;

Line 1583: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, errbuf);

1579: EXCEPTION
1580: WHEN OTHERS THEN
1581: retcode := -1;
1582: errbuf := 'Invalid budget user or Acecess level';
1583: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, errbuf);
1584: p_retcode := retcode;
1585: p_errbuf := errbuf;
1586: reset_control_status;
1587: RETURN;

Line 1820: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

1816: WHERE doc_id = v_doc_id;
1817:
1818: END LOOP;
1819:
1820: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1821: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'RUNNING UPDATE CLEANUP');
1822: END IF;
1823: update_cleanup(parm_source,parm_group_id);
1824:

Line 1821: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'RUNNING UPDATE CLEANUP');

1817:
1818: END LOOP;
1819:
1820: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1821: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'RUNNING UPDATE CLEANUP');
1822: END IF;
1823: update_cleanup(parm_source,parm_group_id);
1824:
1825: IF retcode <> 0 THEN

Line 1833: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

1829: reset_control_status;
1830: RETURN;
1831: END IF;
1832:
1833: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1834: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SUBMITTING BE TRANSACTIONS IMPORT REPORT');
1835: END IF;
1836: v_req_id := 0;
1837:

Line 1834: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SUBMITTING BE TRANSACTIONS IMPORT REPORT');

1830: RETURN;
1831: END IF;
1832:
1833: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1834: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SUBMITTING BE TRANSACTIONS IMPORT REPORT');
1835: END IF;
1836: v_req_id := 0;
1837:
1838: v_req_id := FND_REQUEST.SUBMIT_REQUEST

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

1838: v_req_id := FND_REQUEST.SUBMIT_REQUEST
1839: ('FV','FVBEINTR','','',FALSE, parm_ledger_id, parm_source, parm_group_id);
1840:
1841: -- If the request submission fails, then abort process
1842: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1843: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REQEST ID FOR REPORT = '||
1844: to_char(v_req_id)) ;
1845: END IF;
1846:

Line 1843: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REQEST ID FOR REPORT = '||

1839: ('FV','FVBEINTR','','',FALSE, parm_ledger_id, parm_source, parm_group_id);
1840:
1841: -- If the request submission fails, then abort process
1842: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1843: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REQEST ID FOR REPORT = '||
1844: to_char(v_req_id)) ;
1845: END IF;
1846:
1847: IF (v_req_id = 0)

Line 1850: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.message13',errbuf);

1846:
1847: IF (v_req_id = 0)
1848: THEN
1849: errbuf := 'Unable to submit BE Transactions Import Report';
1850: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.message13',errbuf);
1851: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'UNABLE TO SUBMIT BE TRANSACTIONS IMPORT REPORT');
1852: retcode := -1;
1853: p_retcode := retcode;
1854: p_errbuf := errbuf;

Line 1851: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'UNABLE TO SUBMIT BE TRANSACTIONS IMPORT REPORT');

1847: IF (v_req_id = 0)
1848: THEN
1849: errbuf := 'Unable to submit BE Transactions Import Report';
1850: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.message13',errbuf);
1851: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'UNABLE TO SUBMIT BE TRANSACTIONS IMPORT REPORT');
1852: retcode := -1;
1853: p_retcode := retcode;
1854: p_errbuf := errbuf;
1855: ROLLBACK;

Line 1867: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

1863: EXCEPTION
1864: WHEN OTHERS THEN
1865: retcode := -1;
1866: errbuf := SQLERRM;
1867: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1868: p_retcode := retcode;
1869: p_errbuf := errbuf;
1870:
1871: END; -- Main

Line 1892: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

1888: EXCEPTION
1889: WHEN OTHERS THEN
1890: errbuf := SQLERRM;
1891: retcode := -1;
1892: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1893:
1894: END update_err_code;
1895: --------------------------------------------------------------------------------
1896: -- Procedure to validate set of books id

Line 1911: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

1907: v_error_code := -9;
1908: WHEN OTHERS THEN
1909: retcode := -1;
1910: errbuf := 'When others error while validating set of books id.'||SQLERRM;
1911: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1912: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1913: set of books id');
1914: reset_control_status;
1915: END validate_sob;

Line 1912: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING

1908: WHEN OTHERS THEN
1909: retcode := -1;
1910: errbuf := 'When others error while validating set of books id.'||SQLERRM;
1911: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1912: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1913: set of books id');
1914: reset_control_status;
1915: END validate_sob;
1916: --------------------------------------------------------------------------------

Line 1939: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

1935: v_error_code := -9;
1936: WHEN OTHERS THEN
1937: retcode := -1;
1938: errbuf := 'When others error while validating period name.'||SQLERRM;
1939: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1940: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1941: period name');
1942: reset_control_status;
1943: END validate_gl_date;

Line 1940: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING

1936: WHEN OTHERS THEN
1937: retcode := -1;
1938: errbuf := 'When others error while validating period name.'||SQLERRM;
1939: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1940: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1941: period name');
1942: reset_control_status;
1943: END validate_gl_date;
1944: --------------------------------------------------------------------------------

Line 1962: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

1958: v_error_code := -9;
1959: WHEN OTHERS THEN
1960: retcode := -1;
1961: errbuf := 'When others error while validating budget level.'||SQLERRM;
1962: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1963: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1964: budget level');
1965: reset_control_status;
1966: END validate_budget_level;

Line 1963: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING

1959: WHEN OTHERS THEN
1960: retcode := -1;
1961: errbuf := 'When others error while validating budget level.'||SQLERRM;
1962: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1963: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1964: budget level');
1965: reset_control_status;
1966: END validate_budget_level;
1967: ---------------------------------------------------------------------------------

Line 1988: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

1984: EXCEPTION
1985: WHEN OTHERS THEN
1986: retcode := -1;
1987: errbuf := 'When others error while validating budget User.'||SQLERRM;
1988: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1989: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1990: budget User user ID =>'|| p_bu_user_id);
1991: reset_control_status;
1992:

Line 1989: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING

1985: WHEN OTHERS THEN
1986: retcode := -1;
1987: errbuf := 'When others error while validating budget User.'||SQLERRM;
1988: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1989: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1990: budget User user ID =>'|| p_bu_user_id);
1991: reset_control_status;
1992:
1993: END;---------------------------------------------------------------------------------

Line 2018: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

2014: v_error_code := -11;
2015: WHEN OTHERS THEN
2016: retcode := -1;
2017: errbuf := 'When others error while validating budget User.'||SQLERRM;
2018: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2019: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
2020: budget User Access Level bu_user_id =>'|| p_bu_user_id
2021: || ' Budget_level_id => ' || p_budget_level_id);
2022: reset_control_status;

Line 2019: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING

2015: WHEN OTHERS THEN
2016: retcode := -1;
2017: errbuf := 'When others error while validating budget User.'||SQLERRM;
2018: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2019: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
2020: budget User Access Level bu_user_id =>'|| p_bu_user_id
2021: || ' Budget_level_id => ' || p_budget_level_id);
2022: reset_control_status;
2023:

Line 2046: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

2042: v_error_code := -9;
2043: WHEN OTHERS THEN
2044: retcode := -1;
2045: errbuf := 'When others error while validating fund value.'||SQLERRM;
2046: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2047: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
2048: fund value');
2049: reset_control_status;
2050: END validate_fund_value;

Line 2047: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING

2043: WHEN OTHERS THEN
2044: retcode := -1;
2045: errbuf := 'When others error while validating fund value.'||SQLERRM;
2046: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2047: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
2048: fund value');
2049: reset_control_status;
2050: END validate_fund_value;
2051: --------------------------------------------------------------------------------

Line 2087: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

2083: v_error_code := -9;
2084: WHEN OTHERS THEN
2085: retcode := -1;
2086: errbuf := SUBSTR(SQLERRM,1,100)||' :When others error while validating expire/cancel date for treasury symbol';
2087: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2088: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,SUBSTR(SQLERRM,1,100)||' :WHEN OTHERS ERROR
2089: while validating expire/cancel date for treasury symbol');
2090: reset_control_status;
2091: END validate_tsymbol_date;

Line 2088: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,SUBSTR(SQLERRM,1,100)||' :WHEN OTHERS ERROR

2084: WHEN OTHERS THEN
2085: retcode := -1;
2086: errbuf := SUBSTR(SQLERRM,1,100)||' :When others error while validating expire/cancel date for treasury symbol';
2087: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2088: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,SUBSTR(SQLERRM,1,100)||' :WHEN OTHERS ERROR
2089: while validating expire/cancel date for treasury symbol');
2090: reset_control_status;
2091: END validate_tsymbol_date;
2092: --------------------------------------------------------------------------------

Line 2156: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

2152: v_error_code := -9;
2153: WHEN OTHERS THEN
2154: retcode := -1;
2155: errbuf := 'When others error while validating Transaction Type.'||SQLERRM;
2156: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2157: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
2158: Transaction Type');
2159: reset_control_status;
2160: END validate_trx_type_attribs;

Line 2157: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING

2153: WHEN OTHERS THEN
2154: retcode := -1;
2155: errbuf := 'When others error while validating Transaction Type.'||SQLERRM;
2156: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2157: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
2158: Transaction Type');
2159: reset_control_status;
2160: END validate_trx_type_attribs;
2161: --------------------------------------------------------------------------------

Line 2199: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'Sub Type flag is set to No');

2195: AND S.SUB_TYPE = V_SUB_TYPE
2196: AND t.set_of_books_id = v_set_of_books_id
2197: AND s.ledger_id = v_set_of_books_id;
2198: ELSE
2199: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'Sub Type flag is set to No');
2200: END IF;
2201: EXCEPTION
2202: -- If Sub-Type does not exist
2203: WHEN NO_DATA_FOUND THEN

Line 2208: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.message1',errbuf);

2204: v_error_code := -9;
2205: WHEN OTHERS THEN
2206: retcode := -1;
2207: errbuf := 'When others error while validating Sub Type.'||SQLERRM;
2208: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.message1',errbuf);
2209: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE
2210: validating Sub-Type');
2211: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, '!!!retcode; '||retcode);
2212: reset_control_status;

Line 2209: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE

2205: WHEN OTHERS THEN
2206: retcode := -1;
2207: errbuf := 'When others error while validating Sub Type.'||SQLERRM;
2208: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.message1',errbuf);
2209: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE
2210: validating Sub-Type');
2211: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, '!!!retcode; '||retcode);
2212: reset_control_status;
2213: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, '$$$retcode; '||retcode);

Line 2211: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, '!!!retcode; '||retcode);

2207: errbuf := 'When others error while validating Sub Type.'||SQLERRM;
2208: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.message1',errbuf);
2209: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE
2210: validating Sub-Type');
2211: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, '!!!retcode; '||retcode);
2212: reset_control_status;
2213: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, '$$$retcode; '||retcode);
2214: END VALIDATE_SUB_TYPE;
2215: --------------------------------------------------------------------------------

Line 2213: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, '$$$retcode; '||retcode);

2209: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE
2210: validating Sub-Type');
2211: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, '!!!retcode; '||retcode);
2212: reset_control_status;
2213: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, '$$$retcode; '||retcode);
2214: END VALIDATE_SUB_TYPE;
2215: --------------------------------------------------------------------------------
2216: -- Procedure to validate document number
2217: PROCEDURE validate_doc_number(v_doc_number VARCHAR2,

Line 2282: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.message1',errbuf);

2278: v_error_code := -9;
2279: WHEN OTHERS THEN
2280: retcode := -1;
2281: errbuf := 'When others error while validating Document Number.'||SQLERRM;
2282: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.message1',errbuf);
2283: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'WHEN OTHERS ERROR WHILE
2284: validating Document Number');
2285: reset_control_status;
2286: END;

Line 2283: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'WHEN OTHERS ERROR WHILE

2279: WHEN OTHERS THEN
2280: retcode := -1;
2281: errbuf := 'When others error while validating Document Number.'||SQLERRM;
2282: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.message1',errbuf);
2283: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'WHEN OTHERS ERROR WHILE
2284: validating Document Number');
2285: reset_control_status;
2286: END;
2287: WHEN OTHERS THEN

Line 2290: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

2286: END;
2287: WHEN OTHERS THEN
2288: retcode := -1;
2289: errbuf := 'When others error while validating Document Number.'||SQLERRM;
2290: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2291: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE
2292: validating Document Number');
2293: reset_control_status;
2294: END validate_doc_number;

Line 2291: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE

2287: WHEN OTHERS THEN
2288: retcode := -1;
2289: errbuf := 'When others error while validating Document Number.'||SQLERRM;
2290: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2291: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE
2292: validating Document Number');
2293: reset_control_status;
2294: END validate_doc_number;
2295: --------------------------------------------------------------------------------

Line 2358: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

2354: EXCEPTION
2355: WHEN OTHERS THEN
2356: retcode := -1;
2357: errbuf := 'When others error while validating DFF.'||SQLERRM;
2358: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2359: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,errbuf);
2360: reset_control_status;
2361: END validate_dff;
2362: --------------------------------------------------------------------------------

Line 2359: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,errbuf);

2355: WHEN OTHERS THEN
2356: retcode := -1;
2357: errbuf := 'When others error while validating DFF.'||SQLERRM;
2358: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2359: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,errbuf);
2360: reset_control_status;
2361: END validate_dff;
2362: --------------------------------------------------------------------------------
2363: -- Procedure to copy default segment values

Line 2411: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.no_data',errbuf);

2407: END LOOP;
2408: EXCEPTION
2409: WHEN NO_DATA_FOUND THEN
2410: errbuf := 'No Data Found error while copying default segment values';
2411: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.no_data',errbuf);
2412: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND ERROR WHILE COPYING
2413: default segment values');
2414: retcode := -1;
2415: reset_control_status;

Line 2412: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND ERROR WHILE COPYING

2408: EXCEPTION
2409: WHEN NO_DATA_FOUND THEN
2410: errbuf := 'No Data Found error while copying default segment values';
2411: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.no_data',errbuf);
2412: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND ERROR WHILE COPYING
2413: default segment values');
2414: retcode := -1;
2415: reset_control_status;
2416: WHEN OTHERS THEN

Line 2418: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

2414: retcode := -1;
2415: reset_control_status;
2416: WHEN OTHERS THEN
2417: errbuf := substr(sqlerrm,1,100)||':When others error while copying default segment values';
2418: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2419: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,SUBSTR(SQLERRM,1,100)||':WHEN OTHERS ERROR
2420: while copying default segment values');
2421: retcode := -1;
2422: reset_control_status;

Line 2419: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,SUBSTR(SQLERRM,1,100)||':WHEN OTHERS ERROR

2415: reset_control_status;
2416: WHEN OTHERS THEN
2417: errbuf := substr(sqlerrm,1,100)||':When others error while copying default segment values';
2418: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2419: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,SUBSTR(SQLERRM,1,100)||':WHEN OTHERS ERROR
2420: while copying default segment values');
2421: retcode := -1;
2422: reset_control_status;
2423: END copy_default_seg_vals;

Line 2462: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.no_data',errbuf);

2458: END LOOP;
2459: EXCEPTION
2460: WHEN NO_DATA_FOUND THEN
2461: errbuf := 'When no data found error while concatenating segments';
2462: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.no_data',errbuf);
2463: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN NO DATA FOUND ERROR WHILE CONCATENATING
2464: segments');
2465: retcode := -1;
2466: reset_control_status;

Line 2463: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN NO DATA FOUND ERROR WHILE CONCATENATING

2459: EXCEPTION
2460: WHEN NO_DATA_FOUND THEN
2461: errbuf := 'When no data found error while concatenating segments';
2462: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.no_data',errbuf);
2463: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN NO DATA FOUND ERROR WHILE CONCATENATING
2464: segments');
2465: retcode := -1;
2466: reset_control_status;
2467: WHEN OTHERS THEN

Line 2469: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

2465: retcode := -1;
2466: reset_control_status;
2467: WHEN OTHERS THEN
2468: errbuf := SQLERRM;
2469: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2470: retcode := -1;
2471: END concat_segs;
2472: --------------------------------------------------------------------------------
2473: -- Procedure to update revision_num, doc_status

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

2480: l_prof_val VARCHAR2(1);
2481:
2482: BEGIN
2483: l_module_name := g_module_name || 'update_cleanup';
2484: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2485: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING REV NUM IN HEADERS');
2486: END IF;
2487: UPDATE fv_be_trx_hdrs fbh
2488: SET revision_num =

Line 2485: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING REV NUM IN HEADERS');

2481:
2482: BEGIN
2483: l_module_name := g_module_name || 'update_cleanup';
2484: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2485: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING REV NUM IN HEADERS');
2486: END IF;
2487: UPDATE fv_be_trx_hdrs fbh
2488: SET revision_num =
2489: (SELECT MAX(revision_num)

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

2490: FROM fv_be_trx_dtls fbd
2491: WHERE fbh.doc_id = fbd.doc_id)
2492: WHERE fbh.doc_status = 'IMPORTING';
2493:
2494: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2495: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING DOC STATUS IN HEADERS
2496: for existing recs');
2497: END IF;
2498: UPDATE fv_be_trx_hdrs

Line 2495: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING DOC STATUS IN HEADERS

2491: WHERE fbh.doc_id = fbd.doc_id)
2492: WHERE fbh.doc_status = 'IMPORTING';
2493:
2494: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2495: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING DOC STATUS IN HEADERS
2496: for existing recs');
2497: END IF;
2498: UPDATE fv_be_trx_hdrs
2499: SET doc_status = 'RA'

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

2499: SET doc_status = 'RA'
2500: WHERE doc_status = 'IMPORTING'
2501: AND internal_revision_num <> -9999;
2502:
2503: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2504: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING DOC STATUS, REV NUM IN
2505: headers for new recs');
2506: END IF;
2507: UPDATE fv_be_trx_hdrs

Line 2504: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING DOC STATUS, REV NUM IN

2500: WHERE doc_status = 'IMPORTING'
2501: AND internal_revision_num <> -9999;
2502:
2503: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2504: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING DOC STATUS, REV NUM IN
2505: headers for new recs');
2506: END IF;
2507: UPDATE fv_be_trx_hdrs
2508: SET doc_status = 'IN',

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

2509: internal_revision_num = 0
2510: WHERE doc_status = 'IMPORTING'
2511: AND internal_revision_num = -9999;
2512:
2513: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2514: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING STATUS IN CONTROL TABLE');
2515: END IF;
2516: UPDATE fv_be_interface_control
2517: SET status = 'IMPORTED'

Line 2514: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING STATUS IN CONTROL TABLE');

2510: WHERE doc_status = 'IMPORTING'
2511: AND internal_revision_num = -9999;
2512:
2513: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2514: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING STATUS IN CONTROL TABLE');
2515: END IF;
2516: UPDATE fv_be_interface_control
2517: SET status = 'IMPORTED'
2518: WHERE source = parm_source

Line 2525: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

2521: l_prof_val := FND_PROFILE.VALUE('FV_ARCH_BE_INT_RECS');
2522:
2523: IF l_prof_val = 'Y'
2524: THEN
2525: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2526: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'INSERTING INTO HISTORY TABLE');
2527: END IF;
2528:
2529: INSERT INTO fv_be_interface_history

Line 2526: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'INSERTING INTO HISTORY TABLE');

2522:
2523: IF l_prof_val = 'Y'
2524: THEN
2525: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2526: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'INSERTING INTO HISTORY TABLE');
2527: END IF;
2528:
2529: INSERT INTO fv_be_interface_history
2530: (record_number, set_of_books_id, source, group_id, error_code,

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

2571: AND status = 'ACCEPTED'
2572: AND processed_flag = 'Y';
2573: END IF;
2574:
2575: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2576: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'DELETING FROM BE_INTERFACE');
2577: END IF;
2578: DELETE FROM fv_be_interface
2579: WHERE source = parm_source

Line 2576: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'DELETING FROM BE_INTERFACE');

2572: AND processed_flag = 'Y';
2573: END IF;
2574:
2575: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2576: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'DELETING FROM BE_INTERFACE');
2577: END IF;
2578: DELETE FROM fv_be_interface
2579: WHERE source = parm_source
2580: AND group_id = parm_group_id

Line 2588: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.no_data',errbuf);

2584: EXCEPTION
2585: WHEN NO_DATA_FOUND THEN
2586: retcode := -1;
2587: errbuf := 'When no data found error in update_cleanup';
2588: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.no_data',errbuf);
2589: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN NO DATA FOUND ERROR IN UPDATE_CLEANUP');
2590: reset_control_status;
2591: WHEN OTHERS THEN
2592: retcode := -1;

Line 2589: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN NO DATA FOUND ERROR IN UPDATE_CLEANUP');

2585: WHEN NO_DATA_FOUND THEN
2586: retcode := -1;
2587: errbuf := 'When no data found error in update_cleanup';
2588: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.no_data',errbuf);
2589: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN NO DATA FOUND ERROR IN UPDATE_CLEANUP');
2590: reset_control_status;
2591: WHEN OTHERS THEN
2592: retcode := -1;
2593: errbuf := 'When others error in update_cleanup.'||SQLERRM;

Line 2594: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

2590: reset_control_status;
2591: WHEN OTHERS THEN
2592: retcode := -1;
2593: errbuf := 'When others error in update_cleanup.'||SQLERRM;
2594: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2595: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR IN UPDATE_CLEANUP');
2596: reset_control_status;
2597: END update_cleanup;
2598: --------------------------------------------------------------------------------

Line 2595: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR IN UPDATE_CLEANUP');

2591: WHEN OTHERS THEN
2592: retcode := -1;
2593: errbuf := 'When others error in update_cleanup.'||SQLERRM;
2594: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2595: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR IN UPDATE_CLEANUP');
2596: reset_control_status;
2597: END update_cleanup;
2598: --------------------------------------------------------------------------------
2599: PROCEDURE update_err_rec(v_rec_number IN NUMBER) IS

Line 2617: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

2613: EXCEPTION
2614: WHEN OTHERS THEN
2615: retcode := -1;
2616: errbuf := SQLERRM;
2617: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2618: RAISE;
2619: END update_err_rec;
2620: --------------------------------------------------------------------------------
2621: -- This procedure resets the status in the control table

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

2625: l_module_name VARCHAR2(200);
2626: PRAGMA AUTONOMOUS_TRANSACTION;
2627: BEGIN
2628: l_module_name := g_module_name || 'reset_control_status';
2629: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2630: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'RESETTING STATUS IN THE CONTROL TABLE');
2631: END IF;
2632: UPDATE fv_be_interface_control
2633: SET status = 'REJECTED'

Line 2630: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'RESETTING STATUS IN THE CONTROL TABLE');

2626: PRAGMA AUTONOMOUS_TRANSACTION;
2627: BEGIN
2628: l_module_name := g_module_name || 'reset_control_status';
2629: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2630: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'RESETTING STATUS IN THE CONTROL TABLE');
2631: END IF;
2632: UPDATE fv_be_interface_control
2633: SET status = 'REJECTED'
2634: WHERE source = parm_source

Line 2643: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);

2639: EXCEPTION
2640: WHEN OTHERS THEN
2641: retcode := -1;
2642: errbuf := SQLERRM;
2643: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2644: RAISE;
2645: END reset_control_status;
2646: --------------------------------------------------------------------------------
2647: BEGIN