DBA Data[Home] [Help]

APPS.IEX_MERGE_PVT dependencies on FND_LOG

Line 5: PG_DEBUG NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

1: PACKAGE BODY IEX_MERGE_PVT as
2: /* $Header: iexvmrgb.pls 120.9.12020000.2 2012/08/30 05:18:26 snuthala ship $ */
3:
4: --PG_DEBUG NUMBER(2) := TO_NUMBER(NVL(FND_PROFILE.value('IEX_DEBUG_LEVEL'), '20'));
5: PG_DEBUG NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6: G_Batch_Size NUMBER := to_number(nvl(fnd_profile.value('IEX_BATCH_SIZE'), '1000'));
7: /*-------------------------------------------------------------
8: |
9: | PROCEDURE

Line 88: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

84: l_acc_status_cnt Number; -- Added for bug 14492050 Snuthala
85:
86: BEGIN
87:
88: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
89: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.SCORE_HISTORY_MERGE BEGIN');
90: END IF;
91:
92: IF process_mode='LOCK' THEN

Line 101: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

97: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
98: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
99:
100: /* process IEX_SCORE_HISTORIES.SCORE_OBJECT_ID.OBJECT_CODE='IEX_ACCOUNT' */
101: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
102: IEX_DEBUG_PUB.logMessage('IEX_SCORE_HISTORIES.SCORE_OBJECT_ID.OBJECT_CODE=IEX_ACCOUNT');
103: END IF;
104: open merged_records1;
105: LOOP

Line 157: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

153: hz_utility_pub.LAST_UPDATE_DATE,
154: hz_utility_pub.LAST_UPDATED_BY);
155: END IF;
156:
157: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
158: IEX_DEBUG_PUB.logMessage('Merging ' || MERGE_HEADER_ID_LIST.COUNT || ' Records');
159: END IF;
160: --FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
161: -- Changed for all loop to for loop to fix 14492050 Snuthala

Line 194: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

190: /* process IEX_SCORE_HISTORIES.SCORE_OBJECT_ID where JTF_OBJECT_TYPE = 'IEX_ACCOUNT_SITE' */
191: MERGE_HEADER_ID_LIST.delete;
192: PRIMARY_KEY_ID_LIST.delete;
193: l_count := 0;
194: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
195: IEX_DEBUG_PUB.logMessage('IEX_SCORE_HISTORIES.SCORE_OBJECT_ID.OBJECT_CODE=IEX_ACCOUNT_SITE');
196: END IF;
197: open merged_records2;
198: LOOP

Line 251: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

247: hz_utility_pub.LAST_UPDATE_DATE,
248: hz_utility_pub.LAST_UPDATED_BY);
249: END IF;
250:
251: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
252: IEX_DEBUG_PUB.logMessage('Merging ' || MERGE_HEADER_ID_LIST.COUNT || ' Records');
253: END IF;
254: --FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
255: -- Changed for all loop to for loop to fix 14492050 Snuthala

Line 284: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

280: /* process IEX_SCORE_HISTORIES.SCORE_OBJECT_ID where JTF_OBJECT_TYPE = 'IEX_BILLTO' */
281: MERGE_HEADER_ID_LIST.delete;
282: PRIMARY_KEY_ID_LIST.delete;
283: l_count := 0;
284: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
285: IEX_DEBUG_PUB.logMessage('IEX_SCORE_HISTORIES.SCORE_OBJECT_ID.OBJECT_CODE=IEX_BILLTO');
286: END IF;
287: open merged_records3;
288: LOOP

Line 340: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

336: hz_utility_pub.LAST_UPDATE_DATE,
337: hz_utility_pub.LAST_UPDATED_BY);
338: END IF;
339:
340: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
341: IEX_DEBUG_PUB.logMessage('Merging ' || MERGE_HEADER_ID_LIST.COUNT || ' Records');
342: END IF;
343: --FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
344: -- Changed for all loop to for loop to fix 14492050 Snuthala

Line 447: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

443: IF process_mode='LOCK' THEN
444: NULL;
445: ELSE
446: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.DUNNING_MERGE BEGIN');
447: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
448: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.DUNNING_MERGE BEGIN');
449: IEX_DEBUG_PUB.logMessage('Input parameters:');
450: IEX_DEBUG_PUB.logMessage('req_id = ' || req_id);
451: IEX_DEBUG_PUB.logMessage('set_num = ' || set_num);

Line 462: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

458: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
459: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
460: IEX_DEBUG_PUB.logMessage('l_profile_val = ' || l_profile_val);
461: /* process IEX_STRATEGIES.CUST_ACCOUNT_ID */
462: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
463: IEX_DEBUG_PUB.logMessage('IEX_DUNNING.DUNNING_OBJECT_ID');
464: END IF;
465: open merged_records1;
466: LOOP

Line 531: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

527: hz_utility_pub.LAST_UPDATE_DATE,
528: hz_utility_pub.LAST_UPDATED_BY);
529: END IF;
530:
531: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
532: IEX_DEBUG_PUB.logMessage('Merging mergerecord1 : ' || MERGE_HEADER_ID_LIST.COUNT || ' Records');
533:
534:
535: END IF;

Line 574: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

570: /* process IEX_DUNNINGS.DUNNING_OBJECT_ID where DUNNING_LEVEL = 'BILLTO' */
571: MERGE_HEADER_ID_LIST.delete;
572: PRIMARY_KEY_ID_LIST.delete;
573: l_count := 0;
574: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
575: IEX_DEBUG_PUB.logMessage('IEX_DUNNINGS.DUNNING_OBJECT_ID.TYPE=ACCOUNT END');
576:
577: END IF;
578: open merged_records2;

Line 640: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

636: hz_utility_pub.LAST_UPDATE_DATE,
637: hz_utility_pub.LAST_UPDATED_BY);
638: END IF;
639:
640: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
641: IEX_DEBUG_PUB.logMessage('Merging merge_record2' || MERGE_HEADER_ID_LIST.COUNT || ' Records');
642:
643: END IF;
644: --FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT

Line 671: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

667: END LOOP;
668:
669: arp_message.set_name('AR','AR_ROWS_UPDATED');
670: arp_message.set_token('NUM_ROWS',to_char(l_count));
671: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
672:
673: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.DUNNNING_MERGE END');
674: END IF;
675:

Line 790: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

786: BEGIN
787: IF process_mode='LOCK' THEN
788: NULL;
789: ELSE
790: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
791: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.STRATEGY_MERGE BEGIN');
792: END IF;
793:
794: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');

Line 800: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

796: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
797: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
798:
799: /* process IEX_STRATEGIES.CUST_ACCOUNT_ID */
800: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
801: IEX_DEBUG_PUB.logMessage('IEX_STRATEGIES.CUST_ACCOUNT_ID');
802: END IF;
803: open merged_records1;
804: LOOP

Line 857: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

853: hz_utility_pub.LAST_UPDATE_DATE,
854: hz_utility_pub.LAST_UPDATED_BY);
855: END IF;
856:
857: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
858: IEX_DEBUG_PUB.logMessage('Merging ' || MERGE_HEADER_ID_LIST.COUNT || ' Records');
859: END IF;
860: --FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
861: -- Changed for all loop to for loop to fix 14492050 Snuthala

Line 897: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

893: PRIMARY_KEY_ID_LIST.delete;
894: PARTY_ID_LIST.delete;
895: STATUS_CODE_LIST.delete; --Added for bug#6974531 by schekuri on 14-Aug-2008
896: l_count := 0;
897: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
898: IEX_DEBUG_PUB.logMessage('IEX_STRATEGIES.JTF_OBJECT_ID.TYPE=IEX_ACCOUNT');
899: END IF;
900: open merged_records2;
901: LOOP

Line 956: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

952: hz_utility_pub.LAST_UPDATE_DATE,
953: hz_utility_pub.LAST_UPDATED_BY);
954: END IF;
955:
956: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
957: IEX_DEBUG_PUB.logMessage('Merging ' || MERGE_HEADER_ID_LIST.COUNT || ' Records');
958: END IF;
959: --FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
960: -- Changed for all loop to for loop to fix 14492050 Snuthala

Line 1008: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1004: MERGE_HEADER_ID_LIST.delete;
1005: PRIMARY_KEY_ID_LIST.delete;
1006: STATUS_CODE_LIST.delete; --Added for bug#6974531 by schekuri on 14-Aug-2008
1007: l_count := 0;
1008: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1009: IEX_DEBUG_PUB.logMessage('IEX_STRATEGIES.JTF_OBJECT_ID.TYPE=IEX_BILLTO');
1010: END IF;
1011: open merged_records3;
1012: LOOP

Line 1067: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1063: hz_utility_pub.LAST_UPDATE_DATE,
1064: hz_utility_pub.LAST_UPDATED_BY);
1065: END IF;
1066:
1067: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1068: IEX_DEBUG_PUB.logMessage('Merging ' || MERGE_HEADER_ID_LIST.COUNT || ' Records');
1069: END IF;
1070: --FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
1071: -- Changed for all loop to for loop to fix 14492050 Snuthala

Line 1109: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1105:
1106: arp_message.set_name('AR','AR_ROWS_UPDATED');
1107: arp_message.set_token('NUM_ROWS',to_char(l_count));
1108:
1109: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1110: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.STRATEGY_MERGE END');
1111: END IF;
1112:
1113: END IF;

Line 1330: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1326: l_last_fetch BOOLEAN := FALSE;
1327: l_count NUMBER;
1328: BEGIN
1329:
1330: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1331: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.DELINQUENCY_MERGE BEGIN');
1332: IEX_DEBUG_PUB.logMessage('Input parameters:');
1333: IEX_DEBUG_PUB.logMessage('req_id = ' || req_id);
1334: IEX_DEBUG_PUB.logMessage('set_num = ' || set_num);

Line 1346: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1342: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','IEX_DELINQUENCIES',FALSE);
1343: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
1344: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
1345:
1346: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1347: IEX_DEBUG_PUB.logMessage('l_profile_val = ' || l_profile_val);
1348: END IF;
1349:
1350: l_count := 0;

Line 1351: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1347: IEX_DEBUG_PUB.logMessage('l_profile_val = ' || l_profile_val);
1348: END IF;
1349:
1350: l_count := 0;
1351: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1352: IEX_DEBUG_PUB.logMessage('Searching for ACCOUNT records...');
1353: END IF;
1354:
1355: /* merging cust_account_id */

Line 1369: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1365: IF merged_records%NOTFOUND THEN
1366: l_last_fetch := TRUE;
1367: END IF;
1368:
1369: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1370: IEX_DEBUG_PUB.logMessage('Fetched ' || MERGE_HEADER_ID_LIST.COUNT || ' records');
1371: END IF;
1372:
1373: IF MERGE_HEADER_ID_LIST.COUNT = 0 and l_last_fetch then

Line 1374: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1370: IEX_DEBUG_PUB.logMessage('Fetched ' || MERGE_HEADER_ID_LIST.COUNT || ' records');
1371: END IF;
1372:
1373: IF MERGE_HEADER_ID_LIST.COUNT = 0 and l_last_fetch then
1374: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1375: IEX_DEBUG_PUB.logMessage('Exiting fetch');
1376: END IF;
1377: goto iex_delinquency_acc_site_use;
1378: END IF;

Line 1385: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1381: NUM_COL1_NEW_LIST(I) := HZ_ACCT_MERGE_UTIL.GETDUP_ACCOUNT(NUM_COL1_ORIG_LIST(I));
1382: END LOOP;
1383:
1384: IF l_profile_val IS NOT NULL AND l_profile_val = 'Y' THEN
1385: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1386: IEX_DEBUG_PUB.logMessage('Inserting into HZ_CUSTOMER_MERGE_LOG...');
1387: END IF;
1388: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
1389: INSERT INTO HZ_CUSTOMER_MERGE_LOG (

Line 1418: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1414: hz_utility_pub.LAST_UPDATE_LOGIN,
1415: hz_utility_pub.LAST_UPDATE_DATE,
1416: hz_utility_pub.LAST_UPDATED_BY);
1417:
1418: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1419: IEX_DEBUG_PUB.logMessage('...done');
1420: END IF;
1421:
1422: END IF;

Line 1423: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1419: IEX_DEBUG_PUB.logMessage('...done');
1420: END IF;
1421:
1422: END IF;
1423: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1424: IEX_DEBUG_PUB.logMessage('Updating IEX_DELINQUENCIES_ALL...');
1425: END IF;
1426:
1427: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT

Line 1440: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1436: , PROGRAM_ID = arp_standard.profile.program_id
1437: , PROGRAM_UPDATE_DATE = SYSDATE
1438: WHERE DELINQUENCY_ID=PRIMARY_KEY_ID_LIST(I);
1439: l_count := l_count + SQL%ROWCOUNT;
1440: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1441: IEX_DEBUG_PUB.logMessage('...done');
1442: END IF;
1443:
1444: IF l_last_fetch THEN

Line 1449: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1445: goto iex_delinquency_acc_site_use;
1446: END IF;
1447: END LOOP;
1448:
1449: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1450: IEX_DEBUG_PUB.logMessage('Total processed ' || l_count || ' ACCOUNT records');
1451: END IF;
1452:
1453: arp_message.set_name('AR','AR_ROWS_UPDATED');

Line 1463: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1459: MERGE_HEADER_ID_LIST.delete;
1460: PRIMARY_KEY_ID_LIST.delete;
1461: l_count := 0;
1462:
1463: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1464: IEX_DEBUG_PUB.logMessage('Searching for CUSTOMER_SITE_USE_ID records...');
1465: END IF;
1466:
1467: open merged_records1;

Line 1475: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1471: , PRIMARY_KEY_ID_LIST
1472: , NUM_COL2_ORIG_LIST
1473: limit G_Batch_Size;
1474:
1475: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1476: IEX_DEBUG_PUB.logMessage('Fetched ' || MERGE_HEADER_ID_LIST.COUNT || ' records');
1477: END IF;
1478:
1479: IF merged_records1%NOTFOUND THEN

Line 1484: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1480: l_last_fetch := TRUE;
1481: END IF;
1482:
1483: IF MERGE_HEADER_ID_LIST.COUNT = 0 and l_last_fetch then
1484: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1485: IEX_DEBUG_PUB.logMessage('Exiting fetch');
1486: END IF;
1487: exit;
1488: END IF;

Line 1497: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1493: END LOOP;
1494:
1495: IF l_profile_val IS NOT NULL AND l_profile_val = 'Y' THEN
1496:
1497: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1498: IEX_DEBUG_PUB.logMessage('Inserting into HZ_CUSTOMER_MERGE_LOG...');
1499: END IF;
1500:
1501: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT

Line 1531: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1527: hz_utility_pub.LAST_UPDATE_LOGIN,
1528: hz_utility_pub.LAST_UPDATE_DATE,
1529: hz_utility_pub.LAST_UPDATED_BY);
1530:
1531: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1532: IEX_DEBUG_PUB.logMessage('...done');
1533: END IF;
1534:
1535: END IF;

Line 1537: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1533: END IF;
1534:
1535: END IF;
1536:
1537: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1538: IEX_DEBUG_PUB.logMessage('Updating IEX_DELINQUENCIES_ALL...');
1539: END IF;
1540:
1541: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT

Line 1553: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1549: , PROGRAM_ID = arp_standard.profile.program_id
1550: , PROGRAM_UPDATE_DATE = SYSDATE
1551: WHERE DELINQUENCY_ID=PRIMARY_KEY_ID_LIST(I);
1552: l_count := l_count + SQL%ROWCOUNT;
1553: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1554: IEX_DEBUG_PUB.logMessage('...done');
1555: END IF;
1556: IF l_last_fetch THEN
1557: EXIT;

Line 1561: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1557: EXIT;
1558: END IF;
1559: END LOOP;
1560:
1561: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1562: IEX_DEBUG_PUB.logMessage('Total processed ' || l_count || ' CUSTOMER_SITE_USE_ID records');
1563: END IF;
1564:
1565: arp_message.set_name('AR','AR_ROWS_UPDATED');

Line 1568: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1564:
1565: arp_message.set_name('AR','AR_ROWS_UPDATED');
1566: arp_message.set_token('NUM_ROWS',to_char(l_count));
1567:
1568: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1569: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.DELINQUENCY_MERGE END');
1570: END IF;
1571:
1572: END IF;

Line 1575: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1571:
1572: END IF;
1573: EXCEPTION
1574: WHEN OTHERS THEN
1575: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1576: IEX_DEBUG_PUB.logMessage('In IEX_MERGE_PVT.DELINQUENCY_MERGE exception');
1577: END IF;
1578: arp_message.set_line('DELINQUENCY_MERGE');
1579: RAISE;

Line 1602: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1598: e_NullParameters EXCEPTION;
1599: -- End - 10/12/2005 - Andre Araujo - Add exception handling
1600:
1601: BEGIN
1602: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1603: IEX_DEBUG_PUB.LOGMESSAGE('MERGE_DELINQUENCY_PARTIES: Begin');
1604: IEX_DEBUG_PUB.LOGMESSAGE('MERGE_DELINQUENCY_PARTIES: p_from_id: ' || p_from_id );
1605: IEX_DEBUG_PUB.LOGMESSAGE('MERGE_DELINQUENCY_PARTIES: p_to_id: ' || p_to_id );
1606: IEX_DEBUG_PUB.LOGMESSAGE('MERGE_DELINQUENCY_PARTIES: p_from_fk_id: ' || p_from_fk_id );

Line 1833: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1829: WHERE PARTY_ID = p_from_fk_id;
1830:
1831: /* end raverma 02032003 */
1832:
1833: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1834: IEX_DEBUG_PUB.LOGMESSAGE('MERGE_DELINQUENCY_PARTIES: End success!');
1835: END IF;
1836:
1837: RETURN;

Line 1948: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

1944: l_api_name CONSTANT VARCHAR2(30) := 'CASE_CONTACT_MERGE';
1945: l_api_version_number CONSTANT NUMBER := 1.0;
1946: l_merge_reason_code VARCHAR2(30);
1947: BEGIN
1948: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1949: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.CASE_CONTACT_MERGE BEGIN');
1950: END IF;
1951: x_return_status := FND_API.G_RET_STS_SUCCESS;
1952:

Line 2032: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2028: where phone_id = p_from_fk_id;
2029: END IF;
2030: EXCEPTION
2031: WHEN OTHERS THEN
2032: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2033: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.CASE_CONTACT_MERGE EXCEPTION:');
2034: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT' || '.' || l_api_name || ': ' || sqlerrm);
2035: END IF;
2036: arp_message.set_line('IEX_MERGE_PVT' || '.' || l_api_name || ': ' || sqlerrm);

Line 2042: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

2038: raise;
2039: END;
2040: END IF;
2041:
2042: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
2043: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.CASE_CONTACT_MERGE END');
2044: END IF;
2045:
2046: END CASE_CONTACT_MERGE;