DBA Data[Home] [Help]

APPS.IGI_STP_CREATE_PCK_PKG dependencies on IGI_STP_CREATE_PCK_PKG

Line 1: PACKAGE BODY IGI_STP_CREATE_PCK_PKG AS

1: PACKAGE BODY IGI_STP_CREATE_PCK_PKG AS
2: -- $Header: igistpcb.pls 120.9 2008/03/05 13:35:55 gkumares ship $
3: -- Processing Variables
4: --following variables added for bug 3199481: fnd logging changes: sdixit
5: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

Line 351: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.feed_packages',TRUE);

347:
348: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
349: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
350: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
351: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.feed_packages',TRUE);
352: END IF;
353: RAISE_APPLICATION_ERROR(-20010, 'Error in feed_packages procedure');
354: END feed_packages;
355:

Line 376: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Delete_Candidates',TRUE);

372:
373: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
374: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
375: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
376: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Delete_Candidates',TRUE);
377: END IF;
378: -- fnd_message.set_name('SQLGL', 'MRC_SYSTEM_OPTIONS_NOT_FOUND');
379: -- fnd_message.set_token('MODULE','STEP 2');
380: -- RAISE_APPLICATION_ERROR(-20010, fnd_message.get);

Line 416: fnd_log.string(l_state_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',l_message||' : '||l_get_ap_amount);

412: l_variable := 'l_get_ap_amount';
413: l_value := to_char(l_get_ap_amount);
414: --bug 3199481 fnd logging changes: sdixit: start block
415: IF l_state_level >= l_debug_level THEN
416: fnd_log.string(l_state_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',l_message||' : '||l_get_ap_amount);
417: END IF;
418: --bug 3199481 fnd logging changes: sdixit: end block
419:
420: -- Calculate the AR netting amount

Line 431: 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',

427: l_value := to_char(l_get_ar_amount);
428: --bug 3199481 fnd logging changes: sdixit: start block
429: IF (l_state_level >= l_debug_level ) THEN
430: FND_LOG.STRING (l_state_level ,
431: 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',
432: l_message||' :'||l_get_ar_amount);
433: END IF;
434: --bug 3199481 fnd logging changes: sdixit: end block
435:

Line 446: 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',

442: l_ap_netting_amount := l_ar_netting_amount;
443: --bug 3199481 fnd logging changes: sdixit: start block
444: IF (l_state_level >= l_debug_level ) THEN
445: FND_LOG.STRING (l_state_level ,
446: 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',
447: l_message||' :'||l_ar_netting_amount);
448: END IF;
449: --bug 3199481 fnd logging changes: sdixit: end block
450:

Line 484: 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',

480: l_value := to_char(l_rec_ccid);
481: --bug 3199481 fnd logging changes: sdixit: start block
482: IF (l_state_level >= l_debug_level ) THEN
483: FND_LOG.STRING (l_state_level ,
484: 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',
485: l_message||' : '||l_rec_ccid);
486: END IF;
487: --bug 3199481 fnd logging changes: sdixit: end block
488:

Line 511: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',

507: ar_rec.exchange_date);
508:
509: --bug 3199481 fnd logging changes: sdixit: start block
510: IF (l_state_level >= l_debug_level ) THEN
511: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',
512: 'Creating a payables document');
513: END IF;
514: --bug 3199481 fnd logging changes: sdixit: end block
515: l_ar_netting_amount := l_ar_netting_amount - ar_rec.amount;

Line 522: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',

518: l_variable := 'l_ar_netting_amount';
519: l_value := to_char(l_ar_netting_amount);
520: --bug 3199481 fnd logging changes: sdixit: start block
521: IF (l_state_level >= l_debug_level ) THEN
522: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',
523: l_message||' : '||l_ar_netting_amount);
524: END IF;
525: --bug 3199481 fnd logging changes: sdixit: end block
526:

Line 559: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',

555: l_variable := 'l_liability_ccid';
556: l_value := to_char(l_liability_ccid);
557: --bug 3199481 fnd logging changes: sdixit: start block
558: IF (l_state_level >= l_debug_level ) THEN
559: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',
560: l_message||' : '||l_liability_ccid);
561: END IF;
562: --bug 3199481 fnd logging changes: sdixit: end block
563:

Line 586: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',l_message);

582:
583: l_message := 'Creating a receivable document';
584: --bug 3199481 fnd logging changes: sdixit: start block
585: IF (l_state_level >= l_debug_level ) THEN
586: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',l_message);
587: END IF;
588:
589: l_ap_netting_amount := l_ap_netting_amount - ap_rec.amount;
590: l_message := 'AP Netting amount diminish';

Line 595: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',

591: l_variable := 'l_ap_netting_amount';
592: l_value := to_char(l_ap_netting_amount);
593: --bug 3199481 fnd logging changes: sdixit: start block
594: IF (l_state_level >= l_debug_level ) THEN
595: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting',
596: l_message||' : '||l_ap_netting_amount);
597: END IF;
598:
599: IF l_ap_netting_amount <= 0 THEN

Line 617: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting.msg1',TRUE);

613:
614: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
615: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
616: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
617: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting.msg1',TRUE);
618: END IF;
619:
620: RAISE_APPLICATION_ERROR(-20010, 'Error in netting procedure Receivable AC ');
621: elsif l_flag = '2' then

Line 628: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting.msg2',TRUE);

624:
625: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
626: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
627: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
628: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting.msg2',TRUE);
629: END IF;
630: RAISE_APPLICATION_ERROR(-20010, 'Error in netting procedure Liability AC');
631: else
632: --bug 3199481 fnd logging changes: sdixit

Line 638: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting.msg3',TRUE);

634:
635: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
636: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
637: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
638: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Netting.msg3',TRUE);
639: END IF;
640: RAISE_APPLICATION_ERROR(-20010, 'Error in netting procedure');
641: end if;
642:

Line 675: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Ap_only_Netting',

671: l_value := to_char(l_ap_only_netting_amount);
672: --bug 3199481 fnd logging changes: sdixit: start block
673: -- fnd_file.put_line(fnd_file.log ,l_message||' : '||l_ap_only_netting_amount);
674: IF (l_state_level >= l_debug_level ) THEN
675: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Ap_only_Netting',
676: l_message||' : '||l_ap_only_netting_amount);
677: END IF;
678: --bug 3199481 fnd logging changes: sdixit: end block
679:

Line 695: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Ap_only_Netting',

691: l_value := to_char(l_contra_party_site_id);
692: --bug 3199481 fnd logging changes: sdixit: start block
693: --fnd_file.put_line(fnd_file.log ,l_message||' : '||l_contra_party_site_id);
694: IF (l_state_level >= l_debug_level ) THEN
695: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Ap_only_Netting',
696: l_message||' : '||l_contra_party_site_id);
697: END IF;
698: --bug 3199481 fnd logging changes: sdixit: end block
699:

Line 726: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.ap_only_Netting',

722: l_value := to_char(l_liability_ccid);
723: --bug 3199481 fnd logging changes: sdixit: start block
724: -- fnd_file.put_line(fnd_file.log ,l_message||' : '||l_liability_ccid);
725: IF (l_state_level >= l_debug_level ) THEN
726: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.ap_only_Netting',
727: l_message||' : '||l_liability_ccid);
728: END IF;
729: --bug 3199481 fnd logging changes: sdixit: end block
730:

Line 760: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Ap_only_Netting',l_message);

756: l_message := 'Create AP objection to payment document for the third party';
757: --bug 3199481 fnd logging changes: sdixit: start block
758: --d_file.put_line(fnd_file.log ,l_message);
759: IF (l_state_level >= l_debug_level ) THEN
760: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Ap_only_Netting',l_message);
761: END IF;
762: --bug 3199481 fnd logging changes: sdixit: end block
763:
764: -- Insert the AP document for the Contra party id

Line 785: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Ap_only_Netting',l_message);

781: ap_rec.exchange_date);
782: l_message := 'Create AP objection to payment document for the Contra party';
783: --bug 3199481 fnd logging changes: sdixit: start block
784: IF (l_state_level >= l_debug_level ) THEN
785: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Ap_only_Netting',l_message);
786: END IF;
787: --bug 3199481 fnd logging changes: sdixit: end block
788:
789: ELSIF p_netting_trx_type_id = 5 THEN

Line 815: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Ap_only_Netting',l_message);

811:
812: l_message := 'Create AP assignment document for the STP';
813: --bug 3199481 fnd logging changes: sdixit: start block
814: IF (l_state_level >= l_debug_level ) THEN
815: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Ap_only_Netting',l_message);
816: END IF;
817: --bug 3199481 fnd logging changes: sdixit: end block
818:
819: -- Insert the AP document for the Contra party id

Line 841: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Ap_only_Netting',l_message);

837: ap_rec.exchange_date);
838: l_message := 'Create AP assignment doc. for the Contra party';
839: --bug 3199481 fnd logging changes: sdixit: start block
840: IF (l_state_level >= l_debug_level ) THEN
841: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Ap_only_Netting',l_message);
842: END IF;
843: --bug 3199481 fnd logging changes: sdixit: end block
844:
845: END IF;

Line 853: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Ap_only_Netting',l_message);

849: l_variable := 'l_ap_only_netting_amount';
850: l_value := to_char(l_ap_only_netting_amount);
851: --bug 3199481 fnd logging changes: sdixit: start block
852: IF (l_state_level >= l_debug_level ) THEN
853: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Ap_only_Netting',l_message);
854: END IF;
855: --bug 3199481 fnd logging changes: sdixit: end block
856:
857: IF l_ap_only_netting_amount <= 0

Line 874: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.AP_Only_Netting.msg1',TRUE);

870:
871: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
872: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
873: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
874: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.AP_Only_Netting.msg1',TRUE);
875: END IF;
876: RAISE_APPLICATION_ERROR(-20010, 'Error in ap_only_netting procedure vendor site id');
877: elsif l_flag = '2' then
878: --bug 3199481 fnd logging changes: sdixit

Line 884: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.AP_Only_Netting.msg2',TRUE);

880:
881: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
882: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
883: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
884: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.AP_Only_Netting.msg2',TRUE);
885: END IF;
886: RAISE_APPLICATION_ERROR(-20010, 'Error in ap_only_netting procedure liability account');
887: else
888: --bug 3199481 fnd logging changes: sdixit

Line 894: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.AP_Only_Netting.msg3',TRUE);

890:
891: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
892: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
893: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
894: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.AP_Only_Netting.msg3',TRUE);
895: END IF;
896: RAISE_APPLICATION_ERROR(-20010, 'Error in ap_only_netting procedure' );
897: end if;
898: END AP_only_Netting;

Line 938: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Submit_Netting',l_message);

934: l_value := to_char(p_package_id);
935: l_message := 'package_id : '||to_char(p_package_id);
936: --bug 3199481 fnd logging changes: sdixit: start block
937: IF (l_state_level >= l_debug_level ) THEN
938: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Submit_Netting',l_message);
939: END IF;
940: --bug 3199481 fnd logging changes: sdixit: end block
941:
942: l_variable := 'p_netting_trx_type_id';

Line 947: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Submit_Netting',l_message);

943: l_value := to_char(p_netting_trx_type_id);
944: l_message := 'netting_trx_type_id : '||to_char(p_netting_trx_type_id);
945: --bug 3199481 fnd logging changes: sdixit: start block
946: IF (l_state_level >= l_debug_level ) THEN
947: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Submit_Netting',l_message);
948: END IF;
949: --bug 3199481 fnd logging changes: sdixit: end block
950:
951: --Transaction types 1 and 2 are commented because this partcular feature is not part of R12

Line 1010: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Pay_excess_Netting',l_message);

1006: l_variable := 'l_get_ar_amount';
1007: l_value := to_char(l_get_ar_amount);
1008: --bug 3199481 fnd logging changes: sdixit: start block
1009: IF (l_state_level >= l_debug_level ) THEN
1010: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.Pay_excess_Netting',l_message);
1011: END IF;
1012: --bug 3199481 fnd logging changes: sdixit: end block
1013:
1014: -- set the netting_amount to the lower of the AP netting amount

Line 1024: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.pay_excess_Netting',l_message);

1020: l_variable := 'l_ar_netting_amount';
1021: l_value := to_char(l_ar_netting_amount);
1022: --bug 3199481 fnd logging changes: sdixit: start block
1023: IF (l_state_level >= l_debug_level ) THEN
1024: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.pay_excess_Netting',l_message);
1025: END IF;
1026: --bug 3199481 fnd logging changes: sdixit: end block
1027: IF (l_ar_netting_amount <> 0) THEN
1028: l_flag := '1';

Line 1052: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.pay_excess_Netting',l_message);

1048: l_variable := 'l_rec_ccid';
1049: l_value := to_char(l_rec_ccid);
1050: --bug 3199481 fnd logging changes: sdixit: start block
1051: IF (l_state_level >= l_debug_level ) THEN
1052: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.pay_excess_Netting',l_message);
1053: END IF;
1054: --bug 3199481 fnd logging changes: sdixit: end block
1055: l_message := 'Creating a Receivable DM';
1056: feed_packages (p_batch_id,

Line 1076: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.pay_excess_Netting',l_message);

1072: ar_rec.exchange_date);
1073: l_message := 'Creating a payable invoice';
1074: --bug 3199481 fnd logging changes: sdixit: start block
1075: IF (l_state_level >= l_debug_level ) THEN
1076: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.pay_excess_Netting',l_message);
1077: END IF;
1078: --bug 3199481 fnd logging changes: sdixit: end block
1079:
1080: open get_vendor(ar_rec.stp_id);

Line 1111: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.pay_excess_Netting',l_message);

1107: l_variable := 'l_ar_netting_amount';
1108: l_value := to_char(l_ar_netting_amount);
1109: --bug 3199481 fnd logging changes: sdixit: start block
1110: IF (l_state_level >= l_debug_level ) THEN
1111: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.pay_excess_Netting',l_message);
1112: END IF;
1113: --bug 3199481 fnd logging changes: sdixit: end block
1114:
1115: IF l_ar_netting_amount <= 0 THEN

Line 1129: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.pay_excess_netting',TRUE);

1125:
1126: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
1127: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1128: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1129: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.pay_excess_netting',TRUE);
1130: END IF;
1131:
1132: if l_flag = '1' then
1133: RAISE_APPLICATION_ERROR(-20010, 'Error in pay excess netting procedure Receivable AC ');

Line 1168: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.sup_reimb_Netting',l_message);

1164: l_variable := 'l_get_ap_amount';
1165: l_value := to_char(l_get_ap_amount);
1166: --bug 3199481 fnd logging changes: sdixit: start block
1167: IF (l_state_level >= l_debug_level ) THEN
1168: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.sup_reimb_Netting',l_message);
1169: END IF;
1170: --bug 3199481 fnd logging changes: sdixit: end block
1171:
1172: l_message := 'Getting the netting amount';

Line 1197: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.sup_reimb_Netting',l_message);

1193: l_value := to_char(l_liability_ccid);
1194: --bug 3199481 fnd logging changes: sdixit: start block
1195: --fnd_file.put_line(fnd_file.log ,l_message);
1196: IF (l_state_level >= l_debug_level ) THEN
1197: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.sup_reimb_Netting',l_message);
1198: END IF;
1199: --bug 3199481 fnd logging changes: sdixit: end block
1200:
1201: feed_packages (p_batch_id,

Line 1221: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.sup_reimb_Netting',l_message);

1217: ap_rec.exchange_date);
1218: l_message := 'Creating a receivable document';
1219: --bug 3199481 fnd logging changes: sdixit: start block
1220: IF (l_state_level >= l_debug_level ) THEN
1221: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.sup_reimb_Netting',l_message);
1222: END IF;
1223: --bug 3199481 fnd logging changes: sdixit: end block
1224:
1225: open get_customer(ap_rec.stp_id);

Line 1255: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.sup_reimb_Netting',l_message);

1251: l_variable := 'l_ap_netting_amount';
1252: l_value := to_char(l_ap_netting_amount);
1253: --bug 3199481 fnd logging changes: sdixit: start block
1254: IF (l_state_level >= l_debug_level ) THEN
1255: FND_LOG.STRING (l_state_level , 'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.sup_reimb_Netting',l_message);
1256: END IF;
1257: --bug 3199481 fnd logging changes: sdixit: end block
1258:
1259: IF l_ap_netting_amount <= 0 THEN

Line 1272: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.sup_reimb_netting',TRUE);

1268:
1269: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
1270: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
1271: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
1272: FND_LOG.MESSAGE ( l_unexp_level,'igi.plsql.igistpcb.IGI_STP_CREATE_PCK_PKG.sup_reimb_netting',TRUE);
1273: END IF;
1274: if l_flag = '1' then
1275: RAISE_APPLICATION_ERROR(-20010, 'Error in supplier reimb netting procedure Liability AC');
1276: else

Line 1283: END IGI_STP_CREATE_PCK_PKG;

1279:
1280: END sup_reimb_netting;
1281:
1282:
1283: END IGI_STP_CREATE_PCK_PKG;