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 267: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then

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

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

264:
265: IF v_interface_count > 0
266: THEN
267: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
268: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'THERE ARE '||TO_CHAR(V_INTERFACE_COUNT)||
269: ' record(s) for Import process');
270: END IF;
271: END IF;
272:

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

275: errbuf := 'No records found for source: '||parm_source||
276: ' and Group ID: '||parm_group_id||
277: ' in the interface table!.';
278: retcode := -1;
279: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message1_1',errbuf);
280: reset_control_status;
281: RETURN;
282: END IF;
283:

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

313: segs_array.DELETE;
314: val_set_id_array.DELETE;
315:
316: --------------------------------------------------------------------------------
317: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
318: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'------------------------------------------------');
319: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'START VALIDATING REC#: '||INT_REC.RECORD_NUMBER);
320: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SET OF BOOKS ID: '||
321: int_rec.set_of_books_id);

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

314: val_set_id_array.DELETE;
315:
316: --------------------------------------------------------------------------------
317: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
318: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'------------------------------------------------');
319: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'START VALIDATING REC#: '||INT_REC.RECORD_NUMBER);
320: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SET OF BOOKS ID: '||
321: int_rec.set_of_books_id);
322: END IF;

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

315:
316: --------------------------------------------------------------------------------
317: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
318: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'------------------------------------------------');
319: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'START VALIDATING REC#: '||INT_REC.RECORD_NUMBER);
320: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SET OF BOOKS ID: '||
321: int_rec.set_of_books_id);
322: END IF;
323: validate_sob(int_rec.set_of_books_id);

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

316: --------------------------------------------------------------------------------
317: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
318: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'------------------------------------------------');
319: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'START VALIDATING REC#: '||INT_REC.RECORD_NUMBER);
320: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SET OF BOOKS ID: '||
321: int_rec.set_of_books_id);
322: END IF;
323: validate_sob(int_rec.set_of_books_id);
324: IF retcode <> 0 THEN

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

332: -- record
333: EXIT;
334: END IF;
335: --------------------------------------------------------------------------------
336: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
337: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING GL DATE: '||
338: int_rec.gl_date);
339: END IF;
340: validate_gl_date(int_rec.gl_date,

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

333: EXIT;
334: END IF;
335: --------------------------------------------------------------------------------
336: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
337: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING GL DATE: '||
338: int_rec.gl_date);
339: END IF;
340: validate_gl_date(int_rec.gl_date,
341: int_rec.set_of_books_id,

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

348: update_err_code(int_rec.rowid,'EP06', 'Invalid GL Date');
349: EXIT;
350: END IF;
351: --------------------------------------------------------------------------------
352: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
353: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING BUDGET LEVEL ID: '||
354: int_rec.budget_level_id);
355: END IF;
356: validate_budget_level(int_rec.set_of_books_id,

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

349: EXIT;
350: END IF;
351: --------------------------------------------------------------------------------
352: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
353: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING BUDGET LEVEL ID: '||
354: int_rec.budget_level_id);
355: END IF;
356: validate_budget_level(int_rec.set_of_books_id,
357: int_rec.budget_level_id);

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

364: 'Invalid Budget Level');
365: EXIT;
366: END IF;
367: -----------------------------------------------------------------------------------------------
368: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
369: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING BUDGET USER: '||
370: int_rec.budget_user_id);
371: END IF;
372: validate_budget_user( int_rec.set_of_books_id,

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

365: EXIT;
366: END IF;
367: -----------------------------------------------------------------------------------------------
368: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
369: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING BUDGET USER: '||
370: int_rec.budget_user_id);
371: END IF;
372: validate_budget_user( int_rec.set_of_books_id,
373: int_rec.budget_user_id);

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

380: 'Invalid Budget User');
381: EXIT;
382: END IF;
383: -----------------------------------------------------------------------------------------------
384: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
385: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING BUDGET USER ACCESS : '||
386: int_rec.budget_user_id || ' Budget Level Id => ' ||int_rec.budget_level_id );
387: END IF;
388: validate_bu_access_level( int_rec.set_of_books_id,

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

381: EXIT;
382: END IF;
383: -----------------------------------------------------------------------------------------------
384: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
385: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING BUDGET USER ACCESS : '||
386: int_rec.budget_user_id || ' Budget Level Id => ' ||int_rec.budget_level_id );
387: END IF;
388: validate_bu_access_level( int_rec.set_of_books_id,
389: int_rec.budget_user_id,

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

399: END IF;
400:
401:
402: --------------------------------------------------------------------------------
403: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
404: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING FUND VALUE: '||
405: int_rec.fund_value);
406: END IF;
407: validate_fund_value(int_rec.set_of_books_id,

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

400:
401:
402: --------------------------------------------------------------------------------
403: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
404: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING FUND VALUE: '||
405: int_rec.fund_value);
406: END IF;
407: validate_fund_value(int_rec.set_of_books_id,
408: int_rec.fund_value, int_rec.budget_level_id);

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

415: 'Fund Value not defined in Budget Distributions');
416: EXIT;
417: END IF;
418: --------------------------------------------------------------------------------
419: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
420: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
421: 'Validating Treasury Symbol date for fund value: '||
422: int_rec.fund_value);
423: END IF;

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

416: EXIT;
417: END IF;
418: --------------------------------------------------------------------------------
419: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
420: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,
421: 'Validating Treasury Symbol date for fund value: '||
422: int_rec.fund_value);
423: END IF;
424: validate_tsymbol_date(int_rec.set_of_books_id,

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

433: 'Cancelled or Expired Treasury Symbol');
434: EXIT;
435: END IF;
436: --------------------------------------------------------------------------------
437: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
438: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING INCREASE/DECREASE FLAG: '||
439: int_rec.increase_decrease_flag);
440: END IF;
441:

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

434: EXIT;
435: END IF;
436: --------------------------------------------------------------------------------
437: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
438: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING INCREASE/DECREASE FLAG: '||
439: int_rec.increase_decrease_flag);
440: END IF;
441:
442: IF nvl(int_rec.increase_decrease_flag,' ') NOT IN ('I','D')

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

445: 'Invalid Increase / Decrease Flag');
446: EXIT;
447: END IF;
448: --------------------------------------------------------------------------------
449: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
450: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING AMOUNT: '||INT_REC.AMOUNT);
451: END IF;
452: IF int_rec.amount < 0 THEN
453: update_err_code(int_rec.rowid, 'EM36',

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

446: EXIT;
447: END IF;
448: --------------------------------------------------------------------------------
449: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
450: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING AMOUNT: '||INT_REC.AMOUNT);
451: END IF;
452: IF int_rec.amount < 0 THEN
453: update_err_code(int_rec.rowid, 'EM36',
454: 'Amount must be equal to or greater than zero');

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

454: 'Amount must be equal to or greater than zero');
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 TRANSACTION TYPE: '||
460: int_rec.transaction_type);
461: END IF;
462: validate_trx_type_attribs(int_rec.set_of_books_id,

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

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 TRANSACTION TYPE: '||
460: int_rec.transaction_type);
461: END IF;
462: validate_trx_type_attribs(int_rec.set_of_books_id,
463: int_rec.budget_level_id,

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

492: 'Invalid Sub Type');
493: EXIT;
494: END IF;
495: --------------------------------------------------------------------------------
496: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
497: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SUB TYPE: '||
498: int_rec.sub_type);
499: END IF;
500: VALIDATE_SUB_TYPE(int_rec.set_of_books_id,

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

493: EXIT;
494: END IF;
495: --------------------------------------------------------------------------------
496: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
497: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SUB TYPE: '||
498: int_rec.sub_type);
499: END IF;
500: VALIDATE_SUB_TYPE(int_rec.set_of_books_id,
501: int_rec.transaction_type,

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

511: 'Invalid Sub Type');
512: EXIT;
513: END IF;
514: --------------------------------------------------------------------------------
515: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
516: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING DOCUMENT NUMBER: '||
517: int_rec.doc_number);
518: END IF;
519: validate_doc_number(int_rec.doc_number,

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

512: EXIT;
513: END IF;
514: --------------------------------------------------------------------------------
515: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
516: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING DOCUMENT NUMBER: '||
517: int_rec.doc_number);
518: END IF;
519: validate_doc_number(int_rec.doc_number,
520: int_rec.set_of_books_id,

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

543: END IF;
544: EXIT;
545: END IF;
546: --------------------------------------------------------------------------------
547: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
548: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING DFFs');
549: END IF;
550: IF (validation = 'W') THEN
551: validate_dff

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

544: EXIT;
545: END IF;
546: --------------------------------------------------------------------------------
547: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
548: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING DFFs');
549: END IF;
550: IF (validation = 'W') THEN
551: validate_dff
552: (

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

645: EXCEPTION
646: WHEN NO_DATA_FOUND THEN
647: errbuf := 'No Data Found error occurred while copying
648: default segment values';
649: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message1',errbuf);
650: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND ERROR OCCURRED
651: while copying default segment values');
652: retcode := -1;
653: reset_control_status;

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

646: WHEN NO_DATA_FOUND THEN
647: errbuf := 'No Data Found error occurred while copying
648: default segment values';
649: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message1',errbuf);
650: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND ERROR OCCURRED
651: while copying default segment values');
652: retcode := -1;
653: reset_control_status;
654: ROLLBACK;

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

655: RETURN;
656: WHEN OTHERS THEN
657: errbuf := substr(sqlerrm,1,100)||':When others error occurred
658: while copying default segment values';
659: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message2',errbuf);
660: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,SUBSTR(SQLERRM,1,100)||':WHEN OTHERS ERROR
661: occurred while copying default segment values');
662: retcode := -1;
663: reset_control_status;

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

656: WHEN OTHERS THEN
657: errbuf := substr(sqlerrm,1,100)||':When others error occurred
658: while copying default segment values';
659: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message2',errbuf);
660: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,SUBSTR(SQLERRM,1,100)||':WHEN OTHERS ERROR
661: occurred while copying default segment values');
662: retcode := -1;
663: reset_control_status;
664: ROLLBACK;

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

675: -- Validate mandatory segments. Check if the segment values,
676: -- for segments which have segment type of Y, are provided
677: -- in the interface record.
678:
679: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
680: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING MANDATORY SEGMENTS');
681: END IF;
682: BEGIN
683: FOR app_col_rec IN app_col(int_rec.set_of_books_id)

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

676: -- for segments which have segment type of Y, are provided
677: -- in the interface record.
678:
679: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
680: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING MANDATORY SEGMENTS');
681: END IF;
682: BEGIN
683: FOR app_col_rec IN app_col(int_rec.set_of_books_id)
684: LOOP

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

719: END IF;
720: END LOOP;
721: EXCEPTION WHEN OTHERS THEN
722: errbuf := 'When others error while validating mandatory segments.'||SQLERRM;
723: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message3',errbuf);
724: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
725: mandatory segments');
726: retcode := -1;
727: ROLLBACK;

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

720: END LOOP;
721: EXCEPTION WHEN OTHERS THEN
722: errbuf := 'When others error while validating mandatory segments.'||SQLERRM;
723: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message3',errbuf);
724: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
725: mandatory segments');
726: retcode := -1;
727: ROLLBACK;
728: reset_control_status;

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

738: -- Validate segment values where the segment type is 'Y' (need not validate
739: -- segment values where segment type is 'N' since default values are copied
740: -- which already exist in the fv tables and hence have been validated) i.e.,
741: -- check whether the values exist in fnd_flex_values before cross validation.
742: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
743: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SEGMENT VALUES');
744: END IF;
745:
746: BEGIN

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

739: -- segment values where segment type is 'N' since default values are copied
740: -- which already exist in the fv tables and hence have been validated) i.e.,
741: -- check whether the values exist in fnd_flex_values before cross validation.
742: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
743: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'VALIDATING SEGMENT VALUES');
744: END IF;
745:
746: BEGIN
747: FOR app_col_rec IN app_col(int_rec.set_of_books_id)

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

805: -- record
806: EXIT;
807: WHEN OTHERS THEN
808: errbuf := 'When others error while validating segment values.'||SQLERRM;
809: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message3_1',errbuf);
810: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
811: segment values');
812: retcode := -1;
813: ROLLBACK;

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

806: EXIT;
807: WHEN OTHERS THEN
808: errbuf := 'When others error while validating segment values.'||SQLERRM;
809: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message3_1',errbuf);
810: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
811: segment values');
812: retcode := -1;
813: ROLLBACK;
814: reset_control_status;

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

839:
840: IF v_err_code THEN
841: retcode := -1;
842: errbuf := 'Error when getting accounting segment';
843: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message4',errbuf);
844: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'ERROR WHEN GETTING ACCOUNTING SEGMENT');
845: ROLLBACK;
846: reset_control_status;
847: RETURN;

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

840: IF v_err_code THEN
841: retcode := -1;
842: errbuf := 'Error when getting accounting segment';
843: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message4',errbuf);
844: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'ERROR WHEN GETTING ACCOUNTING SEGMENT');
845: ROLLBACK;
846: reset_control_status;
847: RETURN;
848: END IF;

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

866:
867: segs_array(substr(acc_seg_name,8,2)) := v_temp_seg_val;
868:
869: -- Checking cross-validation
870: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
871: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'CHECKING CROSS VALIDATION');
872: END IF;
873: FV_BE_UTIL_PKG.check_cross_validation(l_val_errbuf,
874: l_val_retcode,v_coa_id, segs_array, segs_array,

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

867: segs_array(substr(acc_seg_name,8,2)) := v_temp_seg_val;
868:
869: -- Checking cross-validation
870: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
871: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'CHECKING CROSS VALIDATION');
872: END IF;
873: FV_BE_UTIL_PKG.check_cross_validation(l_val_errbuf,
874: l_val_retcode,v_coa_id, segs_array, segs_array,
875: int_rec.budget_level_id, v_tt_id,int_rec.sub_type,

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

915: END LOOP;
916:
917: EXCEPTION
918: WHEN NO_DATA_FOUND THEN
919: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN NO DATA FOUND EXCEPTION WHILE GETTING
920: delimiter');
921: errbuf := 'When no data found while getting delimiter';
922: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message5',errbuf);
923: retcode := -1;

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

918: WHEN NO_DATA_FOUND THEN
919: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN NO DATA FOUND EXCEPTION WHILE GETTING
920: delimiter');
921: errbuf := 'When no data found while getting delimiter';
922: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message5',errbuf);
923: retcode := -1;
924: reset_control_status;
925: ROLLBACK;
926: RETURN;

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

925: ROLLBACK;
926: RETURN;
927: WHEN OTHERS THEN
928: errbuf := 'When others exception while getting delimiter'||SQLERRM;
929: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS EXCEPTION WHILE GETTING
930: delimiter');
931: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message6',errbuf);
932: retcode := -1;
933: reset_control_status;

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

927: WHEN OTHERS THEN
928: errbuf := 'When others exception while getting delimiter'||SQLERRM;
929: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS EXCEPTION WHILE GETTING
930: delimiter');
931: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message6',errbuf);
932: retcode := -1;
933: reset_control_status;
934: ROLLBACK;
935: RETURN;

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

969:
970: IF l_seg_type = 'E' THEN
971: IF hdr_segs_array(substr(rtrim(app_col_rec.application_column_name),8)) IS NULL
972: THEN
973: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
974: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'MISSING BUDGETARY SEGMENT');
975: END IF;
976: missing_bud_segs := TRUE;
977: EXIT;

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

970: IF l_seg_type = 'E' THEN
971: IF hdr_segs_array(substr(rtrim(app_col_rec.application_column_name),8)) IS NULL
972: THEN
973: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
974: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'MISSING BUDGETARY SEGMENT');
975: END IF;
976: missing_bud_segs := TRUE;
977: EXIT;
978: END IF;

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

1057:
1058: END LOOP; -- Second
1059: END LOOP; -- First
1060:
1061: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1062: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'****** VALIDATION COMPLETE ******');
1063: END IF;
1064: --------------------------------------------------------------------------------
1065: -- Validation of all records are complete

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

1058: END LOOP; -- Second
1059: END LOOP; -- First
1060:
1061: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1062: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'****** VALIDATION COMPLETE ******');
1063: END IF;
1064: --------------------------------------------------------------------------------
1065: -- Validation of all records are complete
1066: -- If any records are rejected, update the control table

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

1075: AND source = parm_source
1076: AND set_of_books_id = parm_ledger_id
1077: AND status = 'REJECTED';
1078:
1079: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1080: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'****** RECORDS REJECTED :'||
1081: v_rej_rec_count||' ******');
1082: END IF;
1083:

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

1076: AND set_of_books_id = parm_ledger_id
1077: AND status = 'REJECTED';
1078:
1079: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1080: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'****** RECORDS REJECTED :'||
1081: v_rej_rec_count||' ******');
1082: END IF;
1083:
1084: IF v_rej_rec_count > 0

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

1084: IF v_rej_rec_count > 0
1085: THEN
1086: reset_control_status;
1087:
1088: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1089: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SUBMITTING BE TRANSACTIONS IMPORT REPORT');
1090: END IF;
1091:
1092: v_req_id := FND_REQUEST.SUBMIT_REQUEST

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

1085: THEN
1086: reset_control_status;
1087:
1088: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1089: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SUBMITTING BE TRANSACTIONS IMPORT REPORT');
1090: END IF;
1091:
1092: v_req_id := FND_REQUEST.SUBMIT_REQUEST
1093: ('FV','FVBEINTR','','',FALSE, parm_ledger_id, parm_source, parm_group_id);

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

1092: v_req_id := FND_REQUEST.SUBMIT_REQUEST
1093: ('FV','FVBEINTR','','',FALSE, parm_ledger_id, parm_source, parm_group_id);
1094:
1095: -- If the request submission fails, then abort process
1096: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1097: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REQEST ID FOR REPORT = '||
1098: to_char(v_req_id)) ;
1099: END IF;
1100:

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

1093: ('FV','FVBEINTR','','',FALSE, parm_ledger_id, parm_source, parm_group_id);
1094:
1095: -- If the request submission fails, then abort process
1096: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1097: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REQEST ID FOR REPORT = '||
1098: to_char(v_req_id)) ;
1099: END IF;
1100:
1101: IF (v_req_id = 0)

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

1101: IF (v_req_id = 0)
1102: THEN
1103: errbuf := 'Unable to submit BE Transactions Import Report';
1104: retcode := -1;
1105: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message7',errbuf);
1106: ROLLBACK;
1107: reset_control_status;
1108: RETURN;
1109: END IF;

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

1171: end;
1172:
1173: -- Replace segment values having segment type 'N' with
1174: -- default segment values for that budget level
1175: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1176: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REPLACING SEGMENT VALUES WITH DEFAULT
1177: segment values before inserting');
1178: END IF;
1179: BEGIN

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

1172:
1173: -- Replace segment values having segment type 'N' with
1174: -- default segment values for that budget level
1175: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1176: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REPLACING SEGMENT VALUES WITH DEFAULT
1177: segment values before inserting');
1178: END IF;
1179: BEGIN
1180: FOR app_col_name IN app_col(valid_rec.set_of_books_id)

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

1206: END LOOP;
1207: EXCEPTION
1208: WHEN NO_DATA_FOUND THEN
1209: errbuf := 'No Data Found error occurred while copying default segment values';
1210: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message8',errbuf);
1211: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND ERROR OCCURRED
1212: while copying default segment values');
1213: retcode := -1;
1214: reset_control_status;

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

1207: EXCEPTION
1208: WHEN NO_DATA_FOUND THEN
1209: errbuf := 'No Data Found error occurred while copying default segment values';
1210: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message8',errbuf);
1211: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND ERROR OCCURRED
1212: while copying default segment values');
1213: retcode := -1;
1214: reset_control_status;
1215: ROLLBACK;

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

1216: RETURN;
1217:
1218: WHEN OTHERS THEN
1219: errbuf := substr(sqlerrm,1,100)||':When others error occurred while copying default segment values';
1220: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message9',errbuf);
1221: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,SUBSTR(SQLERRM,1,100)||':WHEN OTHERS ERROR
1222: occurred while copying default segment values');
1223: retcode := -1;
1224: reset_control_status;

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

1217:
1218: WHEN OTHERS THEN
1219: errbuf := substr(sqlerrm,1,100)||':When others error occurred while copying default segment values';
1220: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message9',errbuf);
1221: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,SUBSTR(SQLERRM,1,100)||':WHEN OTHERS ERROR
1222: occurred while copying default segment values');
1223: retcode := -1;
1224: reset_control_status;
1225: ROLLBACK;

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

1242: AND budget_level_id = valid_rec.budget_level_id
1243: AND apprn_transaction_type = valid_rec.transaction_type;
1244:
1245: -- check if document number exists
1246: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1247: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'CHECKING IF DOC :'||VALID_REC.DOC_NUMBER||
1248: ' exists for fund '||valid_rec.fund_value||
1249: ' and budget level id: '||valid_rec.budget_level_id);
1250: END IF;

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

1243: AND apprn_transaction_type = valid_rec.transaction_type;
1244:
1245: -- check if document number exists
1246: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1247: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'CHECKING IF DOC :'||VALID_REC.DOC_NUMBER||
1248: ' exists for fund '||valid_rec.fund_value||
1249: ' and budget level id: '||valid_rec.budget_level_id);
1250: END IF;
1251: BEGIN

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

1280: WHERE fund_value = valid_rec.fund_value
1281: AND set_of_books_id = valid_rec.set_of_books_id;
1282:
1283: IF valid_rec.budget_level_id = 1 THEN
1284: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1285: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'INSERTING NEW HEADER RECORD');
1286: END IF;
1287: -- Select the budget group id for the User
1288: BEGIN

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

1281: AND set_of_books_id = valid_rec.set_of_books_id;
1282:
1283: IF valid_rec.budget_level_id = 1 THEN
1284: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1285: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'INSERTING NEW HEADER RECORD');
1286: END IF;
1287: -- Select the budget group id for the User
1288: BEGIN
1289: SELECT bu_group_id

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

1295: EXCEPTION
1296: WHEN OTHERS THEN
1297: retcode := -1;
1298: errbuf := 'Invalid budget user or Access level';
1299: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,errbuf);
1300: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'Error in getting the Group ID'
1301: || ' for the user user id => '||valid_rec.budget_user_id
1302: || ' budget level id ' || valid_rec.budget_level_id );
1303: reset_control_status;

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

1296: WHEN OTHERS THEN
1297: retcode := -1;
1298: errbuf := 'Invalid budget user or Access level';
1299: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,errbuf);
1300: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'Error in getting the Group ID'
1301: || ' for the user user id => '||valid_rec.budget_user_id
1302: || ' budget level id ' || valid_rec.budget_level_id );
1303: reset_control_status;
1304: ROLLBACK;

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

1365: IF v_num_segs = 0
1366: THEN
1367: retcode := -1;
1368: errbuf := 'No segments found in budgeting_segments';
1369: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message10',errbuf);
1370: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO SEGMENTS FOUND IN BUDGETING SEGMENTS');
1371: reset_control_status;
1372: ROLLBACK;
1373: RETURN;

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

1366: THEN
1367: retcode := -1;
1368: errbuf := 'No segments found in budgeting_segments';
1369: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message10',errbuf);
1370: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO SEGMENTS FOUND IN BUDGETING SEGMENTS');
1371: reset_control_status;
1372: ROLLBACK;
1373: RETURN;
1374: END IF;

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

1470: EXCEPTION
1471: WHEN NO_DATA_FOUND THEN
1472: retcode := -1;
1473: errbuf := 'No records found with the same segments for the previous budget level';
1474: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message11',errbuf);
1475: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'NO RECORDS FOUND WITH THE SAME SEGMENTS
1476: for the previous budget level');
1477: -- reset_control_status;
1478: -- ROLLBACK;

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

1471: WHEN NO_DATA_FOUND THEN
1472: retcode := -1;
1473: errbuf := 'No records found with the same segments for the previous budget level';
1474: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message11',errbuf);
1475: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'NO RECORDS FOUND WITH THE SAME SEGMENTS
1476: for the previous budget level');
1477: -- reset_control_status;
1478: -- ROLLBACK;
1479: update_err_rec(valid_rec.record_number);

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

1480: RETURN;
1481: WHEN OTHERS THEN
1482: retcode := -1;
1483: errbuf := 'When others error while checking for segments in the previous budget level.'||SQLERRM;
1484: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message12',errbuf);
1485: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'WHEN OTHERS ERROR WHILE CHECKING FOR
1486: segments in the previous budget level');
1487: reset_control_status;
1488: ROLLBACK;

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

1481: WHEN OTHERS THEN
1482: retcode := -1;
1483: errbuf := 'When others error while checking for segments in the previous budget level.'||SQLERRM;
1484: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'message12',errbuf);
1485: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'WHEN OTHERS ERROR WHILE CHECKING FOR
1486: segments in the previous budget level');
1487: reset_control_status;
1488: ROLLBACK;
1489: RETURN;

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

1499: EXCEPTION
1500: WHEN OTHERS THEN
1501: retcode := -1;
1502: errbuf := 'Invalid budget user or Acecess level';
1503: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name, errbuf);
1504: reset_control_status;
1505: RETURN;
1506: END;
1507:

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

1734: WHERE doc_id = v_doc_id;
1735:
1736: END LOOP;
1737:
1738: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1739: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'RUNNING UPDATE CLEANUP');
1740: END IF;
1741: update_cleanup(parm_source,parm_group_id);
1742:

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

1735:
1736: END LOOP;
1737:
1738: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1739: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'RUNNING UPDATE CLEANUP');
1740: END IF;
1741: update_cleanup(parm_source,parm_group_id);
1742:
1743: IF retcode <> 0

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

1746: reset_control_status;
1747: RETURN;
1748: END IF;
1749:
1750: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1751: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SUBMITTING BE TRANSACTIONS IMPORT REPORT');
1752: END IF;
1753: v_req_id := 0;
1754:

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

1747: RETURN;
1748: END IF;
1749:
1750: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1751: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'SUBMITTING BE TRANSACTIONS IMPORT REPORT');
1752: END IF;
1753: v_req_id := 0;
1754:
1755: v_req_id := FND_REQUEST.SUBMIT_REQUEST

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

1755: v_req_id := FND_REQUEST.SUBMIT_REQUEST
1756: ('FV','FVBEINTR','','',FALSE, parm_ledger_id, parm_source, parm_group_id);
1757:
1758: -- If the request submission fails, then abort process
1759: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1760: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REQEST ID FOR REPORT = '||
1761: to_char(v_req_id)) ;
1762: END IF;
1763:

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

1756: ('FV','FVBEINTR','','',FALSE, parm_ledger_id, parm_source, parm_group_id);
1757:
1758: -- If the request submission fails, then abort process
1759: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1760: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'REQEST ID FOR REPORT = '||
1761: to_char(v_req_id)) ;
1762: END IF;
1763:
1764: IF (v_req_id = 0)

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

1763:
1764: IF (v_req_id = 0)
1765: THEN
1766: errbuf := 'Unable to submit BE Transactions Import Report';
1767: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.message13',errbuf);
1768: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'UNABLE TO SUBMIT BE TRANSACTIONS IMPORT REPORT');
1769: retcode := -1;
1770: ROLLBACK;
1771: reset_control_status;

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

1764: IF (v_req_id = 0)
1765: THEN
1766: errbuf := 'Unable to submit BE Transactions Import Report';
1767: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.message13',errbuf);
1768: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'UNABLE TO SUBMIT BE TRANSACTIONS IMPORT REPORT');
1769: retcode := -1;
1770: ROLLBACK;
1771: reset_control_status;
1772: RETURN;

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

1778: EXCEPTION
1779: WHEN OTHERS THEN
1780: retcode := -1;
1781: errbuf := SQLERRM;
1782: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1783:
1784: END; -- Main
1785: --------------------------------------------------------------------------------
1786: -- Procedures being used by the above code

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

1801: EXCEPTION
1802: WHEN OTHERS THEN
1803: errbuf := SQLERRM;
1804: retcode := -1;
1805: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1806:
1807: END update_err_code;
1808: --------------------------------------------------------------------------------
1809: -- Procedure to validate set of books id

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

1820: v_error_code := -9;
1821: WHEN OTHERS THEN
1822: retcode := -1;
1823: errbuf := 'When others error while validating set of books id.'||SQLERRM;
1824: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1825: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1826: set of books id');
1827: reset_control_status;
1828: END validate_sob;

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

1821: WHEN OTHERS THEN
1822: retcode := -1;
1823: errbuf := 'When others error while validating set of books id.'||SQLERRM;
1824: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1825: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1826: set of books id');
1827: reset_control_status;
1828: END validate_sob;
1829: --------------------------------------------------------------------------------

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

1848: v_error_code := -9;
1849: WHEN OTHERS THEN
1850: retcode := -1;
1851: errbuf := 'When others error while validating period name.'||SQLERRM;
1852: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1853: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1854: period name');
1855: reset_control_status;
1856: END validate_gl_date;

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

1849: WHEN OTHERS THEN
1850: retcode := -1;
1851: errbuf := 'When others error while validating period name.'||SQLERRM;
1852: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1853: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1854: period name');
1855: reset_control_status;
1856: END validate_gl_date;
1857: --------------------------------------------------------------------------------

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

1871: v_error_code := -9;
1872: WHEN OTHERS THEN
1873: retcode := -1;
1874: errbuf := 'When others error while validating budget level.'||SQLERRM;
1875: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1876: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1877: budget level');
1878: reset_control_status;
1879: END validate_budget_level;

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

1872: WHEN OTHERS THEN
1873: retcode := -1;
1874: errbuf := 'When others error while validating budget level.'||SQLERRM;
1875: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1876: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1877: budget level');
1878: reset_control_status;
1879: END validate_budget_level;
1880: ---------------------------------------------------------------------------------

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

1897: EXCEPTION
1898: WHEN OTHERS THEN
1899: retcode := -1;
1900: errbuf := 'When others error while validating budget User.'||SQLERRM;
1901: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1902: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1903: budget User user ID =>'|| p_bu_user_id);
1904: reset_control_status;
1905:

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

1898: WHEN OTHERS THEN
1899: retcode := -1;
1900: errbuf := 'When others error while validating budget User.'||SQLERRM;
1901: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1902: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1903: budget User user ID =>'|| p_bu_user_id);
1904: reset_control_status;
1905:
1906: END;---------------------------------------------------------------------------------

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

1927: v_error_code := -11;
1928: WHEN OTHERS THEN
1929: retcode := -1;
1930: errbuf := 'When others error while validating budget User.'||SQLERRM;
1931: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1932: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1933: budget User Access Level bu_user_id =>'|| p_bu_user_id
1934: || ' Budget_level_id => ' || p_budget_level_id);
1935: reset_control_status;

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

1928: WHEN OTHERS THEN
1929: retcode := -1;
1930: errbuf := 'When others error while validating budget User.'||SQLERRM;
1931: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1932: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1933: budget User Access Level bu_user_id =>'|| p_bu_user_id
1934: || ' Budget_level_id => ' || p_budget_level_id);
1935: reset_control_status;
1936:

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

1955: v_error_code := -9;
1956: WHEN OTHERS THEN
1957: retcode := -1;
1958: errbuf := 'When others error while validating fund value.'||SQLERRM;
1959: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1960: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1961: fund value');
1962: reset_control_status;
1963: END validate_fund_value;

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

1956: WHEN OTHERS THEN
1957: retcode := -1;
1958: errbuf := 'When others error while validating fund value.'||SQLERRM;
1959: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
1960: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
1961: fund value');
1962: reset_control_status;
1963: END validate_fund_value;
1964: --------------------------------------------------------------------------------

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

1996: v_error_code := -9;
1997: WHEN OTHERS THEN
1998: retcode := -1;
1999: errbuf := SUBSTR(SQLERRM,1,100)||' :When others error while validating expire/cancel date for treasury symbol';
2000: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2001: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,SUBSTR(SQLERRM,1,100)||' :WHEN OTHERS ERROR
2002: while validating expire/cancel date for treasury symbol');
2003: reset_control_status;
2004: END validate_tsymbol_date;

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

1997: WHEN OTHERS THEN
1998: retcode := -1;
1999: errbuf := SUBSTR(SQLERRM,1,100)||' :When others error while validating expire/cancel date for treasury symbol';
2000: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2001: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,SUBSTR(SQLERRM,1,100)||' :WHEN OTHERS ERROR
2002: while validating expire/cancel date for treasury symbol');
2003: reset_control_status;
2004: END validate_tsymbol_date;
2005: --------------------------------------------------------------------------------

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

2065: v_error_code := -9;
2066: WHEN OTHERS THEN
2067: retcode := -1;
2068: errbuf := 'When others error while validating Transaction Type.'||SQLERRM;
2069: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2070: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
2071: Transaction Type');
2072: reset_control_status;
2073: END validate_trx_type_attribs;

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

2066: WHEN OTHERS THEN
2067: retcode := -1;
2068: errbuf := 'When others error while validating Transaction Type.'||SQLERRM;
2069: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2070: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE VALIDATING
2071: Transaction Type');
2072: reset_control_status;
2073: END validate_trx_type_attribs;
2074: --------------------------------------------------------------------------------

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

2106: AND T.BUDGET_LEVEL_ID = V_BUDGET_LEVEL_ID
2107: AND T.APPRN_TRANSACTION_TYPE = V_TRX_TYPE
2108: AND S.SUB_TYPE = V_SUB_TYPE;
2109: ELSE
2110: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'Sub Type flag is set to No');
2111: END IF;
2112: EXCEPTION
2113: -- If Sub-Type does not exist
2114: WHEN NO_DATA_FOUND THEN

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

2115: v_error_code := -9;
2116: WHEN OTHERS THEN
2117: retcode := -1;
2118: errbuf := 'When others error while validating Sub Type.'||SQLERRM;
2119: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.message1',errbuf);
2120: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE
2121: validating Sub-Type');
2122: reset_control_status;
2123: END VALIDATE_SUB_TYPE;

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

