DBA Data[Home] [Help]

APPS.GCS_INTERCO_DYNAMIC_PKG dependencies on FND_LOG

Line 9: g_fnd_login_id NUMBER := fnd_global.login_id;

5: -- PRIVATE GLOBAL VARIABLES
6: --
7: g_pkg_name VARCHAR2(100) := 'gcs.plsql.GCS_INTERCO_DYNAMIC_PKG';
8: g_fnd_user_id NUMBER := fnd_global.user_id;
9: g_fnd_login_id NUMBER := fnd_global.login_id;
10: g_no_rows NUMBER :=0;
11: g_intercompany_org_code VARCHAR2(30) := 'DIFFERENT_ORG' ;
12: g_specific_intercompany_id NUMBER:= 0;
13: g_cons_run_name VARCHAR2(80);

Line 38: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

34: -- Insert all eligible elimination lines from GCS_INTERCO_ELM_TRX
35: -- GCS_ENTRY-LINES.
36: BEGIN
37:
38: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
39: fnd_log.STRING (fnd_log.level_procedure,
40: g_pkg_name || '.' || l_api_name,
41: gcs_utility_pkg.g_module_enter
42: || ' '

Line 39: fnd_log.STRING (fnd_log.level_procedure,

35: -- GCS_ENTRY-LINES.
36: BEGIN
37:
38: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
39: fnd_log.STRING (fnd_log.level_procedure,
40: g_pkg_name || '.' || l_api_name,
41: gcs_utility_pkg.g_module_enter
42: || ' '
43: || l_api_name

Line 51: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

47: END IF;
48:
49:
50:
51: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
52: fnd_log.STRING (fnd_log.level_procedure,
53: g_pkg_name || '.' || l_api_name,
54: ' Arguments passed to Insr_Interco_Lines() '
55: ||' Hierarchy_Id: '||p_hierarchy_id

Line 52: fnd_log.STRING (fnd_log.level_procedure,

48:
49:
50:
51: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
52: fnd_log.STRING (fnd_log.level_procedure,
53: g_pkg_name || '.' || l_api_name,
54: ' Arguments passed to Insr_Interco_Lines() '
55: ||' Hierarchy_Id: '||p_hierarchy_id
56: ||' Cal_Period_Id: '||p_cal_period_id

Line 75: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

71: gbl_period_end_date := p_period_end_date;
72: IF (P_ELIM_MODE = 'IE') THEN
73: IF (p_match_rule_code = 'COMPANY') THEN /* In Intercompany option */
74: g_no_rows := 0;
75: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
76: fnd_log.STRING (fnd_log.level_procedure,
77: g_pkg_name || '.' || l_api_name,
78: 'Intercompany- Inserting entry lines'
79: || ' into GCS_ENTRY_LINES_GT'

Line 76: fnd_log.STRING (fnd_log.level_procedure,

72: IF (P_ELIM_MODE = 'IE') THEN
73: IF (p_match_rule_code = 'COMPANY') THEN /* In Intercompany option */
74: g_no_rows := 0;
75: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
76: fnd_log.STRING (fnd_log.level_procedure,
77: g_pkg_name || '.' || l_api_name,
78: 'Intercompany- Inserting entry lines'
79: || ' into GCS_ENTRY_LINES_GT'
80: || ' after matching by company-Receivables side'

Line 152: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

148:
149: giet.line_item_id;
150: g_no_rows := NVL(SQL%ROWCOUNT,0);
151:
152: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
153: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
154: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
155: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES_GT');
156:

Line 157: FND_LOG.String (fnd_log.level_procedure,

153: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
154: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
155: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES_GT');
156:
157: FND_LOG.String (fnd_log.level_procedure,
158: g_pkg_name || '.' || l_api_name,
159: 'SHRD0117: '||FND_MESSAGE.get);
160: END IF;
161:

Line 164: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

160: END IF;
161:
162: --****************************----
163: g_no_rows := 0;
164: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
165: fnd_log.STRING (fnd_log.level_procedure,
166: g_pkg_name || '.' || l_api_name,
167: 'Intercompany- Inserting entry lines'
168: || ' into GCS_ENTRY_LINES_GT'

Line 165: fnd_log.STRING (fnd_log.level_procedure,

161:
162: --****************************----
163: g_no_rows := 0;
164: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
165: fnd_log.STRING (fnd_log.level_procedure,
166: g_pkg_name || '.' || l_api_name,
167: 'Intercompany- Inserting entry lines'
168: || ' into GCS_ENTRY_LINES_GT'
169: || ' after matching by company - Payabales side'

Line 240: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

236:
237: giet.line_item_id;
238: g_no_rows := NVL(SQL%ROWCOUNT,0);
239:
240: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
241: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
242: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
243: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES_GT');
244:

Line 245: FND_LOG.String (fnd_log.level_procedure,

241: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
242: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
243: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES_GT');
244:
245: FND_LOG.String (fnd_log.level_procedure,
246: g_pkg_name || '.' || l_api_name,
247: 'SHRD0117: '||FND_MESSAGE.get);
248: END IF;
249:

Line 256: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

252:
253: ELSIF (p_match_rule_code = 'ORGANIZATION') THEN
254: --In Intercompany option
255: g_no_rows := 0;
256: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
257: fnd_log.STRING (fnd_log.level_procedure,
258: g_pkg_name || '.' || l_api_name,
259: 'Intercompany- Inserting entry lines'
260: || ' into GCS_ENTRY_LINES_GT'

Line 257: fnd_log.STRING (fnd_log.level_procedure,

253: ELSIF (p_match_rule_code = 'ORGANIZATION') THEN
254: --In Intercompany option
255: g_no_rows := 0;
256: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
257: fnd_log.STRING (fnd_log.level_procedure,
258: g_pkg_name || '.' || l_api_name,
259: 'Intercompany- Inserting entry lines'
260: || ' into GCS_ENTRY_LINES_GT'
261: || ' after matching by Org-Receivables side'

Line 335: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

331: giet.line_item_id;
332:
333: g_no_rows := NVL(SQL%ROWCOUNT,0);
334:
335: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
336: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
337: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
338: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES_GT');
339:

Line 340: FND_LOG.String (fnd_log.level_procedure,

336: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
337: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
338: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES_GT');
339:
340: FND_LOG.String (fnd_log.level_procedure,
341: g_pkg_name || '.' || l_api_name,
342: 'SHRD0117: '||FND_MESSAGE.get);
343: END IF;
344:

Line 347: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

343: END IF;
344:
345:
346: g_no_rows := 0;
347: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
348: fnd_log.STRING (fnd_log.level_procedure,
349: g_pkg_name || '.' || l_api_name,
350: 'Intercompany- Inserting entry lines'
351: || ' into GCS_ENTRY_LINES'

Line 348: fnd_log.STRING (fnd_log.level_procedure,

344:
345:
346: g_no_rows := 0;
347: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
348: fnd_log.STRING (fnd_log.level_procedure,
349: g_pkg_name || '.' || l_api_name,
350: 'Intercompany- Inserting entry lines'
351: || ' into GCS_ENTRY_LINES'
352: || ' after matching by Org-Payables side'

Line 426: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

422: giet.line_item_id;
423:
424: g_no_rows := NVL(SQL%ROWCOUNT,0);
425:
426: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
427: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
428: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
429: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES_GT');
430:

Line 431: FND_LOG.String (fnd_log.level_procedure,

427: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
428: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
429: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES_GT');
430:
431: FND_LOG.String (fnd_log.level_procedure,
432: g_pkg_name || '.' || l_api_name,
433: 'SHRD0117: '||FND_MESSAGE.get);
434: END IF;
435: END IF; -- End if for match by

Line 440: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

436:
437: ELSIF (P_ELIM_MODE = 'IA') THEN
438: IF (p_match_rule_code = 'COMPANY') THEN --In Intracompany option
439: g_no_rows := 0;
440: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
441: fnd_log.STRING (fnd_log.level_procedure,
442: g_pkg_name || '.' || l_api_name,
443: 'Intracompany- Inserting entry lines'
444: || ' into GCS_ENTRY_LINES_GT'

Line 441: fnd_log.STRING (fnd_log.level_procedure,

437: ELSIF (P_ELIM_MODE = 'IA') THEN
438: IF (p_match_rule_code = 'COMPANY') THEN --In Intracompany option
439: g_no_rows := 0;
440: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
441: fnd_log.STRING (fnd_log.level_procedure,
442: g_pkg_name || '.' || l_api_name,
443: 'Intracompany- Inserting entry lines'
444: || ' into GCS_ENTRY_LINES_GT'
445: || ' after matching by company'

Line 523: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

519:
520: giet.line_item_id;
521: g_no_rows := NVL(SQL%ROWCOUNT,0);
522:
523: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
524: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
525: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
526: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES_GT');
527:

Line 528: FND_LOG.String (fnd_log.level_procedure,

524: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
525: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
526: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES_GT');
527:
528: FND_LOG.String (fnd_log.level_procedure,
529: g_pkg_name || '.' || l_api_name,
530: 'SHRD0117: '||FND_MESSAGE.get);
531: END IF;
532:

Line 538: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

534:
535: ELSIF (p_match_rule_code = 'ORGANIZATION') THEN
536: -- In Intracompany option
537: g_no_rows := 0;
538: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
539: fnd_log.STRING (fnd_log.level_procedure,
540: g_pkg_name || '.' || l_api_name,
541: 'Intracompany- Inserting entry lines'
542: || 'into GCS_ENTRY_LINES_GT'

Line 539: fnd_log.STRING (fnd_log.level_procedure,

535: ELSIF (p_match_rule_code = 'ORGANIZATION') THEN
536: -- In Intracompany option
537: g_no_rows := 0;
538: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
539: fnd_log.STRING (fnd_log.level_procedure,
540: g_pkg_name || '.' || l_api_name,
541: 'Intracompany- Inserting entry lines'
542: || 'into GCS_ENTRY_LINES_GT'
543: || 'after matching by Org'

Line 623: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

619: giet.line_item_id;
620:
621: g_no_rows := NVL(SQL%ROWCOUNT,0);
622:
623: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
624: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
625: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
626: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES_GT');
627:

Line 628: FND_LOG.String (fnd_log.level_procedure,

624: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
625: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
626: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES_GT');
627:
628: FND_LOG.String (fnd_log.level_procedure,
629: g_pkg_name || '.' || l_api_name,
630: 'SHRD0117: '||FND_MESSAGE.get);
631: END IF;
632: End If; -- End of matching rule code in intracompany

Line 635: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN

631: END IF;
632: End If; -- End of matching rule code in intracompany
633:
634: END If; -- End of elimination mode.
635: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
636: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
637: g_pkg_name || '.' || l_api_name,
638: GCS_UTILITY_PKG.g_module_success || l_api_name ||
639: to_char(sysdate, ' DD-MON-YYYY HH:MI:SS'));

Line 636: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,

632: End If; -- End of matching rule code in intracompany
633:
634: END If; -- End of elimination mode.
635: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
636: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
637: g_pkg_name || '.' || l_api_name,
638: GCS_UTILITY_PKG.g_module_success || l_api_name ||
639: to_char(sysdate, ' DD-MON-YYYY HH:MI:SS'));
640: END IF;

Line 646: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

642:
643: EXCEPTION
644:
645: WHEN OTHERS THEN
646: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
647: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
648: g_pkg_name || '.' || l_api_name,
649: SUBSTR(SQLERRM, 1, 255));
650: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,

Line 647: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,

643: EXCEPTION
644:
645: WHEN OTHERS THEN
646: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
647: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
648: g_pkg_name || '.' || l_api_name,
649: SUBSTR(SQLERRM, 1, 255));
650: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
651: g_pkg_name || '.' || l_api_name,

Line 650: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,

646: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
647: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
648: g_pkg_name || '.' || l_api_name,
649: SUBSTR(SQLERRM, 1, 255));
650: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
651: g_pkg_name || '.' || l_api_name,
652: GCS_UTILITY_PKG.g_module_failure || l_api_name ||
653: to_char(sysdate, ' DD-MON-YYYY HH:MI:SS'));
654: END IF;

Line 688: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

684: -- Insert Suspense lines for unbalanced matched rows
685: -- into GCS_ENTRY-LINES.
686: BEGIN
687:
688: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
689: fnd_log.STRING (fnd_log.level_procedure,
690: g_pkg_name || '.' || l_api_name,
691: gcs_utility_pkg.g_module_enter
692: || ' '

Line 689: fnd_log.STRING (fnd_log.level_procedure,

685: -- into GCS_ENTRY-LINES.
686: BEGIN
687:
688: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
689: fnd_log.STRING (fnd_log.level_procedure,
690: g_pkg_name || '.' || l_api_name,
691: gcs_utility_pkg.g_module_enter
692: || ' '
693: || l_api_name

Line 701: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

697: END IF;
698:
699:
700:
701: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
702: fnd_log.STRING (fnd_log.level_procedure,
703: g_pkg_name || '.' || l_api_name,
704: ' Arguments passed to Insr_Suspense_Lines() '
705: ||' Hierarchy_Id: '||p_hierarchy_id

Line 702: fnd_log.STRING (fnd_log.level_procedure,

698:
699:
700:
701: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
702: fnd_log.STRING (fnd_log.level_procedure,
703: g_pkg_name || '.' || l_api_name,
704: ' Arguments passed to Insr_Suspense_Lines() '
705: ||' Hierarchy_Id: '||p_hierarchy_id
706: ||' Cal_Period_Id: '||p_cal_period_id

Line 721: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

717: (P_ELIM_MODE = 'IA')) THEN
718:
719: IF (p_match_rule_code = 'COMPANY') THEN
720: g_no_rows := 0;
721: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
722: fnd_log.STRING (fnd_log.level_procedure,
723: g_pkg_name || '.' || l_api_name,
724: 'Intercompany- Inserting necessary suspense lines'
725: || ' into GCS_ENTRY_LINES_GT'

Line 722: fnd_log.STRING (fnd_log.level_procedure,

718:
719: IF (p_match_rule_code = 'COMPANY') THEN
720: g_no_rows := 0;
721: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
722: fnd_log.STRING (fnd_log.level_procedure,
723: g_pkg_name || '.' || l_api_name,
724: 'Intercompany- Inserting necessary suspense lines'
725: || ' into GCS_ENTRY_LINES_GT'
726: || ' after matching by company'

Line 797: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

793: fcoa3.dim_attribute_numeric_member;
794:
795: g_no_rows := NVL(SQL%ROWCOUNT,0);
796:
797: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
798: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
799: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
800: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES_GT');
801:

Line 802: FND_LOG.String (fnd_log.level_procedure,

798: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
799: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
800: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES_GT');
801:
802: FND_LOG.String (fnd_log.level_procedure,
803: g_pkg_name || '.' || l_api_name,
804: 'SHRD0117: '||FND_MESSAGE.get);
805: END IF;
806:

Line 810: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

806:
807: ELSIF (p_match_rule_code = 'ORGANIZATION') THEN
808: -- In Intercompany option
809: g_no_rows := 0;
810: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
811: fnd_log.STRING (fnd_log.level_procedure,
812: g_pkg_name || '.' || l_api_name,
813: 'Intercompany- Inserting necessary suspense lines'
814: || ' into GCS_ENTRY_LINES_GT'

Line 811: fnd_log.STRING (fnd_log.level_procedure,

807: ELSIF (p_match_rule_code = 'ORGANIZATION') THEN
808: -- In Intercompany option
809: g_no_rows := 0;
810: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
811: fnd_log.STRING (fnd_log.level_procedure,
812: g_pkg_name || '.' || l_api_name,
813: 'Intercompany- Inserting necessary suspense lines'
814: || ' into GCS_ENTRY_LINES_GT'
815: || ' after matching by org '

Line 869: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

865: GROUP BY gihg1.entry_id, receivables_org_id, payables_org_id;
866:
867: g_no_rows := NVL(SQL%ROWCOUNT,0);
868:
869: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
870: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
871: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
872: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES_GT');
873:

Line 874: FND_LOG.String (fnd_log.level_procedure,

870: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
871: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
872: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES_GT');
873:
874: FND_LOG.String (fnd_log.level_procedure,
875: g_pkg_name || '.' || l_api_name,
876: 'SHRD0117: '||FND_MESSAGE.get);
877:
878: END IF;

Line 883: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

879: END IF; -- Ends matching rule code in intercompany.
880: END IF; --Added to end the mode IF
881:
882: g_no_rows := 0;
883: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
884: fnd_log.STRING (fnd_log.level_procedure,
885: g_pkg_name || '.' || l_api_name,
886: 'Intercompany- Inserting '
887: || ' into GCS_ENTRY_LINES'

Line 884: fnd_log.STRING (fnd_log.level_procedure,

880: END IF; --Added to end the mode IF
881:
882: g_no_rows := 0;
883: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
884: fnd_log.STRING (fnd_log.level_procedure,
885: g_pkg_name || '.' || l_api_name,
886: 'Intercompany- Inserting '
887: || ' into GCS_ENTRY_LINES'
888: || ' after processing'

Line 914: , SYSDATE, g_fnd_user_id, g_fnd_login_id

910: , USER_DIM5_ID, USER_DIM6_ID, USER_DIM7_ID
911: , USER_DIM8_ID, USER_DIM9_ID, USER_DIM10_ID
912: , YTD_DEBIT_BALANCE_E , YTD_CREDIT_BALANCE_E
913: , SYSDATE, g_fnd_user_id
914: , SYSDATE, g_fnd_user_id, g_fnd_login_id
915: , DESCRIPTION, YTD_BALANCE_E
916: FROM GCS_ENTRY_LINES_GT
917: WHERE DESCRIPTION <> 'SUSPENSE_LINE'
918:

Line 929: , SYSDATE, g_fnd_user_id, g_fnd_login_id

925: , USER_DIM5_ID, USER_DIM6_ID, USER_DIM7_ID
926: , USER_DIM8_ID, USER_DIM9_ID, USER_DIM10_ID
927: , YTD_DEBIT_BALANCE_E , YTD_CREDIT_BALANCE_E
928: , SYSDATE, g_fnd_user_id
929: , SYSDATE, g_fnd_user_id, g_fnd_login_id
930: , DESCRIPTION, YTD_BALANCE_E
931: FROM GCS_ENTRY_LINES_GT
932: WHERE (DESCRIPTION = 'SUSPENSE_LINE' AND YTD_BALANCE_E <> 0);
933:

Line 936: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

932: WHERE (DESCRIPTION = 'SUSPENSE_LINE' AND YTD_BALANCE_E <> 0);
933:
934: g_no_rows := NVL(SQL%ROWCOUNT,0);
935:
936: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
937: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
938: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
939: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES');
940:

Line 941: FND_LOG.String (fnd_log.level_procedure,

937: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
938: FND_MESSAGE.Set_Token('NUM',TO_CHAR(g_no_rows));
939: FND_MESSAGE.Set_Token('TABLE','GCS_ENTRY_LINES');
940:
941: FND_LOG.String (fnd_log.level_procedure,
942: g_pkg_name || '.' || l_api_name,
943: 'SHRD0117: '||FND_MESSAGE.get);
944:
945: END IF;

Line 948: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN

944:
945: END IF;
946:
947:
948: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
949: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
950: g_pkg_name || '.' || l_api_name,
951: GCS_UTILITY_PKG.g_module_success || l_api_name ||
952: to_char(sysdate, ' DD-MON-YYYY HH:MI:SS'));

Line 949: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,

945: END IF;
946:
947:
948: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
949: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
950: g_pkg_name || '.' || l_api_name,
951: GCS_UTILITY_PKG.g_module_success || l_api_name ||
952: to_char(sysdate, ' DD-MON-YYYY HH:MI:SS'));
953: END IF;

Line 961: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

957:
958: EXCEPTION
959:
960: WHEN OTHERS THEN
961: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
962: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
963: g_pkg_name || '.' || l_api_name,
964: SUBSTR(SQLERRM, 1, 255));
965: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,

Line 962: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,

958: EXCEPTION
959:
960: WHEN OTHERS THEN
961: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
962: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
963: g_pkg_name || '.' || l_api_name,
964: SUBSTR(SQLERRM, 1, 255));
965: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
966: g_pkg_name || '.' || l_api_name,

Line 965: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,

961: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
962: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
963: g_pkg_name || '.' || l_api_name,
964: SUBSTR(SQLERRM, 1, 255));
965: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
966: g_pkg_name || '.' || l_api_name,
967: GCS_UTILITY_PKG.g_module_failure || l_api_name ||
968: to_char(sysdate, ' DD-MON-YYYY HH:MI:SS'));
969: END IF;

Line 1039: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1035:
1036:
1037: BEGIN
1038:
1039: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1040:
1041: fnd_log.STRING (fnd_log.level_procedure,
1042: g_pkg_name || '.' || l_api_name,
1043: gcs_utility_pkg.g_module_enter

Line 1041: fnd_log.STRING (fnd_log.level_procedure,

1037: BEGIN
1038:
1039: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1040:
1041: fnd_log.STRING (fnd_log.level_procedure,
1042: g_pkg_name || '.' || l_api_name,
1043: gcs_utility_pkg.g_module_enter
1044: || ' '
1045: || l_api_name

Line 1055: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1051: -- Get the matching rule for the given hierarchy_id
1052: -- for matching intercompany eliminations such as by organization,
1053: -- by company or by cost center.
1054:
1055: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1056: fnd_log.STRING (fnd_log.level_procedure,
1057: g_pkg_name || '.' || l_api_name,
1058: 'Get the matching rule information'
1059: );

Line 1056: fnd_log.STRING (fnd_log.level_procedure,

1052: -- for matching intercompany eliminations such as by organization,
1053: -- by company or by cost center.
1054:
1055: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1056: fnd_log.STRING (fnd_log.level_procedure,
1057: g_pkg_name || '.' || l_api_name,
1058: 'Get the matching rule information'
1059: );
1060: END IF;

Line 1089: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1085: WHEN NO_DATA_FOUND Then
1086: Raise NO_MATCH_RULE_CODE;
1087: END;
1088:
1089: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1090: fnd_log.STRING (fnd_log.level_procedure,
1091: g_pkg_name || '.' || l_api_name,
1092: ' Arguments Hierarchy_id :'||p_hierarchy_id
1093: ||' Stat Entry Id: '|| p_stat_entry_id

Line 1090: fnd_log.STRING (fnd_log.level_procedure,

1086: Raise NO_MATCH_RULE_CODE;
1087: END;
1088:
1089: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1090: fnd_log.STRING (fnd_log.level_procedure,
1091: g_pkg_name || '.' || l_api_name,
1092: ' Arguments Hierarchy_id :'||p_hierarchy_id
1093: ||' Stat Entry Id: '|| p_stat_entry_id
1094: ||' Entry id: '||p_entry_id

Line 1115: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1111:
1112: IF ((x_lob_reporting_enabled = 'Y')
1113: AND (x_lob_hierarchy_obj_id IS NOT NULL)) THEN
1114:
1115: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1116: fnd_log.STRING (fnd_log.level_procedure,
1117: g_pkg_name || '.' || l_api_name,
1118: 'Entered into LOB support block'
1119: );

Line 1116: fnd_log.STRING (fnd_log.level_procedure,

1112: IF ((x_lob_reporting_enabled = 'Y')
1113: AND (x_lob_hierarchy_obj_id IS NOT NULL)) THEN
1114:
1115: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1116: fnd_log.STRING (fnd_log.level_procedure,
1117: g_pkg_name || '.' || l_api_name,
1118: 'Entered into LOB support block'
1119: );
1120: END IF;

Line 1124: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1120: END IF;
1121:
1122: BEGIN
1123:
1124: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1125: fnd_log.STRING (fnd_log.level_procedure,
1126: g_pkg_name || '.' || l_api_name,
1127: 'Checking Hierarchy date effectivity'
1128: );

Line 1125: fnd_log.STRING (fnd_log.level_procedure,

1121:
1122: BEGIN
1123:
1124: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1125: fnd_log.STRING (fnd_log.level_procedure,
1126: g_pkg_name || '.' || l_api_name,
1127: 'Checking Hierarchy date effectivity'
1128: );
1129: END IF;

Line 1145: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1141: EXCEPTION
1142: WHEN NO_DATA_FOUND THEN
1143: l_valid_hierarchy_id :=0;
1144:
1145: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1146: fnd_log.STRING (fnd_log.level_procedure,
1147: g_pkg_name || '.' || l_api_name,
1148: 'Hierarchy date effectivity failed'
1149: || ' either due to wrong hierarchy or '

Line 1146: fnd_log.STRING (fnd_log.level_procedure,

1142: WHEN NO_DATA_FOUND THEN
1143: l_valid_hierarchy_id :=0;
1144:
1145: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1146: fnd_log.STRING (fnd_log.level_procedure,
1147: g_pkg_name || '.' || l_api_name,
1148: 'Hierarchy date effectivity failed'
1149: || ' either due to wrong hierarchy or '
1150: ||' period end date is not falling '

Line 1158: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

1154: null;
1155: --Raise Hierarchy_Check_Failed;
1156:
1157: WHEN OTHERS THEN
1158: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1159: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
1160: g_pkg_name || '.' || l_api_name
1161: ||' Hierarchy_Check ',
1162: SUBSTR(SQLERRM, 1, 255));

Line 1159: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,

1155: --Raise Hierarchy_Check_Failed;
1156:
1157: WHEN OTHERS THEN
1158: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1159: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
1160: g_pkg_name || '.' || l_api_name
1161: ||' Hierarchy_Check ',
1162: SUBSTR(SQLERRM, 1, 255));
1163:

Line 1173: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1169: IF (x_intercompany_org_code = 'SPECIFIC_VALUE') THEN
1170:
1171: l_no_rows := 0;
1172:
1173: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1174: fnd_log.STRING (fnd_log.level_procedure,
1175: g_pkg_name || '.' || l_api_name,
1176: 'Inserting intercompany transactions for matching by'
1177: || ' organization into GCS_INTERCO_ELM_TRX'

Line 1174: fnd_log.STRING (fnd_log.level_procedure,

1170:
1171: l_no_rows := 0;
1172:
1173: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1174: fnd_log.STRING (fnd_log.level_procedure,
1175: g_pkg_name || '.' || l_api_name,
1176: 'Inserting intercompany transactions for matching by'
1177: || ' organization into GCS_INTERCO_ELM_TRX'
1178: || ' - LOB REPORTING ENABLED ');

Line 1203: g_fnd_login_id,

1199: gel.line_item_id,
1200: NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
1201: SYSDATE, g_fnd_user_id,
1202: SYSDATE, g_fnd_user_id,
1203: g_fnd_login_id,
1204: DECODE(fcoa2.dim_attribute_numeric_member,
1205: fcoa3.dim_attribute_numeric_member,
1206: fcoa2.dim_attribute_numeric_member,
1207: fcca.dim_attribute_numeric_member)

Line 1301: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1297: AND giet1.line_item_id = gel.line_item_id) ;
1298:
1299: l_no_rows := NVL(SQL%ROWCOUNT,0);
1300:
1301: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1302: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
1303: FND_MESSAGE.Set_Token('NUM',TO_CHAR(l_no_rows));
1304: FND_MESSAGE.Set_Token('TABLE','GCS_INTERCO_ELM_TRX');
1305:

Line 1306: FND_LOG.String (fnd_log.level_procedure,

1302: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
1303: FND_MESSAGE.Set_Token('NUM',TO_CHAR(l_no_rows));
1304: FND_MESSAGE.Set_Token('TABLE','GCS_INTERCO_ELM_TRX');
1305:
1306: FND_LOG.String (fnd_log.level_procedure,
1307: g_pkg_name || '.' || l_api_name,
1308: 'SHRD0117: '||FND_MESSAGE.get);
1309: --FND_FILE.Put_Line(FND_FILE.Log,'SHRD0117: '||FND_MESSAGE.get);
1310: END IF;

Line 1316: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1312: ELSE
1313:
1314: l_no_rows := 0;
1315:
1316: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1317: fnd_log.STRING (fnd_log.level_procedure,
1318: g_pkg_name || '.' || l_api_name,
1319: 'Inserting intercompany transactions for matching by'
1320: || ' organization into GCS_INTERCO_ELM_TRX'

Line 1317: fnd_log.STRING (fnd_log.level_procedure,

1313:
1314: l_no_rows := 0;
1315:
1316: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1317: fnd_log.STRING (fnd_log.level_procedure,
1318: g_pkg_name || '.' || l_api_name,
1319: 'Inserting intercompany transactions for matching by'
1320: || ' organization into GCS_INTERCO_ELM_TRX'
1321: || ' - LOB REPORTING ENABLED ');

Line 1346: g_fnd_login_id,

1342: gel.line_item_id,
1343: NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
1344: SYSDATE, g_fnd_user_id,
1345: SYSDATE, g_fnd_user_id,
1346: g_fnd_login_id,
1347: DECODE(fcoa2.dim_attribute_numeric_member,
1348: fcoa3.dim_attribute_numeric_member,
1349: fcoa2.dim_attribute_numeric_member,
1350: fcca.dim_attribute_numeric_member)

Line 1444: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1440: AND giet1.line_item_id = gel.line_item_id) ;
1441:
1442: l_no_rows := NVL(SQL%ROWCOUNT,0);
1443:
1444: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1445: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
1446: FND_MESSAGE.Set_Token('NUM',TO_CHAR(l_no_rows));
1447: FND_MESSAGE.Set_Token('TABLE','GCS_INTERCO_ELM_TRX');
1448:

Line 1449: FND_LOG.String (fnd_log.level_procedure,

1445: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
1446: FND_MESSAGE.Set_Token('NUM',TO_CHAR(l_no_rows));
1447: FND_MESSAGE.Set_Token('TABLE','GCS_INTERCO_ELM_TRX');
1448:
1449: FND_LOG.String (fnd_log.level_procedure,
1450: g_pkg_name || '.' || l_api_name,
1451: 'SHRD0117: '||FND_MESSAGE.get);
1452: --FND_FILE.Put_Line(FND_FILE.Log,'SHRD0117: '||FND_MESSAGE.get);
1453: END IF;

Line 1462: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1458: -- Regular matching by organization.
1459: IF (x_intercompany_org_code = 'SPECIFIC_VALUE') THEN
1460: l_no_rows := 0;
1461:
1462: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1463: fnd_log.STRING (fnd_log.level_procedure,
1464: g_pkg_name || '.' || l_api_name,
1465: 'Inserting intercompany transactions for matching by'
1466: || ' organization into GCS_INTERCO_ELM_TRX'

Line 1463: fnd_log.STRING (fnd_log.level_procedure,

1459: IF (x_intercompany_org_code = 'SPECIFIC_VALUE') THEN
1460: l_no_rows := 0;
1461:
1462: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1463: fnd_log.STRING (fnd_log.level_procedure,
1464: g_pkg_name || '.' || l_api_name,
1465: 'Inserting intercompany transactions for matching by'
1466: || ' organization into GCS_INTERCO_ELM_TRX'
1467: || ' - LOB REPORTING Disabled');

Line 1493: g_fnd_login_id

1489: gel.line_item_id,
1490: NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
1491: SYSDATE, g_fnd_user_id,
1492: SYSDATE, g_fnd_user_id,
1493: g_fnd_login_id
1494: FROM GCS_ENTRY_HEADERS geh,
1495: GCS_ENTRY_LINES gel,
1496: GCS_ENTITY_CCTR_ORGS geo,
1497: GCS_ENTITY_CCTR_ORGS geo1,

Line 1535: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1531: AND giet1.line_item_id = gel.line_item_id);
1532:
1533: l_no_rows := NVL(SQL%ROWCOUNT,0);
1534:
1535: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1536: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
1537: FND_MESSAGE.Set_Token('NUM',TO_CHAR(l_no_rows));
1538: FND_MESSAGE.Set_Token('TABLE','GCS_INTERCO_ELM_TRX');
1539:

Line 1540: FND_LOG.String (fnd_log.level_procedure,

1536: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
1537: FND_MESSAGE.Set_Token('NUM',TO_CHAR(l_no_rows));
1538: FND_MESSAGE.Set_Token('TABLE','GCS_INTERCO_ELM_TRX');
1539:
1540: FND_LOG.String (fnd_log.level_procedure,
1541: g_pkg_name || '.' || l_api_name,
1542: 'SHRD0117: '||FND_MESSAGE.get);
1543: --FND_FILE.Put_Line(FND_FILE.Log,'SHRD0117: '||FND_MESSAGE.get);
1544: END IF;

Line 1549: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1545:
1546: ELSE
1547: l_no_rows := 0;
1548:
1549: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1550: fnd_log.STRING (fnd_log.level_procedure,
1551: g_pkg_name || '.' || l_api_name,
1552: 'Inserting intercompany transactions for matching by'
1553: || ' organization into GCS_INTERCO_ELM_TRX'

Line 1550: fnd_log.STRING (fnd_log.level_procedure,

1546: ELSE
1547: l_no_rows := 0;
1548:
1549: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1550: fnd_log.STRING (fnd_log.level_procedure,
1551: g_pkg_name || '.' || l_api_name,
1552: 'Inserting intercompany transactions for matching by'
1553: || ' organization into GCS_INTERCO_ELM_TRX'
1554: || ' - LOB REPORTING Disabled');

Line 1580: g_fnd_login_id

1576: gel.line_item_id,
1577: NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
1578: SYSDATE, g_fnd_user_id,
1579: SYSDATE, g_fnd_user_id,
1580: g_fnd_login_id
1581: FROM GCS_ENTRY_HEADERS geh,
1582: GCS_ENTRY_LINES gel,
1583: GCS_ENTITY_CCTR_ORGS geo,
1584: GCS_ENTITY_CCTR_ORGS geo1,

Line 1622: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1618: AND giet1.line_item_id = gel.line_item_id);
1619:
1620: l_no_rows := NVL(SQL%ROWCOUNT,0);
1621:
1622: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1623: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
1624: FND_MESSAGE.Set_Token('NUM',TO_CHAR(l_no_rows));
1625: FND_MESSAGE.Set_Token('TABLE','GCS_INTERCO_ELM_TRX');
1626:

Line 1627: FND_LOG.String (fnd_log.level_procedure,

1623: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
1624: FND_MESSAGE.Set_Token('NUM',TO_CHAR(l_no_rows));
1625: FND_MESSAGE.Set_Token('TABLE','GCS_INTERCO_ELM_TRX');
1626:
1627: FND_LOG.String (fnd_log.level_procedure,
1628: g_pkg_name || '.' || l_api_name,
1629: 'SHRD0117: '||FND_MESSAGE.get);
1630: --FND_FILE.Put_Line(FND_FILE.Log,'SHRD0117: '||FND_MESSAGE.get);
1631: END IF;

Line 1640: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1636:
1637: if (x_intercompany_org_code = 'SPECIFIC_VALUE') THEN
1638:
1639: l_no_rows := 0;
1640: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1641: FND_LOG.String (fnd_log.level_procedure,
1642: g_pkg_name || '.' || l_api_name,
1643: 'Specific_Value - '
1644: ||' Inserting intercompany transactions for matching by'

Line 1641: FND_LOG.String (fnd_log.level_procedure,

1637: if (x_intercompany_org_code = 'SPECIFIC_VALUE') THEN
1638:
1639: l_no_rows := 0;
1640: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1641: FND_LOG.String (fnd_log.level_procedure,
1642: g_pkg_name || '.' || l_api_name,
1643: 'Specific_Value - '
1644: ||' Inserting intercompany transactions for matching by'
1645: ||' company intercompany into GCS_INTERCO_ELM_TRX');

Line 1674: g_fnd_login_id

1670:
1671: NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
1672: SYSDATE, g_fnd_user_id,
1673: SYSDATE, g_fnd_user_id,
1674: g_fnd_login_id
1675: FROM GCS_ENTRY_HEADERS geh,
1676: GCS_ENTRY_LINES gel,
1677: GCS_ENTITY_CCTR_ORGS geo,
1678: GCS_ENTITY_CCTR_ORGS geo1,

Line 1735: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1731: AND giet1.line_item_id = gel.line_item_id);
1732:
1733: l_no_rows := NVL(SQL%ROWCOUNT,0);
1734:
1735: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1736: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
1737: FND_MESSAGE.Set_Token('NUM',TO_CHAR(l_no_rows));
1738: FND_MESSAGE.Set_Token('TABLE','GCS_INTERCO_ELM_TRX');
1739:

Line 1740: FND_LOG.String (fnd_log.level_procedure,

1736: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
1737: FND_MESSAGE.Set_Token('NUM',TO_CHAR(l_no_rows));
1738: FND_MESSAGE.Set_Token('TABLE','GCS_INTERCO_ELM_TRX');
1739:
1740: FND_LOG.String (fnd_log.level_procedure,
1741: g_pkg_name || '.' || l_api_name,
1742: 'SHRD0117: '||FND_MESSAGE.get);
1743: --FND_FILE.Put_Line(FND_FILE.Log,'SHRD0117: '||FND_MESSAGE.get);
1744:

Line 1752: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1748:
1749: ELSE
1750:
1751: l_no_rows := 0;
1752: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1753: FND_LOG.String (fnd_log.level_procedure,
1754: g_pkg_name || '.' || l_api_name,
1755: ' Org and Interco are different - '
1756: ||'Inserting intercompany transactions for matching by'

Line 1753: FND_LOG.String (fnd_log.level_procedure,

1749: ELSE
1750:
1751: l_no_rows := 0;
1752: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1753: FND_LOG.String (fnd_log.level_procedure,
1754: g_pkg_name || '.' || l_api_name,
1755: ' Org and Interco are different - '
1756: ||'Inserting intercompany transactions for matching by'
1757: ||' company intercompany into GCS_INTERCO_ELM_TRX');

Line 1786: g_fnd_login_id

1782:
1783: NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
1784: SYSDATE, g_fnd_user_id,
1785: SYSDATE, g_fnd_user_id,
1786: g_fnd_login_id
1787: FROM GCS_ENTRY_HEADERS geh,
1788: GCS_ENTRY_LINES gel,
1789: GCS_ENTITY_CCTR_ORGS geo,
1790: GCS_ENTITY_CCTR_ORGS geo1,

Line 1848: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1844: AND giet1.line_item_id = gel.line_item_id);
1845:
1846: l_no_rows := NVL(SQL%ROWCOUNT,0);
1847:
1848: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1849: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
1850: FND_MESSAGE.Set_Token('NUM',TO_CHAR(l_no_rows));
1851: FND_MESSAGE.Set_Token('TABLE','GCS_INTERCO_ELM_TRX');
1852:

Line 1853: FND_LOG.String (fnd_log.level_procedure,

1849: FND_MESSAGE.Set_Name('SQLGL','SHRD0117');
1850: FND_MESSAGE.Set_Token('NUM',TO_CHAR(l_no_rows));
1851: FND_MESSAGE.Set_Token('TABLE','GCS_INTERCO_ELM_TRX');
1852:
1853: FND_LOG.String (fnd_log.level_procedure,
1854: g_pkg_name || '.' || l_api_name,
1855: 'SHRD0117: '||FND_MESSAGE.get);
1856: --FND_FILE.Put_Line(FND_FILE.Log,'SHRD0117: '||FND_MESSAGE.get);
1857:

Line 1863: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE)

1859: END IF; -- Ends Company if specific value..
1860: END IF; -- Ends If matching by
1861:
1862:
1863: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE)
1864: THEN
1865:
1866: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1867: g_pkg_name || '.' || l_api_name,

Line 1866: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1862:
1863: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE)
1864: THEN
1865:
1866: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1867: g_pkg_name || '.' || l_api_name,
1868: GCS_UTILITY_PKG.g_module_success || l_api_name ||
1869: to_char(sysdate, ' DD-MON-YYYY HH:MI:SS'));
1870: END IF;

Line 1881: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

1877: WHEN NO_MATCH_RULE_CODE THEN
1878:
1879: x_errbuf := SQLERRM;
1880:
1881: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1882: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
1883: g_pkg_name || '.' || l_api_name
1884: ||' NO_MATCH_RULE_CODE',
1885: SUBSTR(SQLERRM, 1, 255));

Line 1882: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,

1878:
1879: x_errbuf := SQLERRM;
1880:
1881: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1882: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
1883: g_pkg_name || '.' || l_api_name
1884: ||' NO_MATCH_RULE_CODE',
1885: SUBSTR(SQLERRM, 1, 255));
1886:

Line 1897: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE)

1893: WHEN Hierarchy_Check_Failed THEN
1894:
1895: x_errbuf := SQLERRM;
1896:
1897: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE)
1898: THEN
1899: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1900: g_pkg_name || '.' || l_api_name
1901: || ' Hierarchy_Check_Failed',

Line 1899: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1895: x_errbuf := SQLERRM;
1896:
1897: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE)
1898: THEN
1899: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1900: g_pkg_name || '.' || l_api_name
1901: || ' Hierarchy_Check_Failed',
1902: 'Either hierarchy does not exist or the '
1903: ||' hierarchy date affectivity has not been '

Line 1909: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

1905:
1906:
1907: END IF;
1908:
1909: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1910: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
1911: g_pkg_name || '.' || l_api_name,
1912: SUBSTR(SQLERRM, 1, 255));
1913:

Line 1910: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,

1906:
1907: END IF;
1908:
1909: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1910: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
1911: g_pkg_name || '.' || l_api_name,
1912: SUBSTR(SQLERRM, 1, 255));
1913:
1914:

Line 1926: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN

1922: WHEN OTHERS THEN
1923:
1924: x_errbuf := SQLERRM;
1925:
1926: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1927: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
1928: g_pkg_name || '.' || l_api_name,
1929: SUBSTR(SQLERRM, 1, 255));
1930: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,

Line 1927: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,

1923:
1924: x_errbuf := SQLERRM;
1925:
1926: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1927: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
1928: g_pkg_name || '.' || l_api_name,
1929: SUBSTR(SQLERRM, 1, 255));
1930: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
1931: g_pkg_name || '.' || l_api_name,

Line 1930: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,

1926: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_UNEXPECTED) THEN
1927: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
1928: g_pkg_name || '.' || l_api_name,
1929: SUBSTR(SQLERRM, 1, 255));
1930: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
1931: g_pkg_name || '.' || l_api_name,
1932: GCS_UTILITY_PKG.g_module_failure || l_api_name ||
1933: to_char(sysdate, ' DD-MON-YYYY HH:MI:SS'));
1934: END IF;

Line 1944: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1940:
1941: RAISE;
1942:
1943:
1944: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1945:
1946: fnd_log.STRING (fnd_log.level_procedure,
1947: g_pkg_name || '.' || l_api_name,
1948: gcs_utility_pkg.g_module_success

Line 1946: fnd_log.STRING (fnd_log.level_procedure,

1942:
1943:
1944: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1945:
1946: fnd_log.STRING (fnd_log.level_procedure,
1947: g_pkg_name || '.' || l_api_name,
1948: gcs_utility_pkg.g_module_success
1949: || ' '
1950: || l_api_name