12:
13: PROCEDURE get_rules
14: (
15: p_api_version IN NUMBER,
16: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
17: p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL,
18:
19: x_return_status OUT NOCOPY VARCHAR2,
20: x_msg_count OUT NOCOPY NUMBER,
13: PROCEDURE get_rules
14: (
15: p_api_version IN NUMBER,
16: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
17: p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL,
18:
19: x_return_status OUT NOCOPY VARCHAR2,
20: x_msg_count OUT NOCOPY NUMBER,
21: x_msg_data OUT NOCOPY VARCHAR2,
97:
98: --+
99: -- Standard call to check for call compatibility.
100: --+
101: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
102: p_api_version ,
103: l_api_name,
104: G_PKG_NAME )
105: THEN
102: p_api_version ,
103: l_api_name,
104: G_PKG_NAME )
105: THEN
106: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
107: END IF;
108:
109: --+
110: -- Initialize message list if p_init_msg_list is set to TRUE.
108:
109: --+
110: -- Initialize message list if p_init_msg_list is set to TRUE.
111: --+
112: IF FND_API.to_Boolean( p_init_msg_list ) THEN
113: FND_MSG_PUB.initialize;
114: END IF;
115:
116: --+
115:
116: --+
117: -- Initialize API return status to success
118: --+
119: x_return_status := FND_API.G_RET_STS_SUCCESS;
120: x_loading_status := 'CN_INSERTED';
121:
122: --+
123: -- API body
302:
303:
304:
305: EXCEPTION
306: WHEN FND_API.G_EXC_ERROR THEN
307: x_return_status := FND_API.G_RET_STS_ERROR ;
308: FND_MSG_PUB.Count_And_Get
309: (
310: p_count => x_msg_count ,
303:
304:
305: EXCEPTION
306: WHEN FND_API.G_EXC_ERROR THEN
307: x_return_status := FND_API.G_RET_STS_ERROR ;
308: FND_MSG_PUB.Count_And_Get
309: (
310: p_count => x_msg_count ,
311: p_data => x_msg_data ,
308: FND_MSG_PUB.Count_And_Get
309: (
310: p_count => x_msg_count ,
311: p_data => x_msg_data ,
312: p_encoded => FND_API.G_FALSE
313: );
314: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
315: x_loading_status := 'UNEXPECTED_ERR';
316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
310: p_count => x_msg_count ,
311: p_data => x_msg_data ,
312: p_encoded => FND_API.G_FALSE
313: );
314: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
315: x_loading_status := 'UNEXPECTED_ERR';
316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
317: FND_MSG_PUB.Count_And_Get
318: (
312: p_encoded => FND_API.G_FALSE
313: );
314: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
315: x_loading_status := 'UNEXPECTED_ERR';
316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
317: FND_MSG_PUB.Count_And_Get
318: (
319: p_count => x_msg_count ,
320: p_data => x_msg_data ,
317: FND_MSG_PUB.Count_And_Get
318: (
319: p_count => x_msg_count ,
320: p_data => x_msg_data ,
321: p_encoded => FND_API.G_FALSE
322: );
323: WHEN OTHERS THEN
324: x_loading_status := 'UNEXPECTED_ERR';
325: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
321: p_encoded => FND_API.G_FALSE
322: );
323: WHEN OTHERS THEN
324: x_loading_status := 'UNEXPECTED_ERR';
325: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
326: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
327: THEN
328: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
329: END IF;
330: FND_MSG_PUB.Count_And_Get
331: (
332: p_count => x_msg_count ,
333: p_data => x_msg_data ,
334: p_encoded => FND_API.G_FALSE
335: );
336:
337: END;
338: END cn_rules_disp_pub;