12: -- Insert a row into WSH_CC_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 for clear cross parameter setups information
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: -- p_PARAMETER_ID - Clear Cross Parameter Id ( PK)
49: --*/
50:
51:
50:
51:
52: procedure INSERT_ROW (
53: p_api_version IN NUMBER ,
54: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
55: p_commit IN VARCHAR2 := fnd_api.g_false ,
56: x_return_status OUT VARCHAR2 ,
57: x_msg_count OUT NUMBER ,
58: x_msg_data OUT VARCHAR2 ,
51:
52: procedure INSERT_ROW (
53: p_api_version IN NUMBER ,
54: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
55: p_commit IN VARCHAR2 := fnd_api.g_false ,
56: x_return_status OUT VARCHAR2 ,
57: x_msg_count OUT NUMBER ,
58: x_msg_data OUT VARCHAR2 ,
59: P_PARAMETER_ID OUT NUMBER ,
74: --dbms_output.put_line('begin api');
75: -- Standard Start of API savepoint
76: SAVEPOINT WSH_CC_PARAMETER_SETUPS_PKG;
77: -- Standard call to check for call compatibility.
78: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
79: p_api_version ,
80: l_api_name ,
81: G_PKG_NAME )
82: THEN
81: G_PKG_NAME )
82: THEN
83: FND_MESSAGE.SET_NAME('WSH', 'WSH_INCOMPATIBLE_API_CALL');
84: FND_MSG_PUB.ADD;
85: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
86: END IF;
87: -- Initialize message list if p_init_msg_list is set to TRUE.
88: IF FND_API.to_Boolean( p_init_msg_list ) THEN
89: FND_MSG_PUB.initialize;
84: FND_MSG_PUB.ADD;
85: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
86: END IF;
87: -- Initialize message list if p_init_msg_list is set to TRUE.
88: IF FND_API.to_Boolean( p_init_msg_list ) THEN
89: FND_MSG_PUB.initialize;
90: END IF;
91: -- Initialize API return status to success
92: x_return_status := FND_API.G_RET_STS_SUCCESS;
88: IF FND_API.to_Boolean( p_init_msg_list ) THEN
89: FND_MSG_PUB.initialize;
90: END IF;
91: -- Initialize API return status to success
92: x_return_status := FND_API.G_RET_STS_SUCCESS;
93: --dbms_output.put_line('begin api-2');
94:
95: SELECT WSH_CC_PARAMETER_SETUPS_S.NEXTVAL into l_parameter_id FROM dual;
96:
121:
122: IF SQL%NOTFOUND THEN
123: FND_MESSAGE.SET_NAME('WSH', 'WSH_INSERT_FAILED');
124: FND_MSG_PUB.ADD;
125: x_return_status := FND_API.G_RET_STS_ERROR;
126: RAISE FND_API.G_EXC_ERROR ;
127: END IF;
128: --dbms_output.put_line('Seq Id got it '||l_parameter_ID||'success');
129: x_return_status := fnd_api.g_ret_sts_success;
122: IF SQL%NOTFOUND THEN
123: FND_MESSAGE.SET_NAME('WSH', 'WSH_INSERT_FAILED');
124: FND_MSG_PUB.ADD;
125: x_return_status := FND_API.G_RET_STS_ERROR;
126: RAISE FND_API.G_EXC_ERROR ;
127: END IF;
128: --dbms_output.put_line('Seq Id got it '||l_parameter_ID||'success');
129: x_return_status := fnd_api.g_ret_sts_success;
130: p_parameter_id := l_parameter_id;
125: x_return_status := FND_API.G_RET_STS_ERROR;
126: RAISE FND_API.G_EXC_ERROR ;
127: END IF;
128: --dbms_output.put_line('Seq Id got it '||l_parameter_ID||'success');
129: x_return_status := fnd_api.g_ret_sts_success;
130: p_parameter_id := l_parameter_id;
131: -- End of API body
132: -- Standard check of p_commit.
133: IF FND_API.To_Boolean( p_commit ) THEN
129: x_return_status := fnd_api.g_ret_sts_success;
130: p_parameter_id := l_parameter_id;
131: -- End of API body
132: -- Standard check of p_commit.
133: IF FND_API.To_Boolean( p_commit ) THEN
134: COMMIT WORK;
135: END IF;
136: -- Standard call to get message count and if count is 1,
137: -- get message info.
173:
174: IF SQL%NOTFOUND THEN
175: FND_MESSAGE.SET_NAME('WSH', 'WSH_INSERT_FAILED');
176: FND_MSG_PUB.ADD;
177: x_return_status := FND_API.G_RET_STS_ERROR;
178: RAISE FND_API.G_EXC_ERROR ;
179: END IF;
180: --dbms_output.put_line('Seq Id got it '||l_parameter_ID||'success');
181: x_return_status := fnd_api.g_ret_sts_success;
174: IF SQL%NOTFOUND THEN
175: FND_MESSAGE.SET_NAME('WSH', 'WSH_INSERT_FAILED');
176: FND_MSG_PUB.ADD;
177: x_return_status := FND_API.G_RET_STS_ERROR;
178: RAISE FND_API.G_EXC_ERROR ;
179: END IF;
180: --dbms_output.put_line('Seq Id got it '||l_parameter_ID||'success');
181: x_return_status := fnd_api.g_ret_sts_success;
182: p_parameter_id := l_parameter_id;
177: x_return_status := FND_API.G_RET_STS_ERROR;
178: RAISE FND_API.G_EXC_ERROR ;
179: END IF;
180: --dbms_output.put_line('Seq Id got it '||l_parameter_ID||'success');
181: x_return_status := fnd_api.g_ret_sts_success;
182: p_parameter_id := l_parameter_id;
183: -- End of API body
184: -- Standard check of p_commit.
185: IF FND_API.To_Boolean( p_commit ) THEN
181: x_return_status := fnd_api.g_ret_sts_success;
182: p_parameter_id := l_parameter_id;
183: -- End of API body
184: -- Standard check of p_commit.
185: IF FND_API.To_Boolean( p_commit ) THEN
186: COMMIT WORK;
187: END IF;
188: -- Standard call to get message count and if count is 1,
189: -- get message info.
192: p_data => x_msg_data
193: );
194:
195: EXCEPTION
196: WHEN FND_API.G_EXC_ERROR THEN
197: ROLLBACK TO WSH_CC_PARAMETER_SETUPS_PKG;
198: x_return_status := FND_API.G_RET_STS_ERROR;
199: FND_MSG_PUB.Count_And_Get
200: ( p_count => x_msg_count,
194:
195: EXCEPTION
196: WHEN FND_API.G_EXC_ERROR THEN
197: ROLLBACK TO WSH_CC_PARAMETER_SETUPS_PKG;
198: x_return_status := FND_API.G_RET_STS_ERROR;
199: FND_MSG_PUB.Count_And_Get
200: ( p_count => x_msg_count,
201: p_data => x_msg_data
202: );
199: FND_MSG_PUB.Count_And_Get
200: ( p_count => x_msg_count,
201: p_data => x_msg_data
202: );
203: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
204: ROLLBACK TO WSH_CC_PARAMETER_SETUPS_PKG;
205: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
206: FND_MSG_PUB.Count_And_Get
207: ( p_count => x_msg_count,
201: p_data => x_msg_data
202: );
203: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
204: ROLLBACK TO WSH_CC_PARAMETER_SETUPS_PKG;
205: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
206: FND_MSG_PUB.Count_And_Get
207: ( p_count => x_msg_count,
208: p_data => x_msg_data
209: );
208: p_data => x_msg_data
209: );
210: WHEN OTHERS THEN
211: ROLLBACK TO WSH_CC_PARAMETER_SETUPS_PKG;
212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
213: IF FND_MSG_PUB.Check_Msg_Level
214: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
215: THEN
216: FND_MSG_PUB.Add_Exc_Msg
235: --
236: -- Input Parameters
237: -- p_api_version
238: -- API version number (current version is 1.0)
239: -- p_init_msg_list (optional, default FND_API.G_FALSE)
240: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
241: -- if set to FND_API.G_TRUE
242: -- initialize error message list
243: -- if set to FND_API.G_FALSE - not initialize error
236: -- Input Parameters
237: -- p_api_version
238: -- API version number (current version is 1.0)
239: -- p_init_msg_list (optional, default FND_API.G_FALSE)
240: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
241: -- if set to FND_API.G_TRUE
242: -- initialize error message list
243: -- if set to FND_API.G_FALSE - not initialize error
244: -- message list
237: -- p_api_version
238: -- API version number (current version is 1.0)
239: -- p_init_msg_list (optional, default FND_API.G_FALSE)
240: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
241: -- if set to FND_API.G_TRUE
242: -- initialize error message list
243: -- if set to FND_API.G_FALSE - not initialize error
244: -- message list
245: -- p_commit (optional, default FND_API.G_FALSE)
239: -- p_init_msg_list (optional, default FND_API.G_FALSE)
240: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
241: -- if set to FND_API.G_TRUE
242: -- initialize error message list
243: -- if set to FND_API.G_FALSE - not initialize error
244: -- message list
245: -- p_commit (optional, default FND_API.G_FALSE)
246: -- whether or not to commit the changes to database
247: --
241: -- if set to FND_API.G_TRUE
242: -- initialize error message list
243: -- if set to FND_API.G_FALSE - not initialize error
244: -- message list
245: -- p_commit (optional, default FND_API.G_FALSE)
246: -- whether or not to commit the changes to database
247: --
248: -- Input parameters for clear cross parameter setups information
249: -- P_PARAMETER_ID Unique sequence generated parameter ID
255: -- P_DESCRIPTION Brief Description of the Parameter.
256: -- Output Parameters
257: -- x_return_status
258: -- if the process succeeds, the value is
259: -- fnd_api.g_ret_sts_success;
260: -- if there is an expected error, the value is
261: -- fnd_api.g_ret_sts_error;
262: -- if there is an unexpected error, the value is
263: -- fnd_api.g_ret_sts_unexp_error;
257: -- x_return_status
258: -- if the process succeeds, the value is
259: -- fnd_api.g_ret_sts_success;
260: -- if there is an expected error, the value is
261: -- fnd_api.g_ret_sts_error;
262: -- if there is an unexpected error, the value is
263: -- fnd_api.g_ret_sts_unexp_error;
264: -- x_msg_count
265: -- if there is one or more errors, the number of error messages
259: -- fnd_api.g_ret_sts_success;
260: -- if there is an expected error, the value is
261: -- fnd_api.g_ret_sts_error;
262: -- if there is an unexpected error, the value is
263: -- fnd_api.g_ret_sts_unexp_error;
264: -- x_msg_count
265: -- if there is one or more errors, the number of error messages
266: -- in the buffer
267: -- x_msg_data
265: -- if there is one or more errors, the number of error messages
266: -- in the buffer
267: -- x_msg_data
268: -- if there is one and only one error, the error message
269: -- (See fnd_api package for more details about the above output parameters)
270:
271: --*/
272: procedure LOCK_ROW (
273: p_api_version IN NUMBER ,
270:
271: --*/
272: procedure LOCK_ROW (
273: p_api_version IN NUMBER ,
274: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
275: p_commit IN VARCHAR2 := fnd_api.g_false ,
276: x_return_status OUT VARCHAR2 ,
277: x_msg_count OUT NUMBER ,
278: x_msg_data OUT VARCHAR2 ,
271: --*/
272: procedure LOCK_ROW (
273: p_api_version IN NUMBER ,
274: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
275: p_commit IN VARCHAR2 := fnd_api.g_false ,
276: x_return_status OUT VARCHAR2 ,
277: x_msg_count OUT NUMBER ,
278: x_msg_data OUT VARCHAR2 ,
279: P_PARAMETER_ID IN NUMBER ,
313: --dbms_output.put_line('begin');
314: -- Standard Start of API savepoint
315: SAVEPOINT WSH_CC_PARAMETER_SETUPS_PKG;
316: -- Standard call to check for call compatibility.
317: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
318: p_api_version ,
319: l_api_name ,
320: G_PKG_NAME )
321: THEN
320: G_PKG_NAME )
321: THEN
322: FND_MESSAGE.SET_NAME('WSH', 'WSH_INCOMPATIBLE_API_CALL');
323: FND_MSG_PUB.ADD;
324: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
325: END IF;
326: -- Initialize message list if p_init_msg_list is set to TRUE.
327: IF FND_API.to_Boolean( p_init_msg_list ) THEN
328: FND_MSG_PUB.initialize;
323: FND_MSG_PUB.ADD;
324: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
325: END IF;
326: -- Initialize message list if p_init_msg_list is set to TRUE.
327: IF FND_API.to_Boolean( p_init_msg_list ) THEN
328: FND_MSG_PUB.initialize;
329: END IF;
330: -- Initialize API return status to success
331: x_return_status := FND_API.G_RET_STS_SUCCESS;
327: IF FND_API.to_Boolean( p_init_msg_list ) THEN
328: FND_MSG_PUB.initialize;
329: END IF;
330: -- Initialize API return status to success
331: x_return_status := FND_API.G_RET_STS_SUCCESS;
332:
333: -- Check Lock a row of wsh_cc_parameter_setups
334:
335: open c;
348: OR ((recinfo.DEFAULT_VALUE is null) AND (p_DEFAULT_VALUE is null)))
349: AND ((recinfo.USER_SETTABLE = p_USER_SETTABLE)
350: OR ((recinfo.USER_SETTABLE is null) AND (p_USER_SETTABLE is null)))
351: ) then
352: x_return_status := FND_API.G_RET_STS_SUCCESS;
353: else
354: x_return_status := FND_API.G_RET_STS_ERROR;
355: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
356: app_exception.raise_exception;
350: OR ((recinfo.USER_SETTABLE is null) AND (p_USER_SETTABLE is null)))
351: ) then
352: x_return_status := FND_API.G_RET_STS_SUCCESS;
353: else
354: x_return_status := FND_API.G_RET_STS_ERROR;
355: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
356: app_exception.raise_exception;
357: end if;
358:
362: OR ((tlinfo.USER_PARAMETER_NAME is null) AND (p_USER_PARAMETER_NAME is null)))
363: AND ((tlinfo.DESCRIPTION = p_DESCRIPTION)
364: OR ((tlinfo.DESCRIPTION is null) AND (p_DESCRIPTION is null)))
365: ) then
366: x_return_status := FND_API.G_RET_STS_SUCCESS;
367: else
368: x_return_status := FND_API.G_RET_STS_ERROR;
369: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
370: app_exception.raise_exception;
364: OR ((tlinfo.DESCRIPTION is null) AND (p_DESCRIPTION is null)))
365: ) then
366: x_return_status := FND_API.G_RET_STS_SUCCESS;
367: else
368: x_return_status := FND_API.G_RET_STS_ERROR;
369: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
370: app_exception.raise_exception;
371: end if;
372: end if;
392: --
393: -- Input Parameters
394: -- p_api_version
395: -- API version number (current version is 1.0)
396: -- p_init_msg_list (optional, default FND_API.G_FALSE)
397: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
398: -- if set to FND_API.G_TRUE
399: -- initialize error message list
400: -- if set to FND_API.G_FALSE - not initialize error
393: -- Input Parameters
394: -- p_api_version
395: -- API version number (current version is 1.0)
396: -- p_init_msg_list (optional, default FND_API.G_FALSE)
397: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
398: -- if set to FND_API.G_TRUE
399: -- initialize error message list
400: -- if set to FND_API.G_FALSE - not initialize error
401: -- message list
394: -- p_api_version
395: -- API version number (current version is 1.0)
396: -- p_init_msg_list (optional, default FND_API.G_FALSE)
397: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
398: -- if set to FND_API.G_TRUE
399: -- initialize error message list
400: -- if set to FND_API.G_FALSE - not initialize error
401: -- message list
402: -- p_commit (optional, default FND_API.G_FALSE)
396: -- p_init_msg_list (optional, default FND_API.G_FALSE)
397: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
398: -- if set to FND_API.G_TRUE
399: -- initialize error message list
400: -- if set to FND_API.G_FALSE - not initialize error
401: -- message list
402: -- p_commit (optional, default FND_API.G_FALSE)
403: -- whether or not to commit the changes to database
404: --
398: -- if set to FND_API.G_TRUE
399: -- initialize error message list
400: -- if set to FND_API.G_FALSE - not initialize error
401: -- message list
402: -- p_commit (optional, default FND_API.G_FALSE)
403: -- whether or not to commit the changes to database
404: --
405: -- Input parameters for clear cross parameter setups informations
406: -- P_PARAMETER_ID Unique sequence generated parameter ID
413: --
414: -- Output Parameters
415: -- x_return_status
416: -- if the process succeeds, the value is
417: -- fnd_api.g_ret_sts_success;
418: -- if there is an expected error, the value is
419: -- fnd_api.g_ret_sts_error;
420: -- if there is an unexpected error, the value is
421: -- fnd_api.g_ret_sts_unexp_error;
415: -- x_return_status
416: -- if the process succeeds, the value is
417: -- fnd_api.g_ret_sts_success;
418: -- if there is an expected error, the value is
419: -- fnd_api.g_ret_sts_error;
420: -- if there is an unexpected error, the value is
421: -- fnd_api.g_ret_sts_unexp_error;
422: -- x_msg_count
423: -- if there is one or more errors, the number of error messages
417: -- fnd_api.g_ret_sts_success;
418: -- if there is an expected error, the value is
419: -- fnd_api.g_ret_sts_error;
420: -- if there is an unexpected error, the value is
421: -- fnd_api.g_ret_sts_unexp_error;
422: -- x_msg_count
423: -- if there is one or more errors, the number of error messages
424: -- in the buffer
425: -- x_msg_data
423: -- if there is one or more errors, the number of error messages
424: -- in the buffer
425: -- x_msg_data
426: -- if there is one and only one error, the error message
427: -- (See fnd_api package for more details about the above output parameters)
428:
429: --*/
430:
431: procedure UPDATE_ROW (
429: --*/
430:
431: procedure UPDATE_ROW (
432: p_api_version IN NUMBER ,
433: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
434: p_commit IN VARCHAR2 := fnd_api.g_false ,
435: x_return_status OUT VARCHAR2 ,
436: x_msg_count OUT NUMBER ,
437: x_msg_data OUT VARCHAR2 ,
430:
431: procedure UPDATE_ROW (
432: p_api_version IN NUMBER ,
433: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
434: p_commit IN VARCHAR2 := fnd_api.g_false ,
435: x_return_status OUT VARCHAR2 ,
436: x_msg_count OUT NUMBER ,
437: x_msg_data OUT VARCHAR2 ,
438: P_PARAMETER_ID IN NUMBER ,
452: --dbms_output.put_line('begin');
453: -- Standard Start of API savepoint
454: SAVEPOINT WSH_CC_PARAMETER_SETUPS_PKG;
455: -- Standard call to check for call compatibility.
456: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
457: p_api_version ,
458: l_api_name ,
459: G_PKG_NAME )
460: THEN
459: G_PKG_NAME )
460: THEN
461: FND_MESSAGE.SET_NAME('WSH', 'WSH_INCOMPATIBLE_API_CALL');
462: FND_MSG_PUB.ADD;
463: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
464: END IF;
465: -- Initialize message list if p_init_msg_list is set to TRUE.
466: IF FND_API.to_Boolean( p_init_msg_list ) THEN
467: FND_MSG_PUB.initialize;
462: FND_MSG_PUB.ADD;
463: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
464: END IF;
465: -- Initialize message list if p_init_msg_list is set to TRUE.
466: IF FND_API.to_Boolean( p_init_msg_list ) THEN
467: FND_MSG_PUB.initialize;
468: END IF;
469: -- Initialize API return status to success
470: x_return_status := FND_API.G_RET_STS_SUCCESS;
466: IF FND_API.to_Boolean( p_init_msg_list ) THEN
467: FND_MSG_PUB.initialize;
468: END IF;
469: -- Initialize API return status to success
470: x_return_status := FND_API.G_RET_STS_SUCCESS;
471:
472: -- Update a row into wsh_cc_parameter_setups entity with all detail information
473: -- for the given parameter id
474:
484:
485: IF SQL%NOTFOUND THEN
486: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_FAILED');
487: FND_MSG_PUB.ADD;
488: x_return_status := FND_API.G_RET_STS_ERROR;
489: RAISE FND_API.G_EXC_ERROR ;
490: END IF;
491: --dbms_output.put_line('begin-5');
492: x_return_status := fnd_api.g_ret_sts_success;
485: IF SQL%NOTFOUND THEN
486: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_FAILED');
487: FND_MSG_PUB.ADD;
488: x_return_status := FND_API.G_RET_STS_ERROR;
489: RAISE FND_API.G_EXC_ERROR ;
490: END IF;
491: --dbms_output.put_line('begin-5');
492: x_return_status := fnd_api.g_ret_sts_success;
493:
488: x_return_status := FND_API.G_RET_STS_ERROR;
489: RAISE FND_API.G_EXC_ERROR ;
490: END IF;
491: --dbms_output.put_line('begin-5');
492: x_return_status := fnd_api.g_ret_sts_success;
493:
494: -- End of API body
495: -- Standard check of p_commit.
496: IF FND_API.To_Boolean( p_commit ) THEN
492: x_return_status := fnd_api.g_ret_sts_success;
493:
494: -- End of API body
495: -- Standard check of p_commit.
496: IF FND_API.To_Boolean( p_commit ) THEN
497: COMMIT WORK;
498: END IF;
499: -- Standard call to get message count and if count is 1,
500: -- get message info.
512:
513: IF SQL%NOTFOUND THEN
514: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_FAILED');
515: FND_MSG_PUB.ADD;
516: x_return_status := FND_API.G_RET_STS_ERROR;
517: RAISE FND_API.G_EXC_ERROR ;
518: END IF;
519: --dbms_output.put_line('begin-5');
520: x_return_status := fnd_api.g_ret_sts_success;
513: IF SQL%NOTFOUND THEN
514: FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_FAILED');
515: FND_MSG_PUB.ADD;
516: x_return_status := FND_API.G_RET_STS_ERROR;
517: RAISE FND_API.G_EXC_ERROR ;
518: END IF;
519: --dbms_output.put_line('begin-5');
520: x_return_status := fnd_api.g_ret_sts_success;
521:
516: x_return_status := FND_API.G_RET_STS_ERROR;
517: RAISE FND_API.G_EXC_ERROR ;
518: END IF;
519: --dbms_output.put_line('begin-5');
520: x_return_status := fnd_api.g_ret_sts_success;
521:
522: -- End of API body
523: -- Standard check of p_commit.
524: IF FND_API.To_Boolean( p_commit ) THEN
520: x_return_status := fnd_api.g_ret_sts_success;
521:
522: -- End of API body
523: -- Standard check of p_commit.
524: IF FND_API.To_Boolean( p_commit ) THEN
525: COMMIT WORK;
526: END IF;
527: -- Standard call to get message count and if count is 1,
528: -- get message info.
531: p_data => x_msg_data
532: );
533:
534: EXCEPTION
535: WHEN FND_API.G_EXC_ERROR THEN
536: --dbms_output.put_line(sqlerrm);
537: ROLLBACK TO WSH_CC_PARAMETER_SETUPS_PKG;
538: x_return_status := FND_API.G_RET_STS_ERROR;
539: FND_MSG_PUB.Count_And_Get
534: EXCEPTION
535: WHEN FND_API.G_EXC_ERROR THEN
536: --dbms_output.put_line(sqlerrm);
537: ROLLBACK TO WSH_CC_PARAMETER_SETUPS_PKG;
538: x_return_status := FND_API.G_RET_STS_ERROR;
539: FND_MSG_PUB.Count_And_Get
540: ( p_count => x_msg_count,
541: p_data => x_msg_data
542: );
539: FND_MSG_PUB.Count_And_Get
540: ( p_count => x_msg_count,
541: p_data => x_msg_data
542: );
543: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
544: --dbms_output.put_line(sqlerrm);
545: ROLLBACK TO WSH_CC_PARAMETER_SETUPS_PKG;
546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
547: FND_MSG_PUB.Count_And_Get
542: );
543: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
544: --dbms_output.put_line(sqlerrm);
545: ROLLBACK TO WSH_CC_PARAMETER_SETUPS_PKG;
546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
547: FND_MSG_PUB.Count_And_Get
548: ( p_count => x_msg_count,
549: p_data => x_msg_data
550: );
578: --
579: -- Input Parameters
580: -- p_api_version
581: -- API version number (current version is 1.0)
582: -- p_init_msg_list (optional, default FND_API.G_FALSE)
583: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
584: -- if set to FND_API.G_TRUE
585: -- initialize error message list
586: -- if set to FND_API.G_FALSE - not initialize error
579: -- Input Parameters
580: -- p_api_version
581: -- API version number (current version is 1.0)
582: -- p_init_msg_list (optional, default FND_API.G_FALSE)
583: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
584: -- if set to FND_API.G_TRUE
585: -- initialize error message list
586: -- if set to FND_API.G_FALSE - not initialize error
587: -- message list
580: -- p_api_version
581: -- API version number (current version is 1.0)
582: -- p_init_msg_list (optional, default FND_API.G_FALSE)
583: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
584: -- if set to FND_API.G_TRUE
585: -- initialize error message list
586: -- if set to FND_API.G_FALSE - not initialize error
587: -- message list
588: -- p_commit (optional, default FND_API.G_FALSE)
582: -- p_init_msg_list (optional, default FND_API.G_FALSE)
583: -- Valid values: FND_API.G_FALSE or FND_API.G_TRUE.
584: -- if set to FND_API.G_TRUE
585: -- initialize error message list
586: -- if set to FND_API.G_FALSE - not initialize error
587: -- message list
588: -- p_commit (optional, default FND_API.G_FALSE)
589: -- whether or not to commit the changes to database
590: --
584: -- if set to FND_API.G_TRUE
585: -- initialize error message list
586: -- if set to FND_API.G_FALSE - not initialize error
587: -- message list
588: -- p_commit (optional, default FND_API.G_FALSE)
589: -- whether or not to commit the changes to database
590: --
591: -- Input parameters for clear cross parameters informations
592: -- p_PARAMETER_ID -- parameter id
594: --
595: -- Output Parameters
596: -- x_return_status
597: -- if the process succeeds, the value is
598: -- fnd_api.g_ret_sts_success;
599: -- if there is an expected error, the value is
600: -- fnd_api.g_ret_sts_error;
601: -- if there is an unexpected error, the value is
602: -- fnd_api.g_ret_sts_unexp_error;
596: -- x_return_status
597: -- if the process succeeds, the value is
598: -- fnd_api.g_ret_sts_success;
599: -- if there is an expected error, the value is
600: -- fnd_api.g_ret_sts_error;
601: -- if there is an unexpected error, the value is
602: -- fnd_api.g_ret_sts_unexp_error;
603: -- x_msg_count
604: -- if there is one or more errors, the number of error messages
598: -- fnd_api.g_ret_sts_success;
599: -- if there is an expected error, the value is
600: -- fnd_api.g_ret_sts_error;
601: -- if there is an unexpected error, the value is
602: -- fnd_api.g_ret_sts_unexp_error;
603: -- x_msg_count
604: -- if there is one or more errors, the number of error messages
605: -- in the buffer
606: -- x_msg_data
604: -- if there is one or more errors, the number of error messages
605: -- in the buffer
606: -- x_msg_data
607: -- if there is one and only one error, the error message
608: -- (See fnd_api package for more details about the above output parameters)
609:
610: --*/
611: procedure DELETE_ROW (
612: p_api_version IN NUMBER ,
609:
610: --*/
611: procedure DELETE_ROW (
612: p_api_version IN NUMBER ,
613: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
614: p_commit IN VARCHAR2 := fnd_api.g_false ,
615: x_return_status OUT VARCHAR2 ,
616: x_msg_count OUT NUMBER ,
617: x_msg_data OUT VARCHAR2 ,
610: --*/
611: procedure DELETE_ROW (
612: p_api_version IN NUMBER ,
613: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
614: p_commit IN VARCHAR2 := fnd_api.g_false ,
615: x_return_status OUT VARCHAR2 ,
616: x_msg_count OUT NUMBER ,
617: x_msg_data OUT VARCHAR2 ,
618: P_PARAMETER_ID IN NUMBER
626: --dbms_output.put_line('begin');
627: -- Standard Start of API savepoint
628: SAVEPOINT WSH_CC_PARAMETER_SETUPS_PKG;
629: -- Standard call to check for call compatibility.
630: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
631: p_api_version ,
632: l_api_name ,
633: G_PKG_NAME )
634: THEN
633: G_PKG_NAME )
634: THEN
635: FND_MESSAGE.SET_NAME('WSH', 'WSH_INCOMPATIBLE_API_CALL');
636: FND_MSG_PUB.ADD;
637: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
638: END IF;
639: -- Initialize message list if p_init_msg_list is set to TRUE.
640: IF FND_API.to_Boolean( p_init_msg_list ) THEN
641: FND_MSG_PUB.initialize;
636: FND_MSG_PUB.ADD;
637: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
638: END IF;
639: -- Initialize message list if p_init_msg_list is set to TRUE.
640: IF FND_API.to_Boolean( p_init_msg_list ) THEN
641: FND_MSG_PUB.initialize;
642: END IF;
643: -- Initialize API return status to success
644: x_return_status := FND_API.G_RET_STS_SUCCESS;
640: IF FND_API.to_Boolean( p_init_msg_list ) THEN
641: FND_MSG_PUB.initialize;
642: END IF;
643: -- Initialize API return status to success
644: x_return_status := FND_API.G_RET_STS_SUCCESS;
645:
646: -- Delete a row from wsh_cc_parameter_setups entity
647: -- for the given parameter id
648:
652:
653: IF SQL%NOTFOUND THEN
654: FND_MESSAGE.SET_NAME('WSH', 'WSH_DELETE_FAILED');
655: FND_MSG_PUB.ADD;
656: x_return_status := FND_API.G_RET_STS_ERROR;
657: RAISE FND_API.G_EXC_ERROR ;
658: END IF;
659: --dbms_output.put_line('begin-5');
660: x_return_status := fnd_api.g_ret_sts_success;
653: IF SQL%NOTFOUND THEN
654: FND_MESSAGE.SET_NAME('WSH', 'WSH_DELETE_FAILED');
655: FND_MSG_PUB.ADD;
656: x_return_status := FND_API.G_RET_STS_ERROR;
657: RAISE FND_API.G_EXC_ERROR ;
658: END IF;
659: --dbms_output.put_line('begin-5');
660: x_return_status := fnd_api.g_ret_sts_success;
661:
656: x_return_status := FND_API.G_RET_STS_ERROR;
657: RAISE FND_API.G_EXC_ERROR ;
658: END IF;
659: --dbms_output.put_line('begin-5');
660: x_return_status := fnd_api.g_ret_sts_success;
661:
662: -- End of API body
663: -- Standard check of p_commit.
664: IF FND_API.To_Boolean( p_commit ) THEN
660: x_return_status := fnd_api.g_ret_sts_success;
661:
662: -- End of API body
663: -- Standard check of p_commit.
664: IF FND_API.To_Boolean( p_commit ) THEN
665: COMMIT WORK;
666: END IF;
667: -- Standard call to get message count and if count is 1,
668: -- get message info.
676:
677: IF SQL%NOTFOUND THEN
678: FND_MESSAGE.SET_NAME('WSH', 'WSH_DELETE_FAILED');
679: FND_MSG_PUB.ADD;
680: x_return_status := FND_API.G_RET_STS_ERROR;
681: RAISE FND_API.G_EXC_ERROR ;
682: END IF;
683: --dbms_output.put_line('begin-5');
684: x_return_status := fnd_api.g_ret_sts_success;
677: IF SQL%NOTFOUND THEN
678: FND_MESSAGE.SET_NAME('WSH', 'WSH_DELETE_FAILED');
679: FND_MSG_PUB.ADD;
680: x_return_status := FND_API.G_RET_STS_ERROR;
681: RAISE FND_API.G_EXC_ERROR ;
682: END IF;
683: --dbms_output.put_line('begin-5');
684: x_return_status := fnd_api.g_ret_sts_success;
685:
680: x_return_status := FND_API.G_RET_STS_ERROR;
681: RAISE FND_API.G_EXC_ERROR ;
682: END IF;
683: --dbms_output.put_line('begin-5');
684: x_return_status := fnd_api.g_ret_sts_success;
685:
686: -- End of API body
687: -- Standard check of p_commit.
688: IF FND_API.To_Boolean( p_commit ) THEN
684: x_return_status := fnd_api.g_ret_sts_success;
685:
686: -- End of API body
687: -- Standard check of p_commit.
688: IF FND_API.To_Boolean( p_commit ) THEN
689: COMMIT WORK;
690: END IF;
691: -- Standard call to get message count and if count is 1,
692: -- get message info.
695: p_data => x_msg_data
696: );
697:
698: EXCEPTION
699: WHEN FND_API.G_EXC_ERROR THEN
700: --dbms_output.put_line(sqlerrm);
701: ROLLBACK TO WSH_CC_PARAMETER_SETUPS_PKG;
702: x_return_status := FND_API.G_RET_STS_ERROR;
703: FND_MSG_PUB.Count_And_Get
698: EXCEPTION
699: WHEN FND_API.G_EXC_ERROR THEN
700: --dbms_output.put_line(sqlerrm);
701: ROLLBACK TO WSH_CC_PARAMETER_SETUPS_PKG;
702: x_return_status := FND_API.G_RET_STS_ERROR;
703: FND_MSG_PUB.Count_And_Get
704: ( p_count => x_msg_count,
705: p_data => x_msg_data
706: );
703: FND_MSG_PUB.Count_And_Get
704: ( p_count => x_msg_count,
705: p_data => x_msg_data
706: );
707: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
708: --dbms_output.put_line(sqlerrm);
709: ROLLBACK TO WSH_CC_PARAMETER_SETUPS_PKG;
710: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
711: FND_MSG_PUB.Count_And_Get
706: );
707: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
708: --dbms_output.put_line(sqlerrm);
709: ROLLBACK TO WSH_CC_PARAMETER_SETUPS_PKG;
710: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
711: FND_MSG_PUB.Count_And_Get
712: ( p_count => x_msg_count,
713: p_data => x_msg_data
714: );