DBA Data[Home] [Help]

APPS.IGIPMSLR dependencies on FND_LOG

Line 15: --bug 3199481: following variables added for fnd logging changes:sdixit :start

11: AP_APPLICATION_ID CONSTANT NUMBER(15) := 200;
12: G_USER_ID CONSTANT NUMBER(15) := fnd_global.user_id;
13: G_DATE CONSTANT DATE := sysdate;
14: G_LOGIN_ID CONSTANT NUMBER(15) := fnd_global.login_id;
15: --bug 3199481: following variables added for fnd logging changes:sdixit :start
16: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
17: l_state_level number := FND_LOG.LEVEL_STATEMENT;
18: l_proc_level number := FND_LOG.LEVEL_PROCEDURE;
19: l_event_level number := FND_LOG.LEVEL_EVENT;

Line 16: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

12: G_USER_ID CONSTANT NUMBER(15) := fnd_global.user_id;
13: G_DATE CONSTANT DATE := sysdate;
14: G_LOGIN_ID CONSTANT NUMBER(15) := fnd_global.login_id;
15: --bug 3199481: following variables added for fnd logging changes:sdixit :start
16: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
17: l_state_level number := FND_LOG.LEVEL_STATEMENT;
18: l_proc_level number := FND_LOG.LEVEL_PROCEDURE;
19: l_event_level number := FND_LOG.LEVEL_EVENT;
20: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;

Line 17: l_state_level number := FND_LOG.LEVEL_STATEMENT;

13: G_DATE CONSTANT DATE := sysdate;
14: G_LOGIN_ID CONSTANT NUMBER(15) := fnd_global.login_id;
15: --bug 3199481: following variables added for fnd logging changes:sdixit :start
16: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
17: l_state_level number := FND_LOG.LEVEL_STATEMENT;
18: l_proc_level number := FND_LOG.LEVEL_PROCEDURE;
19: l_event_level number := FND_LOG.LEVEL_EVENT;
20: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
21: l_error_level number := FND_LOG.LEVEL_ERROR;

Line 18: l_proc_level number := FND_LOG.LEVEL_PROCEDURE;

14: G_LOGIN_ID CONSTANT NUMBER(15) := fnd_global.login_id;
15: --bug 3199481: following variables added for fnd logging changes:sdixit :start
16: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
17: l_state_level number := FND_LOG.LEVEL_STATEMENT;
18: l_proc_level number := FND_LOG.LEVEL_PROCEDURE;
19: l_event_level number := FND_LOG.LEVEL_EVENT;
20: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
21: l_error_level number := FND_LOG.LEVEL_ERROR;
22: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED;

Line 19: l_event_level number := FND_LOG.LEVEL_EVENT;

15: --bug 3199481: following variables added for fnd logging changes:sdixit :start
16: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
17: l_state_level number := FND_LOG.LEVEL_STATEMENT;
18: l_proc_level number := FND_LOG.LEVEL_PROCEDURE;
19: l_event_level number := FND_LOG.LEVEL_EVENT;
20: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
21: l_error_level number := FND_LOG.LEVEL_ERROR;
22: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED;
23:

Line 20: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;

16: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
17: l_state_level number := FND_LOG.LEVEL_STATEMENT;
18: l_proc_level number := FND_LOG.LEVEL_PROCEDURE;
19: l_event_level number := FND_LOG.LEVEL_EVENT;
20: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
21: l_error_level number := FND_LOG.LEVEL_ERROR;
22: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED;
23:
24: -- ----------

Line 21: l_error_level number := FND_LOG.LEVEL_ERROR;

17: l_state_level number := FND_LOG.LEVEL_STATEMENT;
18: l_proc_level number := FND_LOG.LEVEL_PROCEDURE;
19: l_event_level number := FND_LOG.LEVEL_EVENT;
20: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
21: l_error_level number := FND_LOG.LEVEL_ERROR;
22: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED;
23:
24: -- ----------
25: -- CURSORS

Line 22: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED;

18: l_proc_level number := FND_LOG.LEVEL_PROCEDURE;
19: l_event_level number := FND_LOG.LEVEL_EVENT;
20: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
21: l_error_level number := FND_LOG.LEVEL_ERROR;
22: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED;
23:
24: -- ----------
25: -- CURSORS
26: -- ----------

Line 186: --bug 3199481 fnd logging changes:sdixit :start

182: END LOOP;
183: END LOOP;
184: return null;
185: EXCEPTION WHEN OTHERS THEN
186: --bug 3199481 fnd logging changes:sdixit :start
187: --standard way to handle when-others as per FND logging guidelines
188:
189: IF ( l_unexp_level >= l_debug_level ) THEN
190:

Line 187: --standard way to handle when-others as per FND logging guidelines

183: END LOOP;
184: return null;
185: EXCEPTION WHEN OTHERS THEN
186: --bug 3199481 fnd logging changes:sdixit :start
187: --standard way to handle when-others as per FND logging guidelines
188:
189: IF ( l_unexp_level >= l_debug_level ) THEN
190:
191: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');

Line 194: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igipmslb.IGIPMSLR.DateFactor',TRUE);

190:
191: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
192: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
193: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
194: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igipmslb.IGIPMSLR.DateFactor',TRUE);
195: END IF;
196: --bug 3199481 fnd logging changes: sdixit: end block
197: return null;
198: END DateFactor;

Line 196: --bug 3199481 fnd logging changes: sdixit: end block

192: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
193: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
194: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igipmslb.IGIPMSLR.DateFactor',TRUE);
195: END IF;
196: --bug 3199481 fnd logging changes: sdixit: end block
197: return null;
198: END DateFactor;
199:
200: FUNCTION GetDay ( fp_period_name in varchar2, fp_sob_id in number,

Line 222: --bug 3199481 fnd logging changes:sdixit :start

218:
219: return NULL;
220: EXCEPTION
221: when others then
222: --bug 3199481 fnd logging changes:sdixit :start
223: --standard way to handle when-others as per FND logging guidelines
224:
225: IF ( l_unexp_level >= l_debug_level ) THEN
226:

Line 223: --standard way to handle when-others as per FND logging guidelines

219: return NULL;
220: EXCEPTION
221: when others then
222: --bug 3199481 fnd logging changes:sdixit :start
223: --standard way to handle when-others as per FND logging guidelines
224:
225: IF ( l_unexp_level >= l_debug_level ) THEN
226:
227: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');

Line 230: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igipmslb.IGIPMSLR.GetDay',TRUE);

226:
227: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
228: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
229: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
230: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igipmslb.IGIPMSLR.GetDay',TRUE);
231: END IF;
232: --bug 3199481 fnd logging changes: sdixit: end block
233: null;
234: END GetDay;

Line 232: --bug 3199481 fnd logging changes: sdixit: end block

228: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
229: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
230: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igipmslb.IGIPMSLR.GetDay',TRUE);
231: END IF;
232: --bug 3199481 fnd logging changes: sdixit: end block
233: null;
234: END GetDay;
235:
236: BEGIN

Line 389: --bug 3199481: fnd logging changes:sdixit :start

385: l_sublgr.reference1 := p_ext_dist.mpp_dist_line_number;
386: l_sublgr.period_name := p_ext_dist.period_name;
387:
388: IF p_dr_or_cr = 'DR' THEN
389: --bug 3199481: fnd logging changes:sdixit :start
390: IF (l_state_level >= l_debug_level ) THEN
391: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateNormalEntries',
392: '>> >> >> >> Debit entry..(EXPENSE).');
393: END IF;

Line 391: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateNormalEntries',

387:
388: IF p_dr_or_cr = 'DR' THEN
389: --bug 3199481: fnd logging changes:sdixit :start
390: IF (l_state_level >= l_debug_level ) THEN
391: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateNormalEntries',
392: '>> >> >> >> Debit entry..(EXPENSE).');
393: END IF;
394: l_sublgr.code_combination_id := p_ext_dist.code_combination_id;
395: ELSE

Line 396: --bug 3199481: fnd logging changes:sdixit :start

392: '>> >> >> >> Debit entry..(EXPENSE).');
393: END IF;
394: l_sublgr.code_combination_id := p_ext_dist.code_combination_id;
395: ELSE
396: --bug 3199481: fnd logging changes:sdixit :start
397: IF (l_state_level >= l_debug_level ) THEN
398: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateNormalEntries',
399: '>> >> >> >> Credit entry..(FUTURE POSTING).');
400: END IF;

Line 398: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateNormalEntries',

394: l_sublgr.code_combination_id := p_ext_dist.code_combination_id;
395: ELSE
396: --bug 3199481: fnd logging changes:sdixit :start
397: IF (l_state_level >= l_debug_level ) THEN
398: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateNormalEntries',
399: '>> >> >> >> Credit entry..(FUTURE POSTING).');
400: END IF;
401: --bug 3199481 fnd logging changes: sdixit: end block
402: l_sublgr.code_combination_id := p_future_posting_ccid;

Line 401: --bug 3199481 fnd logging changes: sdixit: end block

397: IF (l_state_level >= l_debug_level ) THEN
398: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateNormalEntries',
399: '>> >> >> >> Credit entry..(FUTURE POSTING).');
400: END IF;
401: --bug 3199481 fnd logging changes: sdixit: end block
402: l_sublgr.code_combination_id := p_future_posting_ccid;
403: END IF;
404:
405: SELECT DECODE(p_dr_or_cr,'DR',p_ext_dist.amount,null)

Line 454: --bug 3199481: fnd logging changes:sdixit :start

450: /*
451: -- Get the future posting account details and the
452: -- mpp distribution details
453: */
454: --bug 3199481: fnd logging changes:sdixit :start
455: IF (l_state_level >= l_debug_level ) THEN
456: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
457: '>> >> Inside Create new Subledger entry...');
458: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',

Line 456: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',

452: -- mpp distribution details
453: */
454: --bug 3199481: fnd logging changes:sdixit :start
455: IF (l_state_level >= l_debug_level ) THEN
456: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
457: '>> >> Inside Create new Subledger entry...');
458: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
459: '>> >> Validating Set up...');
460: END IF;

Line 458: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',

454: --bug 3199481: fnd logging changes:sdixit :start
455: IF (l_state_level >= l_debug_level ) THEN
456: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
457: '>> >> Inside Create new Subledger entry...');
458: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
459: '>> >> Validating Set up...');
460: END IF;
461: --bug 3199481 fnd logging changes: sdixit: end block
462: OPEN c_future_post;

Line 461: --bug 3199481 fnd logging changes: sdixit: end block

457: '>> >> Inside Create new Subledger entry...');
458: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
459: '>> >> Validating Set up...');
460: END IF;
461: --bug 3199481 fnd logging changes: sdixit: end block
462: OPEN c_future_post;
463: LOOP
464: FETCH c_future_post into l_future_post;
465: EXIT WHEN c_future_post%NOTFOUND;

Line 474: --bug 3199481: fnd logging changes:sdixit :start

470: ELSE
471: CLOSE c_future_post;
472: raise_application_error ( -20000, 'Future Posting Account is not set.');
473: END IF;
474: --bug 3199481: fnd logging changes:sdixit :start
475: IF (l_state_level >= l_debug_level ) THEN
476: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
477: '>> >> MPP Setup Validation successful...');
478: END IF;

Line 476: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',

472: raise_application_error ( -20000, 'Future Posting Account is not set.');
473: END IF;
474: --bug 3199481: fnd logging changes:sdixit :start
475: IF (l_state_level >= l_debug_level ) THEN
476: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
477: '>> >> MPP Setup Validation successful...');
478: END IF;
479: --bug 3199481 fnd logging changes: sdixit: end block
480: END LOOP;

Line 479: --bug 3199481 fnd logging changes: sdixit: end block

475: IF (l_state_level >= l_debug_level ) THEN
476: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
477: '>> >> MPP Setup Validation successful...');
478: END IF;
479: --bug 3199481 fnd logging changes: sdixit: end block
480: END LOOP;
481: CLOSE c_future_post;
482:
483:

Line 490: --bug 3199481: fnd logging changes:sdixit :start

486: END IF;
487: /*
488: -- Set the Subldger Template record
489: */
490: --bug 3199481: fnd logging changes:sdixit :start
491: IF (l_state_level >= l_debug_level ) THEN
492: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
493: '>> >> Building Sub ledger Template...');
494: END IF;

Line 492: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',

488: -- Set the Subldger Template record
489: */
490: --bug 3199481: fnd logging changes:sdixit :start
491: IF (l_state_level >= l_debug_level ) THEN
492: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
493: '>> >> Building Sub ledger Template...');
494: END IF;
495: --bug 3199481 fnd logging changes: sdixit: end block
496:

Line 495: --bug 3199481 fnd logging changes: sdixit: end block

491: IF (l_state_level >= l_debug_level ) THEN
492: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
493: '>> >> Building Sub ledger Template...');
494: END IF;
495: --bug 3199481 fnd logging changes: sdixit: end block
496:
497: l_sublgr.invoice_id := p_dist.invoice_id;
498: l_sublgr.distribution_line_number := p_dist.distribution_line_number;
499: l_sublgr.last_update_date := g_date;

Line 543: --bug 3199481: fnd logging changes:sdixit :start

539: --
540: -- Create Offset Account entries at the invoice distribution
541: -- line level
542: */
543: --bug 3199481: fnd logging changes:sdixit :start
544: IF (l_state_level >= l_debug_level ) THEN
545: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
546: '>> >> Creating Offset entries...');
547: END IF;

Line 545: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',

541: -- line level
542: */
543: --bug 3199481: fnd logging changes:sdixit :start
544: IF (l_state_level >= l_debug_level ) THEN
545: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
546: '>> >> Creating Offset entries...');
547: END IF;
548: --bug 3199481 fnd logging changes: sdixit: end block
549:

Line 548: --bug 3199481 fnd logging changes: sdixit: end block

544: IF (l_state_level >= l_debug_level ) THEN
545: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
546: '>> >> Creating Offset entries...');
547: END IF;
548: --bug 3199481 fnd logging changes: sdixit: end block
549:
550:
551: IF NOT ExistsOffsetEntries ( p_dist.invoice_id
552: , p_dist.distribution_line_number

Line 554: --bug 3199481: fnd logging changes:sdixit :start

550:
551: IF NOT ExistsOffsetEntries ( p_dist.invoice_id
552: , p_dist.distribution_line_number
553: ) THEN
554: --bug 3199481: fnd logging changes:sdixit :start
555: IF (l_state_level >= l_debug_level ) THEN
556: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
557: '>> >> >> Creating Offset entries (CR) OF EXPENSE ...');
558: END IF;

Line 556: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',

552: , p_dist.distribution_line_number
553: ) THEN
554: --bug 3199481: fnd logging changes:sdixit :start
555: IF (l_state_level >= l_debug_level ) THEN
556: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
557: '>> >> >> Creating Offset entries (CR) OF EXPENSE ...');
558: END IF;
559: --bug 3199481 fnd logging changes: sdixit: end block
560: CreateOffsetEntries ( l_sublgr

Line 559: --bug 3199481 fnd logging changes: sdixit: end block

555: IF (l_state_level >= l_debug_level ) THEN
556: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
557: '>> >> >> Creating Offset entries (CR) OF EXPENSE ...');
558: END IF;
559: --bug 3199481 fnd logging changes: sdixit: end block
560: CreateOffsetEntries ( l_sublgr
561: , p_dist.dist_code_combination_id
562: , 'CR'
563: , p_dist.amount

Line 566: --bug 3199481: fnd logging changes:sdixit :start

562: , 'CR'
563: , p_dist.amount
564: , p_dist.base_amount
565: );
566: --bug 3199481: fnd logging changes:sdixit :start
567: IF (l_state_level >= l_debug_level ) THEN
568: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
569: '>> >> >> Creating Offset entries (DR) OF FUTURE POSTING ...');
570: END IF;

Line 568: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',

564: , p_dist.base_amount
565: );
566: --bug 3199481: fnd logging changes:sdixit :start
567: IF (l_state_level >= l_debug_level ) THEN
568: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
569: '>> >> >> Creating Offset entries (DR) OF FUTURE POSTING ...');
570: END IF;
571: --bug 3199481 fnd logging changes: sdixit: end block
572: CreateOffsetEntries ( l_sublgr

Line 571: --bug 3199481 fnd logging changes: sdixit: end block

567: IF (l_state_level >= l_debug_level ) THEN
568: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
569: '>> >> >> Creating Offset entries (DR) OF FUTURE POSTING ...');
570: END IF;
571: --bug 3199481 fnd logging changes: sdixit: end block
572: CreateOffsetEntries ( l_sublgr
573: , l_future_post.future_posting_ccid
574: , 'DR'
575: , p_dist.amount

Line 582: --bug 3199481: fnd logging changes:sdixit :start

578:
579: FOR l_mpp IN c_ext_dist ( p_dist.invoice_id
580: , p_dist.distribution_line_number )
581: LOOP
582: --bug 3199481: fnd logging changes:sdixit :start
583: IF (l_state_level >= l_debug_level ) THEN
584: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
585: '>> >> >> Creating Normal entries (DR) OF EXPENSE ...');
586: END IF;

Line 584: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',

580: , p_dist.distribution_line_number )
581: LOOP
582: --bug 3199481: fnd logging changes:sdixit :start
583: IF (l_state_level >= l_debug_level ) THEN
584: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
585: '>> >> >> Creating Normal entries (DR) OF EXPENSE ...');
586: END IF;
587: --bug 3199481 fnd logging changes: sdixit: end block
588:

Line 587: --bug 3199481 fnd logging changes: sdixit: end block

583: IF (l_state_level >= l_debug_level ) THEN
584: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
585: '>> >> >> Creating Normal entries (DR) OF EXPENSE ...');
586: END IF;
587: --bug 3199481 fnd logging changes: sdixit: end block
588:
589: CreateNormalEntries ( l_sublgr
590: , l_mpp
591: , l_future_post.future_posting_ccid

Line 594: --bug 3199481: fnd logging changes:sdixit :start

590: , l_mpp
591: , l_future_post.future_posting_ccid
592: , 'DR' )
593: ;
594: --bug 3199481: fnd logging changes:sdixit :start
595: IF (l_state_level >= l_debug_level ) THEN
596: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
597: '>> >> >> Creating Normal entries (CR) OF FUTURE POSTING ...');
598: END IF;

Line 596: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',

592: , 'DR' )
593: ;
594: --bug 3199481: fnd logging changes:sdixit :start
595: IF (l_state_level >= l_debug_level ) THEN
596: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
597: '>> >> >> Creating Normal entries (CR) OF FUTURE POSTING ...');
598: END IF;
599: --bug 3199481 fnd logging changes: sdixit: end block
600:

Line 599: --bug 3199481 fnd logging changes: sdixit: end block

595: IF (l_state_level >= l_debug_level ) THEN
596: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.CreateEntries',
597: '>> >> >> Creating Normal entries (CR) OF FUTURE POSTING ...');
598: END IF;
599: --bug 3199481 fnd logging changes: sdixit: end block
600:
601: CreateNormalEntries ( l_sublgr
602: , l_mpp
603: , l_future_post.future_posting_ccid

Line 620: --bug 3199481: fnd logging changes:sdixit :start

616: l_currency_code ap_invoices_all.invoice_currency_code%TYPE := NULL;
617:
618: BEGIN
619:
620: --bug 3199481: fnd logging changes:sdixit :start
621: IF (l_state_level >= l_debug_level ) THEN
622: FND_LOG.STRING (l_state_level ,'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
623: 'Begin Creation of MPP Subledger Entry...');
624: END IF;

Line 622: FND_LOG.STRING (l_state_level ,'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',

618: BEGIN
619:
620: --bug 3199481: fnd logging changes:sdixit :start
621: IF (l_state_level >= l_debug_level ) THEN
622: FND_LOG.STRING (l_state_level ,'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
623: 'Begin Creation of MPP Subledger Entry...');
624: END IF;
625:
626: l_currency_code := GetInvoiceCurrency ( p_invoice_id );

Line 628: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',

624: END IF;
625:
626: l_currency_code := GetInvoiceCurrency ( p_invoice_id );
627: IF (l_state_level >= l_debug_level ) THEN
628: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
629: '>> Invoice Currency '||l_currency_code );
630: END IF;
631: --bug 3199481 fnd logging changes: sdixit: end block
632:

Line 631: --bug 3199481 fnd logging changes: sdixit: end block

627: IF (l_state_level >= l_debug_level ) THEN
628: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
629: '>> Invoice Currency '||l_currency_code );
630: END IF;
631: --bug 3199481 fnd logging changes: sdixit: end block
632:
633: FOR l_dist in c_dist ( p_invoice_id, p_distribution_line_number ) LOOP
634: --bug 3199481: fnd logging changes:sdixit :start
635: IF (l_state_level >= l_debug_level ) THEN

Line 634: --bug 3199481: fnd logging changes:sdixit :start

630: END IF;
631: --bug 3199481 fnd logging changes: sdixit: end block
632:
633: FOR l_dist in c_dist ( p_invoice_id, p_distribution_line_number ) LOOP
634: --bug 3199481: fnd logging changes:sdixit :start
635: IF (l_state_level >= l_debug_level ) THEN
636: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
637: '>> Processing Invoice Distributions ...');
638: END IF;

Line 636: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',

632:
633: FOR l_dist in c_dist ( p_invoice_id, p_distribution_line_number ) LOOP
634: --bug 3199481: fnd logging changes:sdixit :start
635: IF (l_state_level >= l_debug_level ) THEN
636: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
637: '>> Processing Invoice Distributions ...');
638: END IF;
639: IF (l_state_level >= l_debug_level ) THEN
640: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',

Line 640: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',

636: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
637: '>> Processing Invoice Distributions ...');
638: END IF;
639: IF (l_state_level >= l_debug_level ) THEN
640: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
641: '>> Processing MPP distributions ...');
642: END IF;
643: --bug 3199481 fnd logging changes: sdixit: end block
644:

Line 643: --bug 3199481 fnd logging changes: sdixit: end block

639: IF (l_state_level >= l_debug_level ) THEN
640: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
641: '>> Processing MPP distributions ...');
642: END IF;
643: --bug 3199481 fnd logging changes: sdixit: end block
644:
645: IF ExistsRecognizedEntries ( l_dist.invoice_id
646: , l_dist.distribution_line_number
647: ) THEN

Line 648: --bug 3199481: fnd logging changes:sdixit :start

644:
645: IF ExistsRecognizedEntries ( l_dist.invoice_id
646: , l_dist.distribution_line_number
647: ) THEN
648: --bug 3199481: fnd logging changes:sdixit :start
649: IF (l_state_level >= l_debug_level ) THEN
650: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
651: '>> >> Subledger entries have been recognized or posted...');
652: END IF;

Line 650: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',

646: , l_dist.distribution_line_number
647: ) THEN
648: --bug 3199481: fnd logging changes:sdixit :start
649: IF (l_state_level >= l_debug_level ) THEN
650: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
651: '>> >> Subledger entries have been recognized or posted...');
652: END IF;
653: IF (l_state_level >= l_debug_level ) THEN
654: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',

Line 654: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',

650: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
651: '>> >> Subledger entries have been recognized or posted...');
652: END IF;
653: IF (l_state_level >= l_debug_level ) THEN
654: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
655: '>> >> Stop further processing on this MPP distribution...');
656: END IF;
657: --bug 3199481 fnd logging changes: sdixit: end block
658:

Line 657: --bug 3199481 fnd logging changes: sdixit: end block

653: IF (l_state_level >= l_debug_level ) THEN
654: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
655: '>> >> Stop further processing on this MPP distribution...');
656: END IF;
657: --bug 3199481 fnd logging changes: sdixit: end block
658:
659: NULL;
660: ELSE
661: --bug 3199481: fnd logging changes:sdixit :start

Line 661: --bug 3199481: fnd logging changes:sdixit :start

657: --bug 3199481 fnd logging changes: sdixit: end block
658:
659: NULL;
660: ELSE
661: --bug 3199481: fnd logging changes:sdixit :start
662: IF (l_state_level >= l_debug_level ) THEN
663: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
664: '>> >> Delete from Subledger Entries...');
665: END IF;

Line 663: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',

659: NULL;
660: ELSE
661: --bug 3199481: fnd logging changes:sdixit :start
662: IF (l_state_level >= l_debug_level ) THEN
663: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
664: '>> >> Delete from Subledger Entries...');
665: END IF;
666: --bug 3199481 fnd logging changes: sdixit: end block
667:

Line 666: --bug 3199481 fnd logging changes: sdixit: end block

662: IF (l_state_level >= l_debug_level ) THEN
663: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
664: '>> >> Delete from Subledger Entries...');
665: END IF;
666: --bug 3199481 fnd logging changes: sdixit: end block
667:
668: delete from igi_mpp_subledger
669: where invoice_id = l_dist.invoice_id
670: and distribution_line_number = l_dist.distribution_line_number

Line 672: --bug 3199481: fnd logging changes:sdixit :start

668: delete from igi_mpp_subledger
669: where invoice_id = l_dist.invoice_id
670: and distribution_line_number = l_dist.distribution_line_number
671: ;
672: --bug 3199481: fnd logging changes:sdixit :start
673: --WriteToLog ('>> >> Create New Subledger Entries...');
674: IF (l_state_level >= l_debug_level ) THEN
675: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
676: '>> >> Create New Subledger Entries...');

Line 675: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',

671: ;
672: --bug 3199481: fnd logging changes:sdixit :start
673: --WriteToLog ('>> >> Create New Subledger Entries...');
674: IF (l_state_level >= l_debug_level ) THEN
675: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
676: '>> >> Create New Subledger Entries...');
677: END IF;
678: --bug 3199481 fnd logging changes: sdixit: end block
679: CreateEntries ( l_dist );

Line 678: --bug 3199481 fnd logging changes: sdixit: end block

674: IF (l_state_level >= l_debug_level ) THEN
675: FND_LOG.STRING (l_state_level , 'igi.pls.igipmslb.IGIPMSLR.Create_MPPSLR_Details',
676: '>> >> Create New Subledger Entries...');
677: END IF;
678: --bug 3199481 fnd logging changes: sdixit: end block
679: CreateEntries ( l_dist );
680:
681: END IF;
682: