DBA Data[Home] [Help]

APPS.IEM_PARAMETERS_PVT dependencies on FND_API

Line 6: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

2: /* $Header: iemvparb.pls 115.8 2002/12/04 01:23:07 chtang noship $ */
3: G_PKG_NAME CONSTANT varchar2(30) :='IEM_PARAMETERS_PVT ';
4:
5: PROCEDURE select_profile (p_api_version_number IN NUMBER,
6: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
7: p_commit IN VARCHAR2 := FND_API.G_FALSE,
8: p_profile_name IN VARCHAR2,
9: x_profile_value OUT NOCOPY VARCHAR2,
10: x_return_status OUT NOCOPY VARCHAR2,

Line 7: p_commit IN VARCHAR2 := FND_API.G_FALSE,

3: G_PKG_NAME CONSTANT varchar2(30) :='IEM_PARAMETERS_PVT ';
4:
5: PROCEDURE select_profile (p_api_version_number IN NUMBER,
6: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
7: p_commit IN VARCHAR2 := FND_API.G_FALSE,
8: p_profile_name IN VARCHAR2,
9: x_profile_value OUT NOCOPY VARCHAR2,
10: x_return_status OUT NOCOPY VARCHAR2,
11: x_msg_count OUT NOCOPY NUMBER,

Line 21: IF NOT FND_API.Compatible_API_Call (l_api_version_number,

17: BEGIN
18: -- Standard Start of API savepoint
19: SAVEPOINT select_profile_PVT;
20: -- Standard call to check for call compatibility.
21: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
22: p_api_version_number,
23: l_api_name,
24: G_PKG_NAME)
25: THEN

Line 26: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

22: p_api_version_number,
23: l_api_name,
24: G_PKG_NAME)
25: THEN
26: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
27: END IF;
28: -- Initialize message list if p_init_msg_list is set to TRUE.
29: IF FND_API.to_Boolean( p_init_msg_list )
30: THEN

Line 29: IF FND_API.to_Boolean( p_init_msg_list )

25: THEN
26: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
27: END IF;
28: -- Initialize message list if p_init_msg_list is set to TRUE.
29: IF FND_API.to_Boolean( p_init_msg_list )
30: THEN
31: FND_MSG_PUB.initialize;
32: END IF;
33: -- Initialize API return status to SUCCESS

Line 34: x_return_status := FND_API.G_RET_STS_SUCCESS;

30: THEN
31: FND_MSG_PUB.initialize;
32: END IF;
33: -- Initialize API return status to SUCCESS
34: x_return_status := FND_API.G_RET_STS_SUCCESS;
35:
36: x_profile_value := FND_PROFILE.VALUE_SPECIFIC(p_profile_name);
37:
38: -- Standard Check Of p_commit.

Line 39: IF FND_API.To_Boolean(p_commit) THEN

35:
36: x_profile_value := FND_PROFILE.VALUE_SPECIFIC(p_profile_name);
37:
38: -- Standard Check Of p_commit.
39: IF FND_API.To_Boolean(p_commit) THEN
40: COMMIT WORK;
41: END IF;
42: -- Standard callto get message count and if count is 1, get message info.
43: FND_MSG_PUB.Count_And_Get

Line 51: WHEN FND_API.G_EXC_ERROR THEN

47:
48: EXCEPTION
49:
50:
51: WHEN FND_API.G_EXC_ERROR THEN
52: ROLLBACK TO select_profile_PVT;
53: x_return_status := FND_API.G_RET_STS_ERROR ;
54: FND_MSG_PUB.Count_And_Get
55: ( p_count => x_msg_count,

Line 53: x_return_status := FND_API.G_RET_STS_ERROR ;

49:
50:
51: WHEN FND_API.G_EXC_ERROR THEN
52: ROLLBACK TO select_profile_PVT;
53: x_return_status := FND_API.G_RET_STS_ERROR ;
54: FND_MSG_PUB.Count_And_Get
55: ( p_count => x_msg_count,
56: p_data => x_msg_data
57: );

Line 59: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

55: ( p_count => x_msg_count,
56: p_data => x_msg_data
57: );
58:
59: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
60: ROLLBACK TO select_profile_PVT;
61: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
62: FND_MSG_PUB.Count_And_Get
63: ( p_count => x_msg_count,

Line 61: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

57: );
58:
59: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
60: ROLLBACK TO select_profile_PVT;
61: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
62: FND_MSG_PUB.Count_And_Get
63: ( p_count => x_msg_count,
64: p_data => x_msg_data
65: );

Line 69: x_return_status := FND_API.G_RET_STS_ERROR;

65: );
66:
67: WHEN OTHERS THEN
68: ROLLBACK TO select_profile_PVT;
69: x_return_status := FND_API.G_RET_STS_ERROR;
70: IF FND_MSG_PUB.Check_Msg_Level
71: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
72: THEN
73: FND_MSG_PUB.Add_Exc_Msg

Line 110: IF NOT FND_API.Compatible_API_Call (l_api_version_number,

106: BEGIN
107: -- Standard Start of API savepoint
108: SAVEPOINT update_profile_PVT;
109: -- Standard call to check for call compatibility.
110: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
111: p_api_version_number,
112: l_api_name,
113: G_PKG_NAME)
114: THEN

Line 115: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

111: p_api_version_number,
112: l_api_name,
113: G_PKG_NAME)
114: THEN
115: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
116: END IF;
117: -- Initialize message list if p_init_msg_list is set to TRUE.
118: IF FND_API.to_Boolean( p_init_msg_list )
119: THEN

Line 118: IF FND_API.to_Boolean( p_init_msg_list )

114: THEN
115: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
116: END IF;
117: -- Initialize message list if p_init_msg_list is set to TRUE.
118: IF FND_API.to_Boolean( p_init_msg_list )
119: THEN
120: FND_MSG_PUB.initialize;
121: END IF;
122: -- Initialize API return status to SUCCESS

Line 123: x_return_status := FND_API.G_RET_STS_SUCCESS;

119: THEN
120: FND_MSG_PUB.initialize;
121: END IF;
122: -- Initialize API return status to SUCCESS
123: x_return_status := FND_API.G_RET_STS_SUCCESS;
124:
125: -- Validate Default Customer number if the profile name is IEM_DEFAULT_CUSTOMER_NUMBER
126: if UPPER(p_profile_name) = 'IEM_DEFAULT_CUSTOMER_NUMBER' then
127:

Line 184: IF FND_API.To_Boolean(p_commit) THEN

180: raise PROFILE_NOT_UPDATED;
181: end if;
182:
183: -- Standard Check Of p_commit.
184: IF FND_API.To_Boolean(p_commit) THEN
185: COMMIT WORK;
186: END IF;
187: -- Standard callto get message count and if count is 1, get message info.
188: FND_MSG_PUB.Count_And_Get

Line 196: x_return_status := FND_API.G_RET_STS_ERROR;

192:
193: EXCEPTION
194: WHEN INVALID_DEFAULT_CUSTOMER_NUM THEN
195: ROLLBACK TO update_profile_PVT;
196: x_return_status := FND_API.G_RET_STS_ERROR;
197: FND_MESSAGE.SET_NAME('IEM', 'IEM_SSS_INVALID_DEF_CUST_NUM');
198: FND_MSG_PUB.ADD;
199: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
200:

Line 203: x_return_status := FND_API.G_RET_STS_ERROR;

199: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
200:
201: WHEN INVALID_DEFAULT_RESOURCE_NUM THEN
202: ROLLBACK TO update_profile_PVT;
203: x_return_status := FND_API.G_RET_STS_ERROR;
204: FND_MESSAGE.SET_NAME('IEM', 'IEM_SSS_INVALID_DEF_REST_NUM');
205: FND_MSG_PUB.ADD;
206: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
207:

Line 210: x_return_status := FND_API.G_RET_STS_ERROR;

206: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
207:
208: WHEN PROFILE_NOT_UPDATED THEN
209: ROLLBACK TO update_profile_PVT;
210: x_return_status := FND_API.G_RET_STS_ERROR;
211: FND_MESSAGE.SET_NAME('IEM', 'IEM_ADMIN_INTENT_N_NOT_UPDATED');
212: FND_MSG_PUB.ADD;
213: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
214:

Line 216: WHEN FND_API.G_EXC_ERROR THEN

212: FND_MSG_PUB.ADD;
213: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
214:
215:
216: WHEN FND_API.G_EXC_ERROR THEN
217: ROLLBACK TO update_profile_PVT;
218: x_return_status := FND_API.G_RET_STS_ERROR ;
219: FND_MSG_PUB.Count_And_Get
220: ( p_count => x_msg_count,

Line 218: x_return_status := FND_API.G_RET_STS_ERROR ;

214:
215:
216: WHEN FND_API.G_EXC_ERROR THEN
217: ROLLBACK TO update_profile_PVT;
218: x_return_status := FND_API.G_RET_STS_ERROR ;
219: FND_MSG_PUB.Count_And_Get
220: ( p_count => x_msg_count,
221: p_data => x_msg_data
222: );

Line 224: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

220: ( p_count => x_msg_count,
221: p_data => x_msg_data
222: );
223:
224: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
225: ROLLBACK TO update_profile_PVT;
226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
227: FND_MSG_PUB.Count_And_Get
228: ( p_count => x_msg_count,

Line 226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

222: );
223:
224: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
225: ROLLBACK TO update_profile_PVT;
226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
227: FND_MSG_PUB.Count_And_Get
228: ( p_count => x_msg_count,
229: p_data => x_msg_data
230: );

Line 234: x_return_status := FND_API.G_RET_STS_ERROR;

230: );
231:
232: WHEN OTHERS THEN
233: ROLLBACK TO update_profile_PVT;
234: x_return_status := FND_API.G_RET_STS_ERROR;
235: IF FND_MSG_PUB.Check_Msg_Level
236: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
237: THEN
238: FND_MSG_PUB.Add_Exc_Msg

Line 261: l_return_status VARCHAR2(20) := FND_API.G_RET_STS_SUCCESS;

257: x_msg_data OUT NOCOPY VARCHAR2
258: ) is
259: l_api_name VARCHAR2(255):='update_profile_wrap';
260: l_api_version_number NUMBER:=1.0;
261: l_return_status VARCHAR2(20) := FND_API.G_RET_STS_SUCCESS;
262: l_msg_count NUMBER := 0;
263: l_msg_data VARCHAR2(2000);
264: PROFILE_NOT_UPDATED EXCEPTION;
265:

Line 270: IF NOT FND_API.Compatible_API_Call (l_api_version_number,

266: BEGIN
267: -- Standard Start of API savepoint
268: SAVEPOINT update_profile_PVT;
269: -- Standard call to check for call compatibility.
270: IF NOT FND_API.Compatible_API_Call (l_api_version_number,
271: p_api_version_number,
272: l_api_name,
273: G_PKG_NAME)
274: THEN

Line 275: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

271: p_api_version_number,
272: l_api_name,
273: G_PKG_NAME)
274: THEN
275: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
276: END IF;
277: -- Initialize message list if p_init_msg_list is set to TRUE.
278: IF FND_API.to_Boolean( p_init_msg_list )
279: THEN

Line 278: IF FND_API.to_Boolean( p_init_msg_list )

274: THEN
275: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
276: END IF;
277: -- Initialize message list if p_init_msg_list is set to TRUE.
278: IF FND_API.to_Boolean( p_init_msg_list )
279: THEN
280: FND_MSG_PUB.initialize;
281: END IF;
282: -- Initialize API return status to SUCCESS

Line 283: x_return_status := FND_API.G_RET_STS_SUCCESS;

279: THEN
280: FND_MSG_PUB.initialize;
281: END IF;
282: -- Initialize API return status to SUCCESS
283: x_return_status := FND_API.G_RET_STS_SUCCESS;
284:
285: FOR i IN p_profile_name_tbl.FIRST..p_profile_name_tbl.LAST LOOP
286:
287: iem_parameters_pvt.update_profile (p_api_version_number => l_api_version_number,

Line 288: p_init_msg_list => FND_API.G_FALSE,

284:
285: FOR i IN p_profile_name_tbl.FIRST..p_profile_name_tbl.LAST LOOP
286:
287: iem_parameters_pvt.update_profile (p_api_version_number => l_api_version_number,
288: p_init_msg_list => FND_API.G_FALSE,
289: p_commit => FND_API.G_FALSE,
290: p_profile_name => p_profile_name_tbl(i),
291: p_profile_value => p_profile_value_tbl(i),
292: x_return_status=> l_return_status,

Line 289: p_commit => FND_API.G_FALSE,

285: FOR i IN p_profile_name_tbl.FIRST..p_profile_name_tbl.LAST LOOP
286:
287: iem_parameters_pvt.update_profile (p_api_version_number => l_api_version_number,
288: p_init_msg_list => FND_API.G_FALSE,
289: p_commit => FND_API.G_FALSE,
290: p_profile_name => p_profile_name_tbl(i),
291: p_profile_value => p_profile_value_tbl(i),
292: x_return_status=> l_return_status,
293: x_msg_count => l_msg_count,

Line 296: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then

292: x_return_status=> l_return_status,
293: x_msg_count => l_msg_count,
294: x_msg_data => l_msg_data);
295:
296: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) then
297: raise PROFILE_NOT_UPDATED;
298: end if;
299:
300: END LOOP;

Line 303: IF FND_API.To_Boolean(p_commit) THEN

299:
300: END LOOP;
301:
302: -- Standard Check Of p_commit.
303: IF FND_API.To_Boolean(p_commit) THEN
304: COMMIT WORK;
305: END IF;
306: -- Standard callto get message count and if count is 1, get message info.
307: FND_MSG_PUB.Count_And_Get

Line 316: x_return_status := FND_API.G_RET_STS_ERROR;

312: EXCEPTION
313:
314: WHEN PROFILE_NOT_UPDATED THEN
315: ROLLBACK TO update_profile_PVT;
316: x_return_status := FND_API.G_RET_STS_ERROR;
317: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
318:
319:
320: WHEN FND_API.G_EXC_ERROR THEN

Line 320: WHEN FND_API.G_EXC_ERROR THEN

316: x_return_status := FND_API.G_RET_STS_ERROR;
317: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
318:
319:
320: WHEN FND_API.G_EXC_ERROR THEN
321: ROLLBACK TO update_profile_PVT;
322: x_return_status := FND_API.G_RET_STS_ERROR ;
323: FND_MSG_PUB.Count_And_Get
324: ( p_count => x_msg_count,

Line 322: x_return_status := FND_API.G_RET_STS_ERROR ;

318:
319:
320: WHEN FND_API.G_EXC_ERROR THEN
321: ROLLBACK TO update_profile_PVT;
322: x_return_status := FND_API.G_RET_STS_ERROR ;
323: FND_MSG_PUB.Count_And_Get
324: ( p_count => x_msg_count,
325: p_data => x_msg_data
326: );

Line 328: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

324: ( p_count => x_msg_count,
325: p_data => x_msg_data
326: );
327:
328: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
329: ROLLBACK TO update_profile_PVT;
330: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
331: FND_MSG_PUB.Count_And_Get
332: ( p_count => x_msg_count,

Line 330: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

326: );
327:
328: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
329: ROLLBACK TO update_profile_PVT;
330: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
331: FND_MSG_PUB.Count_And_Get
332: ( p_count => x_msg_count,
333: p_data => x_msg_data
334: );

Line 338: x_return_status := FND_API.G_RET_STS_ERROR;

334: );
335:
336: WHEN OTHERS THEN
337: ROLLBACK TO update_profile_PVT;
338: x_return_status := FND_API.G_RET_STS_ERROR;
339: IF FND_MSG_PUB.Check_Msg_Level
340: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
341: THEN
342: FND_MSG_PUB.Add_Exc_Msg