2116: WHEN OTHERS THEN
2117: retcode := -1;
2118: errbuf := 'When others error while validating Sub Type.'||SQLERRM;
2119: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.message1',errbuf);
2120: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN OTHERS ERROR WHILE
2121: validating Sub-Type');
2122: reset_control_status;
2123: END VALIDATE_SUB_TYPE;
2124: --------------------------------------------------------------------------------

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

2187: v_error_code := -9;
2188: WHEN OTHERS THEN
2189: retcode := -1;
2190: errbuf := 'When others error while validating Document Number.'||SQLERRM;
2191: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.message1',errbuf);
2192: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'WHEN OTHERS ERROR WHILE
2193: validating Document Number');
2194: reset_control_status;
2195: END;

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

2188: WHEN OTHERS THEN
2189: retcode := -1;
2190: errbuf := 'When others error while validating Document Number.'||SQLERRM;
2191: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.message1',errbuf);
2192: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'WHEN OTHERS ERROR WHILE
2193: validating Document Number');
2194: reset_control_status;
2195: END;
2196: WHEN OTHERS THEN

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

2195: END;
2196: WHEN OTHERS THEN
2197: retcode := -1;
2198: errbuf := 'When others error while validating Document Number.'||SQLERRM;
2199: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2200: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE
2201: validating Document Number');
2202: reset_control_status;
2203: END validate_doc_number;

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

2196: WHEN OTHERS THEN
2197: retcode := -1;
2198: errbuf := 'When others error while validating Document Number.'||SQLERRM;
2199: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2200: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR WHILE
2201: validating Document Number');
2202: reset_control_status;
2203: END validate_doc_number;
2204: --------------------------------------------------------------------------------

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

2263: EXCEPTION
2264: WHEN OTHERS THEN
2265: retcode := -1;
2266: errbuf := 'When others error while validating DFF.'||SQLERRM;
2267: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2268: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,errbuf);
2269: reset_control_status;
2270: END validate_dff;
2271: --------------------------------------------------------------------------------

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

2264: WHEN OTHERS THEN
2265: retcode := -1;
2266: errbuf := 'When others error while validating DFF.'||SQLERRM;
2267: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2268: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,errbuf);
2269: reset_control_status;
2270: END validate_dff;
2271: --------------------------------------------------------------------------------
2272: -- Procedure to copy default segment values

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

2316: END LOOP;
2317: EXCEPTION
2318: WHEN NO_DATA_FOUND THEN
2319: errbuf := 'No Data Found error while copying default segment values';
2320: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.no_data',errbuf);
2321: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND ERROR WHILE COPYING
2322: default segment values');
2323: retcode := -1;
2324: reset_control_status;

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

2317: EXCEPTION
2318: WHEN NO_DATA_FOUND THEN
2319: errbuf := 'No Data Found error while copying default segment values';
2320: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.no_data',errbuf);
2321: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'NO DATA FOUND ERROR WHILE COPYING
2322: default segment values');
2323: retcode := -1;
2324: reset_control_status;
2325: WHEN OTHERS THEN

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

2323: retcode := -1;
2324: reset_control_status;
2325: WHEN OTHERS THEN
2326: errbuf := substr(sqlerrm,1,100)||':When others error while copying default segment values';
2327: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2328: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,SUBSTR(SQLERRM,1,100)||':WHEN OTHERS ERROR
2329: while copying default segment values');
2330: retcode := -1;
2331: reset_control_status;

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

2324: reset_control_status;
2325: WHEN OTHERS THEN
2326: errbuf := substr(sqlerrm,1,100)||':When others error while copying default segment values';
2327: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2328: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,SUBSTR(SQLERRM,1,100)||':WHEN OTHERS ERROR
2329: while copying default segment values');
2330: retcode := -1;
2331: reset_control_status;
2332: END copy_default_seg_vals;

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

2367: END LOOP;
2368: EXCEPTION
2369: WHEN NO_DATA_FOUND THEN
2370: errbuf := 'When no data found error while concatenating segments';
2371: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.no_data',errbuf);
2372: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN NO DATA FOUND ERROR WHILE CONCATENATING
2373: segments');
2374: retcode := -1;
2375: reset_control_status;

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

2368: EXCEPTION
2369: WHEN NO_DATA_FOUND THEN
2370: errbuf := 'When no data found error while concatenating segments';
2371: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.no_data',errbuf);
2372: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN NO DATA FOUND ERROR WHILE CONCATENATING
2373: segments');
2374: retcode := -1;
2375: reset_control_status;
2376: WHEN OTHERS THEN

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

2374: retcode := -1;
2375: reset_control_status;
2376: WHEN OTHERS THEN
2377: errbuf := SQLERRM;
2378: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2379: retcode := -1;
2380: END concat_segs;
2381: --------------------------------------------------------------------------------
2382: -- Procedure to update revision_num, doc_status

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

2389: l_prof_val VARCHAR2(1);
2390:
2391: BEGIN
2392: l_module_name := g_module_name || 'update_cleanup';
2393: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2394: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING REV NUM IN HEADERS');
2395: END IF;
2396: UPDATE fv_be_trx_hdrs fbh
2397: SET revision_num =

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

2390:
2391: BEGIN
2392: l_module_name := g_module_name || 'update_cleanup';
2393: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2394: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING REV NUM IN HEADERS');
2395: END IF;
2396: UPDATE fv_be_trx_hdrs fbh
2397: SET revision_num =
2398: (SELECT MAX(revision_num)

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

2399: FROM fv_be_trx_dtls fbd
2400: WHERE fbh.doc_id = fbd.doc_id)
2401: WHERE fbh.doc_status = 'IMPORTING';
2402:
2403: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2404: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING DOC STATUS IN HEADERS
2405: for existing recs');
2406: END IF;
2407: UPDATE fv_be_trx_hdrs

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

