25: -- End of comments
26: --------------------------------------------------------------------------
27: PROCEDURE Create_ExpressionLine
28: ( p_api_version IN NUMBER
29: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
30: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
31: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
32: , x_return_status OUT NOCOPY VARCHAR2
33: , x_msg_count OUT NOCOPY NUMBER
26: --------------------------------------------------------------------------
27: PROCEDURE Create_ExpressionLine
28: ( p_api_version IN NUMBER
29: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
30: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
31: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
32: , x_return_status OUT NOCOPY VARCHAR2
33: , x_msg_count OUT NOCOPY NUMBER
34: , x_msg_data OUT NOCOPY VARCHAR2
27: PROCEDURE Create_ExpressionLine
28: ( p_api_version IN NUMBER
29: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
30: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
31: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
32: , x_return_status OUT NOCOPY VARCHAR2
33: , x_msg_count OUT NOCOPY NUMBER
34: , x_msg_data OUT NOCOPY VARCHAR2
35: , p_bel_rec IN brm_expression_line_rec_type
56:
57: --
58: -- Standard call to check for call compatibility
59: --
60: IF NOT FND_API.Compatible_API_Call( l_api_version
61: , p_api_version
62: , l_api_name
63: , G_PKG_NAME
64: )
62: , l_api_name
63: , G_PKG_NAME
64: )
65: THEN
66: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
67: END IF;
68:
69: --
70: -- Initialize message list if p_init_msg_list is set to TRUE
68:
69: --
70: -- Initialize message list if p_init_msg_list is set to TRUE
71: --
72: IF FND_API.To_Boolean(p_init_msg_list)
73: THEN
74: FND_MSG_PUB.Initialize;
75: END IF;
76:
76:
77: --
78: -- Initialize API return status to success
79: --
80: x_return_status := FND_API.G_RET_STS_SUCCESS;
81:
82: ------------------------------------------------------------------------
83: -- Perform the database operation. Generate the ID from the
84: -- sequence, then insert the passed in attributes into the
193:
194: --
195: -- Standard check of p_commit
196: --
197: IF FND_API.To_Boolean(p_commit)
198: THEN
199: COMMIT WORK;
200: END IF;
201:
206: , p_data => x_msg_data
207: );
208:
209: EXCEPTION
210: WHEN FND_API.G_EXC_ERROR
211: THEN
212: ROLLBACK TO Create_ExpressionLine_PVT;
213: x_return_status := FND_API.G_RET_STS_ERROR;
214: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
209: EXCEPTION
210: WHEN FND_API.G_EXC_ERROR
211: THEN
212: ROLLBACK TO Create_ExpressionLine_PVT;
213: x_return_status := FND_API.G_RET_STS_ERROR;
214: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
215: , p_data => x_msg_data
216: );
217:
214: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
215: , p_data => x_msg_data
216: );
217:
218: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
219: THEN
220: ROLLBACK TO Create_ExpressionLine_PVT;
221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
222: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
217:
218: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
219: THEN
220: ROLLBACK TO Create_ExpressionLine_PVT;
221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
222: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
223: , p_data => x_msg_data
224: );
225: WHEN OTHERS
224: );
225: WHEN OTHERS
226: THEN
227: ROLLBACK TO Create_ExpressionLine_PVT;
228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
229: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
230: THEN
231: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
232: , l_api_name
259: -- End of comments
260: --------------------------------------------------------------------------
261: PROCEDURE Update_ExpressionLine
262: ( p_api_version IN NUMBER
263: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
264: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
265: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
266: , x_return_status OUT NOCOPY VARCHAR2
267: , x_msg_count OUT NOCOPY NUMBER
260: --------------------------------------------------------------------------
261: PROCEDURE Update_ExpressionLine
262: ( p_api_version IN NUMBER
263: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
264: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
265: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
266: , x_return_status OUT NOCOPY VARCHAR2
267: , x_msg_count OUT NOCOPY NUMBER
268: , x_msg_data OUT NOCOPY VARCHAR2
261: PROCEDURE Update_ExpressionLine
262: ( p_api_version IN NUMBER
263: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
264: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
265: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
266: , x_return_status OUT NOCOPY VARCHAR2
267: , x_msg_count OUT NOCOPY NUMBER
268: , x_msg_data OUT NOCOPY VARCHAR2
269: , p_bel_rec IN brm_expression_line_rec_type
281: -- Standard start of API savepoint
282: SAVEPOINT Update_ExpressionLine_PVT;
283:
284: -- Standard call to check for call compatibility
285: IF NOT FND_API.Compatible_API_Call( l_api_version
286: , p_api_version
287: , l_api_name
288: , G_PKG_NAME
289: )
287: , l_api_name
288: , G_PKG_NAME
289: )
290: THEN
291: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
292: END IF;
293:
294: -- Initialize message list if p_init_msg_list is set to TRUE
295: IF FND_API.To_Boolean(p_init_msg_list)
291: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
292: END IF;
293:
294: -- Initialize message list if p_init_msg_list is set to TRUE
295: IF FND_API.To_Boolean(p_init_msg_list)
296: THEN
297: FND_MSG_PUB.Initialize;
298: END IF;
299:
297: FND_MSG_PUB.Initialize;
298: END IF;
299:
300: -- Initialize API return status to success
301: x_return_status := FND_API.G_RET_STS_SUCCESS;
302:
303: ------------------------------------------------------------------------
304: -- Get a new object version number
305: ------------------------------------------------------------------------
354:
355: --
356: -- Standard check of p_commit
357: --
358: IF FND_API.To_Boolean(p_commit)
359: THEN
360: COMMIT WORK;
361: END IF;
362:
367: , p_data => x_msg_data
368: );
369:
370: EXCEPTION
371: WHEN FND_API.G_EXC_ERROR
372: THEN
373: ROLLBACK TO Update_ExpressionLine_PVT;
374: x_return_status := FND_API.G_RET_STS_ERROR;
375: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
370: EXCEPTION
371: WHEN FND_API.G_EXC_ERROR
372: THEN
373: ROLLBACK TO Update_ExpressionLine_PVT;
374: x_return_status := FND_API.G_RET_STS_ERROR;
375: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
376: , p_data => x_msg_data
377: );
378:
375: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
376: , p_data => x_msg_data
377: );
378:
379: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
380: THEN
381: ROLLBACK TO Update_ExpressionLine_PVT;
382: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
383: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
378:
379: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
380: THEN
381: ROLLBACK TO Update_ExpressionLine_PVT;
382: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
383: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
384: , p_data => x_msg_data
385: );
386:
386:
387: WHEN OTHERS
388: THEN
389: ROLLBACK TO Update_ExpressionLine_PVT;
390: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
391: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
392: THEN
393: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
394: , l_api_name
422: -- End of comments
423: --------------------------------------------------------------------------
424: PROCEDURE Delete_ExpressionLine
425: ( p_api_version IN NUMBER
426: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
427: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
428: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
429: , x_return_status OUT NOCOPY VARCHAR2
430: , x_msg_count OUT NOCOPY NUMBER
423: --------------------------------------------------------------------------
424: PROCEDURE Delete_ExpressionLine
425: ( p_api_version IN NUMBER
426: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
427: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
428: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
429: , x_return_status OUT NOCOPY VARCHAR2
430: , x_msg_count OUT NOCOPY NUMBER
431: , x_msg_data OUT NOCOPY VARCHAR2
424: PROCEDURE Delete_ExpressionLine
425: ( p_api_version IN NUMBER
426: , p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false
427: , p_commit IN VARCHAR2 DEFAULT fnd_api.g_false
428: , p_validation_level IN NUMBER DEFAULT fnd_api.g_valid_level_full
429: , x_return_status OUT NOCOPY VARCHAR2
430: , x_msg_count OUT NOCOPY NUMBER
431: , x_msg_data OUT NOCOPY VARCHAR2
432: , p_expression_line_id IN NUMBER
446:
447: --
448: -- Check version number
449: --
450: IF NOT FND_API.Compatible_API_Call( l_api_version
451: , p_api_version
452: , l_api_name
453: , G_PKG_NAME
454: )
452: , l_api_name
453: , G_PKG_NAME
454: )
455: THEN
456: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
457: END IF;
458:
459: --
460: -- Initialize message list if requested
458:
459: --
460: -- Initialize message list if requested
461: --
462: IF FND_API.to_Boolean( p_init_msg_list )
463: THEN
464: FND_MSG_PUB.initialize;
465: END IF;
466:
466:
467: --
468: -- Initialize return status to SUCCESS
469: --
470: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
471:
472: DELETE FROM JTF_BRM_EXPRESSION_LINES
473: WHERE expression_line_id = p_expression_line_id;
474:
479: THEN
480: RAISE NO_DATA_FOUND;
481: END IF;
482:
483: IF FND_API.To_Boolean( p_commit )
484: THEN
485: COMMIT WORK;
486: END IF;
487:
489: , p_data => X_MSG_DATA
490: );
491:
492: EXCEPTION
493: WHEN FND_API.G_EXC_ERROR
494: THEN
495: ROLLBACK TO Delete_ExpressionLine_PVT;
496: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
497: FND_MSG_PUB.Count_And_Get( p_count => X_MSG_COUNT
492: EXCEPTION
493: WHEN FND_API.G_EXC_ERROR
494: THEN
495: ROLLBACK TO Delete_ExpressionLine_PVT;
496: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
497: FND_MSG_PUB.Count_And_Get( p_count => X_MSG_COUNT
498: , p_data => X_MSG_DATA
499: );
500:
497: FND_MSG_PUB.Count_And_Get( p_count => X_MSG_COUNT
498: , p_data => X_MSG_DATA
499: );
500:
501: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
502: THEN
503: ROLLBACK TO Delete_ExpressionLine_PVT;
504: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
505: FND_MSG_PUB.Count_And_Get( p_count => X_MSG_COUNT
500:
501: WHEN FND_API.G_EXC_UNEXPECTED_ERROR
502: THEN
503: ROLLBACK TO Delete_ExpressionLine_PVT;
504: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
505: FND_MSG_PUB.Count_And_Get( p_count => X_MSG_COUNT
506: , p_data => X_MSG_DATA
507: );
508:
508:
509: WHEN OTHERS
510: THEN
511: ROLLBACK TO Delete_ExpressionLine_PVT;
512: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
513: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
514: THEN
515: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
516: , l_api_name