DBA Data[Home] [Help]

APPS.HZ_PARTY_MERGE dependencies on FND_MSG_PUB

Line 523: FND_MSG_PUB.initialize;

519:
520: ---Bug 2440553 Savepoint for the start of batch_merge
521: --SAVEPOINT batch_merge; commented out and moved to after commit for bug 3267877.
522:
523: FND_MSG_PUB.initialize;
524: init_globals;
525:
526: --Initialize API return status to success.
527: l_glob_return_status := FND_API.G_RET_STS_SUCCESS;

Line 542: FND_MSG_PUB.ADD;

538: l_batch_id := TO_NUMBER(p_batch_id);
539: ELSE
540: FND_MESSAGE.SET_NAME('AR', 'HZ_BATCH_NOTFOUND');
541: FND_MESSAGE.SET_TOKEN('BATCHID', p_batch_id);
542: FND_MSG_PUB.ADD;
543: RAISE FND_API.G_EXC_ERROR;
544: END IF;
545:
546: -- Open the batch cursor and fetch batch details

Line 553: FND_MSG_PUB.ADD;

549: l_batch_delete, l_batch_commit;
550: IF (c_batch%NOTFOUND) THEN
551: FND_MESSAGE.SET_NAME('AR', 'HZ_BATCH_NOTFOUND');
552: FND_MESSAGE.SET_TOKEN('BATCHID', p_batch_id);
553: FND_MSG_PUB.ADD;
554: RAISE FND_API.G_EXC_ERROR;
555: END IF;
556:
557: -- If batch already complete error out

Line 561: FND_MSG_PUB.ADD;

557: -- If batch already complete error out
558: IF (l_batch_status = 'COMPLETE') THEN
559: FND_MESSAGE.SET_NAME('AR', 'HZ_BATCH_COMPLETE');
560: FND_MESSAGE.SET_TOKEN('BATCHID', p_batch_id);
561: FND_MSG_PUB.ADD;
562: RAISE FND_API.G_EXC_ERROR;
563: END IF;
564: CLOSE c_batch;
565:

Line 577: FND_MSG_PUB.ADD;

573: IF (l_ret_merge_ok = 'N') THEN
574: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_INTERNAL_PARTY_IND');
575: FND_MESSAGE.SET_TOKEN('PARTY_INT', l_int_party);
576: FND_MESSAGE.SET_TOKEN('PARTY_EXT', l_ext_party);
577: FND_MSG_PUB.ADD;
578: RAISE FND_API.G_EXC_ERROR;
579: END IF;
580:
581: HZ_MERGE_DUP_PVT.validate_overlapping_merge_req(

Line 745: FND_MSG_PUB.initialize;

741:
742: ----- Loop through each pre merge party and perform the merge
743: OPEN c_batch_details(l_batch_id, l_pre_merge_to_party_id);
744: LOOP
745: FND_MSG_PUB.initialize;
746:
747: -- Initialize return status and error buffer
748: l_return_status := FND_API.G_RET_STS_SUCCESS;
749: l_error_msg := '';

Line 772: FND_MSG_PUB.ADD;

768: FETCH c_dict_id INTO l_dict_id;
769: IF c_dict_id%NOTFOUND THEN
770: FND_MESSAGE.SET_NAME('AR', 'HZ_INVALID_DICT_ENTRY');
771: FND_MESSAGE.SET_TOKEN('ENTITY' ,'HZ_PARTIES');
772: FND_MSG_PUB.ADD;
773: RAISE FND_API.G_EXC_ERROR;
774: END IF;
775: CLOSE c_dict_id;
776:

Line 813: FND_MSG_PUB.ADD;

809: FETCH c_dict_id INTO l_dict_id;
810: IF c_dict_id%NOTFOUND THEN
811: FND_MESSAGE.SET_NAME('AR', 'HZ_INVALID_DICT_ENTRY');
812: FND_MESSAGE.SET_TOKEN('ENTITY' ,'HZ_PARTY_SITES');
813: FND_MSG_PUB.ADD;
814: RAISE FND_API.G_EXC_ERROR;
815: END IF;
816: CLOSE c_dict_id;
817:

Line 860: FND_MSG_PUB.ADD;

856: FETCH c_dict_id INTO l_dict_id;
857: IF c_dict_id%NOTFOUND THEN
858: FND_MESSAGE.SET_NAME('AR', 'HZ_INVALID_DICT_ENTRY');
859: FND_MESSAGE.SET_TOKEN('ENTITY' ,'HZ_CONTACT_POINTS');
860: FND_MSG_PUB.ADD;
861: RAISE FND_API.G_EXC_ERROR;
862: END IF;
863: CLOSE c_dict_id;
864:

Line 913: FND_MSG_PUB.ADD;

909: FETCH c_dict_id INTO l_dict_id;
910: IF c_dict_id%NOTFOUND THEN
911: FND_MESSAGE.SET_NAME('AR', 'HZ_INVALID_DICT_ENTRY');
912: FND_MESSAGE.SET_TOKEN('ENTITY' ,'HZ_PARTY_RELATIONSHIPS');
913: FND_MSG_PUB.ADD;
914: RAISE FND_API.G_EXC_ERROR;
915: END IF;
916: CLOSE c_dict_id;
917:

Line 981: FND_MSG_PUB.ADD;

977: end if; --l_return_status
978:
979: ELSE --type of merge
980: FND_MESSAGE.SET_NAME('AR', 'HZ_INVALID_MERGE_TYPE');
981: FND_MSG_PUB.ADD;
982: RAISE FND_API.G_EXC_ERROR;
983: END IF; --type of merge
984:
985: -- If the party was successfully merged, update merge status to 'DONE'

Line 1129: IF FND_MSG_PUB.Count_Msg <=0 THEN

1125: ROLLBACK TO batch_merge;
1126: outandlog('Batch merge procedure '||l_proc_name||' is not successful');
1127: l_error_msg := logerror;
1128: --bug 4916777
1129: IF FND_MSG_PUB.Count_Msg <=0 THEN
1130: l_error_msg := 'Error executing batch merge procedure ' || l_proc_name || ' for entity ' || l_sub_entity_name;
1131: END IF;
1132: I_Counter:=0;
1133: store_merge_log(l_batch_pid, -1,

Line 1396: FND_MSG_PUB.ADD;

1392: FETCH c_dict_id INTO l_dict_id, l_desc;
1393: IF c_dict_id%NOTFOUND THEN
1394: FND_MESSAGE.SET_NAME('AR', 'HZ_INVALID_DICT_ENTRY');
1395: FND_MESSAGE.SET_TOKEN('ENTITY' ,'HZ_PARTY_SITES');
1396: FND_MSG_PUB.ADD;
1397: RAISE FND_API.G_EXC_ERROR;
1398: END IF;
1399: CLOSE c_dict_id;
1400:

Line 1523: FND_MSG_PUB.ADD;

1519: -- If not found error out
1520: IF (c_dict_details%NOTFOUND or l_proc_name = null) THEN
1521: FND_MESSAGE.SET_NAME('AR', 'HZ_INVALID_DICT_ENTRY');
1522: FND_MESSAGE.SET_TOKEN('ENTITY' ,p_entity_name);
1523: FND_MSG_PUB.ADD;
1524: RAISE FND_API.G_EXC_ERROR;
1525: END IF;
1526: CLOSE c_dict_details;
1527:

Line 1634: IF FND_MSG_PUB.Count_Msg <=0 THEN

1630: log('Error: Merge failed in procedure '||l_proc_name||' for entity '||p_entity_name,TRUE); --4634891
1631: x_error_msg := logerror;
1632:
1633: --bug 4916777
1634: IF FND_MSG_PUB.Count_Msg <=0 THEN
1635: x_error_msg := 'Error executing procedure ' || l_proc_name || ' for entity ' || p_entity_name;
1636: log(x_error_msg);
1637: END IF;
1638: --bug 4916777

Line 1723: FND_MSG_PUB.ADD;

1719: IF (l_sub_entity_name is null or l_sub_fk_column_name is null or
1720: l_sub_fk_column_name is null) THEN
1721: FND_MESSAGE.SET_NAME('AR', 'HZ_INVALID_DICT_ENTRY');
1722: FND_MESSAGE.SET_TOKEN('ENTITY' ,l_sub_entity_name);
1723: FND_MSG_PUB.ADD;
1724:
1725: x_error_msg:=logerror;
1726: store_merge_log(p_batch_party_id, -1,
1727: -1,p_from_id, p_to_id,null,null,

Line 1806: FND_MSG_PUB.ADD;

1802: l_subrec_str:=NULL;
1803: ELSE
1804: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_SQL_ERROR');
1805: FND_MESSAGE.SET_TOKEN('ERROR' ,'do_merge ' || SQLERRM);
1806: FND_MSG_PUB.ADD;
1807:
1808: x_error_msg:=logerror;
1809: store_merge_log(p_batch_party_id, -1,
1810: -1,p_from_id, p_to_id,null,null,

Line 1831: FND_MSG_PUB.ADD;

1827: -- If not found error out
1828: IF (c_dict_details%NOTFOUND or l_proc_name = null) THEN
1829: FND_MESSAGE.SET_NAME('AR', 'HZ_INVALID_DICT_ENTRY');
1830: FND_MESSAGE.SET_TOKEN('ENTITY' ,l_sub_entity_name);
1831: FND_MSG_PUB.ADD;
1832: RAISE FND_API.G_EXC_ERROR;
1833: END IF;
1834: CLOSE c_dict_details;
1835: log(p_log_padding || ' '|| l_desc);

Line 1899: IF FND_MSG_PUB.Count_Msg <=0 THEN

1895: log(' **** Error **** ', TRUE);
1896: log('Error: Merge failed in procedure '||l_proc_name_b||' for entity '||l_sub_entity_name,TRUE); --4634891
1897: x_error_msg := logerror;
1898: --bug 4916777
1899: IF FND_MSG_PUB.Count_Msg <=0 THEN
1900: x_error_msg := 'Error executing procedure ' || l_proc_name || ' for entity ' || p_entity_name;
1901: log(x_error_msg);
1902: END IF ;
1903: --bug 4916777

Line 1950: FND_MSG_PUB.ADD;

1946: -- If not found error out
1947: IF (c_dict_details%NOTFOUND or l_proc_name = null) THEN
1948: FND_MESSAGE.SET_NAME('AR', 'HZ_INVALID_DICT_ENTRY');
1949: FND_MESSAGE.SET_TOKEN('ENTITY' ,l_sub_entity_name);
1950: FND_MSG_PUB.ADD;
1951: RAISE FND_API.G_EXC_ERROR;
1952: END IF;
1953: CLOSE c_dict_details;
1954: END IF;

Line 1985: IF FND_MSG_PUB.Count_Msg <=0 THEN

1981: log(' **** Error **** ', TRUE);
1982: log('Error: Merge failed in procedure '||l_proc_name_b||' for entity '||l_sub_entity_name,TRUE); --4634891
1983: x_error_msg := logerror;
1984: --bug 4916777
1985: IF FND_MSG_PUB.Count_Msg <=0 THEN
1986: x_error_msg := 'Error executing procedure ' || l_proc_name || ' for entity ' || p_entity_name;
1987: log(x_error_msg);
1988: END IF ;
1989: --bug 4916777

Line 2064: FND_MSG_PUB.ADD;

2060: EXCEPTION
2061: WHEN OTHERS THEN
2062: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_SQL_ERROR');
2063: FND_MESSAGE.SET_TOKEN('ERROR' ,'do_merge ' || SQLERRM);
2064: FND_MSG_PUB.ADD;
2065:
2066: x_error_msg:=logerror;
2067: store_merge_log(p_batch_party_id, -1,
2068: -1,p_from_id, p_to_id,null,null,

Line 2103: FND_MSG_PUB.ADD;

2099: EXCEPTION
2100: WHEN OTHERS THEN
2101: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_BATCH_LOCK_ERROR');
2102: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2103: FND_MSG_PUB.ADD;
2104: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2105: END lock_batch;
2106:
2107: /*---------------------------------------------------------------------------------------

Line 2231: FND_MSG_PUB.ADD;

2227: WHEN OTHERS THEN
2228: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_LOCK_ERROR');
2229: FND_MESSAGE.SET_TOKEN('ENTITY', p_entity_name);
2230: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM || ' : ' || lockstr || ' subent ' || l_sub_ent_name);
2231: FND_MSG_PUB.ADD;
2232: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2233: END lock_records;
2234:
2235: /*------------------------------------------------------------------------------

Line 2293: FND_MSG_PUB.ADD;

2289: EXCEPTION
2290: WHEN OTHERS THEN
2291: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_DELETE_ERROR');
2292: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2293: FND_MSG_PUB.ADD;
2294: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2295: END delete_merged_records;
2296:
2297: /*-------------------------------------------------------------------

Line 2340: FND_MSG_PUB.ADD;

2336: WHEN OTHERS THEN
2337: FND_MESSAGE.SET_NAME('AR', 'HZ_REC_DESC_ERROR');
2338: FND_MESSAGE.SET_TOKEN('ENTITY' ,p_entity_name);
2339: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2340: FND_MSG_PUB.ADD;
2341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2342: RETURN NULL;
2343: END get_record_desc;
2344:

Line 2377: FND_MSG_PUB.ADD;

2373: WHEN OTHERS THEN
2374: FND_MESSAGE.SET_NAME('AR', 'HZ_REC_DESC_ERROR');
2375: FND_MESSAGE.SET_TOKEN('ENTITY' ,p_entity_name);
2376: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2377: FND_MSG_PUB.ADD;
2378: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2379: RETURN NULL;
2380: END get_record_desc_r;
2381:

Line 2465: FND_MSG_PUB.ADD;

2461: log('Data exists in table for the merge-to party. Aborting merge');
2462: log('');
2463: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_SQL_ERROR');
2464: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2465: FND_MSG_PUB.ADD;
2466: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2467: END exec_merge;
2468:
2469: /*-----------------------------------------------------------------

Line 2551: FND_MSG_PUB.ADD;

2547: log('Data exists in table for the merge-to party. Aborting merge');
2548: log('');
2549: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_SQL_ERROR');
2550: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2551: FND_MSG_PUB.ADD;
2552: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2553: END exec_merge_r;
2554:
2555: --bug 4634891 created overloaded procedure exec_merge

Line 2608: FND_MSG_PUB.ADD;

2604: log('Data exists in table for the merge-to party. Aborting merge');
2605: log('');
2606: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_SQL_ERROR');
2607: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2608: FND_MSG_PUB.ADD;
2609: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2610: END exec_merge;
2611:
2612: /*------------------------------------------------------------------------

Line 2710: FND_MSG_PUB.ADD;

2706: EXCEPTION
2707: WHEN OTHERS THEN
2708: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_SQL_ERROR');
2709: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2710: FND_MSG_PUB.ADD;
2711: RAISE FND_API.G_EXC_ERROR;
2712: END store_merge_history;
2713:
2714: /*---------------------------------------------------------------------------

Line 2815: FND_MSG_PUB.ADD;

2811: -- ROLLBACK to batch_merge;
2812: ROLLBACK; -- bug 3947633
2813: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_SQL_ERROR');
2814: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2815: FND_MSG_PUB.ADD;
2816: RAISE FND_API.G_EXC_ERROR;
2817: END store_merge_log;
2818:
2819: /*---------------------------------------------------------------------------

Line 2966: FND_MSG_PUB.ADD;

2962: l_batch_status, l_batch_delete,l_batch_commit;
2963: IF (pre_batch%NOTFOUND) THEN
2964: FND_MESSAGE.SET_NAME('AR', 'HZ_BATCH_NOTFOUND');
2965: FND_MESSAGE.SET_TOKEN('BATCHID', p_batch_id);
2966: FND_MSG_PUB.ADD;
2967: RAISE FND_API.G_EXC_ERROR;
2968: END IF;
2969: CLOSE pre_batch;
2970:

Line 3155: FND_MSG_PUB.Reset;

3151: RETURN VARCHAR2 IS
3152:
3153: l_msg_data VARCHAR2(2000);
3154: BEGIN
3155: FND_MSG_PUB.Reset;
3156:
3157: FOR I IN 1..FND_MSG_PUB.Count_Msg LOOP
3158: l_msg_data := l_msg_data || FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE );
3159: END LOOP;

Line 3157: FOR I IN 1..FND_MSG_PUB.Count_Msg LOOP

3153: l_msg_data VARCHAR2(2000);
3154: BEGIN
3155: FND_MSG_PUB.Reset;
3156:
3157: FOR I IN 1..FND_MSG_PUB.Count_Msg LOOP
3158: l_msg_data := l_msg_data || FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE );
3159: END LOOP;
3160: IF (SQLERRM IS NOT NULL) THEN
3161: l_msg_data := l_msg_data || SQLERRM;

Line 3158: l_msg_data := l_msg_data || FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE );

3154: BEGIN
3155: FND_MSG_PUB.Reset;
3156:
3157: FOR I IN 1..FND_MSG_PUB.Count_Msg LOOP
3158: l_msg_data := l_msg_data || FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE );
3159: END LOOP;
3160: IF (SQLERRM IS NOT NULL) THEN
3161: l_msg_data := l_msg_data || SQLERRM;
3162: END IF;

Line 3215: FND_MSG_PUB.initialize;

3211: END IF;
3212:
3213: --Initialize message list if p_init_msg_list is set to TRUE.
3214: IF FND_API.to_Boolean(p_init_msg_list) THEN
3215: FND_MSG_PUB.initialize;
3216: END IF;
3217:
3218: --Initialize API return status to success.
3219: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3245: FND_MSG_PUB.ADD;

3241: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3242:
3243: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_SQL_ERROR');
3244: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3245: FND_MSG_PUB.ADD;
3246:
3247: FND_MSG_PUB.Count_And_Get(
3248: p_encoded => FND_API.G_FALSE,
3249: p_count => x_msg_count,

Line 3247: FND_MSG_PUB.Count_And_Get(

3243: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_SQL_ERROR');
3244: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3245: FND_MSG_PUB.ADD;
3246:
3247: FND_MSG_PUB.Count_And_Get(
3248: p_encoded => FND_API.G_FALSE,
3249: p_count => x_msg_count,
3250: p_data => x_msg_data);
3251: END get_merge_to_record_id;

Line 3288: FND_MSG_PUB.ADD;

3284: EXCEPTION
3285: WHEN OTHERS THEN
3286: /* FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_SQL_ERROR');
3287: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3288: FND_MSG_PUB.ADD;
3289: RAISE FND_API.G_EXC_ERROR;*/
3290: RETURN NULL;
3291: END;
3292:

Line 3330: FND_MSG_PUB.ADD;

3326: EXCEPTION
3327: WHEN OTHERS THEN
3328: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_SQL_ERROR');
3329: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3330: FND_MSG_PUB.ADD;
3331: RAISE FND_API.G_EXC_ERROR;
3332: END get_col_type;
3333:
3334:

Line 3380: FND_MSG_PUB.initialize;

3376: END IF;
3377:
3378: --Initialize message list if p_init_msg_list is set to TRUE.
3379: IF FND_API.to_Boolean(p_init_msg_list) THEN
3380: FND_MSG_PUB.initialize;
3381: END IF;
3382:
3383: --Initialize API return status to success.
3384: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3404: FND_MSG_PUB.ADD;

3400: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3401:
3402: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_SQL_ERROR');
3403: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3404: FND_MSG_PUB.ADD;
3405:
3406: FND_MSG_PUB.Count_And_Get(
3407: p_count => x_msg_count,
3408: p_data => x_msg_data);

Line 3406: FND_MSG_PUB.Count_And_Get(

3402: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_SQL_ERROR');
3403: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3404: FND_MSG_PUB.ADD;
3405:
3406: FND_MSG_PUB.Count_And_Get(
3407: p_count => x_msg_count,
3408: p_data => x_msg_data);
3409: END check_party_in_merge_batch;
3410:

Line 3542: FOR I IN 1..FND_MSG_PUB.Count_Msg LOOP

3538: l_msg_data);
3539:
3540: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3541: IF l_msg_data IS NULL THEN
3542: FOR I IN 1..FND_MSG_PUB.Count_Msg LOOP
3543: l_msg_data := l_msg_data ||
3544: FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE );
3545: END LOOP;
3546: END IF;

Line 3544: FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE );

3540: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3541: IF l_msg_data IS NULL THEN
3542: FOR I IN 1..FND_MSG_PUB.Count_Msg LOOP
3543: l_msg_data := l_msg_data ||
3544: FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE );
3545: END LOOP;
3546: END IF;
3547: RETURN;
3548: END IF;

Line 3570: FOR I IN 1..FND_MSG_PUB.Count_Msg LOOP

3566: l_msg_data);
3567:
3568: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3569: IF l_msg_data IS NULL THEN
3570: FOR I IN 1..FND_MSG_PUB.Count_Msg LOOP
3571: l_msg_data := l_msg_data ||
3572: FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE );
3573: END LOOP;
3574: END IF;

Line 3572: FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE );

3568: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3569: IF l_msg_data IS NULL THEN
3570: FOR I IN 1..FND_MSG_PUB.Count_Msg LOOP
3571: l_msg_data := l_msg_data ||
3572: FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE );
3573: END LOOP;
3574: END IF;
3575: FND_FILE.put_line (FND_FILE.log,'Warning .. Error updating Org Profile of x_to_id ' || l_msg_data);
3576: -- Bug Fix : 3116262.

Line 4189: FND_MSG_PUB.ADD;

4185: WHEN OTHERS THEN
4186: log('Error in setup DNB data: '||SQLERRM);
4187: FND_MESSAGE.SET_NAME('AR', 'HZ_MERGE_SQL_ERROR');
4188: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4189: FND_MSG_PUB.ADD;
4190: APP_EXCEPTION.RAISE_EXCEPTION;
4191: END;
4192:
4193: PROCEDURE insert_party_site_details (

Line 4405: FND_MSG_PUB.ADD;

4401: WHEN OTHERS THEN
4402: log('Error in check internal/external party type: '||SQLERRM);
4403: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4404: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4405: FND_MSG_PUB.ADD;
4406: APP_EXCEPTION.RAISE_EXCEPTION;
4407: END check_int_ext_party_type;
4408:
4409: