146: '102: Contract Type is: ' || p_contract_type);
147: END IF;
148: -- Initialize message list if p_init_msg_list is set to TRUE.
149: IF FND_API.to_Boolean( p_init_msg_list ) THEN
150: FND_MSG_PUB.initialize;
151: END IF;
152:
153: IF (p_contract_type = 'PA_BLANKET')
154: OR (p_contract_type = 'PA_CONTRACT')
318: g_module || l_api_name || '.exception',
319: '115: Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');
320: END IF;
321: x_return_status := FND_API.G_RET_STS_ERROR;
322: FND_MSG_PUB.Count_And_Get(
323: p_count => x_msg_count,
324: p_data => x_msg_data
325: );
326:
356: g_module || l_api_name || '.exception',
357: '116:Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
358: END IF;
359: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
360: FND_MSG_PUB.Count_And_Get(
361: p_count => x_msg_count,
362: p_data => x_msg_data
363: );
364:
401: p_token1_value => sqlcode,
402: p_token2 => G_SQLERRM_TOKEN,
403: p_token2_value => sqlerrm);
404: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
405: FND_MSG_PUB.Count_And_Get(
406: p_count => x_msg_count,
407: p_data => x_msg_data
408: );
409: END check_contract_access_external;
552: '102: Fucntion Name is: ' || p_function_name);
553: END IF;
554: -- Initialize message list if p_init_msg_list is set to TRUE.
555: IF FND_API.to_Boolean( p_init_msg_list ) THEN
556: FND_MSG_PUB.initialize;
557: END IF;
558:
559: OPEN contract_csr(p_contract_id);
560: FETCH contract_csr INTO l_org_id, l_owner_id, l_use_acl_flag, l_contract_type, l_status_code, l_sign_type;
793: g_module || l_api_name || '.exception',
794: '115: Leaving check_contract_access:FND_API.G_EXC_ERROR Exception');
795: END IF;
796: x_return_status := FND_API.G_RET_STS_ERROR;
797: FND_MSG_PUB.Count_And_Get(
798: p_count => x_msg_count,
799: p_data => x_msg_data
800: );
801:
816: g_module || l_api_name || '.exception',
817: '116:Leaving check_contract_access:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
818: END IF;
819: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
820: FND_MSG_PUB.Count_And_Get(
821: p_count => x_msg_count,
822: p_data => x_msg_data
823: );
824:
845: p_token1_value => sqlcode,
846: p_token2 => G_SQLERRM_TOKEN,
847: p_token2_value => sqlerrm);
848: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
849: FND_MSG_PUB.Count_And_Get(
850: p_count => x_msg_count,
851: p_data => x_msg_data
852: );
853: END check_contract_access;
1061: END IF;
1062:
1063: -- Initialize message list if p_init_msg_list is set to TRUE.
1064: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1065: FND_MSG_PUB.initialize;
1066: END IF;
1067:
1068: x_return_status := FND_API.G_RET_STS_SUCCESS;
1069:
1146: g_module || l_api_name || '.exception',
1147: 'Leaving change_contract_status:FND_API.G_EXC_ERROR Exception');
1148: END IF;
1149: x_return_status := FND_API.G_RET_STS_ERROR;
1150: FND_MSG_PUB.Count_And_Get(
1151: p_count => x_msg_count,
1152: p_data => x_msg_data
1153: );
1154: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1157: g_module || l_api_name || '.exception',
1158: 'Leaving change_contract_status: FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1159: END IF;
1160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1161: FND_MSG_PUB.Count_And_Get(
1162: p_count => x_msg_count,
1163: p_data => x_msg_data
1164: );
1165: WHEN OTHERS THEN
1174: p_token1_value => sqlcode,
1175: p_token2 => G_SQLERRM_TOKEN,
1176: p_token2_value => sqlerrm);
1177: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1178: FND_MSG_PUB.Count_And_Get(
1179: p_count => x_msg_count,
1180: p_data => x_msg_data
1181: );
1182: END change_contract_status;
1245: '306: Forwarded User Id is: ' || to_char(p_forward_user_id));
1246: END IF;
1247: -- Initialize message list if p_init_msg_list is set to TRUE.
1248: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1249: FND_MSG_PUB.initialize;
1250: END IF;
1251:
1252: x_return_status := FND_API.G_RET_STS_SUCCESS;
1253:
1299: g_module || l_api_name || '.exception',
1300: 'Leaving add_approval_hist_record:FND_API.G_EXC_ERROR Exception');
1301: END IF;
1302: x_return_status := FND_API.G_RET_STS_ERROR;
1303: FND_MSG_PUB.Count_And_Get(
1304: p_count => x_msg_count,
1305: p_data => x_msg_data
1306: );
1307: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1310: g_module || l_api_name || '.exception',
1311: 'Leaving add_approval_hist_record: FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1312: END IF;
1313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1314: FND_MSG_PUB.Count_And_Get(
1315: p_count => x_msg_count,
1316: p_data => x_msg_data
1317: );
1318: WHEN OTHERS THEN
1327: p_token1_value => sqlcode,
1328: p_token2 => G_SQLERRM_TOKEN,
1329: p_token2_value => sqlerrm);
1330: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1331: FND_MSG_PUB.Count_And_Get(
1332: p_count => x_msg_count,
1333: p_data => x_msg_data
1334: );
1335: END add_approval_hist_record;
1402: '306: Forwarded User Id is: ' || to_char(p_forward_user_id));
1403: END IF;
1404: -- Initialize message list if p_init_msg_list is set to TRUE.
1405: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1406: FND_MSG_PUB.initialize;
1407: END IF;
1408:
1409: x_return_status := FND_API.G_RET_STS_SUCCESS;
1410:
1466: g_module || l_api_name || '.exception',
1467: 'Leaving add_signature_hist_record:FND_API.G_EXC_ERROR Exception');
1468: END IF;
1469: x_return_status := FND_API.G_RET_STS_ERROR;
1470: FND_MSG_PUB.Count_And_Get(
1471: p_count => x_msg_count,
1472: p_data => x_msg_data
1473: );
1474: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1477: g_module || l_api_name || '.exception',
1478: 'Leaving add_signature_hist_record: FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1479: END IF;
1480: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1481: FND_MSG_PUB.Count_And_Get(
1482: p_count => x_msg_count,
1483: p_data => x_msg_data
1484: );
1485: WHEN OTHERS THEN
1494: p_token1_value => sqlcode,
1495: p_token2 => G_SQLERRM_TOKEN,
1496: p_token2_value => sqlerrm);
1497: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1498: FND_MSG_PUB.Count_And_Get(
1499: p_count => x_msg_count,
1500: p_data => x_msg_data
1501: );
1502: END add_signature_hist_record;
1688: END IF;
1689:
1690: -- Initialize message list if p_init_msg_list is set to TRUE.
1691: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1692: FND_MSG_PUB.initialize;
1693: END IF;
1694:
1695: -- Initialize API return status to success
1696: x_return_status := FND_API.G_RET_STS_SUCCESS;
1730: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1731: 'x_error_code: ' || x_error_code);
1732: END IF;
1733:
1734: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1735: p_data => x_msg_data);
1736:
1737: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1738: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1776: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1777: 'x_error_code: ' || x_error_code);
1778: END IF;
1779:
1780: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1781: p_data => x_msg_data);
1782:
1783: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1784: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1823: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1824: 'x_error_code: ' || x_error_code);
1825: END IF;
1826:
1827: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1828: p_data => x_msg_data);
1829:
1830: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1831: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1860: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1861: 'x_error_code: ' || x_error_code);
1862: END IF;
1863:
1864: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1865: p_data => x_msg_data);
1866:
1867: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1868: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1891: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1892: 'x_error_code: ' || x_error_code);
1893: END IF;
1894:
1895: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1896: p_data => x_msg_data);
1897:
1898: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1899: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1949: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1950: 'x_error_code: ' || x_error_code);
1951: END IF;
1952:
1953: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1954: p_data => x_msg_data);
1955:
1956: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1957: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
1989: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1990: 'x_error_code: ' || x_error_code);
1991: END IF;
1992:
1993: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1994: p_data => x_msg_data);
1995:
1996: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1997: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2041: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2042: 'x_error_code: ' || x_error_code);
2043: END IF;
2044:
2045: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2046: p_data => x_msg_data);
2047:
2048: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2049: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2079: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2080: 'x_error_code: ' || x_error_code);
2081: END IF;
2082:
2083: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2084: p_data => x_msg_data);
2085:
2086: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2087: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2116: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2117: 'x_error_code: ' || x_error_code);
2118: END IF;
2119:
2120: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2121: p_data => x_msg_data);
2122:
2123: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2124: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2170: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2171: 'x_error_code: ' || x_error_code);
2172: END IF;
2173:
2174: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2175: p_data => x_msg_data);
2176:
2177: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2178: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2208: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2209: 'x_error_code: ' || x_error_code);
2210: END IF;
2211:
2212: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2213: p_data => x_msg_data);
2214:
2215: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2216: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2279: 'Leaving validate_contract_party:FND_API.G_EXC_ERROR Exception');
2280: END IF;
2281:
2282: x_return_status := FND_API.G_RET_STS_ERROR;
2283: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2284: p_data => x_msg_data);
2285:
2286: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2287:
2328: 'Leaving validate_contract_party:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2329: END IF;
2330:
2331: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2332: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2333: p_data => x_msg_data);
2334:
2335: WHEN OTHERS THEN
2336:
2383: p_token1_value => sqlcode,
2384: p_token2 => G_SQLERRM_TOKEN,
2385: p_token2_value => sqlerrm);
2386: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2387: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2388: p_data => x_msg_data);
2389:
2390: END validate_contract_party;
2391:
2508: END IF;
2509:
2510: -- Initialize message list if p_init_msg_list is set to TRUE.
2511: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2512: FND_MSG_PUB.initialize;
2513: END IF;
2514:
2515: -- Initialize API return status to success
2516: x_return_status := FND_API.G_RET_STS_SUCCESS;
2544: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2545: 'x_error_code: ' || x_error_code);
2546: END IF;
2547:
2548: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2549: p_data => x_msg_data);
2550:
2551: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2552: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2590: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2591: 'x_error_code: ' || x_error_code);
2592: END IF;
2593:
2594: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2595: p_data => x_msg_data);
2596:
2597: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2598: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2629: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2630: 'x_error_code: ' || x_error_code);
2631: END IF;
2632:
2633: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2634: p_data => x_msg_data);
2635:
2636: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2637: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2667: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
2668: 'x_error_code: ' || x_error_code);
2669: END IF;
2670:
2671: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2672: p_data => x_msg_data);
2673:
2674: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2675: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
2713: 'Leaving validate_party_contact:FND_API.G_EXC_ERROR Exception');
2714: END IF;
2715:
2716: x_return_status := FND_API.G_RET_STS_ERROR;
2717: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2718: p_data => x_msg_data);
2719:
2720: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2721:
2738: 'Leaving validate_party_contact:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2739: END IF;
2740:
2741: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2742: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2743: p_data => x_msg_data);
2744:
2745: WHEN OTHERS THEN
2746:
2769: p_token1_value => sqlcode,
2770: p_token2 => G_SQLERRM_TOKEN,
2771: p_token2_value => sqlerrm);
2772: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2773: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2774: p_data => x_msg_data);
2775:
2776: END validate_party_contact;
2777:
2861: END IF;
2862:
2863: -- Initialize message list if p_init_msg_list is set to TRUE.
2864: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2865: FND_MSG_PUB.initialize;
2866: END IF;
2867:
2868: -- Initialize API return status to success
2869: x_return_status := FND_API.G_RET_STS_SUCCESS;
2926: 'Leaving populate_import_errors:FND_API.G_EXC_ERROR Exception');
2927: END IF;
2928:
2929: x_return_status := FND_API.G_RET_STS_ERROR;
2930: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2931: p_data => x_msg_data);
2932:
2933: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2934:
2946: 'Leaving populate_import_errors:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
2947: END IF;
2948:
2949: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2950: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2951: p_data => x_msg_data);
2952:
2953: WHEN OTHERS THEN
2954:
2972: p_token1_value => sqlcode,
2973: p_token2 => G_SQLERRM_TOKEN,
2974: p_token2_value => sqlerrm);
2975: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2976: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2977: p_data => x_msg_data);
2978:
2979: END populate_import_errors;
2980:
3061: END IF;
3062:
3063: -- Initialize message list if p_init_msg_list is set to TRUE.
3064: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3065: FND_MSG_PUB.initialize;
3066: END IF;
3067:
3068: -- Initialize API return status to success
3069: x_return_status := FND_API.G_RET_STS_SUCCESS;
3293: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
3294: END IF;
3295:
3296: x_return_status := FND_API.G_RET_STS_ERROR;
3297: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3298: p_data => x_msg_data);
3299:
3300: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3301: IF IMPORT_DOCUMENTS_CSR%ISOPEN THEN
3310: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3311: END IF;
3312:
3313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3314: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3315: p_data => x_msg_data);
3316:
3317: WHEN OTHERS THEN
3318: IF IMPORT_DOCUMENTS_CSR%ISOPEN THEN
3333: p_token1_value => sqlcode,
3334: p_token2 => G_SQLERRM_TOKEN,
3335: p_token2_value => sqlerrm);
3336: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3337: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3338: p_data => x_msg_data);
3339:
3340: END validate_import_documents;
3341:
3432: END IF;
3433:
3434: -- Initialize message list if p_init_msg_list is set to TRUE.
3435: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3436: FND_MSG_PUB.initialize;
3437: END IF;
3438:
3439: -- Initialize API return status to success
3440: x_return_status := FND_API.G_RET_STS_SUCCESS;
3808: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
3809: END IF;
3810:
3811: x_return_status := FND_API.G_RET_STS_ERROR;
3812: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3813: p_data => x_msg_data);
3814:
3815: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3816:
3827: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
3828: END IF;
3829:
3830: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3831: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3832: p_data => x_msg_data);
3833:
3834: WHEN OTHERS THEN
3835:
3852: p_token1_value => sqlcode,
3853: p_token2 => G_SQLERRM_TOKEN,
3854: p_token2_value => sqlerrm);
3855: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3856: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3857: p_data => x_msg_data);
3858:
3859: END validate_import_parties;
3860:
4161: END IF;
4162:
4163: -- Initialize message list if p_init_msg_list is set to TRUE.
4164: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4165: FND_MSG_PUB.initialize;
4166: END IF;
4167:
4168: -- Initialize API return status to success
4169: x_return_status := FND_API.G_RET_STS_SUCCESS;
5440: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
5441: END IF;
5442:
5443: x_return_status := FND_API.G_RET_STS_ERROR;
5444: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
5445: p_data => x_msg_data);
5446:
5447: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5448: IF CONTRACT_ID_CSR%ISOPEN THEN
5502: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
5503: END IF;
5504:
5505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5506: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
5507: p_data => x_msg_data);
5508:
5509: WHEN OTHERS THEN
5510: IF CONTRACT_ID_CSR%ISOPEN THEN
5572: p_token1_value => sqlcode,
5573: p_token2 => G_SQLERRM_TOKEN,
5574: p_token2_value => sqlerrm);
5575: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5576: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
5577: p_data => x_msg_data);
5578:
5579: END validate_import_contracts;
5580:
5665: END IF;
5666:
5667: -- Initialize message list if p_init_msg_list is set to TRUE.
5668: IF FND_API.to_Boolean( p_init_msg_list ) THEN
5669: FND_MSG_PUB.initialize;
5670: END IF;
5671:
5672: -- Initialize API return status to success
5673: x_return_status := FND_API.G_RET_STS_SUCCESS;
6079:
6080: x_return_status := FND_API.G_RET_STS_ERROR;
6081: x_number_inserted := 0;
6082:
6083: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6084: p_data => x_msg_data);
6085:
6086: --rollback to the
6087: ROLLBACK TO before_insert_contracts;
6149:
6150: x_return_status := FND_API.G_RET_STS_ERROR;
6151: x_number_inserted := 0;
6152:
6153: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6154: p_data => x_msg_data);
6155:
6156: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6157:
6169:
6170: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6171: x_number_inserted := 0;
6172:
6173: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6174: p_data => x_msg_data);
6175:
6176: WHEN OTHERS THEN
6177:
6195: p_token2_value => sqlerrm);
6196: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6197: x_number_inserted := 0;
6198:
6199: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6200: p_data => x_msg_data);
6201:
6202: END insert_prod_data;
6203:
6251: END IF;
6252:
6253: -- Initialize message list if p_init_msg_list is set to TRUE.
6254: IF FND_API.to_Boolean( p_init_msg_list ) THEN
6255: FND_MSG_PUB.initialize;
6256: END IF;
6257:
6258: -- Initialize API return status to success
6259: x_return_status := FND_API.G_RET_STS_SUCCESS;
6346: END IF;
6347:
6348: x_return_status := FND_API.G_RET_STS_ERROR;
6349:
6350: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6351: p_data => x_msg_data);
6352:
6353: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6354: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6357: END IF;
6358:
6359: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6360:
6361: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6362: p_data => x_msg_data);
6363:
6364: WHEN OTHERS THEN
6365: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
6374: p_token2 => G_SQLERRM_TOKEN,
6375: p_token2_value => sqlerrm);
6376: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6377:
6378: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6379: p_data => x_msg_data);
6380:
6381:
6382: END validate_and_insert_contracts;
6467: END IF;
6468:
6469: -- Initialize message list if p_init_msg_list is set to TRUE.
6470: IF FND_API.to_Boolean( p_init_msg_list ) THEN
6471: FND_MSG_PUB.initialize;
6472: END IF;
6473:
6474: -- Initialize API return status to success
6475: x_return_status := FND_API.G_RET_STS_SUCCESS;
6544: 'Leaving delete_import_contract:FND_API.G_EXC_ERROR Exception');
6545: END IF;
6546:
6547: x_return_status := FND_API.G_RET_STS_ERROR;
6548: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6549: p_data => x_msg_data);
6550:
6551: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6552:
6555: 'Leaving delete_import_contract:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
6556: END IF;
6557:
6558: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6559: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6560: p_data => x_msg_data);
6561:
6562: WHEN OTHERS THEN
6563:
6572: p_token1_value => sqlcode,
6573: p_token2 => G_SQLERRM_TOKEN,
6574: p_token2_value => sqlerrm);
6575: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6576: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6577: p_data => x_msg_data);
6578:
6579: END delete_import_contract;
6580:
7057: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7058: END IF;
7059: -- Initialize message list if p_init_msg_list is set to TRUE.
7060: IF FND_API.to_Boolean( p_init_msg_list ) THEN
7061: FND_MSG_PUB.initialize;
7062: END IF;
7063:
7064: -- Initialize API return status to success
7065: x_return_status := FND_API.G_RET_STS_SUCCESS;
7084: END IF; -- (l_contact_email_address <> NULL)
7085: END LOOP;
7086:
7087: -- Standard call to get message count and if count is 1, get message info.
7088: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7089:
7090: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7091: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7092: 'Leaving OKC_REP_UTIL_PVT.get_vendor_userlist');
7107: IF (vendor_email_csr%ISOPEN) THEN
7108: CLOSE vendor_email_csr ;
7109: END IF;
7110: x_return_status := FND_API.G_RET_STS_ERROR;
7111: FND_MSG_PUB.Count_And_Get(
7112: p_count => x_msg_count,
7113: p_data => x_msg_data
7114: );
7115:
7126: IF (vendor_email_csr%ISOPEN) THEN
7127: CLOSE vendor_email_csr ;
7128: END IF;
7129: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7130: FND_MSG_PUB.Count_And_Get(
7131: p_count => x_msg_count,
7132: p_data => x_msg_data
7133: );
7134:
7151: p_token1_value => sqlcode,
7152: p_token2 => G_SQLERRM_TOKEN,
7153: p_token2_value => sqlerrm);
7154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7155: FND_MSG_PUB.Count_And_Get(
7156: p_count => x_msg_count,
7157: p_data => x_msg_data
7158: );
7159: END get_vendor_userlist;
7225: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7226: END IF;
7227: -- Initialize message list if p_init_msg_list is set to TRUE.
7228: IF FND_API.to_Boolean( p_init_msg_list ) THEN
7229: FND_MSG_PUB.initialize;
7230: END IF;
7231:
7232: -- Initialize API return status to success
7233: x_return_status := FND_API.G_RET_STS_SUCCESS;
7251: END IF; -- (l_contact_email_address <> NULL)
7252: END LOOP;
7253:
7254: -- Standard call to get message count and if count is 1, get message info.
7255: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7256:
7257: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7258: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7259: 'Leaving OKC_REP_UTIL_PVT.get_customer_userlist');
7273: IF (tca_email_csr%ISOPEN) THEN
7274: CLOSE tca_email_csr ;
7275: END IF;
7276: x_return_status := FND_API.G_RET_STS_ERROR;
7277: FND_MSG_PUB.Count_And_Get(
7278: p_count => x_msg_count,
7279: p_data => x_msg_data
7280: );
7281:
7291: IF (tca_email_csr%ISOPEN) THEN
7292: CLOSE tca_email_csr ;
7293: END IF;
7294: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7295: FND_MSG_PUB.Count_And_Get(
7296: p_count => x_msg_count,
7297: p_data => x_msg_data
7298: );
7299:
7315: p_token1_value => sqlcode,
7316: p_token2 => G_SQLERRM_TOKEN,
7317: p_token2_value => sqlerrm);
7318: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7319: FND_MSG_PUB.Count_And_Get(
7320: p_count => x_msg_count,
7321: p_data => x_msg_data
7322: );
7323: END get_customer_userlist;
7383: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7384: END IF;
7385: -- Initialize message list if p_init_msg_list is set to TRUE.
7386: IF FND_API.to_Boolean( p_init_msg_list ) THEN
7387: FND_MSG_PUB.initialize;
7388: END IF;
7389:
7390: -- Initialize API return status to success
7391: x_return_status := FND_API.G_RET_STS_SUCCESS;
7413: END IF;
7414:
7415:
7416: -- Standard call to get message count and if count is 1, get message info.
7417: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7418:
7419: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7420: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
7421: 'Leaving OKC_REP_UTIL_PVT.get_external_userlist');
7429: g_module || l_api_name,
7430: 'Leaving get_external_userlist:FND_API.G_EXC_ERROR Exception');
7431: END IF;
7432: x_return_status := FND_API.G_RET_STS_ERROR;
7433: FND_MSG_PUB.Count_And_Get(
7434: p_count => x_msg_count,
7435: p_data => x_msg_data
7436: );
7437:
7441: g_module || l_api_name,
7442: 'Leaving get_external_userlist:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
7443: END IF;
7444: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7445: FND_MSG_PUB.Count_And_Get(
7446: p_count => x_msg_count,
7447: p_data => x_msg_data
7448: );
7449:
7459: p_token1_value => sqlcode,
7460: p_token2 => G_SQLERRM_TOKEN,
7461: p_token2_value => sqlerrm);
7462: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7463: FND_MSG_PUB.Count_And_Get(
7464: p_count => x_msg_count,
7465: p_data => x_msg_data
7466: );
7467: END get_external_userlist;
7537: END IF;
7538:
7539: -- Initialize message list if p_init_msg_list is set to TRUE.
7540: IF FND_API.to_Boolean( p_init_msg_list ) THEN
7541: FND_MSG_PUB.initialize;
7542: END IF;
7543:
7544: -- Initialize API return status to success
7545: x_return_status := FND_API.G_RET_STS_SUCCESS;
7587: CLOSE l_contract_updatable_csr;
7588: END IF; -- (l_contract_updatable_csr%NOTFOUND)
7589: END IF; -- (p_validation_string is NULL)
7590: -- Standard call to get message count and if count is 1, get message info.
7591: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
7592: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
7593: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,
7594: '110: Leaving OKC_REP_UTIL_PVT.ok_to_commit');
7595: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8006: END IF;
8007:
8008: -- Initialize message list if p_init_msg_list is set to TRUE.
8009: IF FND_API.to_Boolean( p_init_msg_list ) THEN
8010: FND_MSG_PUB.initialize;
8011: END IF;
8012:
8013: -- Initialize API return status to success
8014: x_return_status := FND_API.G_RET_STS_SUCCESS;
8053:
8054: COMMIT WORK;
8055:
8056: -- Standard call to get message count and if count is 1, get message info.
8057: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
8058:
8059: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
8060: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,G_MODULE||l_api_name,
8061: 'Leaving OKC_REP_UTIL_PVT.sync_con_header_attributes');
8146: p_token1_value => sqlcode,
8147: p_token2 => G_SQLERRM_TOKEN,
8148: p_token2_value => sqlerrm);
8149: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8150: FND_MSG_PUB.Count_And_Get(
8151: p_count => x_msg_count,
8152: p_data => x_msg_data
8153: );
8154:
8501: END IF;
8502:
8503: -- Initialize message list if p_init_msg_list is set to TRUE.
8504: IF FND_API.to_Boolean( p_init_msg_list ) THEN
8505: FND_MSG_PUB.initialize;
8506: END IF;
8507:
8508: -- Initialize API return status to success
8509: x_return_status := FND_API.G_RET_STS_SUCCESS;
8825: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
8826: END IF;
8827:
8828: x_return_status := FND_API.G_RET_STS_ERROR;
8829: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
8830: p_data => x_msg_data);
8831:
8832: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8833:
8848: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
8849: END IF;
8850:
8851: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8852: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
8853: p_data => x_msg_data);
8854:
8855: WHEN OTHERS THEN
8856:
8877: p_token1_value => sqlcode,
8878: p_token2 => G_SQLERRM_TOKEN,
8879: p_token2_value => sqlerrm);
8880: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8881: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
8882: p_data => x_msg_data);
8883:
8884: END validate_import_contacts;
8885:
8983: END IF;
8984:
8985: -- Initialize message list if p_init_msg_list is set to TRUE.
8986: IF FND_API.to_Boolean( p_init_msg_list ) THEN
8987: FND_MSG_PUB.initialize;
8988: END IF;
8989:
8990: -- Initialize API return status to success
8991: x_return_status := FND_API.G_RET_STS_SUCCESS;
9214: 'Leaving '||l_api_name||':FND_API.G_EXC_ERROR Exception');
9215: END IF;
9216:
9217: x_return_status := FND_API.G_RET_STS_ERROR;
9218: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
9219: p_data => x_msg_data);
9220:
9221: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9222:
9241: 'Leaving '||l_api_name||':FND_API.G_EXC_UNEXPECTED_ERROR Exception');
9242: END IF;
9243:
9244: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9245: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
9246: p_data => x_msg_data);
9247:
9248: WHEN OTHERS THEN
9249:
9274: p_token1_value => sqlcode,
9275: p_token2 => G_SQLERRM_TOKEN,
9276: p_token2_value => sqlerrm);
9277: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9278: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
9279: p_data => x_msg_data);
9280:
9281: END validate_import_risks;
9282: