12: -- Insert a row into WSH_ITM_PARAMETER_SETUPS_TL entity
13: -- Input Parameters
14: -- p_api_version
15: -- API version number (current version is 1.0)
16: -- p_init_msg_list (optional, default FND_API.G_FALSE)
17: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
18: -- if set to FND_API.G_TRUE
19: -- initialize error message list
20: -- if set to FND_API.G_FALSE - not initialize error
13: -- Input Parameters
14: -- p_api_version
15: -- API version number (current version is 1.0)
16: -- p_init_msg_list (optional, default FND_API.G_FALSE)
17: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
18: -- if set to FND_API.G_TRUE
19: -- initialize error message list
20: -- if set to FND_API.G_FALSE - not initialize error
21: -- message list
14: -- p_api_version
15: -- API version number (current version is 1.0)
16: -- p_init_msg_list (optional, default FND_API.G_FALSE)
17: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
18: -- if set to FND_API.G_TRUE
19: -- initialize error message list
20: -- if set to FND_API.G_FALSE - not initialize error
21: -- message list
22: -- p_commit (optional, default FND_API.G_FALSE)
16: -- p_init_msg_list (optional, default FND_API.G_FALSE)
17: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
18: -- if set to FND_API.G_TRUE
19: -- initialize error message list
20: -- if set to FND_API.G_FALSE - not initialize error
21: -- message list
22: -- p_commit (optional, default FND_API.G_FALSE)
23: -- whether or not to commit the changes to database
24: --
18: -- if set to FND_API.G_TRUE
19: -- initialize error message list
20: -- if set to FND_API.G_FALSE - not initialize error
21: -- message list
22: -- p_commit (optional, default FND_API.G_FALSE)
23: -- whether or not to commit the changes to database
24: --
25: -- Input parameters
26: -- P_PARAMETER_ID Unique sequence generated parameter ID
33: --
34: -- Output Parameters
35: -- x_return_status
36: -- if the process succeeds, the value is
37: -- fnd_api.g_ret_sts_success;
38: -- if there is an expected error, the value is
39: -- fnd_api.g_ret_sts_error;
40: -- if there is an unexpected error, the value is
41: -- fnd_api.g_ret_sts_unexp_error;
35: -- x_return_status
36: -- if the process succeeds, the value is
37: -- fnd_api.g_ret_sts_success;
38: -- if there is an expected error, the value is
39: -- fnd_api.g_ret_sts_error;
40: -- if there is an unexpected error, the value is
41: -- fnd_api.g_ret_sts_unexp_error;
42: -- x_msg_count
43: -- if there is one or more errors, the number of error messages
37: -- fnd_api.g_ret_sts_success;
38: -- if there is an expected error, the value is
39: -- fnd_api.g_ret_sts_error;
40: -- if there is an unexpected error, the value is
41: -- fnd_api.g_ret_sts_unexp_error;
42: -- x_msg_count
43: -- if there is one or more errors, the number of error messages
44: -- in the buffer
45: -- x_msg_data
43: -- if there is one or more errors, the number of error messages
44: -- in the buffer
45: -- x_msg_data
46: -- if there is one and only one error, the error message
47: -- (See fnd_api package for more details about the above output parameters)
48: --*/
49:
50:
51: procedure INSERT_ROW (
49:
50:
51: procedure INSERT_ROW (
52: p_api_version IN NUMBER ,
53: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
54: p_commit IN VARCHAR2 := fnd_api.g_false ,
55: x_return_status OUT NOCOPY VARCHAR2 ,
56: x_msg_count OUT NOCOPY NUMBER ,
57: x_msg_data OUT NOCOPY VARCHAR2 ,
50:
51: procedure INSERT_ROW (
52: p_api_version IN NUMBER ,
53: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
54: p_commit IN VARCHAR2 := fnd_api.g_false ,
55: x_return_status OUT NOCOPY VARCHAR2 ,
56: x_msg_count OUT NOCOPY NUMBER ,
57: x_msg_data OUT NOCOPY VARCHAR2 ,
58: P_PARAMETER_ID OUT NOCOPY NUMBER ,
73: --dbms_output.put_line('begin api');
74: -- Standard Start of API savepoint
75: SAVEPOINT WSH_ITM_PARAMETER_SETUPS_PKG;
76: -- Standard call to check for call compatibility.
77: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
78: p_api_version ,
79: l_api_name ,
80: G_PKG_NAME )
81: THEN
80: G_PKG_NAME )
81: THEN
82: FND_MESSAGE.SET_NAME('WSH', 'WSH_INCOMPATIBLE_API_CALL');
83: FND_MSG_PUB.ADD;
84: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
85: END IF;
86: -- Initialize message list if p_init_msg_list is set to TRUE.
87: IF FND_API.to_Boolean( p_init_msg_list ) THEN
88: FND_MSG_PUB.initialize;
83: FND_MSG_PUB.ADD;
84: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
85: END IF;
86: -- Initialize message list if p_init_msg_list is set to TRUE.
87: IF FND_API.to_Boolean( p_init_msg_list ) THEN
88: FND_MSG_PUB.initialize;
89: END IF;
90: -- Initialize API return status to success
91: x_return_status := FND_API.G_RET_STS_SUCCESS;
87: IF FND_API.to_Boolean( p_init_msg_list ) THEN
88: FND_MSG_PUB.initialize;
89: END IF;
90: -- Initialize API return status to success
91: x_return_status := FND_API.G_RET_STS_SUCCESS;
92: --dbms_output.put_line('begin api-2');
93:
94: SELECT WSH_ITM_PARAMETER_SETUPS_S.NEXTVAL into l_parameter_id FROM dual;
95:
120:
121: IF SQL%NOTFOUND THEN
122: FND_MESSAGE.SET_NAME('WSH', 'WSH_INSERT_FAILED');
123: FND_MSG_PUB.ADD;
124: x_return_status := FND_API.G_RET_STS_ERROR;
125: RAISE FND_API.G_EXC_ERROR ;
126: END IF;
127: --dbms_output.put_line('Seq Id got it '||l_parameter_ID||'success');
128: x_return_status := fnd_api.g_ret_sts_success;
121: IF SQL%NOTFOUND THEN
122: FND_MESSAGE.SET_NAME('WSH', 'WSH_INSERT_FAILED');
123: FND_MSG_PUB.ADD;
124: x_return_status := FND_API.G_RET_STS_ERROR;
125: RAISE FND_API.G_EXC_ERROR ;
126: END IF;
127: --dbms_output.put_line('Seq Id got it '||l_parameter_ID||'success');
128: x_return_status := fnd_api.g_ret_sts_success;
129: p_parameter_id := l_parameter_id;
124: x_return_status := FND_API.G_RET_STS_ERROR;
125: RAISE FND_API.G_EXC_ERROR ;
126: END IF;
127: --dbms_output.put_line('Seq Id got it '||l_parameter_ID||'success');
128: x_return_status := fnd_api.g_ret_sts_success;
129: p_parameter_id := l_parameter_id;
130: -- End of API body
131: -- Standard check of p_commit.
132: IF FND_API.To_Boolean( p_commit ) THEN
128: x_return_status := fnd_api.g_ret_sts_success;
129: p_parameter_id := l_parameter_id;
130: -- End of API body
131: -- Standard check of p_commit.
132: IF FND_API.To_Boolean( p_commit ) THEN
133: COMMIT WORK;
134: END IF;
135: -- Standard call to get message count and if count is 1,
136: -- get message info.
172:
173: IF SQL%NOTFOUND THEN
174: FND_MESSAGE.SET_NAME('WSH', 'WSH_INSERT_FAILED');
175: FND_MSG_PUB.ADD;
176: x_return_status := FND_API.G_RET_STS_ERROR;
177: RAISE FND_API.G_EXC_ERROR ;
178: END IF;
179: --dbms_output.put_line('Seq Id got it '||l_parameter_ID||'success');
180: x_return_status := fnd_api.g_ret_sts_success;
173: IF SQL%NOTFOUND THEN
174: FND_MESSAGE.SET_NAME('WSH', 'WSH_INSERT_FAILED');
175: FND_MSG_PUB.ADD;
176: x_return_status := FND_API.G_RET_STS_ERROR;
177: RAISE FND_API.G_EXC_ERROR ;
178: END IF;
179: --dbms_output.put_line('Seq Id got it '||l_parameter_ID||'success');
180: x_return_status := fnd_api.g_ret_sts_success;
181: p_parameter_id := l_parameter_id;
176: x_return_status := FND_API.G_RET_STS_ERROR;
177: RAISE FND_API.G_EXC_ERROR ;
178: END IF;
179: --dbms_output.put_line('Seq Id got it '||l_parameter_ID||'success');
180: x_return_status := fnd_api.g_ret_sts_success;
181: p_parameter_id := l_parameter_id;
182: -- End of API body
183: -- Standard check of p_commit.
184: IF FND_API.To_Boolean( p_commit ) THEN
180: x_return_status := fnd_api.g_ret_sts_success;
181: p_parameter_id := l_parameter_id;
182: -- End of API body
183: -- Standard check of p_commit.
184: IF FND_API.To_Boolean( p_commit ) THEN
185: COMMIT WORK;
186: END IF;
187: -- Standard call to get message count and if count is 1,
188: -- get message info.
191: p_data => x_msg_data
192: );
193:
194: EXCEPTION
195: WHEN FND_API.G_EXC_ERROR THEN
196: ROLLBACK TO WSH_ITM_PARAMETER_SETUPS_PKG;
197: x_return_status := FND_API.G_RET_STS_ERROR;
198: FND_MSG_PUB.Count_And_Get
199: ( p_count => x_msg_count,
193:
194: EXCEPTION
195: WHEN FND_API.G_EXC_ERROR THEN
196: ROLLBACK TO WSH_ITM_PARAMETER_SETUPS_PKG;
197: x_return_status := FND_API.G_RET_STS_ERROR;
198: FND_MSG_PUB.Count_And_Get
199: ( p_count => x_msg_count,
200: p_data => x_msg_data
201: );
198: FND_MSG_PUB.Count_And_Get
199: ( p_count => x_msg_count,
200: p_data => x_msg_data
201: );
202: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
203: ROLLBACK TO WSH_ITM_PARAMETER_SETUPS_PKG;
204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
205: FND_MSG_PUB.Count_And_Get
206: ( p_count => x_msg_count,
200: p_data => x_msg_data
201: );
202: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
203: ROLLBACK TO WSH_ITM_PARAMETER_SETUPS_PKG;
204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
205: FND_MSG_PUB.Count_And_Get
206: ( p_count => x_msg_count,
207: p_data => x_msg_data
208: );
207: p_data => x_msg_data
208: );
209: WHEN OTHERS THEN
210: ROLLBACK TO WSH_ITM_PARAMETER_SETUPS_PKG;
211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
212: IF FND_MSG_PUB.Check_Msg_Level
213: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
214: THEN
215: FND_MSG_PUB.Add_Exc_Msg
234: --
235: -- Input Parameters
236: -- p_api_version
237: -- API version number (current version is 1.0)
238: -- p_init_msg_list (optional, default FND_API.G_FALSE)
239: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
240: -- if set to FND_API.G_TRUE
241: -- initialize error message list
242: -- if set to FND_API.G_FALSE - not initialize error
235: -- Input Parameters
236: -- p_api_version
237: -- API version number (current version is 1.0)
238: -- p_init_msg_list (optional, default FND_API.G_FALSE)
239: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
240: -- if set to FND_API.G_TRUE
241: -- initialize error message list
242: -- if set to FND_API.G_FALSE - not initialize error
243: -- message list
236: -- p_api_version
237: -- API version number (current version is 1.0)
238: -- p_init_msg_list (optional, default FND_API.G_FALSE)
239: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
240: -- if set to FND_API.G_TRUE
241: -- initialize error message list
242: -- if set to FND_API.G_FALSE - not initialize error
243: -- message list
244: -- p_commit (optional, default FND_API.G_FALSE)
238: -- p_init_msg_list (optional, default FND_API.G_FALSE)
239: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
240: -- if set to FND_API.G_TRUE
241: -- initialize error message list
242: -- if set to FND_API.G_FALSE - not initialize error
243: -- message list
244: -- p_commit (optional, default FND_API.G_FALSE)
245: -- whether or not to commit the changes to database
246: --
240: -- if set to FND_API.G_TRUE
241: -- initialize error message list
242: -- if set to FND_API.G_FALSE - not initialize error
243: -- message list
244: -- p_commit (optional, default FND_API.G_FALSE)
245: -- whether or not to commit the changes to database
246: --
247: -- Input parameters
248: -- P_PARAMETER_ID Unique sequence generated parameter ID
254: -- P_DESCRIPTION Brief Description of the Parameter.
255: -- Output Parameters
256: -- x_return_status
257: -- if the process succeeds, the value is
258: -- fnd_api.g_ret_sts_success;
259: -- if there is an expected error, the value is
260: -- fnd_api.g_ret_sts_error;
261: -- if there is an unexpected error, the value is
262: -- fnd_api.g_ret_sts_unexp_error;
256: -- x_return_status
257: -- if the process succeeds, the value is
258: -- fnd_api.g_ret_sts_success;
259: -- if there is an expected error, the value is
260: -- fnd_api.g_ret_sts_error;
261: -- if there is an unexpected error, the value is
262: -- fnd_api.g_ret_sts_unexp_error;
263: -- x_msg_count
264: -- if there is one or more errors, the number of error messages
258: -- fnd_api.g_ret_sts_success;
259: -- if there is an expected error, the value is
260: -- fnd_api.g_ret_sts_error;
261: -- if there is an unexpected error, the value is
262: -- fnd_api.g_ret_sts_unexp_error;
263: -- x_msg_count
264: -- if there is one or more errors, the number of error messages
265: -- in the buffer
266: -- x_msg_data
264: -- if there is one or more errors, the number of error messages
265: -- in the buffer
266: -- x_msg_data
267: -- if there is one and only one error, the error message
268: -- (See fnd_api package for more details about the above output parameters)
269:
270: --*/
271: procedure LOCK_ROW (
272: p_api_version IN NUMBER ,
269:
270: --*/
271: procedure LOCK_ROW (
272: p_api_version IN NUMBER ,
273: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
274: p_commit IN VARCHAR2 := fnd_api.g_false ,
275: x_return_status OUT NOCOPY VARCHAR2 ,
276: x_msg_count OUT NOCOPY NUMBER ,
277: x_msg_data OUT NOCOPY VARCHAR2 ,
270: --*/
271: procedure LOCK_ROW (
272: p_api_version IN NUMBER ,
273: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
274: p_commit IN VARCHAR2 := fnd_api.g_false ,
275: x_return_status OUT NOCOPY VARCHAR2 ,
276: x_msg_count OUT NOCOPY NUMBER ,
277: x_msg_data OUT NOCOPY VARCHAR2 ,
278: P_PARAMETER_ID IN NUMBER ,
309:
310: begin
311:
312: -- Standard call to check for call compatibility.
313: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
314: p_api_version ,
315: l_api_name ,
316: G_PKG_NAME )
317: THEN
316: G_PKG_NAME )
317: THEN
318: FND_MESSAGE.SET_NAME('WSH', 'WSH_INCOMPATIBLE_API_CALL');
319: FND_MSG_PUB.ADD;
320: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
321: END IF;
322:
323: -- Initialize message list if p_init_msg_list is set to TRUE.
324: IF FND_API.to_Boolean( p_init_msg_list ) THEN
320: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
321: END IF;
322:
323: -- Initialize message list if p_init_msg_list is set to TRUE.
324: IF FND_API.to_Boolean( p_init_msg_list ) THEN
325: FND_MSG_PUB.initialize;
326: END IF;
327:
328: -- Initialize API return status to success
325: FND_MSG_PUB.initialize;
326: END IF;
327:
328: -- Initialize API return status to success
329: x_return_status := FND_API.G_RET_STS_SUCCESS;
330:
331: -- Check Lock a row of wsh_itm_parameter_setups
332:
333: open c;
398: --
399: -- Input Parameters
400: -- p_api_version
401: -- API version number (current version is 1.0)
402: -- p_init_msg_list (optional, default FND_API.G_FALSE)
403: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
404: -- if set to FND_API.G_TRUE
405: -- initialize error message list
406: -- if set to FND_API.G_FALSE - not initialize error
399: -- Input Parameters
400: -- p_api_version
401: -- API version number (current version is 1.0)
402: -- p_init_msg_list (optional, default FND_API.G_FALSE)
403: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
404: -- if set to FND_API.G_TRUE
405: -- initialize error message list
406: -- if set to FND_API.G_FALSE - not initialize error
407: -- message list
400: -- p_api_version
401: -- API version number (current version is 1.0)
402: -- p_init_msg_list (optional, default FND_API.G_FALSE)
403: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
404: -- if set to FND_API.G_TRUE
405: -- initialize error message list
406: -- if set to FND_API.G_FALSE - not initialize error
407: -- message list
408: -- p_commit (optional, default FND_API.G_FALSE)
402: -- p_init_msg_list (optional, default FND_API.G_FALSE)
403: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
404: -- if set to FND_API.G_TRUE
405: -- initialize error message list
406: -- if set to FND_API.G_FALSE - not initialize error
407: -- message list
408: -- p_commit (optional, default FND_API.G_FALSE)
409: -- whether or not to commit the changes to database
410: --
404: -- if set to FND_API.G_TRUE
405: -- initialize error message list
406: -- if set to FND_API.G_FALSE - not initialize error
407: -- message list
408: -- p_commit (optional, default FND_API.G_FALSE)
409: -- whether or not to commit the changes to database
410: --
411: -- Input parameters for clear cross parameter setups informations
412: -- P_PARAMETER_ID Unique sequence generated parameter ID
419: --
420: -- Output Parameters
421: -- x_return_status
422: -- if the process succeeds, the value is
423: -- fnd_api.g_ret_sts_success;
424: -- if there is an expected error, the value is
425: -- fnd_api.g_ret_sts_error;
426: -- if there is an unexpected error, the value is
427: -- fnd_api.g_ret_sts_unexp_error;
421: -- x_return_status
422: -- if the process succeeds, the value is
423: -- fnd_api.g_ret_sts_success;
424: -- if there is an expected error, the value is
425: -- fnd_api.g_ret_sts_error;
426: -- if there is an unexpected error, the value is
427: -- fnd_api.g_ret_sts_unexp_error;
428: -- x_msg_count
429: -- if there is one or more errors, the number of error messages
423: -- fnd_api.g_ret_sts_success;
424: -- if there is an expected error, the value is
425: -- fnd_api.g_ret_sts_error;
426: -- if there is an unexpected error, the value is
427: -- fnd_api.g_ret_sts_unexp_error;
428: -- x_msg_count
429: -- if there is one or more errors, the number of error messages
430: -- in the buffer
431: -- x_msg_data
429: -- if there is one or more errors, the number of error messages
430: -- in the buffer
431: -- x_msg_data
432: -- if there is one and only one error, the error message
433: -- (See fnd_api package for more details about the above output parameters)
434:
435: --*/
436:
437: procedure UPDATE_ROW (
435: --*/
436:
437: procedure UPDATE_ROW (
438: p_api_version IN NUMBER ,
439: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
440: p_commit IN VARCHAR2 := fnd_api.g_false ,
441: x_return_status OUT NOCOPY VARCHAR2 ,
442: x_msg_count OUT NOCOPY NUMBER ,
443: x_msg_data OUT NOCOPY VARCHAR2 ,
436:
437: procedure UPDATE_ROW (
438: p_api_version IN NUMBER ,
439: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
440: p_commit IN VARCHAR2 := fnd_api.g_false ,
441: x_return_status OUT NOCOPY VARCHAR2 ,
442: x_msg_count OUT NOCOPY NUMBER ,
443: x_msg_data OUT NOCOPY VARCHAR2 ,
444: P_PARAMETER_ID IN NUMBER ,
458: --dbms_output.put_line('begin');
459: -- Standard Start of API savepoint
460: SAVEPOINT WSH_ITM_PARAMETER_SETUPS_PKG;
461: -- Standard call to check for call compatibility.
462: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
463: p_api_version ,
464: l_api_name ,
465: G_PKG_NAME )
466: THEN
465: G_PKG_NAME )
466: THEN
467: FND_MESSAGE.SET_NAME('WSH', 'WSH_INCOMPATIBLE_API_CALL');
468: FND_MSG_PUB.ADD;
469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
470: END IF;
471: -- Initialize message list if p_init_msg_list is set to TRUE.
472: IF FND_API.to_Boolean( p_init_msg_list ) THEN
473: FND_MSG_PUB.initialize;
468: FND_MSG_PUB.ADD;
469: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
470: END IF;
471: -- Initialize message list if p_init_msg_list is set to TRUE.
472: IF FND_API.to_Boolean( p_init_msg_list ) THEN
473: FND_MSG_PUB.initialize;
474: END IF;
475: -- Initialize API return status to success
476: x_return_status := FND_API.G_RET_STS_SUCCESS;
472: IF FND_API.to_Boolean( p_init_msg_list ) THEN
473: FND_MSG_PUB.initialize;
474: END IF;
475: -- Initialize API return status to success
476: x_return_status := FND_API.G_RET_STS_SUCCESS;
477:
478: -- Update a row into WSH_ITM_parameter_setups entity with all detail information
479: -- for the given parameter id
480:
490:
491: IF SQL%NOTFOUND THEN
492: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_FAILED');
493: FND_MSG_PUB.ADD;
494: x_return_status := FND_API.G_RET_STS_ERROR;
495: RAISE FND_API.G_EXC_ERROR ;
496: END IF;
497: --dbms_output.put_line('begin-5');
498: x_return_status := fnd_api.g_ret_sts_success;
491: IF SQL%NOTFOUND THEN
492: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_FAILED');
493: FND_MSG_PUB.ADD;
494: x_return_status := FND_API.G_RET_STS_ERROR;
495: RAISE FND_API.G_EXC_ERROR ;
496: END IF;
497: --dbms_output.put_line('begin-5');
498: x_return_status := fnd_api.g_ret_sts_success;
499:
494: x_return_status := FND_API.G_RET_STS_ERROR;
495: RAISE FND_API.G_EXC_ERROR ;
496: END IF;
497: --dbms_output.put_line('begin-5');
498: x_return_status := fnd_api.g_ret_sts_success;
499:
500: -- End of API body
501: -- Standard check of p_commit.
502: IF FND_API.To_Boolean( p_commit ) THEN
498: x_return_status := fnd_api.g_ret_sts_success;
499:
500: -- End of API body
501: -- Standard check of p_commit.
502: IF FND_API.To_Boolean( p_commit ) THEN
503: COMMIT WORK;
504: END IF;
505: -- Standard call to get message count and if count is 1,
506: -- get message info.
518:
519: IF SQL%NOTFOUND THEN
520: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_FAILED');
521: FND_MSG_PUB.ADD;
522: x_return_status := FND_API.G_RET_STS_ERROR;
523: RAISE FND_API.G_EXC_ERROR ;
524: END IF;
525: --dbms_output.put_line('begin-5');
526: x_return_status := fnd_api.g_ret_sts_success;
519: IF SQL%NOTFOUND THEN
520: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_FAILED');
521: FND_MSG_PUB.ADD;
522: x_return_status := FND_API.G_RET_STS_ERROR;
523: RAISE FND_API.G_EXC_ERROR ;
524: END IF;
525: --dbms_output.put_line('begin-5');
526: x_return_status := fnd_api.g_ret_sts_success;
527:
522: x_return_status := FND_API.G_RET_STS_ERROR;
523: RAISE FND_API.G_EXC_ERROR ;
524: END IF;
525: --dbms_output.put_line('begin-5');
526: x_return_status := fnd_api.g_ret_sts_success;
527:
528: -- End of API body
529: -- Standard check of p_commit.
530: IF FND_API.To_Boolean( p_commit ) THEN
526: x_return_status := fnd_api.g_ret_sts_success;
527:
528: -- End of API body
529: -- Standard check of p_commit.
530: IF FND_API.To_Boolean( p_commit ) THEN
531: COMMIT WORK;
532: END IF;
533: -- Standard call to get message count and if count is 1,
534: -- get message info.
537: p_data => x_msg_data
538: );
539:
540: EXCEPTION
541: WHEN FND_API.G_EXC_ERROR THEN
542: --dbms_output.put_line(sqlerrm);
543: ROLLBACK TO WSH_ITM_PARAMETER_SETUPS_PKG;
544: x_return_status := FND_API.G_RET_STS_ERROR;
545: FND_MSG_PUB.Count_And_Get
540: EXCEPTION
541: WHEN FND_API.G_EXC_ERROR THEN
542: --dbms_output.put_line(sqlerrm);
543: ROLLBACK TO WSH_ITM_PARAMETER_SETUPS_PKG;
544: x_return_status := FND_API.G_RET_STS_ERROR;
545: FND_MSG_PUB.Count_And_Get
546: ( p_count => x_msg_count,
547: p_data => x_msg_data
548: );
545: FND_MSG_PUB.Count_And_Get
546: ( p_count => x_msg_count,
547: p_data => x_msg_data
548: );
549: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
550: --dbms_output.put_line(sqlerrm);
551: ROLLBACK TO WSH_ITM_PARAMETER_SETUPS_PKG;
552: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
553: FND_MSG_PUB.Count_And_Get
548: );
549: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
550: --dbms_output.put_line(sqlerrm);
551: ROLLBACK TO WSH_ITM_PARAMETER_SETUPS_PKG;
552: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
553: FND_MSG_PUB.Count_And_Get
554: ( p_count => x_msg_count,
555: p_data => x_msg_data
556: );
584: --
585: -- Input Parameters
586: -- p_api_version
587: -- API version number (current version is 1.0)
588: -- p_init_msg_list (optional, default FND_API.G_FALSE)
589: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
590: -- if set to FND_API.G_TRUE
591: -- initialize error message list
592: -- if set to FND_API.G_FALSE - not initialize error
585: -- Input Parameters
586: -- p_api_version
587: -- API version number (current version is 1.0)
588: -- p_init_msg_list (optional, default FND_API.G_FALSE)
589: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
590: -- if set to FND_API.G_TRUE
591: -- initialize error message list
592: -- if set to FND_API.G_FALSE - not initialize error
593: -- message list
586: -- p_api_version
587: -- API version number (current version is 1.0)
588: -- p_init_msg_list (optional, default FND_API.G_FALSE)
589: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
590: -- if set to FND_API.G_TRUE
591: -- initialize error message list
592: -- if set to FND_API.G_FALSE - not initialize error
593: -- message list
594: -- p_commit (optional, default FND_API.G_FALSE)
588: -- p_init_msg_list (optional, default FND_API.G_FALSE)
589: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
590: -- if set to FND_API.G_TRUE
591: -- initialize error message list
592: -- if set to FND_API.G_FALSE - not initialize error
593: -- message list
594: -- p_commit (optional, default FND_API.G_FALSE)
595: -- whether or not to commit the changes to database
596: --
590: -- if set to FND_API.G_TRUE
591: -- initialize error message list
592: -- if set to FND_API.G_FALSE - not initialize error
593: -- message list
594: -- p_commit (optional, default FND_API.G_FALSE)
595: -- whether or not to commit the changes to database
596: --
597: -- Input parameters for clear cross parameters informations
598: -- p_PARAMETER_ID -- parameter id
600: --
601: -- Output Parameters
602: -- x_return_status
603: -- if the process succeeds, the value is
604: -- fnd_api.g_ret_sts_success;
605: -- if there is an expected error, the value is
606: -- fnd_api.g_ret_sts_error;
607: -- if there is an unexpected error, the value is
608: -- fnd_api.g_ret_sts_unexp_error;
602: -- x_return_status
603: -- if the process succeeds, the value is
604: -- fnd_api.g_ret_sts_success;
605: -- if there is an expected error, the value is
606: -- fnd_api.g_ret_sts_error;
607: -- if there is an unexpected error, the value is
608: -- fnd_api.g_ret_sts_unexp_error;
609: -- x_msg_count
610: -- if there is one or more errors, the number of error messages
604: -- fnd_api.g_ret_sts_success;
605: -- if there is an expected error, the value is
606: -- fnd_api.g_ret_sts_error;
607: -- if there is an unexpected error, the value is
608: -- fnd_api.g_ret_sts_unexp_error;
609: -- x_msg_count
610: -- if there is one or more errors, the number of error messages
611: -- in the buffer
612: -- x_msg_data
610: -- if there is one or more errors, the number of error messages
611: -- in the buffer
612: -- x_msg_data
613: -- if there is one and only one error, the error message
614: -- (See fnd_api package for more details about the above output parameters)
615:
616: --*/
617: procedure DELETE_ROW (
618: p_api_version IN NUMBER ,
615:
616: --*/
617: procedure DELETE_ROW (
618: p_api_version IN NUMBER ,
619: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
620: p_commit IN VARCHAR2 := fnd_api.g_false ,
621: x_return_status OUT NOCOPY VARCHAR2 ,
622: x_msg_count OUT NOCOPY NUMBER ,
623: x_msg_data OUT NOCOPY VARCHAR2 ,
616: --*/
617: procedure DELETE_ROW (
618: p_api_version IN NUMBER ,
619: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
620: p_commit IN VARCHAR2 := fnd_api.g_false ,
621: x_return_status OUT NOCOPY VARCHAR2 ,
622: x_msg_count OUT NOCOPY NUMBER ,
623: x_msg_data OUT NOCOPY VARCHAR2 ,
624: P_PARAMETER_ID IN NUMBER
632: --dbms_output.put_line('begin');
633: -- Standard Start of API savepoint
634: SAVEPOINT WSH_ITM_PARAMETER_SETUPS_PKG;
635: -- Standard call to check for call compatibility.
636: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
637: p_api_version ,
638: l_api_name ,
639: G_PKG_NAME )
640: THEN
639: G_PKG_NAME )
640: THEN
641: FND_MESSAGE.SET_NAME('WSH', 'WSH_INCOMPATIBLE_API_CALL');
642: FND_MSG_PUB.ADD;
643: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
644: END IF;
645: -- Initialize message list if p_init_msg_list is set to TRUE.
646: IF FND_API.to_Boolean( p_init_msg_list ) THEN
647: FND_MSG_PUB.initialize;
642: FND_MSG_PUB.ADD;
643: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
644: END IF;
645: -- Initialize message list if p_init_msg_list is set to TRUE.
646: IF FND_API.to_Boolean( p_init_msg_list ) THEN
647: FND_MSG_PUB.initialize;
648: END IF;
649: -- Initialize API return status to success
650: x_return_status := FND_API.G_RET_STS_SUCCESS;
646: IF FND_API.to_Boolean( p_init_msg_list ) THEN
647: FND_MSG_PUB.initialize;
648: END IF;
649: -- Initialize API return status to success
650: x_return_status := FND_API.G_RET_STS_SUCCESS;
651:
652: -- Delete a row from WSH_ITM_parameter_setups entity
653: -- for the given parameter id
654:
658:
659: IF SQL%NOTFOUND THEN
660: FND_MESSAGE.SET_NAME('WSH', 'WSH_DELETE_FAILED');
661: FND_MSG_PUB.ADD;
662: x_return_status := FND_API.G_RET_STS_ERROR;
663: RAISE FND_API.G_EXC_ERROR ;
664: END IF;
665: --dbms_output.put_line('begin-5');
666: x_return_status := fnd_api.g_ret_sts_success;
659: IF SQL%NOTFOUND THEN
660: FND_MESSAGE.SET_NAME('WSH', 'WSH_DELETE_FAILED');
661: FND_MSG_PUB.ADD;
662: x_return_status := FND_API.G_RET_STS_ERROR;
663: RAISE FND_API.G_EXC_ERROR ;
664: END IF;
665: --dbms_output.put_line('begin-5');
666: x_return_status := fnd_api.g_ret_sts_success;
667:
662: x_return_status := FND_API.G_RET_STS_ERROR;
663: RAISE FND_API.G_EXC_ERROR ;
664: END IF;
665: --dbms_output.put_line('begin-5');
666: x_return_status := fnd_api.g_ret_sts_success;
667:
668: -- End of API body
669: -- Standard check of p_commit.
670: IF FND_API.To_Boolean( p_commit ) THEN
666: x_return_status := fnd_api.g_ret_sts_success;
667:
668: -- End of API body
669: -- Standard check of p_commit.
670: IF FND_API.To_Boolean( p_commit ) THEN
671: COMMIT WORK;
672: END IF;
673: -- Standard call to get message count and if count is 1,
674: -- get message info.
682:
683: IF SQL%NOTFOUND THEN
684: FND_MESSAGE.SET_NAME('WSH', 'WSH_DELETE_FAILED');
685: FND_MSG_PUB.ADD;
686: x_return_status := FND_API.G_RET_STS_ERROR;
687: RAISE FND_API.G_EXC_ERROR ;
688: END IF;
689: --dbms_output.put_line('begin-5');
690: x_return_status := fnd_api.g_ret_sts_success;
683: IF SQL%NOTFOUND THEN
684: FND_MESSAGE.SET_NAME('WSH', 'WSH_DELETE_FAILED');
685: FND_MSG_PUB.ADD;
686: x_return_status := FND_API.G_RET_STS_ERROR;
687: RAISE FND_API.G_EXC_ERROR ;
688: END IF;
689: --dbms_output.put_line('begin-5');
690: x_return_status := fnd_api.g_ret_sts_success;
691:
686: x_return_status := FND_API.G_RET_STS_ERROR;
687: RAISE FND_API.G_EXC_ERROR ;
688: END IF;
689: --dbms_output.put_line('begin-5');
690: x_return_status := fnd_api.g_ret_sts_success;
691:
692: -- End of API body
693: -- Standard check of p_commit.
694: IF FND_API.To_Boolean( p_commit ) THEN
690: x_return_status := fnd_api.g_ret_sts_success;
691:
692: -- End of API body
693: -- Standard check of p_commit.
694: IF FND_API.To_Boolean( p_commit ) THEN
695: COMMIT WORK;
696: END IF;
697: -- Standard call to get message count and if count is 1,
698: -- get message info.
701: p_data => x_msg_data
702: );
703:
704: EXCEPTION
705: WHEN FND_API.G_EXC_ERROR THEN
706: --dbms_output.put_line(sqlerrm);
707: ROLLBACK TO WSH_ITM_PARAMETER_SETUPS_PKG;
708: x_return_status := FND_API.G_RET_STS_ERROR;
709: FND_MSG_PUB.Count_And_Get
704: EXCEPTION
705: WHEN FND_API.G_EXC_ERROR THEN
706: --dbms_output.put_line(sqlerrm);
707: ROLLBACK TO WSH_ITM_PARAMETER_SETUPS_PKG;
708: x_return_status := FND_API.G_RET_STS_ERROR;
709: FND_MSG_PUB.Count_And_Get
710: ( p_count => x_msg_count,
711: p_data => x_msg_data
712: );
709: FND_MSG_PUB.Count_And_Get
710: ( p_count => x_msg_count,
711: p_data => x_msg_data
712: );
713: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
714: --dbms_output.put_line(sqlerrm);
715: ROLLBACK TO WSH_ITM_PARAMETER_SETUPS_PKG;
716: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
717: FND_MSG_PUB.Count_And_Get
712: );
713: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
714: --dbms_output.put_line(sqlerrm);
715: ROLLBACK TO WSH_ITM_PARAMETER_SETUPS_PKG;
716: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
717: FND_MSG_PUB.Count_And_Get
718: ( p_count => x_msg_count,
719: p_data => x_msg_data
720: );