29: -- End of comments
30: --------------------------------------------------------------------------
31: PROCEDURE Create_WFAttrValue
32: ( p_api_version IN NUMBER
33: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
34: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
35: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
36: , x_return_status OUT NOCOPY VARCHAR2
37: , x_msg_count OUT NOCOPY NUMBER
30: --------------------------------------------------------------------------
31: PROCEDURE Create_WFAttrValue
32: ( p_api_version IN NUMBER
33: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
34: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
35: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
36: , x_return_status OUT NOCOPY VARCHAR2
37: , x_msg_count OUT NOCOPY NUMBER
38: , x_msg_data OUT NOCOPY VARCHAR2
31: PROCEDURE Create_WFAttrValue
32: ( p_api_version IN NUMBER
33: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
34: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
35: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
36: , x_return_status OUT NOCOPY VARCHAR2
37: , x_msg_count OUT NOCOPY NUMBER
38: , x_msg_data OUT NOCOPY VARCHAR2
39: , p_bwa_rec IN brm_wf_attr_value_rec_type
60:
61: --
62: -- Standard call to check for call compatibility
63: --
64: IF NOT FND_API.Compatible_API_Call( l_api_version
65: , p_api_version
66: , l_api_name
67: , G_PKG_NAME)
68: THEN
65: , p_api_version
66: , l_api_name
67: , G_PKG_NAME)
68: THEN
69: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
70: END IF;
71:
72: --
73: -- Initialize message list if p_init_msg_list is set to TRUE
71:
72: --
73: -- Initialize message list if p_init_msg_list is set to TRUE
74: --
75: IF FND_API.To_Boolean(p_init_msg_list)
76: THEN
77: FND_MSG_PUB.Initialize;
78: END IF;
79:
79:
80: --
81: -- Initialize API return status to success
82: --
83: x_return_status := FND_API.G_RET_STS_SUCCESS;
84:
85: -- ----------------------------------------------------------------------
86: -- Perform the database operation. Generate the ID from the
87: -- sequence, then insert the passed in attributes into the
187:
188: --
189: -- Standard check of p_commit
190: --
191: IF FND_API.To_Boolean(p_commit)
192: THEN
193: COMMIT WORK;
194: END IF;
195:
200: , p_data => x_msg_data
201: );
202:
203: EXCEPTION
204: WHEN FND_API.G_EXC_ERROR
205: THEN
206: ROLLBACK TO Create_WFAttrValue_PVT;
207: x_return_status := FND_API.G_RET_STS_ERROR;
208: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
203: EXCEPTION
204: WHEN FND_API.G_EXC_ERROR
205: THEN
206: ROLLBACK TO Create_WFAttrValue_PVT;
207: x_return_status := FND_API.G_RET_STS_ERROR;
208: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
209: , p_data => x_msg_data
210: );
211:
208: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
209: , p_data => x_msg_data
210: );
211:
212: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
213: THEN
214: ROLLBACK TO Create_WFAttrValue_PVT;
215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
216: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
211:
212: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
213: THEN
214: ROLLBACK TO Create_WFAttrValue_PVT;
215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
216: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
217: , p_data => x_msg_data
218: );
219:
219:
220: WHEN OTHERS
221: THEN
222: ROLLBACK TO Create_WFAttrValue_PVT;
223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
224: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
225: THEN
226: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
227: , l_api_name
260: -- End of comments
261: --------------------------------------------------------------------------
262: PROCEDURE Update_WFAttrValue
263: ( p_api_version IN NUMBER
264: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
265: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
266: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
267: , x_return_status OUT NOCOPY VARCHAR2
268: , x_msg_count OUT NOCOPY NUMBER
261: --------------------------------------------------------------------------
262: PROCEDURE Update_WFAttrValue
263: ( p_api_version IN NUMBER
264: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
265: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
266: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
267: , x_return_status OUT NOCOPY VARCHAR2
268: , x_msg_count OUT NOCOPY NUMBER
269: , x_msg_data OUT NOCOPY VARCHAR2
262: PROCEDURE Update_WFAttrValue
263: ( p_api_version IN NUMBER
264: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
265: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
266: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
267: , x_return_status OUT NOCOPY VARCHAR2
268: , x_msg_count OUT NOCOPY NUMBER
269: , x_msg_data OUT NOCOPY VARCHAR2
270: , p_bwa_rec IN brm_wf_attr_value_rec_type
286:
287: --
288: -- Standard call to check for call compatibility
289: --
290: IF NOT FND_API.Compatible_API_Call( l_api_version
291: , p_api_version
292: , l_api_name
293: , G_PKG_NAME
294: )
292: , l_api_name
293: , G_PKG_NAME
294: )
295: THEN
296: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
297: END IF;
298:
299: --
300: -- Initialize message list if p_init_msg_list is set to TRUE
298:
299: --
300: -- Initialize message list if p_init_msg_list is set to TRUE
301: --
302: IF FND_API.To_Boolean(p_init_msg_list)
303: THEN
304: FND_MSG_PUB.Initialize;
305: END IF;
306:
306:
307: --
308: -- Initialize API return status to success
309: --
310: x_return_status := FND_API.G_RET_STS_SUCCESS;
311:
312: --
313: -- Get a new object version number
314: --
359:
360: --
361: -- Standard check of p_commit
362: --
363: IF FND_API.To_Boolean(p_commit)
364: THEN
365: COMMIT WORK;
366: END IF;
367:
372: , p_data => x_msg_data
373: );
374:
375: EXCEPTION
376: WHEN FND_API.G_EXC_ERROR
377: THEN
378: ROLLBACK TO Update_WFAttrValue_PVT;
379: x_return_status := FND_API.G_RET_STS_ERROR;
380: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
375: EXCEPTION
376: WHEN FND_API.G_EXC_ERROR
377: THEN
378: ROLLBACK TO Update_WFAttrValue_PVT;
379: x_return_status := FND_API.G_RET_STS_ERROR;
380: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
381: , p_data => x_msg_data
382: );
383:
380: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
381: , p_data => x_msg_data
382: );
383:
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
385: THEN
386: ROLLBACK TO Update_WFAttrValue_PVT;
387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
388: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
383:
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
385: THEN
386: ROLLBACK TO Update_WFAttrValue_PVT;
387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
388: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
389: , p_data => x_msg_data
390: );
391:
391:
392: WHEN OTHERS
393: THEN
394: ROLLBACK TO Update_WFAttrValue_PVT;
395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
396: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
397: THEN
398: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
399: , l_api_name
432: -- End of comments
433: --------------------------------------------------------------------------
434: PROCEDURE Delete_WFAttrValue
435: ( p_api_version IN NUMBER
436: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
437: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
438: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
439: , x_return_status OUT NOCOPY VARCHAR2
440: , x_msg_count OUT NOCOPY NUMBER
433: --------------------------------------------------------------------------
434: PROCEDURE Delete_WFAttrValue
435: ( p_api_version IN NUMBER
436: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
437: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
438: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
439: , x_return_status OUT NOCOPY VARCHAR2
440: , x_msg_count OUT NOCOPY NUMBER
441: , x_msg_data OUT NOCOPY VARCHAR2
434: PROCEDURE Delete_WFAttrValue
435: ( p_api_version IN NUMBER
436: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
437: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
438: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
439: , x_return_status OUT NOCOPY VARCHAR2
440: , x_msg_count OUT NOCOPY NUMBER
441: , x_msg_data OUT NOCOPY VARCHAR2
442: , p_wf_attr_value_id IN NUMBER
456:
457: --
458: -- Check version number
459: --
460: IF NOT FND_API.Compatible_API_Call( l_api_version
461: , p_api_version
462: , l_api_name
463: , G_PKG_NAME
464: )
462: , l_api_name
463: , G_PKG_NAME
464: )
465: THEN
466: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
467: END IF;
468:
469: --
470: -- Initialize message list if requested
468:
469: --
470: -- Initialize message list if requested
471: --
472: IF FND_API.to_Boolean( p_init_msg_list )
473: THEN
474: FND_MSG_PUB.initialize;
475: END IF;
476:
476:
477: --
478: -- Initialize return status to SUCCESS
479: --
480: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
481:
482: DELETE FROM JTF_BRM_WF_ATTR_VALUES
483: WHERE WF_ATTR_VALUE_ID = p_wf_attr_value_id;
484:
489: THEN
490: RAISE no_data_found;
491: END IF;
492:
493: IF FND_API.To_Boolean( p_commit )
494: THEN
495: COMMIT WORK;
496: END IF;
497:
499: , p_data => X_MSG_DATA
500: );
501:
502: EXCEPTION
503: WHEN FND_API.G_EXC_ERROR
504: THEN
505: ROLLBACK TO Delete_WFAttrValue_PVT;
506: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
507: FND_MSG_PUB.Count_And_Get( p_count => X_MSG_COUNT
502: EXCEPTION
503: WHEN FND_API.G_EXC_ERROR
504: THEN
505: ROLLBACK TO Delete_WFAttrValue_PVT;
506: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
507: FND_MSG_PUB.Count_And_Get( p_count => X_MSG_COUNT
508: , p_data => X_MSG_DATA
509: );
510:
507: FND_MSG_PUB.Count_And_Get( p_count => X_MSG_COUNT
508: , p_data => X_MSG_DATA
509: );
510:
511: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
512: THEN
513: ROLLBACK TO Delete_WFAttrValue_PVT;
514: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
515: FND_MSG_PUB.Count_And_Get( p_count => X_MSG_COUNT
510:
511: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
512: THEN
513: ROLLBACK TO Delete_WFAttrValue_PVT;
514: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
515: FND_MSG_PUB.Count_And_Get( p_count => X_MSG_COUNT
516: , p_data => X_MSG_DATA
517: );
518:
518:
519: WHEN OTHERS
520: THEN
521: ROLLBACK TO Delete_WFAttrValue_PVT;
522: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
523: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
524: THEN
525: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
526: , l_api_name