34: /* Define Savepoint */
35: SAVEPOINT Insert_FormulaEffectivity_PVT;
36:
37: /* Standard Check for API compatibility */
38: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
39: p_api_version ,
40: l_api_name ,
41: G_PKG_NAME )
42: THEN
39: p_api_version ,
40: l_api_name ,
41: G_PKG_NAME )
42: THEN
43: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
44: END IF;
45:
46: /* Initialize message list if p_init_msg_list is set to TRUE */
47: IF FND_API.to_Boolean( p_init_msg_list ) THEN
43: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
44: END IF;
45:
46: /* Initialize message list if p_init_msg_list is set to TRUE */
47: IF FND_API.to_Boolean( p_init_msg_list ) THEN
48: FND_MSG_PUB.initialize;
49: END IF;
50: /* Initialize API return status to success */
51: x_return_status := FND_API.G_RET_STS_SUCCESS;
47: IF FND_API.to_Boolean( p_init_msg_list ) THEN
48: FND_MSG_PUB.initialize;
49: END IF;
50: /* Initialize API return status to success */
51: x_return_status := FND_API.G_RET_STS_SUCCESS;
52:
53: /* API Body */
54: /* Later on this insert should be changed to */
55: /* make insert on business view as opposed to tables directly. */
86: p_formula_effectivity_rec.creation_date, p_formula_effectivity_rec.last_update_date,
87: p_formula_effectivity_rec.last_updated_by, p_formula_effectivity_rec.last_update_login);
88:
89: IF(SQL%ROWCOUNT = 0) THEN
90: RAISE FND_API.G_EXC_ERROR;
91: END IF;
92:
93: /* END API Body */
94:
92:
93: /* END API Body */
94:
95: /* Check if p_commit is set to TRUE */
96: IF FND_API.To_Boolean( p_commit ) THEN
97: Commit;
98: END IF;
99:
100: /* Get the message count and information */
103: p_data => x_msg_data );
104:
105:
106: EXCEPTION
107: WHEN FND_API.G_EXC_ERROR THEN
108: ROLLBACK to Insert_FormulaEffectivity_PVT;
109: x_return_status := FND_API.G_RET_STS_ERROR;
110: FND_MSG_PUB.Count_And_Get (
111: p_count => x_msg_count,
105:
106: EXCEPTION
107: WHEN FND_API.G_EXC_ERROR THEN
108: ROLLBACK to Insert_FormulaEffectivity_PVT;
109: x_return_status := FND_API.G_RET_STS_ERROR;
110: FND_MSG_PUB.Count_And_Get (
111: p_count => x_msg_count,
112: p_data => x_msg_data );
113:
110: FND_MSG_PUB.Count_And_Get (
111: p_count => x_msg_count,
112: p_data => x_msg_data );
113:
114: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
115: ROLLBACK to Insert_FormulaEffectivity_PVT;
116: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
117: FND_MSG_PUB.Count_And_Get (
118: p_count => x_msg_count,
112: p_data => x_msg_data );
113:
114: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
115: ROLLBACK to Insert_FormulaEffectivity_PVT;
116: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
117: FND_MSG_PUB.Count_And_Get (
118: p_count => x_msg_count,
119: p_data => x_msg_data );
120:
119: p_data => x_msg_data );
120:
121: WHEN OTHERS THEN
122: ROLLBACK to Insert_FormulaEffectivity_PVT;
123: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
124: FND_MSG_PUB.Count_And_Get (
125: p_count => x_msg_count,
126: p_data => x_msg_data );
127:
186: /* Define Savepoint */
187: SAVEPOINT Update_FormulaEffectivity_PVT;
188:
189: /* Standard Check for API compatibility */
190: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
191: p_api_version ,
192: l_api_name ,
193: G_PKG_NAME )
194: THEN
191: p_api_version ,
192: l_api_name ,
193: G_PKG_NAME )
194: THEN
195: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
196: END IF;
197:
198: /* Initialize message list if p_init_msg_list is set to TRUE */
199: IF FND_API.to_Boolean( p_init_msg_list ) THEN
195: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
196: END IF;
197:
198: /* Initialize message list if p_init_msg_list is set to TRUE */
199: IF FND_API.to_Boolean( p_init_msg_list ) THEN
200: FND_MSG_PUB.initialize;
201: END IF;
202: /* Initialize API return status to success */
203: x_return_status := FND_API.G_RET_STS_SUCCESS;
199: IF FND_API.to_Boolean( p_init_msg_list ) THEN
200: FND_MSG_PUB.initialize;
201: END IF;
202: /* Initialize API return status to success */
203: x_return_status := FND_API.G_RET_STS_SUCCESS;
204:
205: /* API body */
206: /* Later on to be changed to update a business view */
207: /* and not a table. */
212:
213: /* If any of the required fields are passed in as null set them back to the */
214: /* original value */
215: /* BEGIN BUG#2583665 RajaSekhar */
216: /* = FND_API.G_MISS_CHAR is replaced by IS NULL in the below IF condition */
217: IF (p_formula_effectivity_rec.orgn_code IS NULL) THEN
218: l_orgn_code := l_fm_eff_rec.orgn_code ;
219: ELSE
220: l_orgn_code := p_formula_effectivity_rec.orgn_code;
315: WHERE
316: fmeff_id = p_formula_effectivity_rec.fmeff_id;
317:
318: IF(SQL%ROWCOUNT = 0) THEN
319: RAISE FND_API.G_EXC_ERROR;
320: END IF;
321:
322:
323: /* End API body */
322:
323: /* End API body */
324:
325: /* Check if p_commit is set to TRUE */
326: IF FND_API.To_Boolean( p_commit ) THEN
327: Commit;
328: END IF;
329:
330: /* Get the message count and information */
333: p_data => x_msg_data );
334:
335:
336: EXCEPTION
337: WHEN FND_API.G_EXC_ERROR THEN
338: ROLLBACK to Update_FormulaEffectivity_PVT;
339: x_return_status := FND_API.G_RET_STS_ERROR;
340: FND_MSG_PUB.Count_And_Get (
341: p_count => x_msg_count,
335:
336: EXCEPTION
337: WHEN FND_API.G_EXC_ERROR THEN
338: ROLLBACK to Update_FormulaEffectivity_PVT;
339: x_return_status := FND_API.G_RET_STS_ERROR;
340: FND_MSG_PUB.Count_And_Get (
341: p_count => x_msg_count,
342: p_data => x_msg_data );
343:
340: FND_MSG_PUB.Count_And_Get (
341: p_count => x_msg_count,
342: p_data => x_msg_data );
343:
344: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
345: ROLLBACK to Update_FormulaEffectivity_PVT;
346: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
347: FND_MSG_PUB.Count_And_Get (
348: p_count => x_msg_count,
342: p_data => x_msg_data );
343:
344: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
345: ROLLBACK to Update_FormulaEffectivity_PVT;
346: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
347: FND_MSG_PUB.Count_And_Get (
348: p_count => x_msg_count,
349: p_data => x_msg_data );
350:
349: p_data => x_msg_data );
350:
351: WHEN OTHERS THEN
352: ROLLBACK to Update_FormulaEffectivity_PVT;
353: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
354: FND_MSG_PUB.Count_And_Get (
355: p_count => x_msg_count,
356: p_data => x_msg_data );
357: