78: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
79: FND_LOG.STRING( FND_LOG.LEVEL_ERROR ,g_module||l_api_name,'100: leaving with G_EXC_ERROR');
80: END IF;
81: x_return_status := G_RET_STS_ERROR;
82: FND_MSG_PUB.Count_And_Get(
83: p_count => x_msg_count,
84: p_data => x_msg_data
85: );
86:
88: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
89: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'100: leaving with G_EXC_UNEXPECTED_ERROR');
90: END IF;
91: x_return_status := G_RET_STS_UNEXP_ERROR;
92: FND_MSG_PUB.Count_And_Get(
93: p_count => x_msg_count,
94: p_data => x_msg_data
95: );
96:
98: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
99: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'100: leaving with G_EXC_UNEXPECTED_ERROR');
100: END IF;
101: x_return_status := G_RET_STS_UNEXP_ERROR;
102: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
103: END IF;
104: FND_MSG_PUB.Count_And_Get(
105: p_count => x_msg_count,
106: p_data => x_msg_data
100: END IF;
101: x_return_status := G_RET_STS_UNEXP_ERROR;
102: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
103: END IF;
104: FND_MSG_PUB.Count_And_Get(
105: p_count => x_msg_count,
106: p_data => x_msg_data
107: );
108: END; -- checkAndCreateStatusHistory
885: END IF;
886:
887: -- Initialize message list if p_init_msg_list is set to TRUE.
888: IF FND_API.to_Boolean( p_init_msg_list ) THEN
889: FND_MSG_PUB.initialize;
890: END IF;
891:
892: -- Initialize API return status to success
893: x_return_status := FND_API.G_RET_STS_SUCCESS;
987: COMMIT WORK;
988: END IF;
989:
990: -- Standard call to get message count and if count is 1, get message info.
991: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
992:
993: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
994: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'1100: Leaving activateDeliverables');
995: END IF;
1000: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'1200: Leaving activateDeliverables Unexpected ERROR');
1001: END IF;
1002: ROLLBACK TO g_activate_del_GRP;
1003: x_return_status := G_RET_STS_ERROR ;
1004: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1005:
1006: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1007: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1008: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1300: Leaving activateDeliverables Unexpected ERROR');
1008: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1300: Leaving activateDeliverables Unexpected ERROR');
1009: END IF;
1010: ROLLBACK TO g_activate_del_GRP;
1011: x_return_status := G_RET_STS_UNEXP_ERROR ;
1012: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1013:
1014: WHEN OTHERS THEN
1015: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1016: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1400: Leaving activateDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
1016: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1400: Leaving activateDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
1017: END IF;
1018: ROLLBACK TO g_activate_del_GRP;
1019: x_return_status := G_RET_STS_UNEXP_ERROR ;
1020: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1021: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1022: END IF;
1023: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1024:
1017: END IF;
1018: ROLLBACK TO g_activate_del_GRP;
1019: x_return_status := G_RET_STS_UNEXP_ERROR ;
1020: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1021: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1022: END IF;
1023: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1024:
1025: END; -- activateDeliverables
1019: x_return_status := G_RET_STS_UNEXP_ERROR ;
1020: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1021: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1022: END IF;
1023: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1024:
1025: END; -- activateDeliverables
1026:
1027:
1253: END IF;
1254:
1255: -- Initialize message list if p_init_msg_list is set to TRUE.
1256: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1257: FND_MSG_PUB.initialize;
1258: END IF;
1259:
1260: -- Initialize API return status to success
1261: x_return_status := FND_API.G_RET_STS_SUCCESS;
1971: END IF;
1972:
1973: ROLLBACK TO g_resolve_del_GRP;
1974: x_return_status := G_RET_STS_ERROR ;
1975: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1976:
1977: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1978: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1979: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving resolveDeliverables Unexpected ERROR');
1986: END IF;
1987:
1988: ROLLBACK TO g_resolve_del_GRP;
1989: x_return_status := G_RET_STS_UNEXP_ERROR ;
1990: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1991:
1992: WHEN OTHERS THEN
1993: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1994: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving resolveDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
2001: END IF;
2002:
2003: ROLLBACK TO g_resolve_del_GRP;
2004: x_return_status := G_RET_STS_UNEXP_ERROR ;
2005: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2006: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2007: END IF;
2008: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2009:
2002:
2003: ROLLBACK TO g_resolve_del_GRP;
2004: x_return_status := G_RET_STS_UNEXP_ERROR ;
2005: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2006: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2007: END IF;
2008: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2009:
2010: END; -- resolveDeliverables
2004: x_return_status := G_RET_STS_UNEXP_ERROR ;
2005: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2006: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2007: END IF;
2008: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2009:
2010: END; -- resolveDeliverables
2011:
2012: /**
2131: END IF;
2132:
2133: -- Initialize message list if p_init_msg_list is set to TRUE.
2134: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2135: FND_MSG_PUB.initialize;
2136: END IF;
2137:
2138: -- Initialize API return status to success
2139: x_return_status := FND_API.G_RET_STS_SUCCESS;
2755: END IF;
2756:
2757: ROLLBACK TO g_update_del_GRP;
2758: x_return_status := G_RET_STS_ERROR ;
2759: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2760:
2761: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2762: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2763: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving updateDeliverables Unexpected ERROR');
2773: END IF;
2774:
2775: ROLLBACK TO g_update_del_GRP;
2776: x_return_status := G_RET_STS_UNEXP_ERROR ;
2777: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2778:
2779: WHEN OTHERS THEN
2780: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2781: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving updateDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
2791: END IF;
2792:
2793: ROLLBACK TO g_update_del_GRP;
2794: x_return_status := G_RET_STS_UNEXP_ERROR ;
2795: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2796: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2797: END IF;
2798: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2799:
2792:
2793: ROLLBACK TO g_update_del_GRP;
2794: x_return_status := G_RET_STS_UNEXP_ERROR ;
2795: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2796: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2797: END IF;
2798: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2799:
2800: END; -- updateDeliverables
2794: x_return_status := G_RET_STS_UNEXP_ERROR ;
2795: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2796: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2797: END IF;
2798: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2799:
2800: END; -- updateDeliverables
2801:
2802: /**
2833: END IF;
2834:
2835: -- Initialize message list if p_init_msg_list is set to TRUE.
2836: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2837: FND_MSG_PUB.initialize;
2838: END IF;
2839:
2840: -- Initialize API return status to success
2841: x_return_status := FND_API.G_RET_STS_SUCCESS;
2860: FND_LOG.STRING( FND_LOG.LEVEL_ERROR ,g_module||l_api_name,'800: Leaving enableNotifications Unexpected ERROR');
2861: END IF;
2862: ROLLBACK TO g_enable_del_ntf_GRP;
2863: x_return_status := G_RET_STS_ERROR ;
2864: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2865:
2866: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2867: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2868: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving enableNotifications Unexpected ERROR');
2868: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving enableNotifications Unexpected ERROR');
2869: END IF;
2870: ROLLBACK TO g_enable_del_ntf_GRP;
2871: x_return_status := G_RET_STS_UNEXP_ERROR ;
2872: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2873:
2874: WHEN OTHERS THEN
2875: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2876: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving enableNotifications because of EXCEPTION: '||substr(sqlerrm,1,200));
2876: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving enableNotifications because of EXCEPTION: '||substr(sqlerrm,1,200));
2877: END IF;
2878: ROLLBACK TO g_enable_del_ntf_GRP;
2879: x_return_status := G_RET_STS_UNEXP_ERROR ;
2880: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2881: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2882: END IF;
2883: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2884:
2877: END IF;
2878: ROLLBACK TO g_enable_del_ntf_GRP;
2879: x_return_status := G_RET_STS_UNEXP_ERROR ;
2880: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2881: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2882: END IF;
2883: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2884:
2885: END; -- enableNotifications
2879: x_return_status := G_RET_STS_UNEXP_ERROR ;
2880: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2881: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2882: END IF;
2883: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2884:
2885: END; -- enableNotifications
2886:
2887: /**
2918: END IF;
2919:
2920: -- Initialize message list if p_init_msg_list is set to TRUE.
2921: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2922: FND_MSG_PUB.initialize;
2923: END IF;
2924:
2925: -- Initialize API return status to success
2926: x_return_status := FND_API.G_RET_STS_SUCCESS;
2962: COMMIT WORK;
2963: END IF;
2964:
2965: -- Standard call to get message count and if count is 1, get message info.
2966: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2967:
2968: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2969: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'1000: Leaving cancelDeliverables');
2970: END IF;
2976: FND_LOG.STRING( FND_LOG.LEVEL_ERROR ,g_module||l_api_name,'800: Leaving cancelDeliverables Unexpected ERROR');
2977: END IF;
2978: ROLLBACK TO g_cancel_del_GRP;
2979: x_return_status := G_RET_STS_ERROR ;
2980: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2981:
2982: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2983: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2984: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving cancelDeliverables Unexpected ERROR');
2984: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving cancelDeliverables Unexpected ERROR');
2985: END IF;
2986: ROLLBACK TO g_cancel_del_GRP;
2987: x_return_status := G_RET_STS_UNEXP_ERROR ;
2988: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2989:
2990: WHEN OTHERS THEN
2991: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2992: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving cancelDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
2992: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving cancelDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
2993: END IF;
2994: ROLLBACK TO g_cancel_del_GRP;
2995: x_return_status := G_RET_STS_UNEXP_ERROR ;
2996: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2997: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2998: END IF;
2999: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3000:
2993: END IF;
2994: ROLLBACK TO g_cancel_del_GRP;
2995: x_return_status := G_RET_STS_UNEXP_ERROR ;
2996: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2997: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2998: END IF;
2999: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3000:
3001: END;
2995: x_return_status := G_RET_STS_UNEXP_ERROR ;
2996: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2997: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2998: END IF;
2999: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3000:
3001: END;
3002:
3003: /**
3037: END IF;
3038:
3039: -- Initialize message list if p_init_msg_list is set to TRUE.
3040: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3041: FND_MSG_PUB.initialize;
3042: END IF;
3043:
3044: -- Initialize API return status to success
3045: x_return_status := FND_API.G_RET_STS_SUCCESS;
3147: COMMIT WORK;
3148: END IF;
3149:
3150: -- Standard call to get message count and if count is 1, get message info.
3151: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3152:
3153: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3154: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'1000: Leaving cancelDeliverables');
3155: END IF;
3161: FND_LOG.STRING( FND_LOG.LEVEL_ERROR ,g_module||l_api_name,'800: Leaving cancelDeliverables Unexpected ERROR');
3162: END IF;
3163: ROLLBACK TO g_cancel2_del_GRP;
3164: x_return_status := G_RET_STS_ERROR ;
3165: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3166:
3167: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3168:
3169: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3170: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving cancelDeliverables Unexpected ERROR');
3171: END IF;
3172: ROLLBACK TO g_cancel2_del_GRP;
3173: x_return_status := G_RET_STS_UNEXP_ERROR ;
3174: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3175:
3176: WHEN OTHERS THEN
3177: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3178: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving cancelDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
3178: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving cancelDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
3179: END IF;
3180: ROLLBACK TO g_cancel2_del_GRP;
3181: x_return_status := G_RET_STS_UNEXP_ERROR ;
3182: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3183: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3184: END IF;
3185: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3186:
3179: END IF;
3180: ROLLBACK TO g_cancel2_del_GRP;
3181: x_return_status := G_RET_STS_UNEXP_ERROR ;
3182: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3183: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3184: END IF;
3185: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3186:
3187: END; -- cancelDeliverables
3181: x_return_status := G_RET_STS_UNEXP_ERROR ;
3182: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3183: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3184: END IF;
3185: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3186:
3187: END; -- cancelDeliverables
3188:
3189:
3222: END IF;
3223:
3224: -- Initialize message list if p_init_msg_list is set to TRUE.
3225: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3226: FND_MSG_PUB.initialize;
3227: END IF;
3228:
3229: -- Initialize API return status to success
3230: x_return_status := FND_API.G_RET_STS_SUCCESS;
3243: COMMIT WORK;
3244: END IF;
3245:
3246: -- Standard call to get message count and if count is 1, get message info.
3247: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3248:
3249: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3250: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'1000: Leaving updateDeliverables');
3251: END IF;
3257: FND_LOG.STRING( FND_LOG.LEVEL_ERROR ,g_module||l_api_name,'800: Leaving updateDeliverables Unexpected ERROR');
3258: END IF;
3259: ROLLBACK TO g_update_del_GRP;
3260: x_return_status := G_RET_STS_ERROR ;
3261: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3262:
3263: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3264: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3265: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving updateDeliverables Unexpected ERROR');
3265: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving updateDeliverables Unexpected ERROR');
3266: END IF;
3267: ROLLBACK TO g_update_del_GRP;
3268: x_return_status := G_RET_STS_UNEXP_ERROR ;
3269: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3270:
3271: WHEN OTHERS THEN
3272: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3273: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving updateDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
3273: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving updateDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
3274: END IF;
3275: ROLLBACK TO g_update_del_GRP;
3276: x_return_status := G_RET_STS_UNEXP_ERROR ;
3277: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3278: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3279: END IF;
3280: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3281:
3274: END IF;
3275: ROLLBACK TO g_update_del_GRP;
3276: x_return_status := G_RET_STS_UNEXP_ERROR ;
3277: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3278: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3279: END IF;
3280: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3281:
3282: END; -- updateDeliverables
3276: x_return_status := G_RET_STS_UNEXP_ERROR ;
3277: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3278: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3279: END IF;
3280: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3281:
3282: END; -- updateDeliverables
3283:
3284: /**
3325: END IF;
3326:
3327: -- Initialize message list if p_init_msg_list is set to TRUE.
3328: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3329: FND_MSG_PUB.initialize;
3330: END IF;
3331:
3332: -- Initialize API return status to success
3333: x_return_status := FND_API.G_RET_STS_SUCCESS;
3355: COMMIT WORK;
3356: END IF;
3357:
3358: -- Standard call to get message count and if count is 1, get message info.
3359: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3360:
3361: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3362: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'1000: Leaving updateBuyerDeliverables');
3363: END IF;
3369: FND_LOG.STRING( FND_LOG.LEVEL_ERROR ,g_module||l_api_name,'800: Leaving updateBuyerDeliverables Unexpected ERROR');
3370: END IF;
3371: ROLLBACK TO g_update2_del_GRP;
3372: x_return_status := G_RET_STS_ERROR ;
3373: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3374:
3375:
3376: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3377: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3378: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving updateBuyerDeliverables Unexpected ERROR');
3379: END IF;
3380: ROLLBACK TO g_update2_del_GRP;
3381: x_return_status := G_RET_STS_UNEXP_ERROR ;
3382: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3383:
3384: WHEN OTHERS THEN
3385: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3386: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving updateBuyerDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
3386: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving updateBuyerDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
3387: END IF;
3388: ROLLBACK TO g_update2_del_GRP;
3389: x_return_status := G_RET_STS_UNEXP_ERROR ;
3390: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3391: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3392: END IF;
3393: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3394:
3387: END IF;
3388: ROLLBACK TO g_update2_del_GRP;
3389: x_return_status := G_RET_STS_UNEXP_ERROR ;
3390: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3391: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3392: END IF;
3393: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3394:
3395: END; -- updateBuyerDeliverables
3389: x_return_status := G_RET_STS_UNEXP_ERROR ;
3390: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3391: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3392: END IF;
3393: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3394:
3395: END; -- updateBuyerDeliverables
3396:
3397: /**
3427: END IF;
3428:
3429: -- Initialize message list if p_init_msg_list is set to TRUE.
3430: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3431: FND_MSG_PUB.initialize;
3432: END IF;
3433:
3434: -- Initialize API return status to success
3435: x_return_status := FND_API.G_RET_STS_SUCCESS;
3466: COMMIT WORK;
3467: END IF;
3468:
3469: -- Standard call to get message count and if count is 1, get message info.
3470: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3471:
3472: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3473: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'400: Leaving disableDeliverables');
3474: END IF;
3480: FND_LOG.STRING( FND_LOG.LEVEL_ERROR ,g_module||l_api_name,'800: Leaving disableDeliverables Unexpected ERROR');
3481: END IF;
3482: ROLLBACK TO g_disable_del_GRP;
3483: x_return_status := G_RET_STS_ERROR ;
3484: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3485:
3486: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3487: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3488: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving disableDeliverables Unexpected ERROR');
3488: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving disableDeliverables Unexpected ERROR');
3489: END IF;
3490: ROLLBACK TO g_disable_del_GRP;
3491: x_return_status := G_RET_STS_UNEXP_ERROR ;
3492: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3493:
3494: WHEN OTHERS THEN
3495: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3496: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving disableDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
3496: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving disableDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
3497: END IF;
3498: ROLLBACK TO g_disable_del_GRP;
3499: x_return_status := G_RET_STS_UNEXP_ERROR ;
3500: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3501: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3502: END IF;
3503: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3504:
3497: END IF;
3498: ROLLBACK TO g_disable_del_GRP;
3499: x_return_status := G_RET_STS_UNEXP_ERROR ;
3500: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3501: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3502: END IF;
3503: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3504:
3505: END; --disableDeliverables
3499: x_return_status := G_RET_STS_UNEXP_ERROR ;
3500: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3501: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3502: END IF;
3503: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3504:
3505: END; --disableDeliverables
3506:
3507:
3542: END IF;
3543:
3544: -- Initialize message list if p_init_msg_list is set to TRUE.
3545: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3546: FND_MSG_PUB.initialize;
3547: END IF;
3548:
3549: -- Initialize API return status to success
3550: x_return_status := FND_API.G_RET_STS_SUCCESS;
3564: COMMIT WORK;
3565: END IF;
3566:
3567: -- Standard call to get message count and if count is 1, get message info.
3568: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3569:
3570: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3571: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'1000: Leaving updateIntContactOnDeliverables');
3572: END IF;
3578: FND_LOG.STRING( FND_LOG.LEVEL_ERROR ,g_module||l_api_name,'800: Leaving updateIntContactOnDeliverables Unexpected ERROR');
3579: END IF;
3580: ROLLBACK TO g_update_del_GRP;
3581: x_return_status := G_RET_STS_ERROR ;
3582: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3583:
3584: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3585: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3586: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving updateIntContactOnDeliverables Unexpected ERROR');
3586: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving updateIntContactOnDeliverables Unexpected ERROR');
3587: END IF;
3588: ROLLBACK TO g_update_del_GRP;
3589: x_return_status := G_RET_STS_UNEXP_ERROR ;
3590: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3591:
3592: WHEN OTHERS THEN
3593: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3594: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving updateIntContactOnDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
3594: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving updateIntContactOnDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
3595: END IF;
3596: ROLLBACK TO g_update_del_GRP;
3597: x_return_status := G_RET_STS_UNEXP_ERROR ;
3598: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3599: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3600: END IF;
3601: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3602:
3595: END IF;
3596: ROLLBACK TO g_update_del_GRP;
3597: x_return_status := G_RET_STS_UNEXP_ERROR ;
3598: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3599: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3600: END IF;
3601: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3602:
3603: END; -- updateIntContactOnDeliverables
3597: x_return_status := G_RET_STS_UNEXP_ERROR ;
3598: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3599: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3600: END IF;
3601: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3602:
3603: END; -- updateIntContactOnDeliverables
3604:
3605:
3647: END IF;
3648:
3649: -- Initialize message list if p_init_msg_list is set to TRUE.
3650: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3651: FND_MSG_PUB.initialize;
3652: END IF;
3653:
3654: -- Initialize API return status to success
3655: x_return_status := FND_API.G_RET_STS_SUCCESS;
3678: COMMIT WORK;
3679: END IF;
3680:
3681: -- Standard call to get message count and if count is 1, get message info.
3682: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3683:
3684: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3685: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'1000: Leaving updateIntContactOnDeliverables');
3686: END IF;
3692: FND_LOG.STRING( FND_LOG.LEVEL_ERROR ,g_module||l_api_name,'800: Leaving updateIntContactOnDeliverables Unexpected ERROR');
3693: END IF;
3694: ROLLBACK TO g_update2_del_GRP;
3695: x_return_status := G_RET_STS_ERROR ;
3696: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3697:
3698:
3699: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3700: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3701: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving updateIntContactOnDeliverables Unexpected ERROR');
3702: END IF;
3703: ROLLBACK TO g_update2_del_GRP;
3704: x_return_status := G_RET_STS_UNEXP_ERROR ;
3705: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3706:
3707: WHEN OTHERS THEN
3708: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3709: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving updateIntContactOnDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
3709: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving updateIntContactOnDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
3710: END IF;
3711: ROLLBACK TO g_update2_del_GRP;
3712: x_return_status := G_RET_STS_UNEXP_ERROR ;
3713: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3714: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3715: END IF;
3716: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3717:
3710: END IF;
3711: ROLLBACK TO g_update2_del_GRP;
3712: x_return_status := G_RET_STS_UNEXP_ERROR ;
3713: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3714: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3715: END IF;
3716: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3717:
3718: END; -- updateIntContactOnDeliverables
3712: x_return_status := G_RET_STS_UNEXP_ERROR ;
3713: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3714: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3715: END IF;
3716: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3717:
3718: END; -- updateIntContactOnDeliverables
3719:
3720: /**
3753: END IF;
3754:
3755: -- Initialize message list if p_init_msg_list is set to TRUE.
3756: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3757: FND_MSG_PUB.initialize;
3758: END IF;
3759:
3760: -- Initialize API return status to success
3761: x_return_status := FND_API.G_RET_STS_SUCCESS;
3775: COMMIT WORK;
3776: END IF;
3777:
3778: -- Standard call to get message count and if count is 1, get message info.
3779: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3780:
3781: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3782: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'1000: Leaving updateExtPartyOnDeliverables ');
3783: END IF;
3789: FND_LOG.STRING( FND_LOG.LEVEL_ERROR ,g_module||l_api_name,'800: Leaving updateExtPartyOnDeliverables Unexpected ERROR');
3790: END IF;
3791: ROLLBACK TO g_update_del_GRP;
3792: x_return_status := G_RET_STS_ERROR ;
3793: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3794:
3795: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3796: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3797: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving updateExtPartyOnDeliverables Unexpected ERROR');
3797: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving updateExtPartyOnDeliverables Unexpected ERROR');
3798: END IF;
3799: ROLLBACK TO g_update_del_GRP;
3800: x_return_status := G_RET_STS_UNEXP_ERROR ;
3801: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3802:
3803: WHEN OTHERS THEN
3804: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3805: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving updateExtPartyOnDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
3805: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving updateExtPartyOnDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
3806: END IF;
3807: ROLLBACK TO g_update_del_GRP;
3808: x_return_status := G_RET_STS_UNEXP_ERROR ;
3809: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3810: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3811: END IF;
3812: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3813:
3806: END IF;
3807: ROLLBACK TO g_update_del_GRP;
3808: x_return_status := G_RET_STS_UNEXP_ERROR ;
3809: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3810: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3811: END IF;
3812: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3813:
3814: END; -- updateExtPartyOnDeliverables
3808: x_return_status := G_RET_STS_UNEXP_ERROR ;
3809: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3810: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3811: END IF;
3812: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3813:
3814: END; -- updateExtPartyOnDeliverables
3815:
3816: /**
3871: END IF;
3872:
3873: -- Initialize message list if p_init_msg_list is set to TRUE.
3874: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3875: FND_MSG_PUB.initialize;
3876: END IF;
3877:
3878: -- Initialize API return status to success
3879: x_return_status := FND_API.G_RET_STS_SUCCESS;
3934: CLOSE del_cur ;
3935: END IF;
3936: ROLLBACK TO g_update_del_GRP;
3937: x_return_status := G_RET_STS_ERROR ;
3938: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3939:
3940: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3941: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3942: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving updateExtPartyOnDeliverables Unexpected ERROR');
3942: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving updateExtPartyOnDeliverables Unexpected ERROR');
3943: END IF;
3944: ROLLBACK TO g_update_del_GRP;
3945: x_return_status := G_RET_STS_UNEXP_ERROR ;
3946: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3947:
3948: WHEN OTHERS THEN
3949: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3950: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving updateExtPartyOnDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
3955: END IF;
3956:
3957: ROLLBACK TO g_update_del_GRP;
3958: x_return_status := G_RET_STS_UNEXP_ERROR ;
3959: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3960: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3961: END IF;
3962: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3963:
3956:
3957: ROLLBACK TO g_update_del_GRP;
3958: x_return_status := G_RET_STS_UNEXP_ERROR ;
3959: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3960: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3961: END IF;
3962: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3963:
3964: END;
3958: x_return_status := G_RET_STS_UNEXP_ERROR ;
3959: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
3960: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
3961: END IF;
3962: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3963:
3964: END;
3965:
3966: /**
4057: END IF;
4058:
4059: -- Initialize message list if p_init_msg_list is set to TRUE.
4060: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4061: FND_MSG_PUB.initialize;
4062: END IF;
4063:
4064: --loop thru deliverables where only the notes have changed
4065: FOR status_notes_rec IN status_notes_cur LOOP
4184: FND_LOG.STRING( FND_LOG.LEVEL_ERROR ,g_module||l_api_name,'800: Leaving postDelStatusChanges Unexpected ERROR');
4185: END IF;
4186: ROLLBACK TO g_createHistory_GRP;
4187: x_return_status := G_RET_STS_ERROR ;
4188: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4189:
4190: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4191: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4192: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving postDelStatusChanges Unexpected ERROR');
4192: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving postDelStatusChanges Unexpected ERROR');
4193: END IF;
4194: ROLLBACK TO g_createHistory_GRP;
4195: x_return_status := G_RET_STS_UNEXP_ERROR ;
4196: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4197:
4198: WHEN OTHERS THEN
4199: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4200: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving postDelStatusChanges because of EXCEPTION: '||substr(sqlerrm,1,200));
4200: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving postDelStatusChanges because of EXCEPTION: '||substr(sqlerrm,1,200));
4201: END IF;
4202: ROLLBACK TO g_createHistory_GRP;
4203: x_return_status := G_RET_STS_UNEXP_ERROR ;
4204: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4205: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4206: END IF;
4207: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4208:
4201: END IF;
4202: ROLLBACK TO g_createHistory_GRP;
4203: x_return_status := G_RET_STS_UNEXP_ERROR ;
4204: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4205: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4206: END IF;
4207: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4208:
4209: END; -- postDelStatusChanges
4203: x_return_status := G_RET_STS_UNEXP_ERROR ;
4204: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4205: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4206: END IF;
4207: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4208:
4209: END; -- postDelStatusChanges
4210:
4211: /** 11.5.10+ code
4285: CLOSE del_cur ;
4286: END IF;
4287:
4288: x_return_status := G_RET_STS_UNEXP_ERROR ;
4289: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4290: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4291: END IF;
4292: FND_MSG_PUB.Count_And_Get(p_encoded=>'F'
4293: , p_count => x_msg_count
4286: END IF;
4287:
4288: x_return_status := G_RET_STS_UNEXP_ERROR ;
4289: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4290: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4291: END IF;
4292: FND_MSG_PUB.Count_And_Get(p_encoded=>'F'
4293: , p_count => x_msg_count
4294: , p_data => x_msg_data );
4288: x_return_status := G_RET_STS_UNEXP_ERROR ;
4289: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4290: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4291: END IF;
4292: FND_MSG_PUB.Count_And_Get(p_encoded=>'F'
4293: , p_count => x_msg_count
4294: , p_data => x_msg_data );
4295:
4296: RETURN null;
4365: CLOSE del_cur ;
4366: END IF;
4367:
4368: x_return_status := G_RET_STS_UNEXP_ERROR ;
4369: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4370: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4371: END IF;
4372: FND_MSG_PUB.Count_And_Get(p_encoded=>'F'
4373: , p_count => x_msg_count
4366: END IF;
4367:
4368: x_return_status := G_RET_STS_UNEXP_ERROR ;
4369: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4370: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4371: END IF;
4372: FND_MSG_PUB.Count_And_Get(p_encoded=>'F'
4373: , p_count => x_msg_count
4374: , p_data => x_msg_data );
4368: x_return_status := G_RET_STS_UNEXP_ERROR ;
4369: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4370: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4371: END IF;
4372: FND_MSG_PUB.Count_And_Get(p_encoded=>'F'
4373: , p_count => x_msg_count
4374: , p_data => x_msg_data );
4375:
4376: RETURN null;
4437: END IF;
4438:
4439: -- Initialize message list if p_init_msg_list is set to TRUE.
4440: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4441: FND_MSG_PUB.initialize;
4442: END IF;
4443:
4444: -- Initialize API return status to success
4445: x_return_status := FND_API.G_RET_STS_SUCCESS;
4488: CLOSE del_cur ;
4489: END IF;
4490: ROLLBACK TO g_update_del_GRP;
4491: x_return_status := G_RET_STS_ERROR ;
4492: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4493:
4494: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4495: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4496: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving mergeExtPartyOnDeliverables Unexpected ERROR');
4496: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving mergeExtPartyOnDeliverables Unexpected ERROR');
4497: END IF;
4498: ROLLBACK TO g_update_del_GRP;
4499: x_return_status := G_RET_STS_UNEXP_ERROR ;
4500: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4501:
4502: WHEN OTHERS THEN
4503: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4504: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving mergeExtPartyOnDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
4509: END IF;
4510:
4511: ROLLBACK TO g_update_del_GRP;
4512: x_return_status := G_RET_STS_UNEXP_ERROR ;
4513: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4514: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4515: END IF;
4516: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4517:
4510:
4511: ROLLBACK TO g_update_del_GRP;
4512: x_return_status := G_RET_STS_UNEXP_ERROR ;
4513: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4514: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4515: END IF;
4516: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4517:
4518: END; -- mergeExtPartyOnDeliverables
4512: x_return_status := G_RET_STS_UNEXP_ERROR ;
4513: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4514: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4515: END IF;
4516: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4517:
4518: END; -- mergeExtPartyOnDeliverables
4519:
4520: /**
4553: END IF;
4554:
4555: -- Initialize message list if p_init_msg_list is set to TRUE.
4556: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4557: FND_MSG_PUB.initialize;
4558: END IF;
4559:
4560: -- Initialize API return status to success
4561: x_return_status := FND_API.G_RET_STS_SUCCESS;
4628: COMMIT WORK;
4629: END IF;
4630:
4631: -- Standard call to get message count and if count is 1, get message info.
4632: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4633:
4634: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4635: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'1000: Leaving activateCloseoutDeliverables');
4636: END IF;
4642: FND_LOG.STRING( FND_LOG.LEVEL_ERROR ,g_module||l_api_name,'800: Leaving activateCloseoutDeliverables Unexpected ERROR');
4643: END IF;
4644: ROLLBACK TO g_activatecloseout_del_GRP;
4645: x_return_status := G_RET_STS_ERROR ;
4646: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4647:
4648: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4649:
4650: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4651: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'900: Leaving activateCloseoutDeliverables Unexpected ERROR');
4652: END IF;
4653: ROLLBACK TO g_activatecloseout_del_GRP;
4654: x_return_status := G_RET_STS_UNEXP_ERROR ;
4655: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4656:
4657: WHEN OTHERS THEN
4658: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4659: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving activateCloseoutDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
4659: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'1000: Leaving activateCloseoutDeliverables because of EXCEPTION: '||substr(sqlerrm,1,200));
4660: END IF;
4661: ROLLBACK TO g_activatecloseout_del_GRP;
4662: x_return_status := G_RET_STS_UNEXP_ERROR ;
4663: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4664: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4665: END IF;
4666: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4667:
4660: END IF;
4661: ROLLBACK TO g_activatecloseout_del_GRP;
4662: x_return_status := G_RET_STS_UNEXP_ERROR ;
4663: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4664: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4665: END IF;
4666: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4667:
4668: END; -- activateCloseoutDeliverables
4662: x_return_status := G_RET_STS_UNEXP_ERROR ;
4663: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
4664: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
4665: END IF;
4666: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
4667:
4668: END; -- activateCloseoutDeliverables
4669:
4670: /*-- Start of comments
4770: END IF;
4771: IF getDeliverables %ISOPEN THEN
4772: CLOSE getDeliverables ;
4773: END IF;
4774: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4775: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
4776: END IF;
4777: x_return_status := G_RET_STS_ERROR;
4778: FND_MSG_PUB.Count_And_Get(
4771: IF getDeliverables %ISOPEN THEN
4772: CLOSE getDeliverables ;
4773: END IF;
4774: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4775: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
4776: END IF;
4777: x_return_status := G_RET_STS_ERROR;
4778: FND_MSG_PUB.Count_And_Get(
4779: p_count => x_msg_count,
4774: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4775: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
4776: END IF;
4777: x_return_status := G_RET_STS_ERROR;
4778: FND_MSG_PUB.Count_And_Get(
4779: p_count => x_msg_count,
4780: p_data => x_msg_data
4781: );
4782:
4870: END IF;
4871: IF del_cur%ISOPEN THEN
4872: CLOSE del_cur ;
4873: END IF;
4874: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4875: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
4876: END IF;
4877: RETURN null;
4878:
4871: IF del_cur%ISOPEN THEN
4872: CLOSE del_cur ;
4873: END IF;
4874: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4875: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,l_api_name);
4876: END IF;
4877: RETURN null;
4878:
4879: END checkDeliverablePayHold;