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.3.12010000.2 2008/08/14 13:37:03 schekuri 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 86: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN

82: l_last_fetch BOOLEAN := FALSE;
83: l_count NUMBER;
84: BEGIN
85:
86: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
87: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.SCORE_HISTORY_MERGE BEGIN');
88: END IF;
89:
90: IF process_mode='LOCK' THEN

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

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

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

151: hz_utility_pub.LAST_UPDATE_DATE,
152: hz_utility_pub.LAST_UPDATED_BY);
153: END IF;
154:
155: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
156: IEX_DEBUG_PUB.logMessage('Merging ' || MERGE_HEADER_ID_LIST.COUNT || ' Records');
157: END IF;
158: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
159: UPDATE IEX_SCORE_HISTORIES yt SET

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

179: /* process IEX_SCORE_HISTORIES.SCORE_OBJECT_ID where JTF_OBJECT_TYPE = 'IEX_ACCOUNT_SITE' */
180: MERGE_HEADER_ID_LIST.delete;
181: PRIMARY_KEY_ID_LIST.delete;
182: l_count := 0;
183: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
184: IEX_DEBUG_PUB.logMessage('IEX_SCORE_HISTORIES.SCORE_OBJECT_ID.OBJECT_CODE=IEX_ACCOUNT_SITE');
185: END IF;
186: open merged_records2;
187: LOOP

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

236: hz_utility_pub.LAST_UPDATE_DATE,
237: hz_utility_pub.LAST_UPDATED_BY);
238: END IF;
239:
240: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
241: IEX_DEBUG_PUB.logMessage('Merging ' || MERGE_HEADER_ID_LIST.COUNT || ' Records');
242: END IF;
243: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
244: UPDATE IEX_SCORE_HISTORIES yt SET

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

261: /* process IEX_SCORE_HISTORIES.SCORE_OBJECT_ID where JTF_OBJECT_TYPE = 'IEX_BILLTO' */
262: MERGE_HEADER_ID_LIST.delete;
263: PRIMARY_KEY_ID_LIST.delete;
264: l_count := 0;
265: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
266: IEX_DEBUG_PUB.logMessage('IEX_SCORE_HISTORIES.SCORE_OBJECT_ID.OBJECT_CODE=IEX_BILLTO');
267: END IF;
268: open merged_records3;
269: LOOP

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

317: hz_utility_pub.LAST_UPDATE_DATE,
318: hz_utility_pub.LAST_UPDATED_BY);
319: END IF;
320:
321: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
322: IEX_DEBUG_PUB.logMessage('Merging ' || MERGE_HEADER_ID_LIST.COUNT || ' Records');
323: END IF;
324: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
325: UPDATE IEX_SCORE_HISTORIES yt SET

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

413: BEGIN
414: IF process_mode='LOCK' THEN
415: NULL;
416: ELSE
417: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
418: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.DUNNING_MERGE BEGIN');
419: END IF;
420:
421: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');

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

423: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
424: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
425:
426: /* process IEX_STRATEGIES.CUST_ACCOUNT_ID */
427: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
428: IEX_DEBUG_PUB.logMessage('IEX_DUNNING.DUNNING_OBJECT_ID');
429: END IF;
430: open merged_records1;
431: LOOP

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

482: hz_utility_pub.LAST_UPDATE_DATE,
483: hz_utility_pub.LAST_UPDATED_BY);
484: END IF;
485:
486: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
487: IEX_DEBUG_PUB.logMessage('Merging ' || MERGE_HEADER_ID_LIST.COUNT || ' Records');
488: END IF;
489: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
490: UPDATE IEX_DUNNINGS yt SET

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

510: /* process IEX_DUNNINGS.DUNNING_OBJECT_ID where DUNNING_LEVEL = 'BILLTO' */
511: MERGE_HEADER_ID_LIST.delete;
512: PRIMARY_KEY_ID_LIST.delete;
513: l_count := 0;
514: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
515: IEX_DEBUG_PUB.logMessage('IEX_DUNNINGS.DUNNING_OBJECT_ID.TYPE=ACCOUNT');
516: END IF;
517: open merged_records2;
518: LOOP

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

569: hz_utility_pub.LAST_UPDATE_DATE,
570: hz_utility_pub.LAST_UPDATED_BY);
571: END IF;
572:
573: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
574: IEX_DEBUG_PUB.logMessage('Merging ' || MERGE_HEADER_ID_LIST.COUNT || ' Records');
575: END IF;
576: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
577: UPDATE IEX_DUNNINGS yt SET

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

591: END LOOP;
592:
593: arp_message.set_name('AR','AR_ROWS_UPDATED');
594: arp_message.set_token('NUM_ROWS',to_char(l_count));
595: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
596: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.DUNNNING_MERGE END');
597: END IF;
598:
599: END IF;

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

705: BEGIN
706: IF process_mode='LOCK' THEN
707: NULL;
708: ELSE
709: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
710: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.STRATEGY_MERGE BEGIN');
711: END IF;
712:
713: ARP_MESSAGE.SET_NAME('AR','AR_UPDATING_TABLE');

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

715: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
716: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
717:
718: /* process IEX_STRATEGIES.CUST_ACCOUNT_ID */
719: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
720: IEX_DEBUG_PUB.logMessage('IEX_STRATEGIES.CUST_ACCOUNT_ID');
721: END IF;
722: open merged_records1;
723: LOOP

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

772: hz_utility_pub.LAST_UPDATE_DATE,
773: hz_utility_pub.LAST_UPDATED_BY);
774: END IF;
775:
776: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
777: IEX_DEBUG_PUB.logMessage('Merging ' || MERGE_HEADER_ID_LIST.COUNT || ' Records');
778: END IF;
779: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
780: UPDATE IEX_STRATEGIES yt SET

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

803: PRIMARY_KEY_ID_LIST.delete;
804: PARTY_ID_LIST.delete;
805: STATUS_CODE_LIST.delete; --Added for bug#6974531 by schekuri on 14-Aug-2008
806: l_count := 0;
807: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
808: IEX_DEBUG_PUB.logMessage('IEX_STRATEGIES.JTF_OBJECT_ID.TYPE=IEX_ACCOUNT');
809: END IF;
810: open merged_records2;
811: LOOP

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

862: hz_utility_pub.LAST_UPDATE_DATE,
863: hz_utility_pub.LAST_UPDATED_BY);
864: END IF;
865:
866: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
867: IEX_DEBUG_PUB.logMessage('Merging ' || MERGE_HEADER_ID_LIST.COUNT || ' Records');
868: END IF;
869: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
870: UPDATE IEX_STRATEGIES yt SET

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

899: MERGE_HEADER_ID_LIST.delete;
900: PRIMARY_KEY_ID_LIST.delete;
901: STATUS_CODE_LIST.delete; --Added for bug#6974531 by schekuri on 14-Aug-2008
902: l_count := 0;
903: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
904: IEX_DEBUG_PUB.logMessage('IEX_STRATEGIES.JTF_OBJECT_ID.TYPE=IEX_BILLTO');
905: END IF;
906: open merged_records3;
907: LOOP

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

958: hz_utility_pub.LAST_UPDATE_DATE,
959: hz_utility_pub.LAST_UPDATED_BY);
960: END IF;
961:
962: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
963: IEX_DEBUG_PUB.logMessage('Merging ' || MERGE_HEADER_ID_LIST.COUNT || ' Records');
964: END IF;
965: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
966: UPDATE IEX_STRATEGIES yt SET

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

993:
994: arp_message.set_name('AR','AR_ROWS_UPDATED');
995: arp_message.set_token('NUM_ROWS',to_char(l_count));
996:
997: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
998: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.STRATEGY_MERGE END');
999: END IF;
1000:
1001: END IF;

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

1204: l_last_fetch BOOLEAN := FALSE;
1205: l_count NUMBER;
1206: BEGIN
1207:
1208: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1209: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.DELINQUENCY_MERGE BEGIN');
1210: IEX_DEBUG_PUB.logMessage('Input parameters:');
1211: IEX_DEBUG_PUB.logMessage('req_id = ' || req_id);
1212: IEX_DEBUG_PUB.logMessage('set_num = ' || set_num);

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

1220: ARP_MESSAGE.SET_TOKEN('TABLE_NAME','IEX_DELINQUENCIES',FALSE);
1221: HZ_ACCT_MERGE_UTIL.load_set(set_num, req_id);
1222: l_profile_val := FND_PROFILE.VALUE('HZ_AUDIT_ACCT_MERGE');
1223:
1224: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1225: IEX_DEBUG_PUB.logMessage('l_profile_val = ' || l_profile_val);
1226: END IF;
1227:
1228: l_count := 0;

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

1225: IEX_DEBUG_PUB.logMessage('l_profile_val = ' || l_profile_val);
1226: END IF;
1227:
1228: l_count := 0;
1229: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1230: IEX_DEBUG_PUB.logMessage('Searching for ACCOUNT records...');
1231: END IF;
1232:
1233: /* merging cust_account_id */

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

1243: IF merged_records%NOTFOUND THEN
1244: l_last_fetch := TRUE;
1245: END IF;
1246:
1247: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1248: IEX_DEBUG_PUB.logMessage('Fetched ' || MERGE_HEADER_ID_LIST.COUNT || ' records');
1249: END IF;
1250:
1251: IF MERGE_HEADER_ID_LIST.COUNT = 0 and l_last_fetch then

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

1248: IEX_DEBUG_PUB.logMessage('Fetched ' || MERGE_HEADER_ID_LIST.COUNT || ' records');
1249: END IF;
1250:
1251: IF MERGE_HEADER_ID_LIST.COUNT = 0 and l_last_fetch then
1252: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1253: IEX_DEBUG_PUB.logMessage('Exiting fetch');
1254: END IF;
1255: goto iex_delinquency_acc_site_use;
1256: END IF;

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

1259: NUM_COL1_NEW_LIST(I) := HZ_ACCT_MERGE_UTIL.GETDUP_ACCOUNT(NUM_COL1_ORIG_LIST(I));
1260: END LOOP;
1261:
1262: IF l_profile_val IS NOT NULL AND l_profile_val = 'Y' THEN
1263: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1264: IEX_DEBUG_PUB.logMessage('Inserting into HZ_CUSTOMER_MERGE_LOG...');
1265: END IF;
1266: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT
1267: INSERT INTO HZ_CUSTOMER_MERGE_LOG (

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

1292: hz_utility_pub.LAST_UPDATE_LOGIN,
1293: hz_utility_pub.LAST_UPDATE_DATE,
1294: hz_utility_pub.LAST_UPDATED_BY);
1295:
1296: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1297: IEX_DEBUG_PUB.logMessage('...done');
1298: END IF;
1299:
1300: END IF;

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

1297: IEX_DEBUG_PUB.logMessage('...done');
1298: END IF;
1299:
1300: END IF;
1301: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1302: IEX_DEBUG_PUB.logMessage('Updating IEX_DELINQUENCIES_ALL...');
1303: END IF;
1304:
1305: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT

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

1314: , PROGRAM_ID = arp_standard.profile.program_id
1315: , PROGRAM_UPDATE_DATE = SYSDATE
1316: WHERE DELINQUENCY_ID=PRIMARY_KEY_ID_LIST(I);
1317: l_count := l_count + SQL%ROWCOUNT;
1318: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1319: IEX_DEBUG_PUB.logMessage('...done');
1320: END IF;
1321:
1322: IF l_last_fetch THEN

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

1323: goto iex_delinquency_acc_site_use;
1324: END IF;
1325: END LOOP;
1326:
1327: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1328: IEX_DEBUG_PUB.logMessage('Total processed ' || l_count || ' ACCOUNT records');
1329: END IF;
1330:
1331: arp_message.set_name('AR','AR_ROWS_UPDATED');

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

1337: MERGE_HEADER_ID_LIST.delete;
1338: PRIMARY_KEY_ID_LIST.delete;
1339: l_count := 0;
1340:
1341: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1342: IEX_DEBUG_PUB.logMessage('Searching for CUSTOMER_SITE_USE_ID records...');
1343: END IF;
1344:
1345: open merged_records1;

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

1349: , PRIMARY_KEY_ID_LIST
1350: , NUM_COL2_ORIG_LIST
1351: limit G_Batch_Size;
1352:
1353: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1354: IEX_DEBUG_PUB.logMessage('Fetched ' || MERGE_HEADER_ID_LIST.COUNT || ' records');
1355: END IF;
1356:
1357: IF merged_records1%NOTFOUND THEN

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

1358: l_last_fetch := TRUE;
1359: END IF;
1360:
1361: IF MERGE_HEADER_ID_LIST.COUNT = 0 and l_last_fetch then
1362: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1363: IEX_DEBUG_PUB.logMessage('Exiting fetch');
1364: END IF;
1365: exit;
1366: END IF;

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

1371: END LOOP;
1372:
1373: IF l_profile_val IS NOT NULL AND l_profile_val = 'Y' THEN
1374:
1375: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1376: IEX_DEBUG_PUB.logMessage('Inserting into HZ_CUSTOMER_MERGE_LOG...');
1377: END IF;
1378:
1379: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT

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

1405: hz_utility_pub.LAST_UPDATE_LOGIN,
1406: hz_utility_pub.LAST_UPDATE_DATE,
1407: hz_utility_pub.LAST_UPDATED_BY);
1408:
1409: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1410: IEX_DEBUG_PUB.logMessage('...done');
1411: END IF;
1412:
1413: END IF;

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

1411: END IF;
1412:
1413: END IF;
1414:
1415: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1416: IEX_DEBUG_PUB.logMessage('Updating IEX_DELINQUENCIES_ALL...');
1417: END IF;
1418:
1419: FORALL I in 1..MERGE_HEADER_ID_LIST.COUNT

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

1427: , PROGRAM_ID = arp_standard.profile.program_id
1428: , PROGRAM_UPDATE_DATE = SYSDATE
1429: WHERE DELINQUENCY_ID=PRIMARY_KEY_ID_LIST(I);
1430: l_count := l_count + SQL%ROWCOUNT;
1431: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1432: IEX_DEBUG_PUB.logMessage('...done');
1433: END IF;
1434: IF l_last_fetch THEN
1435: EXIT;

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

1435: EXIT;
1436: END IF;
1437: END LOOP;
1438:
1439: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1440: IEX_DEBUG_PUB.logMessage('Total processed ' || l_count || ' CUSTOMER_SITE_USE_ID records');
1441: END IF;
1442:
1443: arp_message.set_name('AR','AR_ROWS_UPDATED');

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

1442:
1443: arp_message.set_name('AR','AR_ROWS_UPDATED');
1444: arp_message.set_token('NUM_ROWS',to_char(l_count));
1445:
1446: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1447: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.DELINQUENCY_MERGE END');
1448: END IF;
1449:
1450: END IF;

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

1449:
1450: END IF;
1451: EXCEPTION
1452: WHEN OTHERS THEN
1453: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1454: IEX_DEBUG_PUB.logMessage('In IEX_MERGE_PVT.DELINQUENCY_MERGE exception');
1455: END IF;
1456: arp_message.set_line('DELINQUENCY_MERGE');
1457: RAISE;

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

1476: e_NullParameters EXCEPTION;
1477: -- End - 10/12/2005 - Andre Araujo - Add exception handling
1478:
1479: BEGIN
1480: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1481: IEX_DEBUG_PUB.LOGMESSAGE('MERGE_DELINQUENCY_PARTIES: Begin');
1482: IEX_DEBUG_PUB.LOGMESSAGE('MERGE_DELINQUENCY_PARTIES: p_from_id: ' || p_from_id );
1483: IEX_DEBUG_PUB.LOGMESSAGE('MERGE_DELINQUENCY_PARTIES: p_to_id: ' || p_to_id );
1484: IEX_DEBUG_PUB.LOGMESSAGE('MERGE_DELINQUENCY_PARTIES: p_from_fk_id: ' || p_from_fk_id );

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

1707: WHERE PARTY_ID = p_from_fk_id;
1708:
1709: /* end raverma 02032003 */
1710:
1711: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1712: IEX_DEBUG_PUB.LOGMESSAGE('MERGE_DELINQUENCY_PARTIES: End success!');
1713: END IF;
1714:
1715: RETURN;

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

1822: l_api_name CONSTANT VARCHAR2(30) := 'CASE_CONTACT_MERGE';
1823: l_api_version_number CONSTANT NUMBER := 1.0;
1824: l_merge_reason_code VARCHAR2(30);
1825: BEGIN
1826: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1827: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.CASE_CONTACT_MERGE BEGIN');
1828: END IF;
1829: x_return_status := FND_API.G_RET_STS_SUCCESS;
1830:

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

1906: where phone_id = p_from_fk_id;
1907: END IF;
1908: EXCEPTION
1909: WHEN OTHERS THEN
1910: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1911: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.CASE_CONTACT_MERGE EXCEPTION:');
1912: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT' || '.' || l_api_name || ': ' || sqlerrm);
1913: END IF;
1914: arp_message.set_line('IEX_MERGE_PVT' || '.' || l_api_name || ': ' || sqlerrm);

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

1916: raise;
1917: END;
1918: END IF;
1919:
1920: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
1921: IEX_DEBUG_PUB.logMessage('IEX_MERGE_PVT.CASE_CONTACT_MERGE END');
1922: END IF;
1923:
1924: END CASE_CONTACT_MERGE;