2400: WHERE fbh.doc_id = fbd.doc_id)
2401: WHERE fbh.doc_status = 'IMPORTING';
2402:
2403: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2404: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING DOC STATUS IN HEADERS
2405: for existing recs');
2406: END IF;
2407: UPDATE fv_be_trx_hdrs
2408: SET doc_status = 'RA'

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

2408: SET doc_status = 'RA'
2409: WHERE doc_status = 'IMPORTING'
2410: AND internal_revision_num <> -9999;
2411:
2412: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2413: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING DOC STATUS, REV NUM IN
2414: headers for new recs');
2415: END IF;
2416: UPDATE fv_be_trx_hdrs

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

2409: WHERE doc_status = 'IMPORTING'
2410: AND internal_revision_num <> -9999;
2411:
2412: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2413: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING DOC STATUS, REV NUM IN
2414: headers for new recs');
2415: END IF;
2416: UPDATE fv_be_trx_hdrs
2417: SET doc_status = 'IN',

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

2418: internal_revision_num = 0
2419: WHERE doc_status = 'IMPORTING'
2420: AND internal_revision_num = -9999;
2421:
2422: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2423: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING STATUS IN CONTROL TABLE');
2424: END IF;
2425: UPDATE fv_be_interface_control
2426: SET status = 'IMPORTED'

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

2419: WHERE doc_status = 'IMPORTING'
2420: AND internal_revision_num = -9999;
2421:
2422: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2423: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'UPDATING STATUS IN CONTROL TABLE');
2424: END IF;
2425: UPDATE fv_be_interface_control
2426: SET status = 'IMPORTED'
2427: WHERE source = parm_source

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

2430: l_prof_val := FND_PROFILE.VALUE('FV_ARCH_BE_INT_RECS');
2431:
2432: IF l_prof_val = 'Y'
2433: THEN
2434: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2435: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'INSERTING INTO HISTORY TABLE');
2436: END IF;
2437:
2438: INSERT INTO fv_be_interface_history

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

2431:
2432: IF l_prof_val = 'Y'
2433: THEN
2434: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2435: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'INSERTING INTO HISTORY TABLE');
2436: END IF;
2437:
2438: INSERT INTO fv_be_interface_history
2439: (record_number, set_of_books_id, source, group_id, error_code,

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

2480: AND status = 'ACCEPTED'
2481: AND processed_flag = 'Y';
2482: END IF;
2483:
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,'DELETING FROM BE_INTERFACE');
2486: END IF;
2487: DELETE FROM fv_be_interface
2488: WHERE source = parm_source

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

2481: AND processed_flag = 'Y';
2482: END IF;
2483:
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,'DELETING FROM BE_INTERFACE');
2486: END IF;
2487: DELETE FROM fv_be_interface
2488: WHERE source = parm_source
2489: AND group_id = parm_group_id

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

2493: EXCEPTION
2494: WHEN NO_DATA_FOUND THEN
2495: retcode := -1;
2496: errbuf := 'When no data found error in update_cleanup';
2497: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.no_data',errbuf);
2498: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN NO DATA FOUND ERROR IN UPDATE_CLEANUP');
2499: reset_control_status;
2500: WHEN OTHERS THEN
2501: retcode := -1;

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

2494: WHEN NO_DATA_FOUND THEN
2495: retcode := -1;
2496: errbuf := 'When no data found error in update_cleanup';
2497: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name||'.no_data',errbuf);
2498: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_ERROR, l_module_name,'WHEN NO DATA FOUND ERROR IN UPDATE_CLEANUP');
2499: reset_control_status;
2500: WHEN OTHERS THEN
2501: retcode := -1;
2502: errbuf := 'When others error in update_cleanup.'||SQLERRM;

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

2499: reset_control_status;
2500: WHEN OTHERS THEN
2501: retcode := -1;
2502: errbuf := 'When others error in update_cleanup.'||SQLERRM;
2503: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2504: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR IN UPDATE_CLEANUP');
2505: reset_control_status;
2506: END update_cleanup;
2507: --------------------------------------------------------------------------------

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

2500: WHEN OTHERS THEN
2501: retcode := -1;
2502: errbuf := 'When others error in update_cleanup.'||SQLERRM;
2503: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2504: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name,'WHEN OTHERS ERROR IN UPDATE_CLEANUP');
2505: reset_control_status;
2506: END update_cleanup;
2507: --------------------------------------------------------------------------------
2508: PROCEDURE update_err_rec(v_rec_number IN NUMBER) IS

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

2522: EXCEPTION
2523: WHEN OTHERS THEN
2524: retcode := -1;
2525: errbuf := SQLERRM;
2526: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2527: RAISE;
2528: END update_err_rec;
2529: --------------------------------------------------------------------------------
2530: -- This procedure resets the status in the control table

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

2534: l_module_name VARCHAR2(200);
2535: PRAGMA AUTONOMOUS_TRANSACTION;
2536: BEGIN
2537: l_module_name := g_module_name || 'reset_control_status';
2538: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2539: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'RESETTING STATUS IN THE CONTROL TABLE');
2540: END IF;
2541: UPDATE fv_be_interface_control
2542: SET status = 'REJECTED'

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

2535: PRAGMA AUTONOMOUS_TRANSACTION;
2536: BEGIN
2537: l_module_name := g_module_name || 'reset_control_status';
2538: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2539: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'RESETTING STATUS IN THE CONTROL TABLE');
2540: END IF;
2541: UPDATE fv_be_interface_control
2542: SET status = 'REJECTED'
2543: WHERE source = parm_source

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

2546: EXCEPTION
2547: WHEN OTHERS THEN
2548: retcode := -1;
2549: errbuf := SQLERRM;
2550: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_UNEXPECTED, l_module_name||'.final_exception',errbuf);
2551: RAISE;
2552: END reset_control_status;
2553: --------------------------------------------------------------------------------
2554: BEGIN