[Home] [Help]
148: );
149:
150: PROCEDURE Create_ActMetric2 (
151: p_api_version IN NUMBER,
152: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
153: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
154: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
155:
156: x_return_status OUT NOCOPY VARCHAR2,
149:
150: PROCEDURE Create_ActMetric2 (
151: p_api_version IN NUMBER,
152: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
153: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
154: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
155:
156: x_return_status OUT NOCOPY VARCHAR2,
157: x_msg_count OUT NOCOPY NUMBER,
150: PROCEDURE Create_ActMetric2 (
151: p_api_version IN NUMBER,
152: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
153: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
154: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
155:
156: x_return_status OUT NOCOPY VARCHAR2,
157: x_msg_count OUT NOCOPY NUMBER,
158: x_msg_data OUT NOCOPY VARCHAR2,
182:
183:
184: PROCEDURE Create_ActMetric (
185: p_api_version IN NUMBER,
186: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
187: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
188: --p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,
189: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
190:
183:
184: PROCEDURE Create_ActMetric (
185: p_api_version IN NUMBER,
186: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
187: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
188: --p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,
189: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
190:
191: x_return_status OUT NOCOPY VARCHAR2,
184: PROCEDURE Create_ActMetric (
185: p_api_version IN NUMBER,
186: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
187: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
188: --p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,
189: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
190:
191: x_return_status OUT NOCOPY VARCHAR2,
192: x_msg_count OUT NOCOPY NUMBER,
185: p_api_version IN NUMBER,
186: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
187: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
188: --p_commit IN VARCHAR2 := Fnd_Api.G_TRUE,
189: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
190:
191: x_return_status OUT NOCOPY VARCHAR2,
192: x_msg_count OUT NOCOPY NUMBER,
193: x_msg_data OUT NOCOPY VARCHAR2,
201: BEGIN
202:
203: SAVEPOINT sp_create_actmetric;
204:
205: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
206: x_activity_metric_id := NULL;
207:
208: --LOCK TABLE AMS_ACT_METRICS_ALL IN EXCLUSIVE MODE;
209:
215: x_return_status => x_return_status,
216: x_msg_count => x_msg_count,
217: x_msg_data => x_msg_data);
218:
219: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS or
220: l_is_locked = FND_API.G_FALSE THEN
221: RAISE Fnd_Api.G_EXC_ERROR;
222: END IF;
223:
216: x_msg_count => x_msg_count,
217: x_msg_data => x_msg_data);
218:
219: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS or
220: l_is_locked = FND_API.G_FALSE THEN
221: RAISE Fnd_Api.G_EXC_ERROR;
222: END IF;
223:
224: Create_ActMetric2 (
217: x_msg_data => x_msg_data);
218:
219: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS or
220: l_is_locked = FND_API.G_FALSE THEN
221: RAISE Fnd_Api.G_EXC_ERROR;
222: END IF;
223:
224: Create_ActMetric2 (
225: p_api_version => p_api_version,
232: p_act_metric_rec => p_act_metric_rec,
233: x_activity_metric_id => x_activity_metric_id);
234:
235: -- If any errors happen abort API.
236: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
237: RAISE Fnd_Api.G_EXC_ERROR;
238: END IF;
239:
240: --COMMIT WORK;
233: x_activity_metric_id => x_activity_metric_id);
234:
235: -- If any errors happen abort API.
236: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
237: RAISE Fnd_Api.G_EXC_ERROR;
238: END IF;
239:
240: --COMMIT WORK;
241:
238: END IF;
239:
240: --COMMIT WORK;
241:
242: IF Fnd_Api.to_boolean(p_commit) THEN
243: COMMIT;
244: END IF;
245:
246: --
249: --
250: Fnd_Msg_Pub.Count_And_Get (
251: p_count => x_msg_count,
252: p_data => x_msg_data,
253: p_encoded => Fnd_Api.G_FALSE
254: );
255:
256: EXCEPTION
257: WHEN Fnd_Api.G_EXC_ERROR THEN
253: p_encoded => Fnd_Api.G_FALSE
254: );
255:
256: EXCEPTION
257: WHEN Fnd_Api.G_EXC_ERROR THEN
258: ROLLBACK TO sp_create_actmetric;
259: x_return_status := Fnd_Api.G_RET_STS_ERROR;
260: Fnd_Msg_Pub.Count_And_Get (
261: p_count => x_msg_count,
255:
256: EXCEPTION
257: WHEN Fnd_Api.G_EXC_ERROR THEN
258: ROLLBACK TO sp_create_actmetric;
259: x_return_status := Fnd_Api.G_RET_STS_ERROR;
260: Fnd_Msg_Pub.Count_And_Get (
261: p_count => x_msg_count,
262: p_data => x_msg_data,
263: p_encoded => FND_API.G_FALSE
259: x_return_status := Fnd_Api.G_RET_STS_ERROR;
260: Fnd_Msg_Pub.Count_And_Get (
261: p_count => x_msg_count,
262: p_data => x_msg_data,
263: p_encoded => FND_API.G_FALSE
264: );
265: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
266: ROLLBACK TO sp_create_actmetric;
267: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
261: p_count => x_msg_count,
262: p_data => x_msg_data,
263: p_encoded => FND_API.G_FALSE
264: );
265: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
266: ROLLBACK TO sp_create_actmetric;
267: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
268: Fnd_Msg_Pub.Count_And_Get (
269: p_count => x_msg_count,
263: p_encoded => FND_API.G_FALSE
264: );
265: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
266: ROLLBACK TO sp_create_actmetric;
267: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
268: Fnd_Msg_Pub.Count_And_Get (
269: p_count => x_msg_count,
270: p_data => x_msg_data,
271: p_encoded => FND_API.G_FALSE
267: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
268: Fnd_Msg_Pub.Count_And_Get (
269: p_count => x_msg_count,
270: p_data => x_msg_data,
271: p_encoded => FND_API.G_FALSE
272: );
273: WHEN OTHERS THEN
274: ROLLBACK TO sp_create_actmetric;
275: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
271: p_encoded => FND_API.G_FALSE
272: );
273: WHEN OTHERS THEN
274: ROLLBACK TO sp_create_actmetric;
275: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
276: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
277: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
278: END IF;
279: Fnd_Msg_Pub.Count_And_Get (
278: END IF;
279: Fnd_Msg_Pub.Count_And_Get (
280: p_count => x_msg_count,
281: p_data => x_msg_data,
282: p_encoded => FND_API.G_FALSE
283: );
284: END Create_ActMetric;
285:
286: -- Start of comments
534: PROCEDURE Init_ActMetric_Rec(
535: x_act_metric_rec IN OUT NOCOPY Ams_Actmetric_Pvt.Act_metric_rec_type
536: ) IS
537: BEGIN
538: x_act_metric_rec.activity_metric_id := Fnd_Api.G_MISS_NUM ;
539: x_act_metric_rec.last_update_date := Fnd_Api.G_MISS_DATE ;
540: x_act_metric_rec.last_updated_by := Fnd_Api.G_MISS_NUM ;
541: x_act_metric_rec.creation_date := Fnd_Api.G_MISS_DATE ;
542: x_act_metric_rec.created_by := Fnd_Api.G_MISS_NUM ;
535: x_act_metric_rec IN OUT NOCOPY Ams_Actmetric_Pvt.Act_metric_rec_type
536: ) IS
537: BEGIN
538: x_act_metric_rec.activity_metric_id := Fnd_Api.G_MISS_NUM ;
539: x_act_metric_rec.last_update_date := Fnd_Api.G_MISS_DATE ;
540: x_act_metric_rec.last_updated_by := Fnd_Api.G_MISS_NUM ;
541: x_act_metric_rec.creation_date := Fnd_Api.G_MISS_DATE ;
542: x_act_metric_rec.created_by := Fnd_Api.G_MISS_NUM ;
543: x_act_metric_rec.last_update_login := Fnd_Api.G_MISS_NUM ;
536: ) IS
537: BEGIN
538: x_act_metric_rec.activity_metric_id := Fnd_Api.G_MISS_NUM ;
539: x_act_metric_rec.last_update_date := Fnd_Api.G_MISS_DATE ;
540: x_act_metric_rec.last_updated_by := Fnd_Api.G_MISS_NUM ;
541: x_act_metric_rec.creation_date := Fnd_Api.G_MISS_DATE ;
542: x_act_metric_rec.created_by := Fnd_Api.G_MISS_NUM ;
543: x_act_metric_rec.last_update_login := Fnd_Api.G_MISS_NUM ;
544: x_act_metric_rec.object_version_number := Fnd_Api.G_MISS_NUM ;
537: BEGIN
538: x_act_metric_rec.activity_metric_id := Fnd_Api.G_MISS_NUM ;
539: x_act_metric_rec.last_update_date := Fnd_Api.G_MISS_DATE ;
540: x_act_metric_rec.last_updated_by := Fnd_Api.G_MISS_NUM ;
541: x_act_metric_rec.creation_date := Fnd_Api.G_MISS_DATE ;
542: x_act_metric_rec.created_by := Fnd_Api.G_MISS_NUM ;
543: x_act_metric_rec.last_update_login := Fnd_Api.G_MISS_NUM ;
544: x_act_metric_rec.object_version_number := Fnd_Api.G_MISS_NUM ;
545: x_act_metric_rec.act_metric_used_by_id := Fnd_Api.G_MISS_NUM ;
538: x_act_metric_rec.activity_metric_id := Fnd_Api.G_MISS_NUM ;
539: x_act_metric_rec.last_update_date := Fnd_Api.G_MISS_DATE ;
540: x_act_metric_rec.last_updated_by := Fnd_Api.G_MISS_NUM ;
541: x_act_metric_rec.creation_date := Fnd_Api.G_MISS_DATE ;
542: x_act_metric_rec.created_by := Fnd_Api.G_MISS_NUM ;
543: x_act_metric_rec.last_update_login := Fnd_Api.G_MISS_NUM ;
544: x_act_metric_rec.object_version_number := Fnd_Api.G_MISS_NUM ;
545: x_act_metric_rec.act_metric_used_by_id := Fnd_Api.G_MISS_NUM ;
546: x_act_metric_rec.arc_act_metric_used_by := Fnd_Api.G_MISS_CHAR ;
539: x_act_metric_rec.last_update_date := Fnd_Api.G_MISS_DATE ;
540: x_act_metric_rec.last_updated_by := Fnd_Api.G_MISS_NUM ;
541: x_act_metric_rec.creation_date := Fnd_Api.G_MISS_DATE ;
542: x_act_metric_rec.created_by := Fnd_Api.G_MISS_NUM ;
543: x_act_metric_rec.last_update_login := Fnd_Api.G_MISS_NUM ;
544: x_act_metric_rec.object_version_number := Fnd_Api.G_MISS_NUM ;
545: x_act_metric_rec.act_metric_used_by_id := Fnd_Api.G_MISS_NUM ;
546: x_act_metric_rec.arc_act_metric_used_by := Fnd_Api.G_MISS_CHAR ;
547: x_act_metric_rec.purchase_req_raised_flag := Fnd_Api.G_MISS_CHAR ;
540: x_act_metric_rec.last_updated_by := Fnd_Api.G_MISS_NUM ;
541: x_act_metric_rec.creation_date := Fnd_Api.G_MISS_DATE ;
542: x_act_metric_rec.created_by := Fnd_Api.G_MISS_NUM ;
543: x_act_metric_rec.last_update_login := Fnd_Api.G_MISS_NUM ;
544: x_act_metric_rec.object_version_number := Fnd_Api.G_MISS_NUM ;
545: x_act_metric_rec.act_metric_used_by_id := Fnd_Api.G_MISS_NUM ;
546: x_act_metric_rec.arc_act_metric_used_by := Fnd_Api.G_MISS_CHAR ;
547: x_act_metric_rec.purchase_req_raised_flag := Fnd_Api.G_MISS_CHAR ;
548: x_act_metric_rec.application_id := Fnd_Api.G_MISS_NUM ;
541: x_act_metric_rec.creation_date := Fnd_Api.G_MISS_DATE ;
542: x_act_metric_rec.created_by := Fnd_Api.G_MISS_NUM ;
543: x_act_metric_rec.last_update_login := Fnd_Api.G_MISS_NUM ;
544: x_act_metric_rec.object_version_number := Fnd_Api.G_MISS_NUM ;
545: x_act_metric_rec.act_metric_used_by_id := Fnd_Api.G_MISS_NUM ;
546: x_act_metric_rec.arc_act_metric_used_by := Fnd_Api.G_MISS_CHAR ;
547: x_act_metric_rec.purchase_req_raised_flag := Fnd_Api.G_MISS_CHAR ;
548: x_act_metric_rec.application_id := Fnd_Api.G_MISS_NUM ;
549: x_act_metric_rec.sensitive_data_flag := Fnd_Api.G_MISS_CHAR ;
542: x_act_metric_rec.created_by := Fnd_Api.G_MISS_NUM ;
543: x_act_metric_rec.last_update_login := Fnd_Api.G_MISS_NUM ;
544: x_act_metric_rec.object_version_number := Fnd_Api.G_MISS_NUM ;
545: x_act_metric_rec.act_metric_used_by_id := Fnd_Api.G_MISS_NUM ;
546: x_act_metric_rec.arc_act_metric_used_by := Fnd_Api.G_MISS_CHAR ;
547: x_act_metric_rec.purchase_req_raised_flag := Fnd_Api.G_MISS_CHAR ;
548: x_act_metric_rec.application_id := Fnd_Api.G_MISS_NUM ;
549: x_act_metric_rec.sensitive_data_flag := Fnd_Api.G_MISS_CHAR ;
550: x_act_metric_rec.budget_id := Fnd_Api.G_MISS_NUM ;
543: x_act_metric_rec.last_update_login := Fnd_Api.G_MISS_NUM ;
544: x_act_metric_rec.object_version_number := Fnd_Api.G_MISS_NUM ;
545: x_act_metric_rec.act_metric_used_by_id := Fnd_Api.G_MISS_NUM ;
546: x_act_metric_rec.arc_act_metric_used_by := Fnd_Api.G_MISS_CHAR ;
547: x_act_metric_rec.purchase_req_raised_flag := Fnd_Api.G_MISS_CHAR ;
548: x_act_metric_rec.application_id := Fnd_Api.G_MISS_NUM ;
549: x_act_metric_rec.sensitive_data_flag := Fnd_Api.G_MISS_CHAR ;
550: x_act_metric_rec.budget_id := Fnd_Api.G_MISS_NUM ;
551: x_act_metric_rec.metric_id := Fnd_Api.G_MISS_NUM ;
544: x_act_metric_rec.object_version_number := Fnd_Api.G_MISS_NUM ;
545: x_act_metric_rec.act_metric_used_by_id := Fnd_Api.G_MISS_NUM ;
546: x_act_metric_rec.arc_act_metric_used_by := Fnd_Api.G_MISS_CHAR ;
547: x_act_metric_rec.purchase_req_raised_flag := Fnd_Api.G_MISS_CHAR ;
548: x_act_metric_rec.application_id := Fnd_Api.G_MISS_NUM ;
549: x_act_metric_rec.sensitive_data_flag := Fnd_Api.G_MISS_CHAR ;
550: x_act_metric_rec.budget_id := Fnd_Api.G_MISS_NUM ;
551: x_act_metric_rec.metric_id := Fnd_Api.G_MISS_NUM ;
552: x_act_metric_rec.transaction_currency_code := Fnd_Api.G_MISS_CHAR ;
545: x_act_metric_rec.act_metric_used_by_id := Fnd_Api.G_MISS_NUM ;
546: x_act_metric_rec.arc_act_metric_used_by := Fnd_Api.G_MISS_CHAR ;
547: x_act_metric_rec.purchase_req_raised_flag := Fnd_Api.G_MISS_CHAR ;
548: x_act_metric_rec.application_id := Fnd_Api.G_MISS_NUM ;
549: x_act_metric_rec.sensitive_data_flag := Fnd_Api.G_MISS_CHAR ;
550: x_act_metric_rec.budget_id := Fnd_Api.G_MISS_NUM ;
551: x_act_metric_rec.metric_id := Fnd_Api.G_MISS_NUM ;
552: x_act_metric_rec.transaction_currency_code := Fnd_Api.G_MISS_CHAR ;
553: x_act_metric_rec.trans_forecasted_value := Fnd_Api.G_MISS_NUM ;
546: x_act_metric_rec.arc_act_metric_used_by := Fnd_Api.G_MISS_CHAR ;
547: x_act_metric_rec.purchase_req_raised_flag := Fnd_Api.G_MISS_CHAR ;
548: x_act_metric_rec.application_id := Fnd_Api.G_MISS_NUM ;
549: x_act_metric_rec.sensitive_data_flag := Fnd_Api.G_MISS_CHAR ;
550: x_act_metric_rec.budget_id := Fnd_Api.G_MISS_NUM ;
551: x_act_metric_rec.metric_id := Fnd_Api.G_MISS_NUM ;
552: x_act_metric_rec.transaction_currency_code := Fnd_Api.G_MISS_CHAR ;
553: x_act_metric_rec.trans_forecasted_value := Fnd_Api.G_MISS_NUM ;
554: x_act_metric_rec.trans_committed_value := Fnd_Api.G_MISS_NUM ;
547: x_act_metric_rec.purchase_req_raised_flag := Fnd_Api.G_MISS_CHAR ;
548: x_act_metric_rec.application_id := Fnd_Api.G_MISS_NUM ;
549: x_act_metric_rec.sensitive_data_flag := Fnd_Api.G_MISS_CHAR ;
550: x_act_metric_rec.budget_id := Fnd_Api.G_MISS_NUM ;
551: x_act_metric_rec.metric_id := Fnd_Api.G_MISS_NUM ;
552: x_act_metric_rec.transaction_currency_code := Fnd_Api.G_MISS_CHAR ;
553: x_act_metric_rec.trans_forecasted_value := Fnd_Api.G_MISS_NUM ;
554: x_act_metric_rec.trans_committed_value := Fnd_Api.G_MISS_NUM ;
555: x_act_metric_rec.trans_actual_value := Fnd_Api.G_MISS_NUM ;
548: x_act_metric_rec.application_id := Fnd_Api.G_MISS_NUM ;
549: x_act_metric_rec.sensitive_data_flag := Fnd_Api.G_MISS_CHAR ;
550: x_act_metric_rec.budget_id := Fnd_Api.G_MISS_NUM ;
551: x_act_metric_rec.metric_id := Fnd_Api.G_MISS_NUM ;
552: x_act_metric_rec.transaction_currency_code := Fnd_Api.G_MISS_CHAR ;
553: x_act_metric_rec.trans_forecasted_value := Fnd_Api.G_MISS_NUM ;
554: x_act_metric_rec.trans_committed_value := Fnd_Api.G_MISS_NUM ;
555: x_act_metric_rec.trans_actual_value := Fnd_Api.G_MISS_NUM ;
556: x_act_metric_rec.functional_currency_code := Fnd_Api.G_MISS_CHAR ;
549: x_act_metric_rec.sensitive_data_flag := Fnd_Api.G_MISS_CHAR ;
550: x_act_metric_rec.budget_id := Fnd_Api.G_MISS_NUM ;
551: x_act_metric_rec.metric_id := Fnd_Api.G_MISS_NUM ;
552: x_act_metric_rec.transaction_currency_code := Fnd_Api.G_MISS_CHAR ;
553: x_act_metric_rec.trans_forecasted_value := Fnd_Api.G_MISS_NUM ;
554: x_act_metric_rec.trans_committed_value := Fnd_Api.G_MISS_NUM ;
555: x_act_metric_rec.trans_actual_value := Fnd_Api.G_MISS_NUM ;
556: x_act_metric_rec.functional_currency_code := Fnd_Api.G_MISS_CHAR ;
557: x_act_metric_rec.func_forecasted_value := Fnd_Api.G_MISS_NUM ;
550: x_act_metric_rec.budget_id := Fnd_Api.G_MISS_NUM ;
551: x_act_metric_rec.metric_id := Fnd_Api.G_MISS_NUM ;
552: x_act_metric_rec.transaction_currency_code := Fnd_Api.G_MISS_CHAR ;
553: x_act_metric_rec.trans_forecasted_value := Fnd_Api.G_MISS_NUM ;
554: x_act_metric_rec.trans_committed_value := Fnd_Api.G_MISS_NUM ;
555: x_act_metric_rec.trans_actual_value := Fnd_Api.G_MISS_NUM ;
556: x_act_metric_rec.functional_currency_code := Fnd_Api.G_MISS_CHAR ;
557: x_act_metric_rec.func_forecasted_value := Fnd_Api.G_MISS_NUM ;
558: x_act_metric_rec.dirty_flag := Fnd_Api.G_MISS_CHAR ;
551: x_act_metric_rec.metric_id := Fnd_Api.G_MISS_NUM ;
552: x_act_metric_rec.transaction_currency_code := Fnd_Api.G_MISS_CHAR ;
553: x_act_metric_rec.trans_forecasted_value := Fnd_Api.G_MISS_NUM ;
554: x_act_metric_rec.trans_committed_value := Fnd_Api.G_MISS_NUM ;
555: x_act_metric_rec.trans_actual_value := Fnd_Api.G_MISS_NUM ;
556: x_act_metric_rec.functional_currency_code := Fnd_Api.G_MISS_CHAR ;
557: x_act_metric_rec.func_forecasted_value := Fnd_Api.G_MISS_NUM ;
558: x_act_metric_rec.dirty_flag := Fnd_Api.G_MISS_CHAR ;
559: x_act_metric_rec.func_committed_value := Fnd_Api.G_MISS_NUM ;
552: x_act_metric_rec.transaction_currency_code := Fnd_Api.G_MISS_CHAR ;
553: x_act_metric_rec.trans_forecasted_value := Fnd_Api.G_MISS_NUM ;
554: x_act_metric_rec.trans_committed_value := Fnd_Api.G_MISS_NUM ;
555: x_act_metric_rec.trans_actual_value := Fnd_Api.G_MISS_NUM ;
556: x_act_metric_rec.functional_currency_code := Fnd_Api.G_MISS_CHAR ;
557: x_act_metric_rec.func_forecasted_value := Fnd_Api.G_MISS_NUM ;
558: x_act_metric_rec.dirty_flag := Fnd_Api.G_MISS_CHAR ;
559: x_act_metric_rec.func_committed_value := Fnd_Api.G_MISS_NUM ;
560: x_act_metric_rec.func_actual_value := Fnd_Api.G_MISS_NUM ;
553: x_act_metric_rec.trans_forecasted_value := Fnd_Api.G_MISS_NUM ;
554: x_act_metric_rec.trans_committed_value := Fnd_Api.G_MISS_NUM ;
555: x_act_metric_rec.trans_actual_value := Fnd_Api.G_MISS_NUM ;
556: x_act_metric_rec.functional_currency_code := Fnd_Api.G_MISS_CHAR ;
557: x_act_metric_rec.func_forecasted_value := Fnd_Api.G_MISS_NUM ;
558: x_act_metric_rec.dirty_flag := Fnd_Api.G_MISS_CHAR ;
559: x_act_metric_rec.func_committed_value := Fnd_Api.G_MISS_NUM ;
560: x_act_metric_rec.func_actual_value := Fnd_Api.G_MISS_NUM ;
561: x_act_metric_rec.last_calculated_date := Fnd_Api.G_MISS_DATE ;
554: x_act_metric_rec.trans_committed_value := Fnd_Api.G_MISS_NUM ;
555: x_act_metric_rec.trans_actual_value := Fnd_Api.G_MISS_NUM ;
556: x_act_metric_rec.functional_currency_code := Fnd_Api.G_MISS_CHAR ;
557: x_act_metric_rec.func_forecasted_value := Fnd_Api.G_MISS_NUM ;
558: x_act_metric_rec.dirty_flag := Fnd_Api.G_MISS_CHAR ;
559: x_act_metric_rec.func_committed_value := Fnd_Api.G_MISS_NUM ;
560: x_act_metric_rec.func_actual_value := Fnd_Api.G_MISS_NUM ;
561: x_act_metric_rec.last_calculated_date := Fnd_Api.G_MISS_DATE ;
562: x_act_metric_rec.variable_value := Fnd_Api.G_MISS_NUM ;
555: x_act_metric_rec.trans_actual_value := Fnd_Api.G_MISS_NUM ;
556: x_act_metric_rec.functional_currency_code := Fnd_Api.G_MISS_CHAR ;
557: x_act_metric_rec.func_forecasted_value := Fnd_Api.G_MISS_NUM ;
558: x_act_metric_rec.dirty_flag := Fnd_Api.G_MISS_CHAR ;
559: x_act_metric_rec.func_committed_value := Fnd_Api.G_MISS_NUM ;
560: x_act_metric_rec.func_actual_value := Fnd_Api.G_MISS_NUM ;
561: x_act_metric_rec.last_calculated_date := Fnd_Api.G_MISS_DATE ;
562: x_act_metric_rec.variable_value := Fnd_Api.G_MISS_NUM ;
563: x_act_metric_rec.forecasted_variable_value := Fnd_Api.G_MISS_NUM;
556: x_act_metric_rec.functional_currency_code := Fnd_Api.G_MISS_CHAR ;
557: x_act_metric_rec.func_forecasted_value := Fnd_Api.G_MISS_NUM ;
558: x_act_metric_rec.dirty_flag := Fnd_Api.G_MISS_CHAR ;
559: x_act_metric_rec.func_committed_value := Fnd_Api.G_MISS_NUM ;
560: x_act_metric_rec.func_actual_value := Fnd_Api.G_MISS_NUM ;
561: x_act_metric_rec.last_calculated_date := Fnd_Api.G_MISS_DATE ;
562: x_act_metric_rec.variable_value := Fnd_Api.G_MISS_NUM ;
563: x_act_metric_rec.forecasted_variable_value := Fnd_Api.G_MISS_NUM;
564: x_act_metric_rec.computed_using_function_value := Fnd_Api.G_MISS_NUM ;
557: x_act_metric_rec.func_forecasted_value := Fnd_Api.G_MISS_NUM ;
558: x_act_metric_rec.dirty_flag := Fnd_Api.G_MISS_CHAR ;
559: x_act_metric_rec.func_committed_value := Fnd_Api.G_MISS_NUM ;
560: x_act_metric_rec.func_actual_value := Fnd_Api.G_MISS_NUM ;
561: x_act_metric_rec.last_calculated_date := Fnd_Api.G_MISS_DATE ;
562: x_act_metric_rec.variable_value := Fnd_Api.G_MISS_NUM ;
563: x_act_metric_rec.forecasted_variable_value := Fnd_Api.G_MISS_NUM;
564: x_act_metric_rec.computed_using_function_value := Fnd_Api.G_MISS_NUM ;
565: x_act_metric_rec.metric_uom_code := Fnd_Api.G_MISS_CHAR ;
558: x_act_metric_rec.dirty_flag := Fnd_Api.G_MISS_CHAR ;
559: x_act_metric_rec.func_committed_value := Fnd_Api.G_MISS_NUM ;
560: x_act_metric_rec.func_actual_value := Fnd_Api.G_MISS_NUM ;
561: x_act_metric_rec.last_calculated_date := Fnd_Api.G_MISS_DATE ;
562: x_act_metric_rec.variable_value := Fnd_Api.G_MISS_NUM ;
563: x_act_metric_rec.forecasted_variable_value := Fnd_Api.G_MISS_NUM;
564: x_act_metric_rec.computed_using_function_value := Fnd_Api.G_MISS_NUM ;
565: x_act_metric_rec.metric_uom_code := Fnd_Api.G_MISS_CHAR ;
566: x_act_metric_rec.org_id := Fnd_Api.G_MISS_NUM ;
559: x_act_metric_rec.func_committed_value := Fnd_Api.G_MISS_NUM ;
560: x_act_metric_rec.func_actual_value := Fnd_Api.G_MISS_NUM ;
561: x_act_metric_rec.last_calculated_date := Fnd_Api.G_MISS_DATE ;
562: x_act_metric_rec.variable_value := Fnd_Api.G_MISS_NUM ;
563: x_act_metric_rec.forecasted_variable_value := Fnd_Api.G_MISS_NUM;
564: x_act_metric_rec.computed_using_function_value := Fnd_Api.G_MISS_NUM ;
565: x_act_metric_rec.metric_uom_code := Fnd_Api.G_MISS_CHAR ;
566: x_act_metric_rec.org_id := Fnd_Api.G_MISS_NUM ;
567: x_act_metric_rec.difference_since_last_calc := Fnd_Api.G_MISS_NUM ;
560: x_act_metric_rec.func_actual_value := Fnd_Api.G_MISS_NUM ;
561: x_act_metric_rec.last_calculated_date := Fnd_Api.G_MISS_DATE ;
562: x_act_metric_rec.variable_value := Fnd_Api.G_MISS_NUM ;
563: x_act_metric_rec.forecasted_variable_value := Fnd_Api.G_MISS_NUM;
564: x_act_metric_rec.computed_using_function_value := Fnd_Api.G_MISS_NUM ;
565: x_act_metric_rec.metric_uom_code := Fnd_Api.G_MISS_CHAR ;
566: x_act_metric_rec.org_id := Fnd_Api.G_MISS_NUM ;
567: x_act_metric_rec.difference_since_last_calc := Fnd_Api.G_MISS_NUM ;
568: x_act_metric_rec.activity_metric_origin_id := Fnd_Api.G_MISS_NUM ;
561: x_act_metric_rec.last_calculated_date := Fnd_Api.G_MISS_DATE ;
562: x_act_metric_rec.variable_value := Fnd_Api.G_MISS_NUM ;
563: x_act_metric_rec.forecasted_variable_value := Fnd_Api.G_MISS_NUM;
564: x_act_metric_rec.computed_using_function_value := Fnd_Api.G_MISS_NUM ;
565: x_act_metric_rec.metric_uom_code := Fnd_Api.G_MISS_CHAR ;
566: x_act_metric_rec.org_id := Fnd_Api.G_MISS_NUM ;
567: x_act_metric_rec.difference_since_last_calc := Fnd_Api.G_MISS_NUM ;
568: x_act_metric_rec.activity_metric_origin_id := Fnd_Api.G_MISS_NUM ;
569: x_act_metric_rec.arc_activity_metric_origin := Fnd_Api.G_MISS_CHAR ;
562: x_act_metric_rec.variable_value := Fnd_Api.G_MISS_NUM ;
563: x_act_metric_rec.forecasted_variable_value := Fnd_Api.G_MISS_NUM;
564: x_act_metric_rec.computed_using_function_value := Fnd_Api.G_MISS_NUM ;
565: x_act_metric_rec.metric_uom_code := Fnd_Api.G_MISS_CHAR ;
566: x_act_metric_rec.org_id := Fnd_Api.G_MISS_NUM ;
567: x_act_metric_rec.difference_since_last_calc := Fnd_Api.G_MISS_NUM ;
568: x_act_metric_rec.activity_metric_origin_id := Fnd_Api.G_MISS_NUM ;
569: x_act_metric_rec.arc_activity_metric_origin := Fnd_Api.G_MISS_CHAR ;
570: x_act_metric_rec.days_since_last_refresh := Fnd_Api.G_MISS_NUM ;
563: x_act_metric_rec.forecasted_variable_value := Fnd_Api.G_MISS_NUM;
564: x_act_metric_rec.computed_using_function_value := Fnd_Api.G_MISS_NUM ;
565: x_act_metric_rec.metric_uom_code := Fnd_Api.G_MISS_CHAR ;
566: x_act_metric_rec.org_id := Fnd_Api.G_MISS_NUM ;
567: x_act_metric_rec.difference_since_last_calc := Fnd_Api.G_MISS_NUM ;
568: x_act_metric_rec.activity_metric_origin_id := Fnd_Api.G_MISS_NUM ;
569: x_act_metric_rec.arc_activity_metric_origin := Fnd_Api.G_MISS_CHAR ;
570: x_act_metric_rec.days_since_last_refresh := Fnd_Api.G_MISS_NUM ;
571: x_act_metric_rec.scenario_id := Fnd_Api.G_MISS_NUM ;
564: x_act_metric_rec.computed_using_function_value := Fnd_Api.G_MISS_NUM ;
565: x_act_metric_rec.metric_uom_code := Fnd_Api.G_MISS_CHAR ;
566: x_act_metric_rec.org_id := Fnd_Api.G_MISS_NUM ;
567: x_act_metric_rec.difference_since_last_calc := Fnd_Api.G_MISS_NUM ;
568: x_act_metric_rec.activity_metric_origin_id := Fnd_Api.G_MISS_NUM ;
569: x_act_metric_rec.arc_activity_metric_origin := Fnd_Api.G_MISS_CHAR ;
570: x_act_metric_rec.days_since_last_refresh := Fnd_Api.G_MISS_NUM ;
571: x_act_metric_rec.scenario_id := Fnd_Api.G_MISS_NUM ;
572: /* yzhao: 09/24/2001 add following lines */
565: x_act_metric_rec.metric_uom_code := Fnd_Api.G_MISS_CHAR ;
566: x_act_metric_rec.org_id := Fnd_Api.G_MISS_NUM ;
567: x_act_metric_rec.difference_since_last_calc := Fnd_Api.G_MISS_NUM ;
568: x_act_metric_rec.activity_metric_origin_id := Fnd_Api.G_MISS_NUM ;
569: x_act_metric_rec.arc_activity_metric_origin := Fnd_Api.G_MISS_CHAR ;
570: x_act_metric_rec.days_since_last_refresh := Fnd_Api.G_MISS_NUM ;
571: x_act_metric_rec.scenario_id := Fnd_Api.G_MISS_NUM ;
572: /* yzhao: 09/24/2001 add following lines */
573: x_act_metric_rec.summarize_to_metric := Fnd_Api.G_MISS_NUM ;
566: x_act_metric_rec.org_id := Fnd_Api.G_MISS_NUM ;
567: x_act_metric_rec.difference_since_last_calc := Fnd_Api.G_MISS_NUM ;
568: x_act_metric_rec.activity_metric_origin_id := Fnd_Api.G_MISS_NUM ;
569: x_act_metric_rec.arc_activity_metric_origin := Fnd_Api.G_MISS_CHAR ;
570: x_act_metric_rec.days_since_last_refresh := Fnd_Api.G_MISS_NUM ;
571: x_act_metric_rec.scenario_id := Fnd_Api.G_MISS_NUM ;
572: /* yzhao: 09/24/2001 add following lines */
573: x_act_metric_rec.summarize_to_metric := Fnd_Api.G_MISS_NUM ;
574: x_act_metric_rec.rollup_to_metric := Fnd_Api.G_MISS_NUM ;
567: x_act_metric_rec.difference_since_last_calc := Fnd_Api.G_MISS_NUM ;
568: x_act_metric_rec.activity_metric_origin_id := Fnd_Api.G_MISS_NUM ;
569: x_act_metric_rec.arc_activity_metric_origin := Fnd_Api.G_MISS_CHAR ;
570: x_act_metric_rec.days_since_last_refresh := Fnd_Api.G_MISS_NUM ;
571: x_act_metric_rec.scenario_id := Fnd_Api.G_MISS_NUM ;
572: /* yzhao: 09/24/2001 add following lines */
573: x_act_metric_rec.summarize_to_metric := Fnd_Api.G_MISS_NUM ;
574: x_act_metric_rec.rollup_to_metric := Fnd_Api.G_MISS_NUM ;
575: x_act_metric_rec.hierarchy_id := Fnd_Api.G_MISS_NUM ;
569: x_act_metric_rec.arc_activity_metric_origin := Fnd_Api.G_MISS_CHAR ;
570: x_act_metric_rec.days_since_last_refresh := Fnd_Api.G_MISS_NUM ;
571: x_act_metric_rec.scenario_id := Fnd_Api.G_MISS_NUM ;
572: /* yzhao: 09/24/2001 add following lines */
573: x_act_metric_rec.summarize_to_metric := Fnd_Api.G_MISS_NUM ;
574: x_act_metric_rec.rollup_to_metric := Fnd_Api.G_MISS_NUM ;
575: x_act_metric_rec.hierarchy_id := Fnd_Api.G_MISS_NUM ;
576: x_act_metric_rec.start_node := Fnd_Api.G_MISS_NUM ;
577: x_act_metric_rec.from_level := Fnd_Api.G_MISS_NUM ;
570: x_act_metric_rec.days_since_last_refresh := Fnd_Api.G_MISS_NUM ;
571: x_act_metric_rec.scenario_id := Fnd_Api.G_MISS_NUM ;
572: /* yzhao: 09/24/2001 add following lines */
573: x_act_metric_rec.summarize_to_metric := Fnd_Api.G_MISS_NUM ;
574: x_act_metric_rec.rollup_to_metric := Fnd_Api.G_MISS_NUM ;
575: x_act_metric_rec.hierarchy_id := Fnd_Api.G_MISS_NUM ;
576: x_act_metric_rec.start_node := Fnd_Api.G_MISS_NUM ;
577: x_act_metric_rec.from_level := Fnd_Api.G_MISS_NUM ;
578: x_act_metric_rec.to_level := Fnd_Api.G_MISS_NUM ;
571: x_act_metric_rec.scenario_id := Fnd_Api.G_MISS_NUM ;
572: /* yzhao: 09/24/2001 add following lines */
573: x_act_metric_rec.summarize_to_metric := Fnd_Api.G_MISS_NUM ;
574: x_act_metric_rec.rollup_to_metric := Fnd_Api.G_MISS_NUM ;
575: x_act_metric_rec.hierarchy_id := Fnd_Api.G_MISS_NUM ;
576: x_act_metric_rec.start_node := Fnd_Api.G_MISS_NUM ;
577: x_act_metric_rec.from_level := Fnd_Api.G_MISS_NUM ;
578: x_act_metric_rec.to_level := Fnd_Api.G_MISS_NUM ;
579: x_act_metric_rec.from_date := Fnd_Api.G_MISS_DATE ;
572: /* yzhao: 09/24/2001 add following lines */
573: x_act_metric_rec.summarize_to_metric := Fnd_Api.G_MISS_NUM ;
574: x_act_metric_rec.rollup_to_metric := Fnd_Api.G_MISS_NUM ;
575: x_act_metric_rec.hierarchy_id := Fnd_Api.G_MISS_NUM ;
576: x_act_metric_rec.start_node := Fnd_Api.G_MISS_NUM ;
577: x_act_metric_rec.from_level := Fnd_Api.G_MISS_NUM ;
578: x_act_metric_rec.to_level := Fnd_Api.G_MISS_NUM ;
579: x_act_metric_rec.from_date := Fnd_Api.G_MISS_DATE ;
580: x_act_metric_rec.TO_DATE := Fnd_Api.G_MISS_DATE ;
573: x_act_metric_rec.summarize_to_metric := Fnd_Api.G_MISS_NUM ;
574: x_act_metric_rec.rollup_to_metric := Fnd_Api.G_MISS_NUM ;
575: x_act_metric_rec.hierarchy_id := Fnd_Api.G_MISS_NUM ;
576: x_act_metric_rec.start_node := Fnd_Api.G_MISS_NUM ;
577: x_act_metric_rec.from_level := Fnd_Api.G_MISS_NUM ;
578: x_act_metric_rec.to_level := Fnd_Api.G_MISS_NUM ;
579: x_act_metric_rec.from_date := Fnd_Api.G_MISS_DATE ;
580: x_act_metric_rec.TO_DATE := Fnd_Api.G_MISS_DATE ;
581: x_act_metric_rec.amount1 := Fnd_Api.G_MISS_NUM ;
574: x_act_metric_rec.rollup_to_metric := Fnd_Api.G_MISS_NUM ;
575: x_act_metric_rec.hierarchy_id := Fnd_Api.G_MISS_NUM ;
576: x_act_metric_rec.start_node := Fnd_Api.G_MISS_NUM ;
577: x_act_metric_rec.from_level := Fnd_Api.G_MISS_NUM ;
578: x_act_metric_rec.to_level := Fnd_Api.G_MISS_NUM ;
579: x_act_metric_rec.from_date := Fnd_Api.G_MISS_DATE ;
580: x_act_metric_rec.TO_DATE := Fnd_Api.G_MISS_DATE ;
581: x_act_metric_rec.amount1 := Fnd_Api.G_MISS_NUM ;
582: x_act_metric_rec.amount2 := Fnd_Api.G_MISS_NUM ;
575: x_act_metric_rec.hierarchy_id := Fnd_Api.G_MISS_NUM ;
576: x_act_metric_rec.start_node := Fnd_Api.G_MISS_NUM ;
577: x_act_metric_rec.from_level := Fnd_Api.G_MISS_NUM ;
578: x_act_metric_rec.to_level := Fnd_Api.G_MISS_NUM ;
579: x_act_metric_rec.from_date := Fnd_Api.G_MISS_DATE ;
580: x_act_metric_rec.TO_DATE := Fnd_Api.G_MISS_DATE ;
581: x_act_metric_rec.amount1 := Fnd_Api.G_MISS_NUM ;
582: x_act_metric_rec.amount2 := Fnd_Api.G_MISS_NUM ;
583: x_act_metric_rec.amount3 := Fnd_Api.G_MISS_NUM ;
576: x_act_metric_rec.start_node := Fnd_Api.G_MISS_NUM ;
577: x_act_metric_rec.from_level := Fnd_Api.G_MISS_NUM ;
578: x_act_metric_rec.to_level := Fnd_Api.G_MISS_NUM ;
579: x_act_metric_rec.from_date := Fnd_Api.G_MISS_DATE ;
580: x_act_metric_rec.TO_DATE := Fnd_Api.G_MISS_DATE ;
581: x_act_metric_rec.amount1 := Fnd_Api.G_MISS_NUM ;
582: x_act_metric_rec.amount2 := Fnd_Api.G_MISS_NUM ;
583: x_act_metric_rec.amount3 := Fnd_Api.G_MISS_NUM ;
584: x_act_metric_rec.percent1 := Fnd_Api.G_MISS_NUM ;
577: x_act_metric_rec.from_level := Fnd_Api.G_MISS_NUM ;
578: x_act_metric_rec.to_level := Fnd_Api.G_MISS_NUM ;
579: x_act_metric_rec.from_date := Fnd_Api.G_MISS_DATE ;
580: x_act_metric_rec.TO_DATE := Fnd_Api.G_MISS_DATE ;
581: x_act_metric_rec.amount1 := Fnd_Api.G_MISS_NUM ;
582: x_act_metric_rec.amount2 := Fnd_Api.G_MISS_NUM ;
583: x_act_metric_rec.amount3 := Fnd_Api.G_MISS_NUM ;
584: x_act_metric_rec.percent1 := Fnd_Api.G_MISS_NUM ;
585: x_act_metric_rec.percent2 := Fnd_Api.G_MISS_NUM ;
578: x_act_metric_rec.to_level := Fnd_Api.G_MISS_NUM ;
579: x_act_metric_rec.from_date := Fnd_Api.G_MISS_DATE ;
580: x_act_metric_rec.TO_DATE := Fnd_Api.G_MISS_DATE ;
581: x_act_metric_rec.amount1 := Fnd_Api.G_MISS_NUM ;
582: x_act_metric_rec.amount2 := Fnd_Api.G_MISS_NUM ;
583: x_act_metric_rec.amount3 := Fnd_Api.G_MISS_NUM ;
584: x_act_metric_rec.percent1 := Fnd_Api.G_MISS_NUM ;
585: x_act_metric_rec.percent2 := Fnd_Api.G_MISS_NUM ;
586: x_act_metric_rec.percent3 := Fnd_Api.G_MISS_NUM ;
579: x_act_metric_rec.from_date := Fnd_Api.G_MISS_DATE ;
580: x_act_metric_rec.TO_DATE := Fnd_Api.G_MISS_DATE ;
581: x_act_metric_rec.amount1 := Fnd_Api.G_MISS_NUM ;
582: x_act_metric_rec.amount2 := Fnd_Api.G_MISS_NUM ;
583: x_act_metric_rec.amount3 := Fnd_Api.G_MISS_NUM ;
584: x_act_metric_rec.percent1 := Fnd_Api.G_MISS_NUM ;
585: x_act_metric_rec.percent2 := Fnd_Api.G_MISS_NUM ;
586: x_act_metric_rec.percent3 := Fnd_Api.G_MISS_NUM ;
587: x_act_metric_rec.published_flag := Fnd_Api.G_MISS_CHAR ;
580: x_act_metric_rec.TO_DATE := Fnd_Api.G_MISS_DATE ;
581: x_act_metric_rec.amount1 := Fnd_Api.G_MISS_NUM ;
582: x_act_metric_rec.amount2 := Fnd_Api.G_MISS_NUM ;
583: x_act_metric_rec.amount3 := Fnd_Api.G_MISS_NUM ;
584: x_act_metric_rec.percent1 := Fnd_Api.G_MISS_NUM ;
585: x_act_metric_rec.percent2 := Fnd_Api.G_MISS_NUM ;
586: x_act_metric_rec.percent3 := Fnd_Api.G_MISS_NUM ;
587: x_act_metric_rec.published_flag := Fnd_Api.G_MISS_CHAR ;
588: x_act_metric_rec.pre_function_name := Fnd_Api.G_MISS_CHAR ;
581: x_act_metric_rec.amount1 := Fnd_Api.G_MISS_NUM ;
582: x_act_metric_rec.amount2 := Fnd_Api.G_MISS_NUM ;
583: x_act_metric_rec.amount3 := Fnd_Api.G_MISS_NUM ;
584: x_act_metric_rec.percent1 := Fnd_Api.G_MISS_NUM ;
585: x_act_metric_rec.percent2 := Fnd_Api.G_MISS_NUM ;
586: x_act_metric_rec.percent3 := Fnd_Api.G_MISS_NUM ;
587: x_act_metric_rec.published_flag := Fnd_Api.G_MISS_CHAR ;
588: x_act_metric_rec.pre_function_name := Fnd_Api.G_MISS_CHAR ;
589: x_act_metric_rec.post_function_name := Fnd_Api.G_MISS_CHAR ;
582: x_act_metric_rec.amount2 := Fnd_Api.G_MISS_NUM ;
583: x_act_metric_rec.amount3 := Fnd_Api.G_MISS_NUM ;
584: x_act_metric_rec.percent1 := Fnd_Api.G_MISS_NUM ;
585: x_act_metric_rec.percent2 := Fnd_Api.G_MISS_NUM ;
586: x_act_metric_rec.percent3 := Fnd_Api.G_MISS_NUM ;
587: x_act_metric_rec.published_flag := Fnd_Api.G_MISS_CHAR ;
588: x_act_metric_rec.pre_function_name := Fnd_Api.G_MISS_CHAR ;
589: x_act_metric_rec.post_function_name := Fnd_Api.G_MISS_CHAR ;
590: -- x_act_metric_rec.security_group_id := Fnd_Api.G_MISS_NUM ;
583: x_act_metric_rec.amount3 := Fnd_Api.G_MISS_NUM ;
584: x_act_metric_rec.percent1 := Fnd_Api.G_MISS_NUM ;
585: x_act_metric_rec.percent2 := Fnd_Api.G_MISS_NUM ;
586: x_act_metric_rec.percent3 := Fnd_Api.G_MISS_NUM ;
587: x_act_metric_rec.published_flag := Fnd_Api.G_MISS_CHAR ;
588: x_act_metric_rec.pre_function_name := Fnd_Api.G_MISS_CHAR ;
589: x_act_metric_rec.post_function_name := Fnd_Api.G_MISS_CHAR ;
590: -- x_act_metric_rec.security_group_id := Fnd_Api.G_MISS_NUM ;
591: /* yzhao: 09/24/2001 ends */
584: x_act_metric_rec.percent1 := Fnd_Api.G_MISS_NUM ;
585: x_act_metric_rec.percent2 := Fnd_Api.G_MISS_NUM ;
586: x_act_metric_rec.percent3 := Fnd_Api.G_MISS_NUM ;
587: x_act_metric_rec.published_flag := Fnd_Api.G_MISS_CHAR ;
588: x_act_metric_rec.pre_function_name := Fnd_Api.G_MISS_CHAR ;
589: x_act_metric_rec.post_function_name := Fnd_Api.G_MISS_CHAR ;
590: -- x_act_metric_rec.security_group_id := Fnd_Api.G_MISS_NUM ;
591: /* yzhao: 09/24/2001 ends */
592: x_act_metric_rec.attribute_category := Fnd_Api.G_MISS_CHAR ;
585: x_act_metric_rec.percent2 := Fnd_Api.G_MISS_NUM ;
586: x_act_metric_rec.percent3 := Fnd_Api.G_MISS_NUM ;
587: x_act_metric_rec.published_flag := Fnd_Api.G_MISS_CHAR ;
588: x_act_metric_rec.pre_function_name := Fnd_Api.G_MISS_CHAR ;
589: x_act_metric_rec.post_function_name := Fnd_Api.G_MISS_CHAR ;
590: -- x_act_metric_rec.security_group_id := Fnd_Api.G_MISS_NUM ;
591: /* yzhao: 09/24/2001 ends */
592: x_act_metric_rec.attribute_category := Fnd_Api.G_MISS_CHAR ;
593: x_act_metric_rec.attribute1 := Fnd_Api.G_MISS_CHAR ;
586: x_act_metric_rec.percent3 := Fnd_Api.G_MISS_NUM ;
587: x_act_metric_rec.published_flag := Fnd_Api.G_MISS_CHAR ;
588: x_act_metric_rec.pre_function_name := Fnd_Api.G_MISS_CHAR ;
589: x_act_metric_rec.post_function_name := Fnd_Api.G_MISS_CHAR ;
590: -- x_act_metric_rec.security_group_id := Fnd_Api.G_MISS_NUM ;
591: /* yzhao: 09/24/2001 ends */
592: x_act_metric_rec.attribute_category := Fnd_Api.G_MISS_CHAR ;
593: x_act_metric_rec.attribute1 := Fnd_Api.G_MISS_CHAR ;
594: x_act_metric_rec.attribute2 := Fnd_Api.G_MISS_CHAR ;
588: x_act_metric_rec.pre_function_name := Fnd_Api.G_MISS_CHAR ;
589: x_act_metric_rec.post_function_name := Fnd_Api.G_MISS_CHAR ;
590: -- x_act_metric_rec.security_group_id := Fnd_Api.G_MISS_NUM ;
591: /* yzhao: 09/24/2001 ends */
592: x_act_metric_rec.attribute_category := Fnd_Api.G_MISS_CHAR ;
593: x_act_metric_rec.attribute1 := Fnd_Api.G_MISS_CHAR ;
594: x_act_metric_rec.attribute2 := Fnd_Api.G_MISS_CHAR ;
595: x_act_metric_rec.attribute3 := Fnd_Api.G_MISS_CHAR ;
596: x_act_metric_rec.attribute4 := Fnd_Api.G_MISS_CHAR ;
589: x_act_metric_rec.post_function_name := Fnd_Api.G_MISS_CHAR ;
590: -- x_act_metric_rec.security_group_id := Fnd_Api.G_MISS_NUM ;
591: /* yzhao: 09/24/2001 ends */
592: x_act_metric_rec.attribute_category := Fnd_Api.G_MISS_CHAR ;
593: x_act_metric_rec.attribute1 := Fnd_Api.G_MISS_CHAR ;
594: x_act_metric_rec.attribute2 := Fnd_Api.G_MISS_CHAR ;
595: x_act_metric_rec.attribute3 := Fnd_Api.G_MISS_CHAR ;
596: x_act_metric_rec.attribute4 := Fnd_Api.G_MISS_CHAR ;
597: x_act_metric_rec.attribute5 := Fnd_Api.G_MISS_CHAR ;
590: -- x_act_metric_rec.security_group_id := Fnd_Api.G_MISS_NUM ;
591: /* yzhao: 09/24/2001 ends */
592: x_act_metric_rec.attribute_category := Fnd_Api.G_MISS_CHAR ;
593: x_act_metric_rec.attribute1 := Fnd_Api.G_MISS_CHAR ;
594: x_act_metric_rec.attribute2 := Fnd_Api.G_MISS_CHAR ;
595: x_act_metric_rec.attribute3 := Fnd_Api.G_MISS_CHAR ;
596: x_act_metric_rec.attribute4 := Fnd_Api.G_MISS_CHAR ;
597: x_act_metric_rec.attribute5 := Fnd_Api.G_MISS_CHAR ;
598: x_act_metric_rec.attribute6 := Fnd_Api.G_MISS_CHAR ;
591: /* yzhao: 09/24/2001 ends */
592: x_act_metric_rec.attribute_category := Fnd_Api.G_MISS_CHAR ;
593: x_act_metric_rec.attribute1 := Fnd_Api.G_MISS_CHAR ;
594: x_act_metric_rec.attribute2 := Fnd_Api.G_MISS_CHAR ;
595: x_act_metric_rec.attribute3 := Fnd_Api.G_MISS_CHAR ;
596: x_act_metric_rec.attribute4 := Fnd_Api.G_MISS_CHAR ;
597: x_act_metric_rec.attribute5 := Fnd_Api.G_MISS_CHAR ;
598: x_act_metric_rec.attribute6 := Fnd_Api.G_MISS_CHAR ;
599: x_act_metric_rec.attribute7 := Fnd_Api.G_MISS_CHAR ;
592: x_act_metric_rec.attribute_category := Fnd_Api.G_MISS_CHAR ;
593: x_act_metric_rec.attribute1 := Fnd_Api.G_MISS_CHAR ;
594: x_act_metric_rec.attribute2 := Fnd_Api.G_MISS_CHAR ;
595: x_act_metric_rec.attribute3 := Fnd_Api.G_MISS_CHAR ;
596: x_act_metric_rec.attribute4 := Fnd_Api.G_MISS_CHAR ;
597: x_act_metric_rec.attribute5 := Fnd_Api.G_MISS_CHAR ;
598: x_act_metric_rec.attribute6 := Fnd_Api.G_MISS_CHAR ;
599: x_act_metric_rec.attribute7 := Fnd_Api.G_MISS_CHAR ;
600: x_act_metric_rec.attribute8 := Fnd_Api.G_MISS_CHAR ;
593: x_act_metric_rec.attribute1 := Fnd_Api.G_MISS_CHAR ;
594: x_act_metric_rec.attribute2 := Fnd_Api.G_MISS_CHAR ;
595: x_act_metric_rec.attribute3 := Fnd_Api.G_MISS_CHAR ;
596: x_act_metric_rec.attribute4 := Fnd_Api.G_MISS_CHAR ;
597: x_act_metric_rec.attribute5 := Fnd_Api.G_MISS_CHAR ;
598: x_act_metric_rec.attribute6 := Fnd_Api.G_MISS_CHAR ;
599: x_act_metric_rec.attribute7 := Fnd_Api.G_MISS_CHAR ;
600: x_act_metric_rec.attribute8 := Fnd_Api.G_MISS_CHAR ;
601: x_act_metric_rec.attribute9 := Fnd_Api.G_MISS_CHAR ;
594: x_act_metric_rec.attribute2 := Fnd_Api.G_MISS_CHAR ;
595: x_act_metric_rec.attribute3 := Fnd_Api.G_MISS_CHAR ;
596: x_act_metric_rec.attribute4 := Fnd_Api.G_MISS_CHAR ;
597: x_act_metric_rec.attribute5 := Fnd_Api.G_MISS_CHAR ;
598: x_act_metric_rec.attribute6 := Fnd_Api.G_MISS_CHAR ;
599: x_act_metric_rec.attribute7 := Fnd_Api.G_MISS_CHAR ;
600: x_act_metric_rec.attribute8 := Fnd_Api.G_MISS_CHAR ;
601: x_act_metric_rec.attribute9 := Fnd_Api.G_MISS_CHAR ;
602: x_act_metric_rec.attribute10 := Fnd_Api.G_MISS_CHAR ;
595: x_act_metric_rec.attribute3 := Fnd_Api.G_MISS_CHAR ;
596: x_act_metric_rec.attribute4 := Fnd_Api.G_MISS_CHAR ;
597: x_act_metric_rec.attribute5 := Fnd_Api.G_MISS_CHAR ;
598: x_act_metric_rec.attribute6 := Fnd_Api.G_MISS_CHAR ;
599: x_act_metric_rec.attribute7 := Fnd_Api.G_MISS_CHAR ;
600: x_act_metric_rec.attribute8 := Fnd_Api.G_MISS_CHAR ;
601: x_act_metric_rec.attribute9 := Fnd_Api.G_MISS_CHAR ;
602: x_act_metric_rec.attribute10 := Fnd_Api.G_MISS_CHAR ;
603: x_act_metric_rec.attribute11 := Fnd_Api.G_MISS_CHAR ;
596: x_act_metric_rec.attribute4 := Fnd_Api.G_MISS_CHAR ;
597: x_act_metric_rec.attribute5 := Fnd_Api.G_MISS_CHAR ;
598: x_act_metric_rec.attribute6 := Fnd_Api.G_MISS_CHAR ;
599: x_act_metric_rec.attribute7 := Fnd_Api.G_MISS_CHAR ;
600: x_act_metric_rec.attribute8 := Fnd_Api.G_MISS_CHAR ;
601: x_act_metric_rec.attribute9 := Fnd_Api.G_MISS_CHAR ;
602: x_act_metric_rec.attribute10 := Fnd_Api.G_MISS_CHAR ;
603: x_act_metric_rec.attribute11 := Fnd_Api.G_MISS_CHAR ;
604: x_act_metric_rec.attribute12 := Fnd_Api.G_MISS_CHAR ;
597: x_act_metric_rec.attribute5 := Fnd_Api.G_MISS_CHAR ;
598: x_act_metric_rec.attribute6 := Fnd_Api.G_MISS_CHAR ;
599: x_act_metric_rec.attribute7 := Fnd_Api.G_MISS_CHAR ;
600: x_act_metric_rec.attribute8 := Fnd_Api.G_MISS_CHAR ;
601: x_act_metric_rec.attribute9 := Fnd_Api.G_MISS_CHAR ;
602: x_act_metric_rec.attribute10 := Fnd_Api.G_MISS_CHAR ;
603: x_act_metric_rec.attribute11 := Fnd_Api.G_MISS_CHAR ;
604: x_act_metric_rec.attribute12 := Fnd_Api.G_MISS_CHAR ;
605: x_act_metric_rec.attribute13 := Fnd_Api.G_MISS_CHAR ;
598: x_act_metric_rec.attribute6 := Fnd_Api.G_MISS_CHAR ;
599: x_act_metric_rec.attribute7 := Fnd_Api.G_MISS_CHAR ;
600: x_act_metric_rec.attribute8 := Fnd_Api.G_MISS_CHAR ;
601: x_act_metric_rec.attribute9 := Fnd_Api.G_MISS_CHAR ;
602: x_act_metric_rec.attribute10 := Fnd_Api.G_MISS_CHAR ;
603: x_act_metric_rec.attribute11 := Fnd_Api.G_MISS_CHAR ;
604: x_act_metric_rec.attribute12 := Fnd_Api.G_MISS_CHAR ;
605: x_act_metric_rec.attribute13 := Fnd_Api.G_MISS_CHAR ;
606: x_act_metric_rec.attribute14 := Fnd_Api.G_MISS_CHAR ;
599: x_act_metric_rec.attribute7 := Fnd_Api.G_MISS_CHAR ;
600: x_act_metric_rec.attribute8 := Fnd_Api.G_MISS_CHAR ;
601: x_act_metric_rec.attribute9 := Fnd_Api.G_MISS_CHAR ;
602: x_act_metric_rec.attribute10 := Fnd_Api.G_MISS_CHAR ;
603: x_act_metric_rec.attribute11 := Fnd_Api.G_MISS_CHAR ;
604: x_act_metric_rec.attribute12 := Fnd_Api.G_MISS_CHAR ;
605: x_act_metric_rec.attribute13 := Fnd_Api.G_MISS_CHAR ;
606: x_act_metric_rec.attribute14 := Fnd_Api.G_MISS_CHAR ;
607: x_act_metric_rec.attribute15 := Fnd_Api.G_MISS_CHAR ;
600: x_act_metric_rec.attribute8 := Fnd_Api.G_MISS_CHAR ;
601: x_act_metric_rec.attribute9 := Fnd_Api.G_MISS_CHAR ;
602: x_act_metric_rec.attribute10 := Fnd_Api.G_MISS_CHAR ;
603: x_act_metric_rec.attribute11 := Fnd_Api.G_MISS_CHAR ;
604: x_act_metric_rec.attribute12 := Fnd_Api.G_MISS_CHAR ;
605: x_act_metric_rec.attribute13 := Fnd_Api.G_MISS_CHAR ;
606: x_act_metric_rec.attribute14 := Fnd_Api.G_MISS_CHAR ;
607: x_act_metric_rec.attribute15 := Fnd_Api.G_MISS_CHAR ;
608: x_act_metric_rec.description := Fnd_Api.G_MISS_CHAR ;
601: x_act_metric_rec.attribute9 := Fnd_Api.G_MISS_CHAR ;
602: x_act_metric_rec.attribute10 := Fnd_Api.G_MISS_CHAR ;
603: x_act_metric_rec.attribute11 := Fnd_Api.G_MISS_CHAR ;
604: x_act_metric_rec.attribute12 := Fnd_Api.G_MISS_CHAR ;
605: x_act_metric_rec.attribute13 := Fnd_Api.G_MISS_CHAR ;
606: x_act_metric_rec.attribute14 := Fnd_Api.G_MISS_CHAR ;
607: x_act_metric_rec.attribute15 := Fnd_Api.G_MISS_CHAR ;
608: x_act_metric_rec.description := Fnd_Api.G_MISS_CHAR ;
609: x_act_metric_rec.act_metric_date := Fnd_Api.G_MISS_DATE ;
602: x_act_metric_rec.attribute10 := Fnd_Api.G_MISS_CHAR ;
603: x_act_metric_rec.attribute11 := Fnd_Api.G_MISS_CHAR ;
604: x_act_metric_rec.attribute12 := Fnd_Api.G_MISS_CHAR ;
605: x_act_metric_rec.attribute13 := Fnd_Api.G_MISS_CHAR ;
606: x_act_metric_rec.attribute14 := Fnd_Api.G_MISS_CHAR ;
607: x_act_metric_rec.attribute15 := Fnd_Api.G_MISS_CHAR ;
608: x_act_metric_rec.description := Fnd_Api.G_MISS_CHAR ;
609: x_act_metric_rec.act_metric_date := Fnd_Api.G_MISS_DATE ;
610: x_act_metric_rec.depend_act_metric := Fnd_Api.G_MISS_NUM ;
603: x_act_metric_rec.attribute11 := Fnd_Api.G_MISS_CHAR ;
604: x_act_metric_rec.attribute12 := Fnd_Api.G_MISS_CHAR ;
605: x_act_metric_rec.attribute13 := Fnd_Api.G_MISS_CHAR ;
606: x_act_metric_rec.attribute14 := Fnd_Api.G_MISS_CHAR ;
607: x_act_metric_rec.attribute15 := Fnd_Api.G_MISS_CHAR ;
608: x_act_metric_rec.description := Fnd_Api.G_MISS_CHAR ;
609: x_act_metric_rec.act_metric_date := Fnd_Api.G_MISS_DATE ;
610: x_act_metric_rec.depend_act_metric := Fnd_Api.G_MISS_NUM ;
611: x_act_metric_rec.function_used_by_id := Fnd_Api.G_MISS_NUM ;
604: x_act_metric_rec.attribute12 := Fnd_Api.G_MISS_CHAR ;
605: x_act_metric_rec.attribute13 := Fnd_Api.G_MISS_CHAR ;
606: x_act_metric_rec.attribute14 := Fnd_Api.G_MISS_CHAR ;
607: x_act_metric_rec.attribute15 := Fnd_Api.G_MISS_CHAR ;
608: x_act_metric_rec.description := Fnd_Api.G_MISS_CHAR ;
609: x_act_metric_rec.act_metric_date := Fnd_Api.G_MISS_DATE ;
610: x_act_metric_rec.depend_act_metric := Fnd_Api.G_MISS_NUM ;
611: x_act_metric_rec.function_used_by_id := Fnd_Api.G_MISS_NUM ;
612: x_act_metric_rec.arc_function_used_by := Fnd_Api.G_MISS_CHAR ;
605: x_act_metric_rec.attribute13 := Fnd_Api.G_MISS_CHAR ;
606: x_act_metric_rec.attribute14 := Fnd_Api.G_MISS_CHAR ;
607: x_act_metric_rec.attribute15 := Fnd_Api.G_MISS_CHAR ;
608: x_act_metric_rec.description := Fnd_Api.G_MISS_CHAR ;
609: x_act_metric_rec.act_metric_date := Fnd_Api.G_MISS_DATE ;
610: x_act_metric_rec.depend_act_metric := Fnd_Api.G_MISS_NUM ;
611: x_act_metric_rec.function_used_by_id := Fnd_Api.G_MISS_NUM ;
612: x_act_metric_rec.arc_function_used_by := Fnd_Api.G_MISS_CHAR ;
613: /* 05/15/2002 yzhao: 11.5.9 add 6 new columns for top-down bottom-up budgeting */
606: x_act_metric_rec.attribute14 := Fnd_Api.G_MISS_CHAR ;
607: x_act_metric_rec.attribute15 := Fnd_Api.G_MISS_CHAR ;
608: x_act_metric_rec.description := Fnd_Api.G_MISS_CHAR ;
609: x_act_metric_rec.act_metric_date := Fnd_Api.G_MISS_DATE ;
610: x_act_metric_rec.depend_act_metric := Fnd_Api.G_MISS_NUM ;
611: x_act_metric_rec.function_used_by_id := Fnd_Api.G_MISS_NUM ;
612: x_act_metric_rec.arc_function_used_by := Fnd_Api.G_MISS_CHAR ;
613: /* 05/15/2002 yzhao: 11.5.9 add 6 new columns for top-down bottom-up budgeting */
614: x_act_metric_rec.hierarchy_type := Fnd_Api.G_MISS_CHAR ;
607: x_act_metric_rec.attribute15 := Fnd_Api.G_MISS_CHAR ;
608: x_act_metric_rec.description := Fnd_Api.G_MISS_CHAR ;
609: x_act_metric_rec.act_metric_date := Fnd_Api.G_MISS_DATE ;
610: x_act_metric_rec.depend_act_metric := Fnd_Api.G_MISS_NUM ;
611: x_act_metric_rec.function_used_by_id := Fnd_Api.G_MISS_NUM ;
612: x_act_metric_rec.arc_function_used_by := Fnd_Api.G_MISS_CHAR ;
613: /* 05/15/2002 yzhao: 11.5.9 add 6 new columns for top-down bottom-up budgeting */
614: x_act_metric_rec.hierarchy_type := Fnd_Api.G_MISS_CHAR ;
615: x_act_metric_rec.status_code := Fnd_Api.G_MISS_CHAR ;
608: x_act_metric_rec.description := Fnd_Api.G_MISS_CHAR ;
609: x_act_metric_rec.act_metric_date := Fnd_Api.G_MISS_DATE ;
610: x_act_metric_rec.depend_act_metric := Fnd_Api.G_MISS_NUM ;
611: x_act_metric_rec.function_used_by_id := Fnd_Api.G_MISS_NUM ;
612: x_act_metric_rec.arc_function_used_by := Fnd_Api.G_MISS_CHAR ;
613: /* 05/15/2002 yzhao: 11.5.9 add 6 new columns for top-down bottom-up budgeting */
614: x_act_metric_rec.hierarchy_type := Fnd_Api.G_MISS_CHAR ;
615: x_act_metric_rec.status_code := Fnd_Api.G_MISS_CHAR ;
616: x_act_metric_rec.method_code := Fnd_Api.G_MISS_CHAR ;
610: x_act_metric_rec.depend_act_metric := Fnd_Api.G_MISS_NUM ;
611: x_act_metric_rec.function_used_by_id := Fnd_Api.G_MISS_NUM ;
612: x_act_metric_rec.arc_function_used_by := Fnd_Api.G_MISS_CHAR ;
613: /* 05/15/2002 yzhao: 11.5.9 add 6 new columns for top-down bottom-up budgeting */
614: x_act_metric_rec.hierarchy_type := Fnd_Api.G_MISS_CHAR ;
615: x_act_metric_rec.status_code := Fnd_Api.G_MISS_CHAR ;
616: x_act_metric_rec.method_code := Fnd_Api.G_MISS_CHAR ;
617: x_act_metric_rec.action_code := Fnd_Api.G_MISS_CHAR ;
618: x_act_metric_rec.basis_year := Fnd_Api.G_MISS_NUM ;
611: x_act_metric_rec.function_used_by_id := Fnd_Api.G_MISS_NUM ;
612: x_act_metric_rec.arc_function_used_by := Fnd_Api.G_MISS_CHAR ;
613: /* 05/15/2002 yzhao: 11.5.9 add 6 new columns for top-down bottom-up budgeting */
614: x_act_metric_rec.hierarchy_type := Fnd_Api.G_MISS_CHAR ;
615: x_act_metric_rec.status_code := Fnd_Api.G_MISS_CHAR ;
616: x_act_metric_rec.method_code := Fnd_Api.G_MISS_CHAR ;
617: x_act_metric_rec.action_code := Fnd_Api.G_MISS_CHAR ;
618: x_act_metric_rec.basis_year := Fnd_Api.G_MISS_NUM ;
619: x_act_metric_rec.ex_start_node := Fnd_Api.G_MISS_CHAR ;
612: x_act_metric_rec.arc_function_used_by := Fnd_Api.G_MISS_CHAR ;
613: /* 05/15/2002 yzhao: 11.5.9 add 6 new columns for top-down bottom-up budgeting */
614: x_act_metric_rec.hierarchy_type := Fnd_Api.G_MISS_CHAR ;
615: x_act_metric_rec.status_code := Fnd_Api.G_MISS_CHAR ;
616: x_act_metric_rec.method_code := Fnd_Api.G_MISS_CHAR ;
617: x_act_metric_rec.action_code := Fnd_Api.G_MISS_CHAR ;
618: x_act_metric_rec.basis_year := Fnd_Api.G_MISS_NUM ;
619: x_act_metric_rec.ex_start_node := Fnd_Api.G_MISS_CHAR ;
620: /* 05/15/2002 yzhao: add ends */
613: /* 05/15/2002 yzhao: 11.5.9 add 6 new columns for top-down bottom-up budgeting */
614: x_act_metric_rec.hierarchy_type := Fnd_Api.G_MISS_CHAR ;
615: x_act_metric_rec.status_code := Fnd_Api.G_MISS_CHAR ;
616: x_act_metric_rec.method_code := Fnd_Api.G_MISS_CHAR ;
617: x_act_metric_rec.action_code := Fnd_Api.G_MISS_CHAR ;
618: x_act_metric_rec.basis_year := Fnd_Api.G_MISS_NUM ;
619: x_act_metric_rec.ex_start_node := Fnd_Api.G_MISS_CHAR ;
620: /* 05/15/2002 yzhao: add ends */
621: END Init_ActMetric_Rec;
614: x_act_metric_rec.hierarchy_type := Fnd_Api.G_MISS_CHAR ;
615: x_act_metric_rec.status_code := Fnd_Api.G_MISS_CHAR ;
616: x_act_metric_rec.method_code := Fnd_Api.G_MISS_CHAR ;
617: x_act_metric_rec.action_code := Fnd_Api.G_MISS_CHAR ;
618: x_act_metric_rec.basis_year := Fnd_Api.G_MISS_NUM ;
619: x_act_metric_rec.ex_start_node := Fnd_Api.G_MISS_CHAR ;
620: /* 05/15/2002 yzhao: add ends */
621: END Init_ActMetric_Rec;
622:
615: x_act_metric_rec.status_code := Fnd_Api.G_MISS_CHAR ;
616: x_act_metric_rec.method_code := Fnd_Api.G_MISS_CHAR ;
617: x_act_metric_rec.action_code := Fnd_Api.G_MISS_CHAR ;
618: x_act_metric_rec.basis_year := Fnd_Api.G_MISS_NUM ;
619: x_act_metric_rec.ex_start_node := Fnd_Api.G_MISS_CHAR ;
620: /* 05/15/2002 yzhao: add ends */
621: END Init_ActMetric_Rec;
622:
623:
733: -- End of comments
734:
735: PROCEDURE Create_ParentActMetric
736: (p_api_version IN NUMBER
737: ,p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE
738: ,p_commit IN VARCHAR2 := Fnd_Api.G_FALSE
739: ,p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full
740: ,p_act_metric_rec IN OUT NOCOPY act_metric_rec_type
741: ,x_act_metric_id OUT NOCOPY NUMBER
734:
735: PROCEDURE Create_ParentActMetric
736: (p_api_version IN NUMBER
737: ,p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE
738: ,p_commit IN VARCHAR2 := Fnd_Api.G_FALSE
739: ,p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full
740: ,p_act_metric_rec IN OUT NOCOPY act_metric_rec_type
741: ,x_act_metric_id OUT NOCOPY NUMBER
742: )
735: PROCEDURE Create_ParentActMetric
736: (p_api_version IN NUMBER
737: ,p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE
738: ,p_commit IN VARCHAR2 := Fnd_Api.G_FALSE
739: ,p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full
740: ,p_act_metric_rec IN OUT NOCOPY act_metric_rec_type
741: ,x_act_metric_id OUT NOCOPY NUMBER
742: )
743: IS
961: x_return_status => x_return_status,
962: x_msg_count => l_msg_count,
963: x_msg_data => l_msg_data);
964:
965: IF x_return_status = Fnd_Api.G_RET_STS_ERROR THEN
966: IF(l_msg_count > 0) THEN
967: FOR i IN 1 .. l_msg_count
968: LOOP
969: l_msg_data := Fnd_Msg_Pub.get(i, Fnd_Api.g_false);
965: IF x_return_status = Fnd_Api.G_RET_STS_ERROR THEN
966: IF(l_msg_count > 0) THEN
967: FOR i IN 1 .. l_msg_count
968: LOOP
969: l_msg_data := Fnd_Msg_Pub.get(i, Fnd_Api.g_false);
970: END LOOP;
971: END IF;
972: CLOSE c_get_rollup_metrics;
973: RAISE Fnd_Api.G_EXC_ERROR;
969: l_msg_data := Fnd_Msg_Pub.get(i, Fnd_Api.g_false);
970: END LOOP;
971: END IF;
972: CLOSE c_get_rollup_metrics;
973: RAISE Fnd_Api.G_EXC_ERROR;
974: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
975: CLOSE c_get_rollup_metrics;
976: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
977: END IF; -- for IF l_return_status = FND_API.G_RET_STS_ERROR
970: END LOOP;
971: END IF;
972: CLOSE c_get_rollup_metrics;
973: RAISE Fnd_Api.G_EXC_ERROR;
974: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
975: CLOSE c_get_rollup_metrics;
976: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
977: END IF; -- for IF l_return_status = FND_API.G_RET_STS_ERROR
978: END IF; -- IF l_obj_trans_curr <> l_act_metric_trans_curr THEN
972: CLOSE c_get_rollup_metrics;
973: RAISE Fnd_Api.G_EXC_ERROR;
974: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
975: CLOSE c_get_rollup_metrics;
976: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
977: END IF; -- for IF l_return_status = FND_API.G_RET_STS_ERROR
978: END IF; -- IF l_obj_trans_curr <> l_act_metric_trans_curr THEN
979: END LOOP;
980: CLOSE c_get_rollup_metrics;
973: RAISE Fnd_Api.G_EXC_ERROR;
974: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
975: CLOSE c_get_rollup_metrics;
976: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
977: END IF; -- for IF l_return_status = FND_API.G_RET_STS_ERROR
978: END IF; -- IF l_obj_trans_curr <> l_act_metric_trans_curr THEN
979: END LOOP;
980: CLOSE c_get_rollup_metrics;
981:
1004: -- object's
1005: -- End of comments
1006:
1007: PROCEDURE Default_ActMetric(
1008: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
1009: --p_act_metric_rec IN act_metric_rec_type,
1010: p_validation_mode IN VARCHAR2 ,
1011: x_complete_rec IN OUT NOCOPY act_metric_rec_type,
1012: x_return_status OUT NOCOPY VARCHAR2,
1026:
1027: l_met_det_rec c_met_det%ROWTYPE ;
1028: l_obj_trans_curr VARCHAR2(15);
1029: l_return_status VARCHAR2(1);
1030: l_curr_return_status VARCHAR2(1) := Fnd_Api.G_RET_STS_SUCCESS;
1031: l_current_date DATE := SYSDATE;
1032: l_trans_actual_value number;
1033: l_trans_forecasted_value number;
1034:
1035: BEGIN
1036: --
1037: -- Initialize message list if p_init_msg_list is set to TRUE.
1038: --
1039: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN
1040: Fnd_Msg_Pub.Initialize;
1041: END IF;
1042:
1043: --
1042:
1043: --
1044: -- Initialize API return status to success.
1045: --
1046: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1047:
1048: -- x_complete_rec := p_act_metric_rec;
1049:
1050: -- OPEN c_met_det(p_act_metric_rec.metric_id);
1109: -- drive with functional value.
1110:
1111: IF l_met_det_rec.metric_calculation_type IN ('MANUAL', 'FUNCTION') THEN
1112: IF x_complete_rec.transaction_currency_code IS NOT NULL AND
1113: x_complete_rec.transaction_currency_code <> Fnd_Api.G_MISS_CHAR THEN
1114:
1115: l_trans_actual_value := x_complete_rec.trans_actual_value;
1116: l_trans_forecasted_value := x_complete_rec.trans_forecasted_value;
1117: -- Round the transaction values to the Minimum Accountable Unit.
1123: p_from_amount => l_trans_actual_value,
1124: x_to_amount => x_complete_rec.trans_actual_value,
1125: p_from_amount2 => l_trans_forecasted_value,
1126: x_to_amount2 => x_complete_rec.trans_forecasted_value,
1127: p_round => Fnd_Api.G_TRUE);
1128:
1129: IF (x_complete_rec.func_actual_value IS NOT NULL AND
1130: x_complete_rec.func_actual_value <> Fnd_Api.G_MISS_NUM) AND
1131: (x_complete_rec.trans_actual_value IS NULL
1126: x_to_amount2 => x_complete_rec.trans_forecasted_value,
1127: p_round => Fnd_Api.G_TRUE);
1128:
1129: IF (x_complete_rec.func_actual_value IS NOT NULL AND
1130: x_complete_rec.func_actual_value <> Fnd_Api.G_MISS_NUM) AND
1131: (x_complete_rec.trans_actual_value IS NULL
1132: /* OR l_met_det_rec.accrual_type = 'VARIABLE' */) THEN
1133:
1134: -- drive with func value
1139: p_to_currency => x_complete_rec.transaction_currency_code,
1140: p_conv_date => l_current_date,
1141: p_from_amount => NVL(x_complete_rec.func_actual_value,0),
1142: x_to_amount => x_complete_rec.trans_actual_value,
1143: p_round => Fnd_Api.G_TRUE);
1144: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1145: RAISE Fnd_Api.G_EXC_ERROR;
1146: END IF;
1147: ELSIF x_complete_rec.trans_actual_value IS NOT NULL AND
1140: p_conv_date => l_current_date,
1141: p_from_amount => NVL(x_complete_rec.func_actual_value,0),
1142: x_to_amount => x_complete_rec.trans_actual_value,
1143: p_round => Fnd_Api.G_TRUE);
1144: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1145: RAISE Fnd_Api.G_EXC_ERROR;
1146: END IF;
1147: ELSIF x_complete_rec.trans_actual_value IS NOT NULL AND
1148: x_complete_rec.trans_actual_value <> Fnd_Api.G_MISS_NUM THEN
1141: p_from_amount => NVL(x_complete_rec.func_actual_value,0),
1142: x_to_amount => x_complete_rec.trans_actual_value,
1143: p_round => Fnd_Api.G_TRUE);
1144: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1145: RAISE Fnd_Api.G_EXC_ERROR;
1146: END IF;
1147: ELSIF x_complete_rec.trans_actual_value IS NOT NULL AND
1148: x_complete_rec.trans_actual_value <> Fnd_Api.G_MISS_NUM THEN
1149: -- drive with trans value
1144: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1145: RAISE Fnd_Api.G_EXC_ERROR;
1146: END IF;
1147: ELSIF x_complete_rec.trans_actual_value IS NOT NULL AND
1148: x_complete_rec.trans_actual_value <> Fnd_Api.G_MISS_NUM THEN
1149: -- drive with trans value
1150: Convert_Currency (
1151: x_return_status => l_curr_return_status,
1152: p_from_currency => x_complete_rec.transaction_currency_code,
1153: p_to_currency => x_complete_rec.functional_currency_code,
1154: p_conv_date => l_current_date,
1155: p_from_amount => NVL(x_complete_rec.trans_actual_value,0),
1156: x_to_amount => x_complete_rec.func_actual_value,
1157: p_round => Fnd_Api.G_FALSE);
1158:
1159: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1160: RAISE Fnd_Api.G_EXC_ERROR;
1161: END IF;
1155: p_from_amount => NVL(x_complete_rec.trans_actual_value,0),
1156: x_to_amount => x_complete_rec.func_actual_value,
1157: p_round => Fnd_Api.G_FALSE);
1158:
1159: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1160: RAISE Fnd_Api.G_EXC_ERROR;
1161: END IF;
1162: END IF;
1163:
1156: x_to_amount => x_complete_rec.func_actual_value,
1157: p_round => Fnd_Api.G_FALSE);
1158:
1159: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1160: RAISE Fnd_Api.G_EXC_ERROR;
1161: END IF;
1162: END IF;
1163:
1164: IF (x_complete_rec.func_forecasted_value IS NOT NULL AND
1161: END IF;
1162: END IF;
1163:
1164: IF (x_complete_rec.func_forecasted_value IS NOT NULL AND
1165: x_complete_rec.func_forecasted_value <> Fnd_Api.G_MISS_NUM) AND
1166: (x_complete_rec.trans_forecasted_value IS NULL) THEN
1167: -- drive with func value
1168: Convert_Currency (
1169: x_return_status => l_curr_return_status,
1171: p_to_currency => x_complete_rec.transaction_currency_code,
1172: p_conv_date => l_current_date,
1173: p_from_amount => NVL(x_complete_rec.func_forecasted_value,0),
1174: x_to_amount => x_complete_rec.trans_forecasted_value,
1175: p_round => Fnd_Api.G_TRUE);
1176: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1177: RAISE Fnd_Api.G_EXC_ERROR;
1178: END IF;
1179: ELSIF (x_complete_rec.trans_forecasted_value IS NOT NULL AND
1172: p_conv_date => l_current_date,
1173: p_from_amount => NVL(x_complete_rec.func_forecasted_value,0),
1174: x_to_amount => x_complete_rec.trans_forecasted_value,
1175: p_round => Fnd_Api.G_TRUE);
1176: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1177: RAISE Fnd_Api.G_EXC_ERROR;
1178: END IF;
1179: ELSIF (x_complete_rec.trans_forecasted_value IS NOT NULL AND
1180: x_complete_rec.trans_forecasted_value <> Fnd_Api.G_MISS_NUM) THEN
1173: p_from_amount => NVL(x_complete_rec.func_forecasted_value,0),
1174: x_to_amount => x_complete_rec.trans_forecasted_value,
1175: p_round => Fnd_Api.G_TRUE);
1176: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1177: RAISE Fnd_Api.G_EXC_ERROR;
1178: END IF;
1179: ELSIF (x_complete_rec.trans_forecasted_value IS NOT NULL AND
1180: x_complete_rec.trans_forecasted_value <> Fnd_Api.G_MISS_NUM) THEN
1181: --drive with trans value
1176: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1177: RAISE Fnd_Api.G_EXC_ERROR;
1178: END IF;
1179: ELSIF (x_complete_rec.trans_forecasted_value IS NOT NULL AND
1180: x_complete_rec.trans_forecasted_value <> Fnd_Api.G_MISS_NUM) THEN
1181: --drive with trans value
1182: Convert_Currency (
1183: x_return_status => l_curr_return_status,
1184: p_from_currency => x_complete_rec.transaction_currency_code,
1185: p_to_currency => x_complete_rec.functional_currency_code,
1186: p_conv_date => l_current_date,
1187: p_from_amount =>NVL(x_complete_rec.trans_forecasted_value,0),
1188: x_to_amount => x_complete_rec.func_forecasted_value,
1189: p_round => Fnd_Api.G_FALSE);
1190: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1191: RAISE Fnd_Api.G_EXC_ERROR;
1192: END IF;
1193:
1186: p_conv_date => l_current_date,
1187: p_from_amount =>NVL(x_complete_rec.trans_forecasted_value,0),
1188: x_to_amount => x_complete_rec.func_forecasted_value,
1189: p_round => Fnd_Api.G_FALSE);
1190: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1191: RAISE Fnd_Api.G_EXC_ERROR;
1192: END IF;
1193:
1194: END IF;
1187: p_from_amount =>NVL(x_complete_rec.trans_forecasted_value,0),
1188: x_to_amount => x_complete_rec.func_forecasted_value,
1189: p_round => Fnd_Api.G_FALSE);
1190: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1191: RAISE Fnd_Api.G_EXC_ERROR;
1192: END IF;
1193:
1194: END IF;
1195:
1195:
1196: -- in case of non-currencies handle in the same way as above.
1197: ELSE
1198: IF (x_complete_rec.func_actual_value IS NOT NULL AND
1199: x_complete_rec.func_actual_value <> Fnd_Api.G_MISS_NUM) AND
1200: (x_complete_rec.trans_actual_value IS NULL) THEN
1201: -- drive with func value
1202: x_complete_rec.trans_actual_value :=
1203: x_complete_rec.func_actual_value;
1207: x_complete_rec.trans_actual_value;
1208: END IF;
1209:
1210: IF (x_complete_rec.func_forecasted_value IS NOT NULL AND
1211: x_complete_rec.func_forecasted_value <> Fnd_Api.G_MISS_NUM) AND
1212: (x_complete_rec.trans_forecasted_value IS NULL) THEN
1213: -- drive with func value.
1214: x_complete_rec.trans_forecasted_value :=
1215: x_complete_rec.func_forecasted_value;
1231:
1232: -- Now do currency conversions if this metric is currency metric and
1233: -- transaction currency code is passed.
1234: IF (x_complete_rec.transaction_currency_code IS NOT NULL AND
1235: x_complete_rec.transaction_currency_code <> Fnd_Api.G_MISS_CHAR) THEN
1236: -- Convert transaction amount to functional amount when only
1237: -- transaction amount is passed.
1238: IF (x_complete_rec.trans_actual_value IS NOT NULL AND
1239: x_complete_rec.trans_actual_value <> Fnd_Api.G_MISS_NUM) AND
1235: x_complete_rec.transaction_currency_code <> Fnd_Api.G_MISS_CHAR) THEN
1236: -- Convert transaction amount to functional amount when only
1237: -- transaction amount is passed.
1238: IF (x_complete_rec.trans_actual_value IS NOT NULL AND
1239: x_complete_rec.trans_actual_value <> Fnd_Api.G_MISS_NUM) AND
1240: (x_complete_rec.func_actual_value IS NULL) THEN
1241: Convert_Currency (
1242: x_return_status => l_curr_return_status,
1243: p_from_currency => x_complete_rec.transaction_currency_code,
1244: p_to_currency => x_complete_rec.functional_currency_code,
1245: p_conv_date => l_current_date,
1246: p_from_amount => NVL(x_complete_rec.trans_actual_value,0),
1247: x_to_amount => x_complete_rec.func_actual_value,
1248: p_round => Fnd_Api.G_FALSE);
1249: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1250: RAISE Fnd_Api.G_EXC_ERROR;
1251: END IF;
1252:
1245: p_conv_date => l_current_date,
1246: p_from_amount => NVL(x_complete_rec.trans_actual_value,0),
1247: x_to_amount => x_complete_rec.func_actual_value,
1248: p_round => Fnd_Api.G_FALSE);
1249: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1250: RAISE Fnd_Api.G_EXC_ERROR;
1251: END IF;
1252:
1253: -- drive with func values.
1246: p_from_amount => NVL(x_complete_rec.trans_actual_value,0),
1247: x_to_amount => x_complete_rec.func_actual_value,
1248: p_round => Fnd_Api.G_FALSE);
1249: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1250: RAISE Fnd_Api.G_EXC_ERROR;
1251: END IF;
1252:
1253: -- drive with func values.
1254: ELSIF (x_complete_rec.func_actual_value IS NOT NULL AND
1251: END IF;
1252:
1253: -- drive with func values.
1254: ELSIF (x_complete_rec.func_actual_value IS NOT NULL AND
1255: x_complete_rec.func_actual_value <> Fnd_Api.G_MISS_NUM) THEN
1256: Convert_Currency (
1257: x_return_status => l_curr_return_status,
1258: p_from_currency => x_complete_rec.functional_currency_code,
1259: p_to_currency => x_complete_rec.transaction_currency_code,
1259: p_to_currency => x_complete_rec.transaction_currency_code,
1260: p_conv_date => l_current_date,
1261: p_from_amount => NVL(x_complete_rec.func_actual_value,0),
1262: x_to_amount => x_complete_rec.trans_actual_value,
1263: p_round => Fnd_Api.G_TRUE);
1264: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1265: RAISE Fnd_Api.G_EXC_ERROR;
1266: END IF;
1267:
1260: p_conv_date => l_current_date,
1261: p_from_amount => NVL(x_complete_rec.func_actual_value,0),
1262: x_to_amount => x_complete_rec.trans_actual_value,
1263: p_round => Fnd_Api.G_TRUE);
1264: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1265: RAISE Fnd_Api.G_EXC_ERROR;
1266: END IF;
1267:
1268: END IF; -- (p_act_metric_rec.trans_actual_value IS NOT NULL AND
1261: p_from_amount => NVL(x_complete_rec.func_actual_value,0),
1262: x_to_amount => x_complete_rec.trans_actual_value,
1263: p_round => Fnd_Api.G_TRUE);
1264: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1265: RAISE Fnd_Api.G_EXC_ERROR;
1266: END IF;
1267:
1268: END IF; -- (p_act_metric_rec.trans_actual_value IS NOT NULL AND
1269:
1271: -- If func values are passed drive with them otherwise with
1272: -- trans values
1273:
1274: IF (x_complete_rec.trans_forecasted_value IS NOT NULL AND
1275: x_complete_rec.trans_forecasted_value <> Fnd_Api.G_MISS_NUM) AND
1276: (x_complete_rec.func_forecasted_value IS NULL) THEN
1277: Convert_Currency (
1278: x_return_status => l_curr_return_status,
1279: p_from_currency => x_complete_rec.transaction_currency_code,
1280: p_to_currency => x_complete_rec.functional_currency_code,
1281: p_conv_date => l_current_date,
1282: p_from_amount => NVL(x_complete_rec.trans_forecasted_value,0),
1283: x_to_amount => x_complete_rec.func_forecasted_value,
1284: p_round => Fnd_Api.G_FALSE);
1285: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1286: RAISE Fnd_Api.G_EXC_ERROR;
1287: END IF;
1288:
1281: p_conv_date => l_current_date,
1282: p_from_amount => NVL(x_complete_rec.trans_forecasted_value,0),
1283: x_to_amount => x_complete_rec.func_forecasted_value,
1284: p_round => Fnd_Api.G_FALSE);
1285: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1286: RAISE Fnd_Api.G_EXC_ERROR;
1287: END IF;
1288:
1289: -- drive with func values.
1282: p_from_amount => NVL(x_complete_rec.trans_forecasted_value,0),
1283: x_to_amount => x_complete_rec.func_forecasted_value,
1284: p_round => Fnd_Api.G_FALSE);
1285: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1286: RAISE Fnd_Api.G_EXC_ERROR;
1287: END IF;
1288:
1289: -- drive with func values.
1290: ELSIF (x_complete_rec.func_forecasted_value IS NOT NULL AND
1287: END IF;
1288:
1289: -- drive with func values.
1290: ELSIF (x_complete_rec.func_forecasted_value IS NOT NULL AND
1291: x_complete_rec.func_forecasted_value <> Fnd_Api.G_MISS_NUM) THEN
1292: Convert_Currency (
1293: x_return_status => l_curr_return_status,
1294: p_from_currency => x_complete_rec.functional_currency_code,
1295: p_to_currency => x_complete_rec.transaction_currency_code,
1295: p_to_currency => x_complete_rec.transaction_currency_code,
1296: p_conv_date => l_current_date,
1297: p_from_amount => NVL(x_complete_rec.func_forecasted_value,0),
1298: x_to_amount => x_complete_rec.trans_forecasted_value,
1299: p_round => Fnd_Api.G_TRUE);
1300: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1301: RAISE Fnd_Api.G_EXC_ERROR;
1302: END IF;
1303: END IF; --if for p_act_metric_rec.func_forecasted_value IS NOT NULL AND
1296: p_conv_date => l_current_date,
1297: p_from_amount => NVL(x_complete_rec.func_forecasted_value,0),
1298: x_to_amount => x_complete_rec.trans_forecasted_value,
1299: p_round => Fnd_Api.G_TRUE);
1300: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1301: RAISE Fnd_Api.G_EXC_ERROR;
1302: END IF;
1303: END IF; --if for p_act_metric_rec.func_forecasted_value IS NOT NULL AND
1304:
1297: p_from_amount => NVL(x_complete_rec.func_forecasted_value,0),
1298: x_to_amount => x_complete_rec.trans_forecasted_value,
1299: p_round => Fnd_Api.G_TRUE);
1300: IF l_curr_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
1301: RAISE Fnd_Api.G_EXC_ERROR;
1302: END IF;
1303: END IF; --if for p_act_metric_rec.func_forecasted_value IS NOT NULL AND
1304:
1305: ELSE -- Transaction currency code is null
1303: END IF; --if for p_act_metric_rec.func_forecasted_value IS NOT NULL AND
1304:
1305: ELSE -- Transaction currency code is null
1306: IF (x_complete_rec.trans_actual_value IS NOT NULL AND
1307: x_complete_rec.trans_actual_value <> Fnd_Api.G_MISS_NUM) AND
1308: (x_complete_rec.func_actual_value IS NULL) THEN
1309: x_complete_rec.func_actual_value :=
1310: x_complete_rec.trans_actual_value;
1311: ELSE
1312: x_complete_rec.trans_actual_value :=
1313: x_complete_rec.func_actual_value;
1314: END IF;
1315: IF (x_complete_rec.trans_forecasted_value IS NOT NULL AND
1316: x_complete_rec.trans_forecasted_value <> Fnd_Api.G_MISS_NUM) AND
1317: (x_complete_rec.func_forecasted_value IS NULL) THEN
1318: x_complete_rec.func_forecasted_value :=
1319: x_complete_rec.trans_forecasted_value;
1320: ELSE
1332: -- transaction currency and functional currency
1333: FND_MESSAGE.Set_Name('AMS', 'AMS_METR_NO_RATE');
1334: FND_MSG_PUB.Add;
1335: END IF;
1336: x_return_status := FND_API.G_RET_STS_ERROR;
1337:
1338: -- If any error happens abort API.
1339: RETURN;
1340: WHEN GL_CURRENCY_API.INVALID_CURRENCY THEN
1342: -- Atleast One of the two Currencies specified is invalid
1343: FND_MESSAGE.Set_Name('AMS', 'AMS_METR_INVALID_CURR');
1344: FND_MSG_PUB.Add;
1345: END IF;
1346: x_return_status := FND_API.G_RET_STS_ERROR;
1347:
1348: -- If any error happens abort API.
1349: RETURN;
1350: */
1358: IS
1359: -- Cursors for checking of statuses when the object is active.
1360: -- Relevant in Update.
1361: CURSOR c_camp_active(id NUMBER) IS
1362: SELECT Fnd_Api.G_TRUE
1363: FROM ams_campaigns_all_b
1364: WHERE campaign_id = id
1365: AND status_code IN ('SUBMITTED_BA', 'ACTIVE');
1366:
1364: WHERE campaign_id = id
1365: AND status_code IN ('SUBMITTED_BA', 'ACTIVE');
1366:
1367: CURSOR c_csch_active(id NUMBER) IS
1368: SELECT Fnd_Api.G_TRUE
1369: FROM ams_campaign_schedules_b
1370: WHERE schedule_id = id
1371: AND status_code = 'ACTIVE';
1372:
1370: WHERE schedule_id = id
1371: AND status_code = 'ACTIVE';
1372:
1373: CURSOR c_delv_active(id NUMBER) IS
1374: SELECT Fnd_Api.G_TRUE
1375: FROM ams_deliverables_all_b
1376: WHERE deliverable_id = id
1377: AND status_code IN ('SUBMITTED_BA', 'AVAILABLE');
1378:
1376: WHERE deliverable_id = id
1377: AND status_code IN ('SUBMITTED_BA', 'AVAILABLE');
1378:
1379: CURSOR c_eveh_active(id NUMBER) IS
1380: SELECT Fnd_Api.G_TRUE
1381: FROM ams_event_headers_all_b
1382: WHERE event_header_id = id
1383: AND system_status_code IN ('ACTIVE', 'SUBMITTED_BA');
1384:
1382: WHERE event_header_id = id
1383: AND system_status_code IN ('ACTIVE', 'SUBMITTED_BA');
1384:
1385: CURSOR c_eveo_active(id NUMBER) IS
1386: SELECT Fnd_Api.G_TRUE
1387: FROM ams_event_offers_all_b
1388: WHERE event_offer_id = id
1389: AND system_status_code IN ('SUBMITTED_BA', 'ACTIVE');
1390:
1391: --sunkumar 04/30/2003
1392: -- Added cursors for checking of statuses when the object is active,
1393: -- completed or cancelled. Relevant in delete.
1394: CURSOR c_camp_delete(id NUMBER) IS
1395: SELECT Fnd_Api.G_TRUE
1396: FROM ams_campaigns_all_b
1397: WHERE campaign_id = id
1398: AND status_code IN ('SUBMITTED_BA', 'ACTIVE', 'COMPLETED', 'CANCELLED');
1399:
1397: WHERE campaign_id = id
1398: AND status_code IN ('SUBMITTED_BA', 'ACTIVE', 'COMPLETED', 'CANCELLED');
1399:
1400: CURSOR c_csch_delete(id NUMBER) IS
1401: SELECT Fnd_Api.G_TRUE
1402: FROM ams_campaign_schedules_b
1403: WHERE schedule_id = id
1404: AND status_code IN ('SUBMITTED_BA', 'ACTIVE', 'COMPLETED', 'CANCELLED');
1405:
1403: WHERE schedule_id = id
1404: AND status_code IN ('SUBMITTED_BA', 'ACTIVE', 'COMPLETED', 'CANCELLED');
1405:
1406: CURSOR c_delv_delete(id NUMBER) IS
1407: SELECT Fnd_Api.G_TRUE
1408: FROM ams_deliverables_all_b
1409: WHERE deliverable_id = id
1410: AND status_code IN ('SUBMITTED_BA', 'AVAILABLE', 'CANCELLED', 'ARCHIVED');
1411:
1409: WHERE deliverable_id = id
1410: AND status_code IN ('SUBMITTED_BA', 'AVAILABLE', 'CANCELLED', 'ARCHIVED');
1411:
1412: CURSOR c_eveh_delete(id NUMBER) IS
1413: SELECT Fnd_Api.G_TRUE
1414: FROM ams_event_headers_all_b
1415: WHERE event_header_id = id
1416: AND system_status_code IN ('ACTIVE', 'CANCELLED', 'SUBMITTED_BA','COMPLETED');
1417:
1415: WHERE event_header_id = id
1416: AND system_status_code IN ('ACTIVE', 'CANCELLED', 'SUBMITTED_BA','COMPLETED');
1417:
1418: CURSOR c_eveo_delete(id NUMBER) IS
1419: SELECT Fnd_Api.G_TRUE
1420: FROM ams_event_offers_all_b
1421: WHERE event_offer_id = id
1422: AND system_status_code IN ('SUBMITTED_BA', 'ACTIVE', 'CANCELLED', 'COMPLETED');
1423:
1420: FROM ams_event_offers_all_b
1421: WHERE event_offer_id = id
1422: AND system_status_code IN ('SUBMITTED_BA', 'ACTIVE', 'CANCELLED', 'COMPLETED');
1423:
1424: l_return_value VARCHAR2(1) := Fnd_Api.G_FALSE;
1425:
1426: BEGIN
1427: IF p_operation_mode =G_UPDATE THEN
1428:
1524: p_operation_mode => p_operation_mode);
1525: --
1526: -- Initialize procedure return status to success.
1527: --
1528: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1529: -- make a call to API that will be provided in future, and based on that
1530: -- return OUT NOCOPY parameters.
1531: -- for time being, return FALSE always
1532: x_freeze_status := l_return_value;
1556: -- End of comments
1557:
1558: PROCEDURE Create_ActMetric2 (
1559: p_api_version IN NUMBER,
1560: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
1561: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
1562: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
1563:
1564: x_return_status OUT NOCOPY VARCHAR2,
1557:
1558: PROCEDURE Create_ActMetric2 (
1559: p_api_version IN NUMBER,
1560: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
1561: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
1562: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
1563:
1564: x_return_status OUT NOCOPY VARCHAR2,
1565: x_msg_count OUT NOCOPY NUMBER,
1558: PROCEDURE Create_ActMetric2 (
1559: p_api_version IN NUMBER,
1560: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
1561: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
1562: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
1563:
1564: x_return_status OUT NOCOPY VARCHAR2,
1565: x_msg_count OUT NOCOPY NUMBER,
1566: x_msg_data OUT NOCOPY VARCHAR2,
1636: l_summary_metric_id NUMBER;
1637: l_sensitive_data_flag VARCHAR2(1);
1638: -- Local record variable for the parent metric
1639: l_parent_act_metrics_rec act_metric_rec_type; -- := p_act_metric_rec;
1640: l_freeze_status VARCHAR2(1):= Fnd_Api.G_FALSE;
1641: l_summarize_to_metric NUMBER;
1642: l_today DATE := SYSDATE;
1643:
1644: BEGIN
1653:
1654: --
1655: -- Initialize message list if p_init_msg_list is set to TRUE.
1656: --
1657: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN
1658: Fnd_Msg_Pub.Initialize;
1659: END IF;
1660:
1661: --
1660:
1661: --
1662: -- Standard check for API version compatibility.
1663: --
1664: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,
1665: p_api_version,
1666: L_API_NAME,
1667: G_PKG_NAME)
1668: THEN
1665: p_api_version,
1666: L_API_NAME,
1667: G_PKG_NAME)
1668: THEN
1669: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1670: END IF;
1671:
1672: --
1673: -- Initialize API return status to success.
1671:
1672: --
1673: -- Initialize API return status to success.
1674: --
1675: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1676: x_activity_metric_id := NULL;
1677: --
1678: -- Begin API Body.
1679: --
1698: Ams_Utility_Pvt.Debug_Message(l_full_name||': ignore metric id: ' || p_act_metric_rec.metric_id);
1699: END IF;
1700:
1701: RETURN;
1702: -- l_return_status := Fnd_Api.G_RET_STS_ERROR;
1703: -- RAISE Fnd_Api.G_EXC_ERROR;
1704: END IF;
1705: -- END
1706:
1699: END IF;
1700:
1701: RETURN;
1702: -- l_return_status := Fnd_Api.G_RET_STS_ERROR;
1703: -- RAISE Fnd_Api.G_EXC_ERROR;
1704: END IF;
1705: -- END
1706:
1707: -- Make a call-out to check the frozen status.
1710: G_CREATE, -- Create is operation mode
1711: l_freeze_status,
1712: l_return_status);
1713:
1714: IF (l_freeze_status = Fnd_Api.G_TRUE) THEN
1715: -- frozen to create the record
1716: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
1717: Fnd_Message.Set_Name('AMS', 'AMS_METR_FROZEN');
1718: Fnd_Msg_Pub.ADD;
1716: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
1717: Fnd_Message.Set_Name('AMS', 'AMS_METR_FROZEN');
1718: Fnd_Msg_Pub.ADD;
1719: END IF;
1720: l_return_status := Fnd_Api.G_RET_STS_ERROR;
1721: END IF;
1722: -- If it is frozen, or any errors happen abort API.
1723:
1724: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1720: l_return_status := Fnd_Api.G_RET_STS_ERROR;
1721: END IF;
1722: -- If it is frozen, or any errors happen abort API.
1723:
1724: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1725: RAISE Fnd_Api.G_EXC_ERROR;
1726: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
1727: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1728: END IF;
1721: END IF;
1722: -- If it is frozen, or any errors happen abort API.
1723:
1724: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1725: RAISE Fnd_Api.G_EXC_ERROR;
1726: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
1727: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1728: END IF;
1729:
1722: -- If it is frozen, or any errors happen abort API.
1723:
1724: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1725: RAISE Fnd_Api.G_EXC_ERROR;
1726: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
1727: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1728: END IF;
1729:
1730: -- Check for existence of parent metric for this given metric_id
1723:
1724: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1725: RAISE Fnd_Api.G_EXC_ERROR;
1726: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
1727: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1728: END IF;
1729:
1730: -- Check for existence of parent metric for this given metric_id
1731: IF l_summary_metric_id IS NOT NULL THEN
1744: -- Conditional test is in Create_ParentActMetric.
1745: Create_ParentActMetric
1746: (p_api_version => p_api_version
1747: ,p_init_msg_list => p_init_msg_list
1748: ,p_commit => Fnd_Api.g_false
1749: ,p_validation_level => p_validation_level
1750: ,p_act_metric_rec => l_parent_act_metrics_rec
1751: ,x_act_metric_id => l_summarize_to_metric
1752: );
1754: END IF;
1755:
1756: l_act_metrics_rec.summarize_to_metric := l_summarize_to_metric;
1757:
1758: IF l_act_metrics_rec.hierarchy_type = FND_API.G_MISS_CHAR then
1759: l_act_metrics_rec.hierarchy_type := NULL;
1760: END IF;
1761: IF l_act_metrics_rec.status_code = FND_API.G_MISS_CHAR then
1762: l_act_metrics_rec.status_code := NULL;
1757:
1758: IF l_act_metrics_rec.hierarchy_type = FND_API.G_MISS_CHAR then
1759: l_act_metrics_rec.hierarchy_type := NULL;
1760: END IF;
1761: IF l_act_metrics_rec.status_code = FND_API.G_MISS_CHAR then
1762: l_act_metrics_rec.status_code := NULL;
1763: END IF;
1764: IF l_act_metrics_rec.method_code = FND_API.G_MISS_CHAR then
1765: l_act_metrics_rec.method_code := NULL;
1760: END IF;
1761: IF l_act_metrics_rec.status_code = FND_API.G_MISS_CHAR then
1762: l_act_metrics_rec.status_code := NULL;
1763: END IF;
1764: IF l_act_metrics_rec.method_code = FND_API.G_MISS_CHAR then
1765: l_act_metrics_rec.method_code := NULL;
1766: END IF;
1767: IF l_act_metrics_rec.action_code = FND_API.G_MISS_CHAR then
1768: l_act_metrics_rec.action_code := NULL;
1763: END IF;
1764: IF l_act_metrics_rec.method_code = FND_API.G_MISS_CHAR then
1765: l_act_metrics_rec.method_code := NULL;
1766: END IF;
1767: IF l_act_metrics_rec.action_code = FND_API.G_MISS_CHAR then
1768: l_act_metrics_rec.action_code := NULL;
1769: END IF;
1770: IF l_act_metrics_rec.basis_year = FND_API.G_MISS_NUM then
1771: l_act_metrics_rec.basis_year := NULL;
1766: END IF;
1767: IF l_act_metrics_rec.action_code = FND_API.G_MISS_CHAR then
1768: l_act_metrics_rec.action_code := NULL;
1769: END IF;
1770: IF l_act_metrics_rec.basis_year = FND_API.G_MISS_NUM then
1771: l_act_metrics_rec.basis_year := NULL;
1772: END IF;
1773: IF l_act_metrics_rec.ex_start_node = FND_API.G_MISS_CHAR then
1774: l_act_metrics_rec.ex_start_node := NULL;
1769: END IF;
1770: IF l_act_metrics_rec.basis_year = FND_API.G_MISS_NUM then
1771: l_act_metrics_rec.basis_year := NULL;
1772: END IF;
1773: IF l_act_metrics_rec.ex_start_node = FND_API.G_MISS_CHAR then
1774: l_act_metrics_rec.ex_start_node := NULL;
1775: END IF;
1776:
1777:
1787: x_msg_data => x_msg_data
1788: );
1789:
1790: -- If any errors happen abort API.
1791: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1792: RAISE Fnd_Api.G_EXC_ERROR;
1793: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
1794: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1795: END IF;
1788: );
1789:
1790: -- If any errors happen abort API.
1791: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1792: RAISE Fnd_Api.G_EXC_ERROR;
1793: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
1794: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1795: END IF;
1796:
1789:
1790: -- If any errors happen abort API.
1791: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1792: RAISE Fnd_Api.G_EXC_ERROR;
1793: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
1794: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1795: END IF;
1796:
1797: --
1790: -- If any errors happen abort API.
1791: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1792: RAISE Fnd_Api.G_EXC_ERROR;
1793: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
1794: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1795: END IF;
1796:
1797: --
1798: -- Validate the record before inserting.
1807: p_act_metric_rec => l_act_metrics_rec
1808: );
1809:
1810: -- If any errors happen abort API.
1811: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1812: RAISE Fnd_Api.G_EXC_ERROR;
1813: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
1814: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1815: END IF;
1808: );
1809:
1810: -- If any errors happen abort API.
1811: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1812: RAISE Fnd_Api.G_EXC_ERROR;
1813: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
1814: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1815: END IF;
1816:
1809:
1810: -- If any errors happen abort API.
1811: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1812: RAISE Fnd_Api.G_EXC_ERROR;
1813: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
1814: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1815: END IF;
1816:
1817: --
1810: -- If any errors happen abort API.
1811: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
1812: RAISE Fnd_Api.G_EXC_ERROR;
1813: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
1814: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1815: END IF;
1816:
1817: --
1818: -- Debug message.
2058: x_msg_data => x_msg_data,
2059: p_act_metric_rec => l_dep_act_metric_rec,
2060: x_activity_metric_id => l_dep_act_met_id);
2061: -- If any errors happen abort API.
2062: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2063: RAISE Fnd_Api.G_EXC_ERROR;
2064: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2065: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2066: END IF;
2059: p_act_metric_rec => l_dep_act_metric_rec,
2060: x_activity_metric_id => l_dep_act_met_id);
2061: -- If any errors happen abort API.
2062: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2063: RAISE Fnd_Api.G_EXC_ERROR;
2064: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2065: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2066: END IF;
2067:
2060: x_activity_metric_id => l_dep_act_met_id);
2061: -- If any errors happen abort API.
2062: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2063: RAISE Fnd_Api.G_EXC_ERROR;
2064: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2065: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2066: END IF;
2067:
2068: -- dmvincen 02/10/2004: no longer useful.
2061: -- If any errors happen abort API.
2062: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2063: RAISE Fnd_Api.G_EXC_ERROR;
2064: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2065: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2066: END IF;
2067:
2068: -- dmvincen 02/10/2004: no longer useful.
2069: -- UPDATE ams_act_metrics_all
2096:
2097: --
2098: -- Standard check for commit request.
2099: --
2100: --IF Fnd_Api.To_Boolean (p_commit) THEN
2101: -- COMMIT WORK;
2102: --END IF;
2103:
2104: --
2107: --
2108: --Fnd_Msg_Pub.Count_And_Get (
2109: -- p_count => x_msg_count,
2110: -- p_data => x_msg_data,
2111: -- p_encoded => Fnd_Api.G_FALSE
2112: --);
2113:
2114: --
2115: -- Add success message to message list.
2119: END IF;
2120:
2121: /*
2122: EXCEPTION
2123: WHEN Fnd_Api.G_EXC_ERROR THEN
2124: ROLLBACK TO Create_ActMetric2_pvt;
2125: --ROLLBACK;
2126: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2127: Fnd_Msg_Pub.Count_And_Get (
2122: EXCEPTION
2123: WHEN Fnd_Api.G_EXC_ERROR THEN
2124: ROLLBACK TO Create_ActMetric2_pvt;
2125: --ROLLBACK;
2126: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2127: Fnd_Msg_Pub.Count_And_Get (
2128: p_count => x_msg_count,
2129: p_data => x_msg_data,
2130: p_encoded => FND_API.G_FALSE
2126: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2127: Fnd_Msg_Pub.Count_And_Get (
2128: p_count => x_msg_count,
2129: p_data => x_msg_data,
2130: p_encoded => FND_API.G_FALSE
2131: );
2132: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2133: ROLLBACK TO Create_ActMetric2_pvt;
2134: --ROLLBACK;
2128: p_count => x_msg_count,
2129: p_data => x_msg_data,
2130: p_encoded => FND_API.G_FALSE
2131: );
2132: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2133: ROLLBACK TO Create_ActMetric2_pvt;
2134: --ROLLBACK;
2135: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2136: Fnd_Msg_Pub.Count_And_Get (
2131: );
2132: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2133: ROLLBACK TO Create_ActMetric2_pvt;
2134: --ROLLBACK;
2135: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2136: Fnd_Msg_Pub.Count_And_Get (
2137: p_count => x_msg_count,
2138: p_data => x_msg_data,
2139: p_encoded => FND_API.G_FALSE
2135: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2136: Fnd_Msg_Pub.Count_And_Get (
2137: p_count => x_msg_count,
2138: p_data => x_msg_data,
2139: p_encoded => FND_API.G_FALSE
2140: );
2141: WHEN OTHERS THEN
2142: ROLLBACK TO Create_ActMetric2_pvt;
2143: --ROLLBACK;
2140: );
2141: WHEN OTHERS THEN
2142: ROLLBACK TO Create_ActMetric2_pvt;
2143: --ROLLBACK;
2144: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2145: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
2146: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
2147: END IF;
2148: Fnd_Msg_Pub.Count_And_Get (
2147: END IF;
2148: Fnd_Msg_Pub.Count_And_Get (
2149: p_count => x_msg_count,
2150: p_data => x_msg_data,
2151: p_encoded => FND_API.G_FALSE
2152: );
2153: */
2154: END Create_ActMetric2;
2155:
2177:
2178:
2179: PROCEDURE Update_ActMetric (
2180: p_api_version IN NUMBER,
2181: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
2182: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
2183: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
2184:
2185: x_return_status OUT NOCOPY VARCHAR2,
2178:
2179: PROCEDURE Update_ActMetric (
2180: p_api_version IN NUMBER,
2181: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
2182: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
2183: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
2184:
2185: x_return_status OUT NOCOPY VARCHAR2,
2186: x_msg_count OUT NOCOPY NUMBER,
2179: PROCEDURE Update_ActMetric (
2180: p_api_version IN NUMBER,
2181: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
2182: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
2183: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
2184:
2185: x_return_status OUT NOCOPY VARCHAR2,
2186: x_msg_count OUT NOCOPY NUMBER,
2187: x_msg_data OUT NOCOPY VARCHAR2,
2191: L_API_VERSION CONSTANT NUMBER := 1.0;
2192: L_API_NAME CONSTANT VARCHAR2(30) := 'UPDATE_ACTMETRIC';
2193: L_FULL_NAME CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
2194:
2195: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2196: l_actmet_rec act_metric_rec_type := p_act_metric_rec;
2197: l_freeze_status VARCHAR2(1) := Fnd_Api.G_FALSE;
2198: l_reprocess_rec VARCHAR2(1) := Fnd_Api.G_FALSE;
2199:
2193: L_FULL_NAME CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
2194:
2195: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2196: l_actmet_rec act_metric_rec_type := p_act_metric_rec;
2197: l_freeze_status VARCHAR2(1) := Fnd_Api.G_FALSE;
2198: l_reprocess_rec VARCHAR2(1) := Fnd_Api.G_FALSE;
2199:
2200: -- huili@ added to invalidate corresponding activity variable metrics
2201: l_depend_act_metric NUMBER;
2194:
2195: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2196: l_actmet_rec act_metric_rec_type := p_act_metric_rec;
2197: l_freeze_status VARCHAR2(1) := Fnd_Api.G_FALSE;
2198: l_reprocess_rec VARCHAR2(1) := Fnd_Api.G_FALSE;
2199:
2200: -- huili@ added to invalidate corresponding activity variable metrics
2201: l_depend_act_metric NUMBER;
2202: CURSOR c_check_var_met (l_activity_metric_id NUMBER) IS
2236: END IF;
2237: --
2238: -- Initialize message list if p_init_msg_list is set to TRUE.
2239: --
2240: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN
2241: Fnd_Msg_Pub.Initialize;
2242: END IF;
2243:
2244: --
2243:
2244: --
2245: -- Standard check for API version compatibility.
2246: --
2247: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,
2248: p_api_version,
2249: L_API_NAME,
2250: G_PKG_NAME)
2251: THEN
2248: p_api_version,
2249: L_API_NAME,
2250: G_PKG_NAME)
2251: THEN
2252: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2253: END IF;
2254:
2255: --
2256: -- Initialize API return status to success.
2254:
2255: --
2256: -- Initialize API return status to success.
2257: --
2258: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2259:
2260: --
2261: -- Begin API Body
2262: --
2266: Ams_Utility_Pvt.debug_message(l_full_name ||': validate');
2267: END IF;
2268:
2269: -- BUG4391308: Added locking to prevent overwriting.
2270: Lock_ActMetric ( 1.0, fnd_api.G_FALSE,
2271: l_return_status, x_msg_count, x_msg_data,
2272: l_actmet_rec.activity_metric_id,
2273: l_actmet_rec.object_version_number);
2274:
2271: l_return_status, x_msg_count, x_msg_data,
2272: l_actmet_rec.activity_metric_id,
2273: l_actmet_rec.object_version_number);
2274:
2275: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2276: RAISE Fnd_Api.G_EXC_ERROR;
2277: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2278: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2279: END IF;
2272: l_actmet_rec.activity_metric_id,
2273: l_actmet_rec.object_version_number);
2274:
2275: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2276: RAISE Fnd_Api.G_EXC_ERROR;
2277: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2278: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2279: END IF;
2280: -- BUG4391308: End
2273: l_actmet_rec.object_version_number);
2274:
2275: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2276: RAISE Fnd_Api.G_EXC_ERROR;
2277: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2278: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2279: END IF;
2280: -- BUG4391308: End
2281:
2274:
2275: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2276: RAISE Fnd_Api.G_EXC_ERROR;
2277: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2278: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2279: END IF;
2280: -- BUG4391308: End
2281:
2282: -- replace g_miss_char/num/date with current column values
2301:
2302: -- DMVINCEN 06/05/2001: If value is posted to budget do not update.
2303: IF l_actmet_rec.published_flag = 'Y' THEN
2304: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2305: l_actmet_rec.trans_actual_value := Fnd_Api.G_MISS_NUM;
2306: l_actmet_rec.func_actual_value := Fnd_Api.G_MISS_NUM;
2307: l_reprocess_rec := Fnd_Api.G_TRUE;
2308: END IF;
2309: END IF;
2302: -- DMVINCEN 06/05/2001: If value is posted to budget do not update.
2303: IF l_actmet_rec.published_flag = 'Y' THEN
2304: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2305: l_actmet_rec.trans_actual_value := Fnd_Api.G_MISS_NUM;
2306: l_actmet_rec.func_actual_value := Fnd_Api.G_MISS_NUM;
2307: l_reprocess_rec := Fnd_Api.G_TRUE;
2308: END IF;
2309: END IF;
2310:
2303: IF l_actmet_rec.published_flag = 'Y' THEN
2304: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2305: l_actmet_rec.trans_actual_value := Fnd_Api.G_MISS_NUM;
2306: l_actmet_rec.func_actual_value := Fnd_Api.G_MISS_NUM;
2307: l_reprocess_rec := Fnd_Api.G_TRUE;
2308: END IF;
2309: END IF;
2310:
2311: IF l_reprocess_rec = Fnd_Api.G_TRUE THEN
2307: l_reprocess_rec := Fnd_Api.G_TRUE;
2308: END IF;
2309: END IF;
2310:
2311: IF l_reprocess_rec = Fnd_Api.G_TRUE THEN
2312: Complete_ActMetric_Rec(l_actmet_rec, l_actmet_rec);
2313: END IF;
2314:
2315: -- Do Currency Conversion
2321: x_return_status => l_return_status,
2322: x_msg_count => x_msg_count,
2323: x_msg_data => x_msg_data ) ;
2324: -- If any errors happen abort API.
2325: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2326: RAISE Fnd_Api.G_EXC_ERROR;
2327: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2328: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2329: END IF;
2322: x_msg_count => x_msg_count,
2323: x_msg_data => x_msg_data ) ;
2324: -- If any errors happen abort API.
2325: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2326: RAISE Fnd_Api.G_EXC_ERROR;
2327: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2328: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2329: END IF;
2330:
2323: x_msg_data => x_msg_data ) ;
2324: -- If any errors happen abort API.
2325: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2326: RAISE Fnd_Api.G_EXC_ERROR;
2327: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2328: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2329: END IF;
2330:
2331: IF p_validation_level >= Jtf_Plsql_Api.g_valid_level_item THEN
2324: -- If any errors happen abort API.
2325: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2326: RAISE Fnd_Api.G_EXC_ERROR;
2327: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2328: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2329: END IF;
2330:
2331: IF p_validation_level >= Jtf_Plsql_Api.g_valid_level_item THEN
2332: Validate_ActMetric_items(
2333: p_act_metric_rec => l_actmet_rec,
2334: p_validation_mode => Jtf_Plsql_Api.g_update,
2335: x_return_status => l_return_status
2336: );
2337: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2338: RAISE Fnd_Api.g_exc_unexpected_error;
2339: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2340: RAISE Fnd_Api.g_exc_error;
2341: END IF;
2334: p_validation_mode => Jtf_Plsql_Api.g_update,
2335: x_return_status => l_return_status
2336: );
2337: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2338: RAISE Fnd_Api.g_exc_unexpected_error;
2339: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2340: RAISE Fnd_Api.g_exc_error;
2341: END IF;
2342: END IF;
2335: x_return_status => l_return_status
2336: );
2337: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2338: RAISE Fnd_Api.g_exc_unexpected_error;
2339: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2340: RAISE Fnd_Api.g_exc_error;
2341: END IF;
2342: END IF;
2343:
2336: );
2337: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2338: RAISE Fnd_Api.g_exc_unexpected_error;
2339: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2340: RAISE Fnd_Api.g_exc_error;
2341: END IF;
2342: END IF;
2343:
2344:
2352: p_complete_rec => l_actmet_rec,
2353: p_operation_mode => G_UPDATE,
2354: x_return_status => l_return_status
2355: );
2356: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2357: RAISE Fnd_Api.g_exc_unexpected_error;
2358: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2359: RAISE Fnd_Api.g_exc_error;
2360: END IF;
2353: p_operation_mode => G_UPDATE,
2354: x_return_status => l_return_status
2355: );
2356: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2357: RAISE Fnd_Api.g_exc_unexpected_error;
2358: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2359: RAISE Fnd_Api.g_exc_error;
2360: END IF;
2361: END IF;
2354: x_return_status => l_return_status
2355: );
2356: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2357: RAISE Fnd_Api.g_exc_unexpected_error;
2358: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2359: RAISE Fnd_Api.g_exc_error;
2360: END IF;
2361: END IF;
2362:
2355: );
2356: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2357: RAISE Fnd_Api.g_exc_unexpected_error;
2358: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2359: RAISE Fnd_Api.g_exc_error;
2360: END IF;
2361: END IF;
2362:
2363: -- Post a new cost item to the budget.
2361: END IF;
2362:
2363: -- Post a new cost item to the budget.
2364: IF l_actmet_rec.published_flag = 'T' THEN
2365: l_return_status := FND_API.G_RET_STS_SUCCESS;
2366: l_actmet_rec.published_flag := 'Y';
2367: l_cost_rec.cost_id := l_actmet_rec.activity_metric_id;
2368: l_cost_rec.cost_amount := l_actmet_rec.trans_actual_value;
2369: l_cost_rec.cost_desc := '';
2377: p_api_version => l_api_version,
2378: x_return_status => l_return_status,
2379: x_msg_count => x_msg_count,
2380: x_msg_data => x_msg_data);
2381: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2382: -- BUG2486379: Display budget utilization errors.
2383: -- Fnd_Msg_Pub.Initialize;
2384: Fnd_Message.set_name('AMS', 'AMS_MET_NO_POST');
2385: Fnd_Msg_Pub.ADD;
2386: --IF (AMS_DEBUG_HIGH_ON) THEN
2387: -- Ams_Utility_Pvt.debug_message('You can not post this cost!');
2388: --END IF;
2389: END IF;
2390: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2391: RAISE Fnd_Api.g_exc_unexpected_error;
2392: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2393: RAISE Fnd_Api.g_exc_error;
2394: END IF;
2387: -- Ams_Utility_Pvt.debug_message('You can not post this cost!');
2388: --END IF;
2389: END IF;
2390: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2391: RAISE Fnd_Api.g_exc_unexpected_error;
2392: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2393: RAISE Fnd_Api.g_exc_error;
2394: END IF;
2395: END IF;
2388: --END IF;
2389: END IF;
2390: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2391: RAISE Fnd_Api.g_exc_unexpected_error;
2392: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2393: RAISE Fnd_Api.g_exc_error;
2394: END IF;
2395: END IF;
2396:
2389: END IF;
2390: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
2391: RAISE Fnd_Api.g_exc_unexpected_error;
2392: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
2393: RAISE Fnd_Api.g_exc_error;
2394: END IF;
2395: END IF;
2396:
2397: IF (AMS_DEBUG_HIGH_ON) THEN
2483: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2484: Fnd_Message.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
2485: Fnd_Msg_Pub.ADD;
2486: END IF;
2487: RAISE Fnd_Api.g_exc_error;
2488: END IF;
2489:
2490: -- huili@ added to invalidate the corresponding variable activity metrics
2491: OPEN c_check_var_met (l_actmet_rec.activity_metric_id);
2502: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2503: Fnd_Message.set_name('AMS', 'AMS_API_VARREC_NOT_FOUND');
2504: Fnd_Msg_Pub.ADD;
2505: END IF;
2506: RAISE Fnd_Api.g_exc_error;
2507: END IF;
2508: END IF;
2509: CLOSE c_check_var_met;
2510: --END
2521: --
2522: -- End API Body
2523: --
2524:
2525: IF Fnd_Api.to_boolean(p_commit) THEN
2526: COMMIT;
2527: END IF;
2528:
2529: --
2532: --
2533: Fnd_Msg_Pub.Count_And_Get (
2534: p_count => x_msg_count,
2535: p_data => x_msg_data,
2536: p_encoded => Fnd_Api.G_FALSE
2537: );
2538:
2539: --
2540: -- Debug message.
2544: END IF;
2545:
2546:
2547: EXCEPTION
2548: WHEN Fnd_Api.G_EXC_ERROR THEN
2549: ROLLBACK TO Update_ActMetric_pvt;
2550: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2551: Fnd_Msg_Pub.Count_And_Get (
2552: p_count => x_msg_count,
2546:
2547: EXCEPTION
2548: WHEN Fnd_Api.G_EXC_ERROR THEN
2549: ROLLBACK TO Update_ActMetric_pvt;
2550: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2551: Fnd_Msg_Pub.Count_And_Get (
2552: p_count => x_msg_count,
2553: p_data => x_msg_data,
2554: p_encoded => FND_API.G_FALSE
2550: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2551: Fnd_Msg_Pub.Count_And_Get (
2552: p_count => x_msg_count,
2553: p_data => x_msg_data,
2554: p_encoded => FND_API.G_FALSE
2555: );
2556: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2557: ROLLBACK TO Update_ActMetric_pvt;
2558: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2552: p_count => x_msg_count,
2553: p_data => x_msg_data,
2554: p_encoded => FND_API.G_FALSE
2555: );
2556: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2557: ROLLBACK TO Update_ActMetric_pvt;
2558: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2559: Fnd_Msg_Pub.Count_And_Get (
2560: p_count => x_msg_count,
2554: p_encoded => FND_API.G_FALSE
2555: );
2556: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2557: ROLLBACK TO Update_ActMetric_pvt;
2558: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2559: Fnd_Msg_Pub.Count_And_Get (
2560: p_count => x_msg_count,
2561: p_data => x_msg_data,
2562: p_encoded => FND_API.G_FALSE
2558: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2559: Fnd_Msg_Pub.Count_And_Get (
2560: p_count => x_msg_count,
2561: p_data => x_msg_data,
2562: p_encoded => FND_API.G_FALSE
2563: );
2564: WHEN OTHERS THEN
2565: ROLLBACK TO Update_ActMetric_pvt;
2566: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2562: p_encoded => FND_API.G_FALSE
2563: );
2564: WHEN OTHERS THEN
2565: ROLLBACK TO Update_ActMetric_pvt;
2566: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2567: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
2568: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
2569: END IF;
2570: Fnd_Msg_Pub.Count_And_Get (
2569: END IF;
2570: Fnd_Msg_Pub.Count_And_Get (
2571: p_count => x_msg_count,
2572: p_data => x_msg_data,
2573: p_encoded => FND_API.G_FALSE
2574: );
2575: END Update_ActMetric;
2576:
2577: -- Start of comments
2596: -- End of comments
2597:
2598: PROCEDURE Delete_ActMetric (
2599: p_api_version IN NUMBER,
2600: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
2601: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
2602: x_return_status OUT NOCOPY VARCHAR2,
2603: x_msg_count OUT NOCOPY NUMBER,
2604: x_msg_data OUT NOCOPY VARCHAR2,
2597:
2598: PROCEDURE Delete_ActMetric (
2599: p_api_version IN NUMBER,
2600: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
2601: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
2602: x_return_status OUT NOCOPY VARCHAR2,
2603: x_msg_count OUT NOCOPY NUMBER,
2604: x_msg_data OUT NOCOPY VARCHAR2,
2605: p_activity_metric_id IN NUMBER,
2610: L_API_NAME CONSTANT VARCHAR2(30) := 'DELETE_ACTMETRIC';
2611: L_FULL_NAME CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
2612:
2613: l_return_status VARCHAR2(1);
2614: l_freeze_status VARCHAR2(1) := Fnd_Api.G_FALSE;
2615: l_act_metric_rec act_metric_rec_type;
2616: l_child_activity_metric_id NUMBER;
2617: l_child_type VARCHAR2(30);
2618:
2740:
2741: --
2742: -- Initialize message list if p_init_msg_list is set to TRUE.
2743: --
2744: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN
2745: Fnd_Msg_Pub.Initialize;
2746: END IF;
2747:
2748: --
2747:
2748: --
2749: -- Standard check for API version compatibility.
2750: --
2751: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,
2752: p_api_version,
2753: L_API_NAME,
2754: G_PKG_NAME)
2755: THEN
2752: p_api_version,
2753: L_API_NAME,
2754: G_PKG_NAME)
2755: THEN
2756: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2757: END IF;
2758:
2759:
2760: --
2767: -- Fnd_Message.set_name('AMS', 'AMS_METR_SEEDED_METR');
2768: -- Fnd_Msg_Pub.ADD;
2769: -- END IF;
2770: --
2771: -- RAISE Fnd_Api.G_EXC_ERROR;
2772: -- END IF;
2773:
2774:
2775: --
2774:
2775: --
2776: -- Initialize API return status to success.
2777: --
2778: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
2779:
2780: --
2781: -- Begin API Body.
2782: --
2802: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2803: Fnd_Message.set_name('AMS', 'AMS_METR_CANT_DELETE_PARENT');
2804: Fnd_Msg_Pub.ADD;
2805: END IF;
2806: RAISE Fnd_Api.g_exc_error;
2807: END IF;
2808: -- end for the bug fix, sveerave.
2809:
2810: -- Get all the details of the activity metric record for passing to
2815: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2816: Fnd_Message.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
2817: Fnd_Msg_Pub.ADD;
2818: END IF;
2819: RAISE Fnd_Api.g_exc_error;
2820: END IF;
2821:
2822: CLOSE c_actmet_details;
2823:
2827: G_DELETE, -- Delete is operation mode
2828: l_freeze_status,
2829: l_return_status);
2830:
2831: IF (l_freeze_status = Fnd_Api.G_TRUE) THEN
2832: -- frozen to create the record
2833: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
2834: -- sunkumar 04/30/2003 added message for delete status of objects depending on status (ACTIVE, CANCELLED, COMPLETED)
2835: l_object_name := ams_utility_pvt.get_lookup_meaning(
2837: Fnd_Message.Set_Name('AMS', 'AMS_METR_DELETE');
2838: Fnd_Message.set_token('OBJECT', l_object_name);
2839: Fnd_Msg_Pub.ADD;
2840: END IF;
2841: l_return_status := Fnd_Api.G_RET_STS_ERROR;
2842: END IF;
2843:
2844:
2845: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2841: l_return_status := Fnd_Api.G_RET_STS_ERROR;
2842: END IF;
2843:
2844:
2845: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2846: RAISE Fnd_Api.G_EXC_ERROR;
2847: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2848: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2849: END IF;
2842: END IF;
2843:
2844:
2845: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2846: RAISE Fnd_Api.G_EXC_ERROR;
2847: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2848: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2849: END IF;
2850:
2843:
2844:
2845: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2846: RAISE Fnd_Api.G_EXC_ERROR;
2847: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2848: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2849: END IF;
2850:
2851:
2844:
2845: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2846: RAISE Fnd_Api.G_EXC_ERROR;
2847: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2848: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2849: END IF;
2850:
2851:
2852:
2849: END IF;
2850:
2851:
2852:
2853: IF (l_freeze_status = Fnd_Api.G_TRUE) THEN
2854: -- frozen to create the record
2855: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
2856: Fnd_Message.Set_Name('AMS', 'AMS_METR_FROZEN');
2857: Fnd_Msg_Pub.ADD;
2855: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
2856: Fnd_Message.Set_Name('AMS', 'AMS_METR_FROZEN');
2857: Fnd_Msg_Pub.ADD;
2858: END IF;
2859: l_return_status := Fnd_Api.G_RET_STS_ERROR;
2860: END IF;
2861:
2862: -- If it is frozen, or any errors happen abort API.
2863: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2859: l_return_status := Fnd_Api.G_RET_STS_ERROR;
2860: END IF;
2861:
2862: -- If it is frozen, or any errors happen abort API.
2863: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2864: RAISE Fnd_Api.G_EXC_ERROR;
2865: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2866: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2867: END IF;
2860: END IF;
2861:
2862: -- If it is frozen, or any errors happen abort API.
2863: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2864: RAISE Fnd_Api.G_EXC_ERROR;
2865: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2866: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2867: END IF;
2868:
2861:
2862: -- If it is frozen, or any errors happen abort API.
2863: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2864: RAISE Fnd_Api.G_EXC_ERROR;
2865: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2866: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2867: END IF;
2868:
2869: -- If the actual value has been posted to the budget do not delete.
2862: -- If it is frozen, or any errors happen abort API.
2863: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2864: RAISE Fnd_Api.G_EXC_ERROR;
2865: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2866: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2867: END IF;
2868:
2869: -- If the actual value has been posted to the budget do not delete.
2870: IF l_act_metric_rec.published_flag = 'Y' THEN
2871: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2872: Fnd_Message.SET_NAME('AMS', 'AMS_METR_PUBLISHED');
2873: Fnd_Msg_Pub.ADD;
2874: END IF;
2875: RAISE Fnd_Api.g_exc_error;
2876: END IF;
2877:
2878: -- Debug message.
2879: IF (AMS_DEBUG_HIGH_ON) THEN
2899: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
2900: Fnd_Message.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
2901: Fnd_Msg_Pub.ADD;
2902: END IF;
2903: RAISE Fnd_Api.g_exc_error;
2904: END IF;
2905:
2906: -- DMVINCEN 04/30/2001 Parent metrics need to be re-evaluated
2907: Make_ActMetric_Dirty(l_act_metric_rec.rollup_to_metric);
2914: WHERE activity_metric_id = l_depend_act_met_id;
2915:
2916: Delete_ActMetric (
2917: p_api_version => p_api_version,
2918: p_init_msg_list => Fnd_Api.G_FALSE,
2919: p_commit => Fnd_Api.G_FALSE,
2920: x_return_status => x_return_status,
2921: x_msg_count => x_msg_count,
2922: x_msg_data => x_msg_data,
2915:
2916: Delete_ActMetric (
2917: p_api_version => p_api_version,
2918: p_init_msg_list => Fnd_Api.G_FALSE,
2919: p_commit => Fnd_Api.G_FALSE,
2920: x_return_status => x_return_status,
2921: x_msg_count => x_msg_count,
2922: x_msg_data => x_msg_data,
2923: p_activity_metric_id => l_depend_act_met_id,
2922: x_msg_data => x_msg_data,
2923: p_activity_metric_id => l_depend_act_met_id,
2924: p_object_version_number => l_depend_version_num);
2925:
2926: IF x_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2927: RAISE Fnd_Api.G_EXC_ERROR;
2928: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2929: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2930: END IF;
2923: p_activity_metric_id => l_depend_act_met_id,
2924: p_object_version_number => l_depend_version_num);
2925:
2926: IF x_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2927: RAISE Fnd_Api.G_EXC_ERROR;
2928: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2929: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2930: END IF;
2931: END IF;
2924: p_object_version_number => l_depend_version_num);
2925:
2926: IF x_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2927: RAISE Fnd_Api.G_EXC_ERROR;
2928: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2929: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2930: END IF;
2931: END IF;
2932:
2925:
2926: IF x_return_status = Fnd_Api.G_RET_STS_ERROR THEN
2927: RAISE Fnd_Api.G_EXC_ERROR;
2928: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
2929: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2930: END IF;
2931: END IF;
2932:
2933: -- end
2935: --
2936: -- End API Body.
2937: --
2938:
2939: IF Fnd_Api.To_Boolean (p_commit) THEN
2940: COMMIT WORK;
2941: END IF;
2942:
2943: --
2953: --
2954: Fnd_Msg_Pub.Count_And_Get (
2955: p_count => x_msg_count,
2956: p_data => x_msg_data,
2957: p_encoded => Fnd_Api.G_FALSE
2958: );
2959:
2960: EXCEPTION
2961: WHEN Fnd_Api.G_EXC_ERROR THEN
2957: p_encoded => Fnd_Api.G_FALSE
2958: );
2959:
2960: EXCEPTION
2961: WHEN Fnd_Api.G_EXC_ERROR THEN
2962: ROLLBACK TO Delete_ActMetric_pvt;
2963: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2964: Fnd_Msg_Pub.Count_And_Get (
2965: p_count => x_msg_count,
2959:
2960: EXCEPTION
2961: WHEN Fnd_Api.G_EXC_ERROR THEN
2962: ROLLBACK TO Delete_ActMetric_pvt;
2963: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2964: Fnd_Msg_Pub.Count_And_Get (
2965: p_count => x_msg_count,
2966: p_data => x_msg_data,
2967: p_encoded => FND_API.G_FALSE
2963: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2964: Fnd_Msg_Pub.Count_And_Get (
2965: p_count => x_msg_count,
2966: p_data => x_msg_data,
2967: p_encoded => FND_API.G_FALSE
2968: );
2969: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2970: ROLLBACK TO Delete_ActMetric_pvt;
2971: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2965: p_count => x_msg_count,
2966: p_data => x_msg_data,
2967: p_encoded => FND_API.G_FALSE
2968: );
2969: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2970: ROLLBACK TO Delete_ActMetric_pvt;
2971: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2972: Fnd_Msg_Pub.Count_And_Get (
2973: p_count => x_msg_count,
2967: p_encoded => FND_API.G_FALSE
2968: );
2969: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2970: ROLLBACK TO Delete_ActMetric_pvt;
2971: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2972: Fnd_Msg_Pub.Count_And_Get (
2973: p_count => x_msg_count,
2974: p_data => x_msg_data,
2975: p_encoded => FND_API.G_FALSE
2971: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2972: Fnd_Msg_Pub.Count_And_Get (
2973: p_count => x_msg_count,
2974: p_data => x_msg_data,
2975: p_encoded => FND_API.G_FALSE
2976: );
2977: WHEN OTHERS THEN
2978: ROLLBACK TO Delete_ActMetric_pvt;
2979: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2975: p_encoded => FND_API.G_FALSE
2976: );
2977: WHEN OTHERS THEN
2978: ROLLBACK TO Delete_ActMetric_pvt;
2979: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2980: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
2981: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
2982: END IF;
2983: Fnd_Msg_Pub.Count_And_Get (
2982: END IF;
2983: Fnd_Msg_Pub.Count_And_Get (
2984: p_count => x_msg_count,
2985: p_data => x_msg_data,
2986: p_encoded => FND_API.G_FALSE
2987: );
2988: END Delete_ActMetric;
2989:
2990: -- Start of comments
3008: -- End of comments
3009:
3010: PROCEDURE Delete_ActMetric (
3011: p_api_version IN NUMBER,
3012: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
3013: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
3014:
3015: x_return_status OUT NOCOPY VARCHAR2,
3016: x_msg_count OUT NOCOPY NUMBER,
3009:
3010: PROCEDURE Delete_ActMetric (
3011: p_api_version IN NUMBER,
3012: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
3013: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
3014:
3015: x_return_status OUT NOCOPY VARCHAR2,
3016: x_msg_count OUT NOCOPY NUMBER,
3017: x_msg_data OUT NOCOPY VARCHAR2,
3066:
3067: --
3068: -- Initialize message list if p_init_msg_list is set to TRUE.
3069: --
3070: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN
3071: Fnd_Msg_Pub.Initialize;
3072: END IF;
3073:
3074: --
3073:
3074: --
3075: -- Standard check for API version compatibility.
3076: --
3077: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,
3078: p_api_version,
3079: L_API_NAME,
3080: G_PKG_NAME)
3081: THEN
3078: p_api_version,
3079: L_API_NAME,
3080: G_PKG_NAME)
3081: THEN
3082: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3083: END IF;
3084:
3085: --
3086: -- Initialize API return status to success.
3084:
3085: --
3086: -- Initialize API return status to success.
3087: --
3088: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
3089:
3090: --
3091: -- Begin API Body.
3092: --
3107: LOOP
3108: -- Recursively delete the next level down.
3109: Delete_actmetric(
3110: p_api_version => p_api_version,
3111: p_init_msg_list => Fnd_Api.G_FALSE,
3112: p_commit => Fnd_Api.G_FALSE,
3113: x_return_status => l_return_status,
3114: x_msg_count => x_msg_count,
3115: x_msg_data => x_msg_data,
3108: -- Recursively delete the next level down.
3109: Delete_actmetric(
3110: p_api_version => p_api_version,
3111: p_init_msg_list => Fnd_Api.G_FALSE,
3112: p_commit => Fnd_Api.G_FALSE,
3113: x_return_status => l_return_status,
3114: x_msg_count => x_msg_count,
3115: x_msg_data => x_msg_data,
3116: p_arc_act_metric_used_by => p_arc_act_metric_used_by,
3117: p_act_metric_used_by_id => p_act_metric_used_by_id,
3118: p_activity_metric_id => l_activity_metric_ids(l_index),
3119: p_object_version_number => l_object_version_numbers(l_index));
3120:
3121: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
3122: RAISE Fnd_Api.G_EXC_ERROR;
3123: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
3124: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3125: END IF;
3118: p_activity_metric_id => l_activity_metric_ids(l_index),
3119: p_object_version_number => l_object_version_numbers(l_index));
3120:
3121: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
3122: RAISE Fnd_Api.G_EXC_ERROR;
3123: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
3124: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3125: END IF;
3126:
3119: p_object_version_number => l_object_version_numbers(l_index));
3120:
3121: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
3122: RAISE Fnd_Api.G_EXC_ERROR;
3123: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
3124: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3125: END IF;
3126:
3127: END LOOP;
3120:
3121: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
3122: RAISE Fnd_Api.G_EXC_ERROR;
3123: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
3124: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3125: END IF;
3126:
3127: END LOOP;
3128: END IF;
3143:
3144: -- Recursively delete the next level down.
3145: Delete_actmetric(
3146: p_api_version => p_api_version,
3147: p_init_msg_list => Fnd_Api.G_FALSE,
3148: p_commit => Fnd_Api.G_FALSE,
3149: x_return_status => l_return_status,
3150: x_msg_count => x_msg_count,
3151: x_msg_data => x_msg_data,
3144: -- Recursively delete the next level down.
3145: Delete_actmetric(
3146: p_api_version => p_api_version,
3147: p_init_msg_list => Fnd_Api.G_FALSE,
3148: p_commit => Fnd_Api.G_FALSE,
3149: x_return_status => l_return_status,
3150: x_msg_count => x_msg_count,
3151: x_msg_data => x_msg_data,
3152: p_arc_act_metric_used_by => p_arc_act_metric_used_by,
3153: p_act_metric_used_by_id => p_act_metric_used_by_id,
3154: p_activity_metric_id => l_activity_metric_ids(l_index),
3155: p_object_version_number => l_object_version_numbers(l_index));
3156:
3157: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
3158: RAISE Fnd_Api.G_EXC_ERROR;
3159: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
3160: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3161: END IF;
3154: p_activity_metric_id => l_activity_metric_ids(l_index),
3155: p_object_version_number => l_object_version_numbers(l_index));
3156:
3157: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
3158: RAISE Fnd_Api.G_EXC_ERROR;
3159: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
3160: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3161: END IF;
3162:
3155: p_object_version_number => l_object_version_numbers(l_index));
3156:
3157: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
3158: RAISE Fnd_Api.G_EXC_ERROR;
3159: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
3160: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3161: END IF;
3162:
3163: END LOOP;
3156:
3157: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
3158: RAISE Fnd_Api.G_EXC_ERROR;
3159: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
3160: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3161: END IF;
3162:
3163: END LOOP;
3164: END IF;
3165:
3166: -- Delete the top activity metric passed in.
3167: Delete_actmetric(
3168: p_api_version => p_api_version,
3169: p_init_msg_list => Fnd_Api.G_FALSE,
3170: p_commit => Fnd_Api.G_FALSE,
3171: x_return_status => l_return_status,
3172: x_msg_count => x_msg_count,
3173: x_msg_data => x_msg_data,
3166: -- Delete the top activity metric passed in.
3167: Delete_actmetric(
3168: p_api_version => p_api_version,
3169: p_init_msg_list => Fnd_Api.G_FALSE,
3170: p_commit => Fnd_Api.G_FALSE,
3171: x_return_status => l_return_status,
3172: x_msg_count => x_msg_count,
3173: x_msg_data => x_msg_data,
3174: p_activity_metric_id => p_activity_metric_id,
3173: x_msg_data => x_msg_data,
3174: p_activity_metric_id => p_activity_metric_id,
3175: p_object_version_number => p_object_version_number);
3176:
3177: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
3178: RAISE Fnd_Api.G_EXC_ERROR;
3179: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
3180: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3181: END IF;
3174: p_activity_metric_id => p_activity_metric_id,
3175: p_object_version_number => p_object_version_number);
3176:
3177: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
3178: RAISE Fnd_Api.G_EXC_ERROR;
3179: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
3180: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3181: END IF;
3182:
3175: p_object_version_number => p_object_version_number);
3176:
3177: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
3178: RAISE Fnd_Api.G_EXC_ERROR;
3179: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
3180: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3181: END IF;
3182:
3183: END IF;
3176:
3177: IF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
3178: RAISE Fnd_Api.G_EXC_ERROR;
3179: ELSIF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
3180: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3181: END IF;
3182:
3183: END IF;
3184:
3185: --
3186: -- End API Body.
3187: --
3188:
3189: IF Fnd_Api.To_Boolean (p_commit) THEN
3190: COMMIT WORK;
3191: END IF;
3192:
3193: --
3203: --
3204: Fnd_Msg_Pub.Count_And_Get (
3205: p_count => x_msg_count,
3206: p_data => x_msg_data,
3207: p_encoded => Fnd_Api.G_FALSE
3208: );
3209:
3210: EXCEPTION
3211: WHEN Fnd_Api.G_EXC_ERROR THEN
3207: p_encoded => Fnd_Api.G_FALSE
3208: );
3209:
3210: EXCEPTION
3211: WHEN Fnd_Api.G_EXC_ERROR THEN
3212: -- ROLLBACK TO Delete_ActMetric_By_Object_pvt;
3213: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3214: Fnd_Msg_Pub.Count_And_Get (
3215: p_count => x_msg_count,
3209:
3210: EXCEPTION
3211: WHEN Fnd_Api.G_EXC_ERROR THEN
3212: -- ROLLBACK TO Delete_ActMetric_By_Object_pvt;
3213: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3214: Fnd_Msg_Pub.Count_And_Get (
3215: p_count => x_msg_count,
3216: p_data => x_msg_data,
3217: p_encoded => FND_API.G_FALSE
3213: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3214: Fnd_Msg_Pub.Count_And_Get (
3215: p_count => x_msg_count,
3216: p_data => x_msg_data,
3217: p_encoded => FND_API.G_FALSE
3218: );
3219: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3220: -- ROLLBACK TO Delete_ActMetric_By_Object_pvt;
3221: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3215: p_count => x_msg_count,
3216: p_data => x_msg_data,
3217: p_encoded => FND_API.G_FALSE
3218: );
3219: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3220: -- ROLLBACK TO Delete_ActMetric_By_Object_pvt;
3221: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3222: Fnd_Msg_Pub.Count_And_Get (
3223: p_count => x_msg_count,
3217: p_encoded => FND_API.G_FALSE
3218: );
3219: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3220: -- ROLLBACK TO Delete_ActMetric_By_Object_pvt;
3221: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3222: Fnd_Msg_Pub.Count_And_Get (
3223: p_count => x_msg_count,
3224: p_data => x_msg_data,
3225: p_encoded => FND_API.G_FALSE
3221: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3222: Fnd_Msg_Pub.Count_And_Get (
3223: p_count => x_msg_count,
3224: p_data => x_msg_data,
3225: p_encoded => FND_API.G_FALSE
3226: );
3227: WHEN OTHERS THEN
3228: -- ROLLBACK TO Delete_ActMetric_By_Object_pvt;
3229: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3225: p_encoded => FND_API.G_FALSE
3226: );
3227: WHEN OTHERS THEN
3228: -- ROLLBACK TO Delete_ActMetric_By_Object_pvt;
3229: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3230: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
3231: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
3232: END IF;
3233: Fnd_Msg_Pub.Count_And_Get (
3232: END IF;
3233: Fnd_Msg_Pub.Count_And_Get (
3234: p_count => x_msg_count,
3235: p_data => x_msg_data,
3236: p_encoded => FND_API.G_FALSE
3237: );
3238: END Delete_ActMetric;
3239:
3240:
3254: -- End of comments
3255:
3256: PROCEDURE Lock_ActMetric (
3257: p_api_version IN NUMBER,
3258: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
3259:
3260: x_return_status OUT NOCOPY VARCHAR2,
3261: x_msg_count OUT NOCOPY NUMBER,
3262: x_msg_data OUT NOCOPY VARCHAR2,
3294:
3295: --
3296: -- Initialize message list if p_init_msg_list is set to TRUE.
3297: --
3298: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN
3299: Fnd_Msg_Pub.Initialize;
3300: END IF;
3301:
3302: --
3301:
3302: --
3303: -- Standard check for API version compatibility.
3304: --
3305: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,
3306: p_api_version,
3307: L_API_NAME,
3308: G_PKG_NAME)
3309: THEN
3306: p_api_version,
3307: L_API_NAME,
3308: G_PKG_NAME)
3309: THEN
3310: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3311: END IF;
3312:
3313: --
3314: -- Initialize API return status to success.
3312:
3313: --
3314: -- Initialize API return status to success.
3315: --
3316: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
3317:
3318: --
3319: -- Begin API Body
3320: --
3343: Fnd_Message.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
3344: Fnd_Msg_Pub.ADD;
3345: END IF;
3346: END IF;
3347: RAISE Fnd_Api.g_exc_error;
3348: END IF;
3349: CLOSE c_act_metrics_info;
3350:
3351:
3355: --
3356: Fnd_Msg_Pub.Count_And_Get (
3357: p_count => x_msg_count,
3358: p_data => x_msg_data,
3359: p_encoded => Fnd_Api.G_FALSE
3360: );
3361:
3362: --
3363: -- Debug message.
3367: END IF;
3368:
3369:
3370: EXCEPTION
3371: WHEN Fnd_Api.G_EXC_ERROR THEN
3372: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3373: Fnd_Msg_Pub.Count_And_Get (
3374: p_count => x_msg_count,
3375: p_data => x_msg_data,
3368:
3369:
3370: EXCEPTION
3371: WHEN Fnd_Api.G_EXC_ERROR THEN
3372: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3373: Fnd_Msg_Pub.Count_And_Get (
3374: p_count => x_msg_count,
3375: p_data => x_msg_data,
3376: p_encoded => FND_API.G_FALSE
3372: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3373: Fnd_Msg_Pub.Count_And_Get (
3374: p_count => x_msg_count,
3375: p_data => x_msg_data,
3376: p_encoded => FND_API.G_FALSE
3377: );
3378: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3379: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3380: Fnd_Msg_Pub.Count_And_Get (
3374: p_count => x_msg_count,
3375: p_data => x_msg_data,
3376: p_encoded => FND_API.G_FALSE
3377: );
3378: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3379: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3380: Fnd_Msg_Pub.Count_And_Get (
3381: p_count => x_msg_count,
3382: p_data => x_msg_data,
3375: p_data => x_msg_data,
3376: p_encoded => FND_API.G_FALSE
3377: );
3378: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3379: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3380: Fnd_Msg_Pub.Count_And_Get (
3381: p_count => x_msg_count,
3382: p_data => x_msg_data,
3383: p_encoded => FND_API.G_FALSE
3379: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3380: Fnd_Msg_Pub.Count_And_Get (
3381: p_count => x_msg_count,
3382: p_data => x_msg_data,
3383: p_encoded => FND_API.G_FALSE
3384: );
3385: WHEN Ams_Utility_Pvt.RESOURCE_LOCKED THEN
3386: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
3387:
3382: p_data => x_msg_data,
3383: p_encoded => FND_API.G_FALSE
3384: );
3385: WHEN Ams_Utility_Pvt.RESOURCE_LOCKED THEN
3386: x_return_status := Fnd_Api.G_RET_STS_ERROR ;
3387:
3388: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
3389: Fnd_Message.set_name('AMS', 'AMS_API_RESOURCE_LOCKED');
3390: Fnd_Msg_Pub.ADD;
3392:
3393: Fnd_Msg_Pub.Count_And_Get (
3394: p_count => x_msg_count,
3395: p_data => x_msg_data,
3396: p_encoded => Fnd_Api.G_FALSE
3397: );
3398: WHEN OTHERS THEN
3399: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3400: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
3395: p_data => x_msg_data,
3396: p_encoded => Fnd_Api.G_FALSE
3397: );
3398: WHEN OTHERS THEN
3399: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3400: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
3401: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
3402: END IF;
3403: Fnd_Msg_Pub.Count_And_Get (
3402: END IF;
3403: Fnd_Msg_Pub.Count_And_Get (
3404: p_count => x_msg_count,
3405: p_data => x_msg_data,
3406: p_encoded => Fnd_Api.G_FALSE
3407: );
3408: END Lock_ActMetric;
3409:
3410: -- Start of comments
3424: -- End of comments
3425:
3426: PROCEDURE Validate_ActMetric (
3427: p_api_version IN NUMBER,
3428: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
3429: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
3430:
3431: x_return_status OUT NOCOPY VARCHAR2,
3432: x_msg_count OUT NOCOPY NUMBER,
3425:
3426: PROCEDURE Validate_ActMetric (
3427: p_api_version IN NUMBER,
3428: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
3429: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
3430:
3431: x_return_status OUT NOCOPY VARCHAR2,
3432: x_msg_count OUT NOCOPY NUMBER,
3433: x_msg_data OUT NOCOPY VARCHAR2,
3451:
3452: --
3453: -- Initialize message list if p_init_msg_list is set to TRUE.
3454: --
3455: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN
3456: Fnd_Msg_Pub.Initialize;
3457: END IF;
3458:
3459: --
3458:
3459: --
3460: -- Standard check for API version compatibility.
3461: --
3462: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,
3463: p_api_version,
3464: L_API_NAME,
3465: G_PKG_NAME)
3466: THEN
3463: p_api_version,
3464: L_API_NAME,
3465: G_PKG_NAME)
3466: THEN
3467: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3468: END IF;
3469:
3470: --
3471: -- Initialize API return status to success.
3469:
3470: --
3471: -- Initialize API return status to success.
3472: --
3473: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
3474:
3475: --
3476: -- Begin API Body.
3477: --
3489: x_return_status => l_return_status
3490: );
3491:
3492: -- If any errors happen abort API.
3493: IF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
3494: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3495: ELSIF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
3496: RAISE Fnd_Api.G_EXC_ERROR;
3497: END IF;
3490: );
3491:
3492: -- If any errors happen abort API.
3493: IF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
3494: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3495: ELSIF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
3496: RAISE Fnd_Api.G_EXC_ERROR;
3497: END IF;
3498: END IF;
3491:
3492: -- If any errors happen abort API.
3493: IF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
3494: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3495: ELSIF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
3496: RAISE Fnd_Api.G_EXC_ERROR;
3497: END IF;
3498: END IF;
3499:
3492: -- If any errors happen abort API.
3493: IF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
3494: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3495: ELSIF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
3496: RAISE Fnd_Api.G_EXC_ERROR;
3497: END IF;
3498: END IF;
3499:
3500: IF (AMS_DEBUG_HIGH_ON) THEN
3507: p_complete_rec => NULL,
3508: x_return_status => l_return_status
3509: );
3510:
3511: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3512: RAISE Fnd_Api.g_exc_unexpected_error;
3513: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
3514: RAISE Fnd_Api.g_exc_error;
3515: END IF;
3508: x_return_status => l_return_status
3509: );
3510:
3511: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3512: RAISE Fnd_Api.g_exc_unexpected_error;
3513: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
3514: RAISE Fnd_Api.g_exc_error;
3515: END IF;
3516: END IF;
3509: );
3510:
3511: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3512: RAISE Fnd_Api.g_exc_unexpected_error;
3513: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
3514: RAISE Fnd_Api.g_exc_error;
3515: END IF;
3516: END IF;
3517:
3510:
3511: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
3512: RAISE Fnd_Api.g_exc_unexpected_error;
3513: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
3514: RAISE Fnd_Api.g_exc_error;
3515: END IF;
3516: END IF;
3517:
3518: --
3525: --
3526: Fnd_Msg_Pub.Count_And_Get (
3527: p_count => x_msg_count,
3528: p_data => x_msg_data,
3529: p_encoded => Fnd_Api.G_FALSE
3530: );
3531:
3532: IF (AMS_DEBUG_HIGH_ON) THEN
3533: Ams_Utility_Pvt.debug_message(l_full_name ||': end');
3533: Ams_Utility_Pvt.debug_message(l_full_name ||': end');
3534: END IF;
3535:
3536: EXCEPTION
3537: WHEN Fnd_Api.G_EXC_ERROR THEN
3538: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3539: Fnd_Msg_Pub.Count_And_Get (
3540: p_count => x_msg_count,
3541: p_data => x_msg_data,
3534: END IF;
3535:
3536: EXCEPTION
3537: WHEN Fnd_Api.G_EXC_ERROR THEN
3538: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3539: Fnd_Msg_Pub.Count_And_Get (
3540: p_count => x_msg_count,
3541: p_data => x_msg_data,
3542: p_encoded => FND_API.G_FALSE
3538: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3539: Fnd_Msg_Pub.Count_And_Get (
3540: p_count => x_msg_count,
3541: p_data => x_msg_data,
3542: p_encoded => FND_API.G_FALSE
3543: );
3544: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3545: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3546: Fnd_Msg_Pub.Count_And_Get (
3540: p_count => x_msg_count,
3541: p_data => x_msg_data,
3542: p_encoded => FND_API.G_FALSE
3543: );
3544: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3545: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3546: Fnd_Msg_Pub.Count_And_Get (
3547: p_count => x_msg_count,
3548: p_data => x_msg_data,
3541: p_data => x_msg_data,
3542: p_encoded => FND_API.G_FALSE
3543: );
3544: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3545: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3546: Fnd_Msg_Pub.Count_And_Get (
3547: p_count => x_msg_count,
3548: p_data => x_msg_data,
3549: p_encoded => FND_API.G_FALSE
3545: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3546: Fnd_Msg_Pub.Count_And_Get (
3547: p_count => x_msg_count,
3548: p_data => x_msg_data,
3549: p_encoded => FND_API.G_FALSE
3550: );
3551: WHEN OTHERS THEN
3552: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3553: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
3548: p_data => x_msg_data,
3549: p_encoded => FND_API.G_FALSE
3550: );
3551: WHEN OTHERS THEN
3552: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3553: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
3554: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
3555: END IF;
3556: Fnd_Msg_Pub.Count_And_Get (
3555: END IF;
3556: Fnd_Msg_Pub.Count_And_Get (
3557: p_count => x_msg_count,
3558: p_data => x_msg_data,
3559: p_encoded => FND_API.G_FALSE
3560: );
3561: END Validate_ActMetric;
3562:
3563:
3584: )
3585: IS
3586: BEGIN
3587: -- Initialize return status to success.
3588: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
3589:
3590: -- APPLICATION_ID
3591:
3592: IF p_act_metric_rec.application_id IS NULL
3597: Fnd_Message.Set_Name('AMS', 'AMS_METR_MISSING_APP_ID');
3598: Fnd_Msg_Pub.ADD;
3599: END IF;
3600:
3601: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3602:
3603: -- If any error happens abort API.
3604: RETURN;
3605: END IF;
3614: Fnd_Message.Set_Name('AMS', 'AMS_METR_MISSING_ARC_USED_FOR');
3615: Fnd_Msg_Pub.ADD;
3616: END IF;
3617:
3618: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3619:
3620: -- If any error happens abort API.
3621: RETURN;
3622: END IF;
3632: Fnd_Message.Set_Name('AMS', 'AMS_METR_MISSING_ARC_USED_FOR');
3633: Fnd_Msg_Pub.ADD;
3634: END IF;
3635:
3636: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3637:
3638: -- If any error happens abort API.
3639: RETURN;
3640: END IF;
3649: Fnd_Message.Set_Name('AMS', 'AMS_METR_MISSING_METRIC_ID');
3650: Fnd_Msg_Pub.ADD;
3651: END IF;
3652:
3653: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3654:
3655: -- If any error happens abort API.
3656: RETURN;
3657: END IF;
3668: FND_MESSAGE.Set_Name('AMS', 'AMS_METR_MISSING_UOM');
3669: FND_MSG_PUB.Add;
3670: END IF;
3671:
3672: x_return_status := FND_API.G_RET_STS_ERROR;
3673:
3674: -- If any error happens abort API.
3675: RETURN;
3676: END IF;
3688: Fnd_Message.Set_Name('AMS', 'AMS_METR_MISSING_SENSITIVE');
3689: Fnd_Msg_Pub.ADD;
3690: END IF;
3691:
3692: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3693:
3694: -- If any error happens abort API.
3695: RETURN;
3696: END IF;
3748: OR metric_calculation_type <> 'FUNCTION');
3749:
3750: BEGIN
3751:
3752: x_return_status := Fnd_Api.g_ret_sts_success;
3753:
3754: -- For Create_ActMetric2, when activity_metric_id is passed in, we need to
3755: -- check if this activity_metric_id is unique.
3756: IF p_validation_mode = Jtf_Plsql_Api.g_create
3760:
3761: IF Ams_Utility_Pvt.Check_Uniqueness(
3762: p_table_name => 'ams_act_metrics_all',
3763: p_where_clause => l_where_clause
3764: ) = Fnd_Api.g_false
3765: THEN
3766: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error)
3767: THEN
3768: Fnd_Message.set_name('AMS', 'AMS_METR_ACT_DUP_ID');
3767: THEN
3768: Fnd_Message.set_name('AMS', 'AMS_METR_ACT_DUP_ID');
3769: Fnd_Msg_Pub.ADD;
3770: END IF;
3771: x_return_status := Fnd_Api.g_ret_sts_error;
3772: RETURN;
3773: END IF;
3774: END IF;
3775:
3790: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
3791: Fnd_Message.set_name('AMS', 'AMS_ACT_MET_DUP_FUNCTION');
3792: Fnd_Msg_Pub.ADD;
3793: END IF;
3794: x_return_status := Fnd_Api.g_ret_sts_error;
3795: END IF;
3796:
3797: END IF;
3798:
3857: and enabled_flag = p_enabled_flag;
3858:
3859: BEGIN
3860: -- Initialize return status to success.
3861: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
3862:
3863: --
3864: -- Begin Validate Referential
3865: --
3877: FND_MESSAGE.Set_Name('AMS', 'AMS_METR_INVALID_MET');
3878: FND_MSG_PUB.ADD;
3879: END IF;
3880:
3881: x_return_status := FND_API.G_RET_STS_ERROR;
3882: CLOSE c_check_metric_id;
3883: RETURN;
3884: END IF;
3885: CLOSE c_check_metric_id;
3885: CLOSE c_check_metric_id;
3886:
3887: -- TRANSACTION_CURRENCY_CODE
3888: -- Do not validate FK if NULL
3889: IF l_act_metrics_rec.transaction_currency_code <> Fnd_Api.G_MISS_CHAR THEN
3890:
3891: OPEN c_check_currency(l_act_metrics_rec.transaction_currency_code,'Y');
3892: IF c_check_currency%NOTFOUND
3893: THEN
3896: FND_MESSAGE.Set_Name('AMS', 'AMS_METR_INVALID_TRANS_CUR');
3897: FND_MSG_PUB.ADD;
3898: END IF;
3899:
3900: x_return_status := FND_API.G_RET_STS_ERROR;
3901: CLOSE c_check_currency;
3902: RETURN;
3903: END IF;
3904: CLOSE c_check_currency;
3907:
3908:
3909: -- FUNCTIONAL_CURRENCY_CODE
3910: -- Do not validate FK if NULL
3911: IF l_act_metrics_rec.functional_currency_code <> Fnd_Api.G_MISS_CHAR THEN
3912:
3913: OPEN c_check_currency(l_act_metrics_rec.functional_currency_code,'Y');
3914: IF c_check_currency%NOTFOUND
3915: THEN
3918: FND_MESSAGE.Set_Name('AMS', 'AMS_METR_INVALID_FUNC_CUR');
3919: FND_MSG_PUB.ADD;
3920: END IF;
3921:
3922: x_return_status := FND_API.G_RET_STS_ERROR;
3923: RETURN;
3924: END IF;
3925: CLOSE c_check_currency;
3926:
3938: ,p_pk_name => l_pk_name
3939: ,p_pk_value => l_pk_value
3940: ,p_pk_data_type => l_pk_data_type
3941: ,p_additional_where_clause => l_additional_where_clause
3942: ) = Fnd_Api.G_FALSE
3943: THEN
3944: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
3945: THEN
3946: Fnd_Message.Set_Name('AMS', 'AMS_METR_INVALID_TRANS_CUR');
3946: Fnd_Message.Set_Name('AMS', 'AMS_METR_INVALID_TRANS_CUR');
3947: Fnd_Msg_Pub.ADD;
3948: END IF;
3949:
3950: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3951: RETURN;
3952: END IF; -- Check_FK_Exists*/
3953:
3954:
3964: ,p_pk_name => l_pk_name
3965: ,p_pk_value => l_pk_value
3966: ,p_pk_data_type => l_pk_data_type
3967: ,p_additional_where_clause => l_additional_where_clause
3968: ) = Fnd_Api.G_FALSE
3969: THEN
3970: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
3971: THEN
3972: Fnd_Message.Set_Name('AMS', 'AMS_METR_INVALID_FUNC_CUR');
3972: Fnd_Message.Set_Name('AMS', 'AMS_METR_INVALID_FUNC_CUR');
3973: Fnd_Msg_Pub.ADD;
3974: END IF;
3975:
3976: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3977: RETURN;
3978: END IF; -- Check_FK_Exists*/
3979:
3980:
3987: -- Begin Validate Flags
3988: --
3989:
3990: -- SENSITIVE_DATA_FLAG
3991: IF l_act_metrics_rec.sensitive_data_flag <> Fnd_Api.G_MISS_CHAR THEN
3992: IF Ams_Utility_Pvt.Is_Y_Or_N (l_act_metrics_rec.sensitive_data_flag)
3993: = Fnd_Api.G_FALSE
3994: THEN
3995: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
3989:
3990: -- SENSITIVE_DATA_FLAG
3991: IF l_act_metrics_rec.sensitive_data_flag <> Fnd_Api.G_MISS_CHAR THEN
3992: IF Ams_Utility_Pvt.Is_Y_Or_N (l_act_metrics_rec.sensitive_data_flag)
3993: = Fnd_Api.G_FALSE
3994: THEN
3995: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR)
3996: THEN
3997: Fnd_Message.Set_Name('AMS', 'AMS_METR_INVALID_SENS_FLAG');
3997: Fnd_Message.Set_Name('AMS', 'AMS_METR_INVALID_SENS_FLAG');
3998: Fnd_Msg_Pub.ADD;
3999: END IF;
4000:
4001: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4002: RETURN;
4003: END IF; -- Is_Y_Or_N
4004: END IF;
4005:
4012: --
4013: -- choang - 30-oct-2003 - enh 3141834: use lookup AMS_METRIC_OBJECT_TYPE,
4014: -- AMS_METRIC_ALLOCATION_TYPE, AMS_METRIC_ROLLUP_TYPE
4015: -- ARC_METRIC_USED_FOR_OBJECT
4016: IF l_act_metrics_rec.arc_act_metric_used_by <> FND_API.g_miss_char THEN
4017: l_dummy := NULL;
4018: OPEN c_arc_metric_usage(l_act_metrics_rec.arc_act_metric_used_by);
4019: FETCH c_arc_metric_usage INTO l_dummy;
4020: CLOSE c_arc_metric_usage;
4022: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4023: Fnd_Message.Set_Name ('AMS', 'AMS_METR_INVALID_USED_BY');
4024: FND_MSG_PUB.add;
4025: END IF;
4026: x_return_status := FND_API.g_ret_sts_error;
4027: END IF;
4028: END IF;
4029:
4030: -- ARC_ACTIVITY_METRIC_ORIGIN
4029:
4030: -- ARC_ACTIVITY_METRIC_ORIGIN
4031: -- DMVINCEN 03/11/2002: Added Dialog Components.
4032: -- DMVINCEN 03/11/2003: Removed Dialogue Components.
4033: IF l_act_metrics_rec.arc_activity_metric_origin <> Fnd_Api.G_MISS_CHAR THEN
4034: l_dummy := NULL;
4035: OPEN c_arc_metric_usage(l_act_metrics_rec.arc_activity_metric_origin);
4036: FETCH c_arc_metric_usage INTO l_dummy;
4037: CLOSE c_arc_metric_usage;
4039: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4040: Fnd_Message.Set_Name ('AMS', 'AMS_METR_INVALID_ORIGIN');
4041: FND_MSG_PUB.add;
4042: END IF;
4043: x_return_status := FND_API.g_ret_sts_error;
4044: END IF;
4045: END IF;
4046:
4047: --
4053: --
4054:
4055: EXCEPTION
4056: WHEN OTHERS THEN
4057: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
4058: END Check_ActMetric_Items;
4059:
4060: --
4061: -- Start of comments.
4159:
4160: l_ref_metric_rec c_ref_metric%ROWTYPE;
4161: BEGIN
4162:
4163: x_return_status := Fnd_Api.g_ret_sts_success;
4164:
4165: -- Initialize any values that are needed from
4166: -- the database to do comparisons in the validation.
4167: OPEN c_metric_details (l_act_metrics_rec.metric_id);
4187: p_object_id => l_act_metrics_rec.act_metric_used_by_id,
4188: p_object_type => l_act_metrics_rec.arc_act_metric_used_by,
4189: p_user_or_role_id => AMS_Utility_PVT.get_resource_id (FND_GLOBAL.user_id),
4190: p_user_or_role_type => 'USER') <> 'F' THEN
4191: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4192: FND_MESSAGE.set_name ('AMS', 'AMS_NO_METRIC_UPDATE_ACCESS');
4193: FND_MESSAGE.set_token('OBJECT',
4194: AMS_Utility_PVT.get_object_name(l_act_metrics_rec.arc_act_metric_used_by,
4195: l_act_metrics_rec.act_metric_used_by_id)
4207: --
4208: -- choang - 01-may-2003 - validate forecast value update
4209: -- moved from the main update api
4210: --
4211: IF (l_freeze_status = Fnd_Api.G_TRUE)
4212: AND ((nvl(l_act_metrics_rec.trans_forecasted_value,0) <> FND_API.g_miss_num
4213: AND NVL (l_act_metrics_rec.trans_forecasted_value, 0) <>
4214: NVL (l_ref_metric_rec.trans_forecasted_value, 0) )
4215: OR ( nvl(l_act_metrics_rec.forecasted_variable_value,0) <> FND_API.g_miss_num
4208: -- choang - 01-may-2003 - validate forecast value update
4209: -- moved from the main update api
4210: --
4211: IF (l_freeze_status = Fnd_Api.G_TRUE)
4212: AND ((nvl(l_act_metrics_rec.trans_forecasted_value,0) <> FND_API.g_miss_num
4213: AND NVL (l_act_metrics_rec.trans_forecasted_value, 0) <>
4214: NVL (l_ref_metric_rec.trans_forecasted_value, 0) )
4215: OR ( nvl(l_act_metrics_rec.forecasted_variable_value,0) <> FND_API.g_miss_num
4216: AND NVL (l_act_metrics_rec.forecasted_variable_value, 0) <>
4211: IF (l_freeze_status = Fnd_Api.G_TRUE)
4212: AND ((nvl(l_act_metrics_rec.trans_forecasted_value,0) <> FND_API.g_miss_num
4213: AND NVL (l_act_metrics_rec.trans_forecasted_value, 0) <>
4214: NVL (l_ref_metric_rec.trans_forecasted_value, 0) )
4215: OR ( nvl(l_act_metrics_rec.forecasted_variable_value,0) <> FND_API.g_miss_num
4216: AND NVL (l_act_metrics_rec.forecasted_variable_value, 0) <>
4217: NVL (l_ref_metric_rec.forecasted_variable_value, 0) ) )
4218: AND l_metric_details_rec.metric_category IN
4219: (G_CATEGORY_COSTS, G_CATEGORY_REVENUES)
4231: Fnd_Message.set_name('AMS', 'AMS_UPDATE_FORECAST');
4232: Fnd_Message.set_token('OBJECT', l_object_name);
4233: Fnd_Msg_Pub.ADD;
4234: END IF; --msg_pub if
4235: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4236: END IF;
4237:
4238: --
4239: -- bug 2931351 - disallow update of actuals before active
4241: -- Make a call-out to check the frozen status.
4242: -- If it is frozen, disallow the operation.
4243: -- Use NVL for comparison of NULLs to 0 because
4244: -- refresh engine updates NULL metrics to 0.
4245: IF l_act_metrics_rec.trans_actual_value <> FND_API.g_miss_num
4246: AND NVL (l_act_metrics_rec.trans_actual_value, 0) <>
4247: NVL (l_ref_metric_rec.func_actual_value, 0)
4248: AND l_metric_details_rec.metric_category IN
4249: (G_CATEGORY_COSTS, G_CATEGORY_REVENUES)
4255: --sunkumar 04/30/2003
4256: --added profile option to restrict updation of actuals
4257: IF (l_allow_actual_update = 'N') THEN
4258: --object is not active and profile is N hence do not allow update
4259: IF (l_freeze_status = Fnd_Api.G_FALSE) THEN
4260: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
4261: Fnd_Message.set_name('AMS', 'AMS_METR_UPDATE_ACTUAL');
4262: Fnd_Msg_Pub.ADD;
4263: END IF; --msg_pub if
4261: Fnd_Message.set_name('AMS', 'AMS_METR_UPDATE_ACTUAL');
4262: Fnd_Msg_Pub.ADD;
4263: END IF; --msg_pub if
4264:
4265: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4266: END IF; --freeze status if
4267: END IF; --profile if
4268: END IF; -- check if func_actual_value changed
4269: -- Validate Create Mode --
4274: -- Make a call-out to check the frozen status.
4275: -- If it is frozen, disallow the operation.
4276: -- Use NVL for comparison of NULLs to 0 because
4277: -- refresh engine updates NULL metrics to 0.
4278: IF l_act_metrics_rec.trans_actual_value <> FND_API.g_miss_num
4279: AND NVL (l_act_metrics_rec.trans_actual_value, 0) <> 0
4280: AND l_metric_details_rec.metric_category IN
4281: (G_CATEGORY_COSTS, G_CATEGORY_REVENUES)
4282: AND l_metric_details_rec.metric_calculation_type IN
4286:
4287: -- Profile option to restrict updation of actuals.
4288: IF (l_allow_actual_update = 'N') THEN
4289: --object is not active and profile is N hence do not allow update
4290: IF (l_freeze_status = Fnd_Api.G_FALSE) THEN
4291: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
4292: Fnd_Message.set_name('AMS', 'AMS_METR_UPDATE_ACTUAL');
4293: Fnd_Msg_Pub.ADD;
4294: END IF; --msg_pub if
4292: Fnd_Message.set_name('AMS', 'AMS_METR_UPDATE_ACTUAL');
4293: Fnd_Msg_Pub.ADD;
4294: END IF; --msg_pub if
4295:
4296: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4297: END IF; --freeze status if
4298: END IF; --profile if
4299: END IF; -- check if func_actual_value changed
4300:
4305: NULL; -- nothing here yet
4306: END IF;
4307:
4308: -- Validate All Modes --
4309: IF l_act_metrics_rec.arc_act_metric_used_by <> Fnd_Api.G_MISS_CHAR THEN
4310:
4311: IF l_act_metrics_rec.act_metric_used_by_id = Fnd_Api.G_MISS_NUM THEN
4312: l_act_metrics_rec.act_metric_used_by_id :=
4313: p_complete_rec.act_metric_used_by_id;
4307:
4308: -- Validate All Modes --
4309: IF l_act_metrics_rec.arc_act_metric_used_by <> Fnd_Api.G_MISS_CHAR THEN
4310:
4311: IF l_act_metrics_rec.act_metric_used_by_id = Fnd_Api.G_MISS_NUM THEN
4312: l_act_metrics_rec.act_metric_used_by_id :=
4313: p_complete_rec.act_metric_used_by_id;
4314: END IF;
4315:
4312: l_act_metrics_rec.act_metric_used_by_id :=
4313: p_complete_rec.act_metric_used_by_id;
4314: END IF;
4315:
4316: IF l_act_metrics_rec.metric_id = Fnd_Api.G_MISS_NUM THEN
4317: l_act_metrics_rec.metric_id := p_complete_rec.metric_id;
4318: END IF;
4319:
4320: -- DMVINCEN 06/07/2001
4331: Fnd_Message.Set_Name('AMS', 'AMS_METR_INVALID_ACT_USAGE');
4332: Fnd_Msg_Pub.ADD;
4333: END IF;
4334:
4335: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4336: END IF; -- Check_FK_Exists
4337:
4338: -- Get table_name and pk_name for the ARC qualifier.
4339: /*sunkumar 21-apr-2004 added*/
4339: /*sunkumar 21-apr-2004 added*/
4340: IF Validate_Object_Exists(
4341: p_object_type => l_act_metrics_rec.arc_act_metric_used_by
4342: ,p_object_id => l_act_metrics_rec.act_metric_used_by_id
4343: ) = Fnd_Api.G_FALSE
4344: THEN
4345: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
4346: l_object_name := ams_utility_pvt.get_lookup_meaning(
4347: 'AMS_SYS_ARC_QUALIFIER',l_act_metrics_rec.arc_act_metric_used_by);
4350: Fnd_Message.Set_Token('OBJID',l_pk_value);
4351: Fnd_Msg_Pub.ADD;
4352: END IF;
4353:
4354: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4355: END IF;
4356:
4357: END IF;
4358:
4356:
4357: END IF;
4358:
4359: -- METRIC_UOM_CODE
4360: IF l_act_metrics_rec.metric_uom_code <> Fnd_Api.G_MISS_CHAR THEN
4361: IF l_act_metrics_rec.metric_id = Fnd_Api.G_MISS_NUM THEN
4362: l_act_metrics_rec.metric_id := p_complete_rec.metric_id ;
4363: END IF;
4364:
4357: END IF;
4358:
4359: -- METRIC_UOM_CODE
4360: IF l_act_metrics_rec.metric_uom_code <> Fnd_Api.G_MISS_CHAR THEN
4361: IF l_act_metrics_rec.metric_id = Fnd_Api.G_MISS_NUM THEN
4362: l_act_metrics_rec.metric_id := p_complete_rec.metric_id ;
4363: END IF;
4364:
4365: OPEN c_check_uom(l_act_metrics_rec.metric_uom_code,l_metric_details_rec.uom_type);
4370: FND_MESSAGE.Set_Name('AMS', 'AMS_METR_INVALID_UOM');
4371: FND_MSG_PUB.ADD;
4372: END IF;
4373:
4374: x_return_status := FND_API.G_RET_STS_ERROR;
4375: CLOSE c_check_uom;
4376: RETURN;
4377: END IF;
4378: CLOSE c_check_uom;
4377: END IF;
4378: CLOSE c_check_uom;
4379: END IF;
4380:
4381: IF l_act_metrics_rec.arc_activity_metric_origin <> Fnd_Api.G_MISS_CHAR THEN
4382: IF l_act_metrics_rec.activity_metric_origin_id = Fnd_Api.G_MISS_NUM THEN
4383: l_act_metrics_rec.activity_metric_origin_id :=
4384: p_complete_rec.activity_metric_origin_id;
4385: END IF;
4378: CLOSE c_check_uom;
4379: END IF;
4380:
4381: IF l_act_metrics_rec.arc_activity_metric_origin <> Fnd_Api.G_MISS_CHAR THEN
4382: IF l_act_metrics_rec.activity_metric_origin_id = Fnd_Api.G_MISS_NUM THEN
4383: l_act_metrics_rec.activity_metric_origin_id :=
4384: p_complete_rec.activity_metric_origin_id;
4385: END IF;
4386:
4388: /*sunkumar 21-apr-2004 added*/
4389: IF Validate_Object_Exists(
4390: p_object_type => l_act_metrics_rec.arc_act_metric_used_by
4391: ,p_object_id => l_act_metrics_rec.act_metric_used_by_id
4392: ) = Fnd_Api.G_FALSE
4393: THEN
4394: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
4395: Fnd_Message.Set_Name ('AMS', 'AMS_METR_INVALID_ORIGIN');
4396: Fnd_Msg_Pub.ADD;
4395: Fnd_Message.Set_Name ('AMS', 'AMS_METR_INVALID_ORIGIN');
4396: Fnd_Msg_Pub.ADD;
4397: END IF;
4398:
4399: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4400: END IF;
4401: END IF;
4402:
4403: --
4434: Check_Req_ActMetrics_Items(
4435: p_act_metric_rec => p_act_metric_rec,
4436: x_return_status => x_return_status
4437: );
4438: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
4439: RETURN;
4440: END IF;
4441:
4442: Check_ActMetric_Uk_Items(
4444: p_validation_mode => p_validation_mode,
4445: x_return_status => x_return_status
4446: );
4447:
4448: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
4449: RETURN;
4450: END IF;
4451:
4452: Check_ActMetric_Items(
4453: p_act_metric_rec => p_act_metric_rec,
4454: x_return_status => x_return_status
4455: );
4456:
4457: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
4458: RETURN;
4459: END IF;
4460:
4461:
4498: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.g_msg_lvl_error) THEN
4499: Fnd_Message.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
4500: Fnd_Msg_Pub.ADD;
4501: END IF;
4502: RAISE Fnd_Api.g_exc_error;
4503: END IF;
4504: CLOSE c_act_metric;
4505:
4506:
4503: END IF;
4504: CLOSE c_act_metric;
4505:
4506:
4507: IF p_act_metric_rec.act_metric_used_by_id = Fnd_Api.G_MISS_NUM THEN
4508: x_complete_rec.act_metric_used_by_id := l_act_metric_rec.act_metric_used_by_id;
4509: END IF;
4510:
4511: IF p_act_metric_rec.arc_act_metric_used_by = Fnd_Api.G_MISS_CHAR THEN
4507: IF p_act_metric_rec.act_metric_used_by_id = Fnd_Api.G_MISS_NUM THEN
4508: x_complete_rec.act_metric_used_by_id := l_act_metric_rec.act_metric_used_by_id;
4509: END IF;
4510:
4511: IF p_act_metric_rec.arc_act_metric_used_by = Fnd_Api.G_MISS_CHAR THEN
4512: x_complete_rec.arc_act_metric_used_by := l_act_metric_rec.arc_act_metric_used_by;
4513: END IF;
4514:
4515: IF p_act_metric_rec.purchase_req_raised_flag = Fnd_Api.G_MISS_CHAR THEN
4511: IF p_act_metric_rec.arc_act_metric_used_by = Fnd_Api.G_MISS_CHAR THEN
4512: x_complete_rec.arc_act_metric_used_by := l_act_metric_rec.arc_act_metric_used_by;
4513: END IF;
4514:
4515: IF p_act_metric_rec.purchase_req_raised_flag = Fnd_Api.G_MISS_CHAR THEN
4516: x_complete_rec.purchase_req_raised_flag := l_act_metric_rec.purchase_req_raised_flag;
4517: END IF;
4518:
4519: IF p_act_metric_rec.application_id = Fnd_Api.G_MISS_NUM THEN
4515: IF p_act_metric_rec.purchase_req_raised_flag = Fnd_Api.G_MISS_CHAR THEN
4516: x_complete_rec.purchase_req_raised_flag := l_act_metric_rec.purchase_req_raised_flag;
4517: END IF;
4518:
4519: IF p_act_metric_rec.application_id = Fnd_Api.G_MISS_NUM THEN
4520: x_complete_rec.application_id := l_act_metric_rec.application_id;
4521: END IF;
4522:
4523: IF p_act_metric_rec.sensitive_data_flag = Fnd_Api.G_MISS_CHAR THEN
4519: IF p_act_metric_rec.application_id = Fnd_Api.G_MISS_NUM THEN
4520: x_complete_rec.application_id := l_act_metric_rec.application_id;
4521: END IF;
4522:
4523: IF p_act_metric_rec.sensitive_data_flag = Fnd_Api.G_MISS_CHAR THEN
4524: x_complete_rec.sensitive_data_flag := l_act_metric_rec.sensitive_data_flag;
4525: END IF;
4526:
4527: IF p_act_metric_rec.budget_id = Fnd_Api.G_MISS_NUM THEN
4523: IF p_act_metric_rec.sensitive_data_flag = Fnd_Api.G_MISS_CHAR THEN
4524: x_complete_rec.sensitive_data_flag := l_act_metric_rec.sensitive_data_flag;
4525: END IF;
4526:
4527: IF p_act_metric_rec.budget_id = Fnd_Api.G_MISS_NUM THEN
4528: x_complete_rec.budget_id := l_act_metric_rec.budget_id;
4529: END IF;
4530:
4531: IF p_act_metric_rec.metric_id = Fnd_Api.G_MISS_NUM THEN
4527: IF p_act_metric_rec.budget_id = Fnd_Api.G_MISS_NUM THEN
4528: x_complete_rec.budget_id := l_act_metric_rec.budget_id;
4529: END IF;
4530:
4531: IF p_act_metric_rec.metric_id = Fnd_Api.G_MISS_NUM THEN
4532: x_complete_rec.metric_id := l_act_metric_rec.metric_id;
4533: END IF;
4534:
4535: IF p_act_metric_rec.transaction_currency_code = Fnd_Api.G_MISS_CHAR THEN
4531: IF p_act_metric_rec.metric_id = Fnd_Api.G_MISS_NUM THEN
4532: x_complete_rec.metric_id := l_act_metric_rec.metric_id;
4533: END IF;
4534:
4535: IF p_act_metric_rec.transaction_currency_code = Fnd_Api.G_MISS_CHAR THEN
4536: x_complete_rec.transaction_currency_code := l_act_metric_rec.transaction_currency_code;
4537: END IF;
4538:
4539: IF NVL(p_act_metric_rec.trans_forecasted_value,-1) = Fnd_Api.G_MISS_NUM THEN
4535: IF p_act_metric_rec.transaction_currency_code = Fnd_Api.G_MISS_CHAR THEN
4536: x_complete_rec.transaction_currency_code := l_act_metric_rec.transaction_currency_code;
4537: END IF;
4538:
4539: IF NVL(p_act_metric_rec.trans_forecasted_value,-1) = Fnd_Api.G_MISS_NUM THEN
4540: x_complete_rec.trans_forecasted_value := l_act_metric_rec.trans_forecasted_value;
4541: END IF;
4542:
4543: IF p_act_metric_rec.trans_committed_value = Fnd_Api.G_MISS_NUM THEN
4539: IF NVL(p_act_metric_rec.trans_forecasted_value,-1) = Fnd_Api.G_MISS_NUM THEN
4540: x_complete_rec.trans_forecasted_value := l_act_metric_rec.trans_forecasted_value;
4541: END IF;
4542:
4543: IF p_act_metric_rec.trans_committed_value = Fnd_Api.G_MISS_NUM THEN
4544: x_complete_rec.trans_committed_value := l_act_metric_rec.trans_committed_value;
4545: END IF;
4546:
4547: IF p_act_metric_rec.trans_actual_value = Fnd_Api.G_MISS_NUM THEN
4543: IF p_act_metric_rec.trans_committed_value = Fnd_Api.G_MISS_NUM THEN
4544: x_complete_rec.trans_committed_value := l_act_metric_rec.trans_committed_value;
4545: END IF;
4546:
4547: IF p_act_metric_rec.trans_actual_value = Fnd_Api.G_MISS_NUM THEN
4548: x_complete_rec.trans_actual_value := l_act_metric_rec.trans_actual_value;
4549: END IF;
4550:
4551: IF p_act_metric_rec.functional_currency_code = Fnd_Api.G_MISS_CHAR THEN
4547: IF p_act_metric_rec.trans_actual_value = Fnd_Api.G_MISS_NUM THEN
4548: x_complete_rec.trans_actual_value := l_act_metric_rec.trans_actual_value;
4549: END IF;
4550:
4551: IF p_act_metric_rec.functional_currency_code = Fnd_Api.G_MISS_CHAR THEN
4552: x_complete_rec.functional_currency_code := l_act_metric_rec.functional_currency_code;
4553: END IF;
4554:
4555: IF p_act_metric_rec.func_forecasted_value = Fnd_Api.G_MISS_NUM THEN
4551: IF p_act_metric_rec.functional_currency_code = Fnd_Api.G_MISS_CHAR THEN
4552: x_complete_rec.functional_currency_code := l_act_metric_rec.functional_currency_code;
4553: END IF;
4554:
4555: IF p_act_metric_rec.func_forecasted_value = Fnd_Api.G_MISS_NUM THEN
4556: x_complete_rec.func_forecasted_value := l_act_metric_rec.func_forecasted_value;
4557: END IF;
4558:
4559: IF p_act_metric_rec.func_committed_value = Fnd_Api.G_MISS_NUM THEN
4555: IF p_act_metric_rec.func_forecasted_value = Fnd_Api.G_MISS_NUM THEN
4556: x_complete_rec.func_forecasted_value := l_act_metric_rec.func_forecasted_value;
4557: END IF;
4558:
4559: IF p_act_metric_rec.func_committed_value = Fnd_Api.G_MISS_NUM THEN
4560: x_complete_rec.func_committed_value := l_act_metric_rec.func_committed_value;
4561: END IF;
4562:
4563: IF p_act_metric_rec.func_actual_value = Fnd_Api.G_MISS_NUM THEN
4559: IF p_act_metric_rec.func_committed_value = Fnd_Api.G_MISS_NUM THEN
4560: x_complete_rec.func_committed_value := l_act_metric_rec.func_committed_value;
4561: END IF;
4562:
4563: IF p_act_metric_rec.func_actual_value = Fnd_Api.G_MISS_NUM THEN
4564: x_complete_rec.func_actual_value := l_act_metric_rec.func_actual_value;
4565: END IF;
4566:
4567: IF p_act_metric_rec.dirty_flag = Fnd_Api.G_MISS_CHAR THEN
4563: IF p_act_metric_rec.func_actual_value = Fnd_Api.G_MISS_NUM THEN
4564: x_complete_rec.func_actual_value := l_act_metric_rec.func_actual_value;
4565: END IF;
4566:
4567: IF p_act_metric_rec.dirty_flag = Fnd_Api.G_MISS_CHAR THEN
4568: IF (l_act_metric_rec.trans_actual_value <>
4569: x_complete_rec.trans_actual_value) OR
4570: (l_act_metric_rec.transaction_currency_code <>
4571: x_complete_rec.transaction_currency_code) OR
4583: x_complete_rec.dirty_flag := NVL(l_act_metric_rec.dirty_flag,G_IS_DIRTY);
4584: END IF;
4585: END IF;
4586:
4587: IF p_act_metric_rec.last_calculated_date = Fnd_Api.G_MISS_DATE THEN
4588: x_complete_rec.last_calculated_date := l_act_metric_rec.last_calculated_date;
4589: END IF;
4590:
4591: IF p_act_metric_rec.variable_value = Fnd_Api.G_MISS_NUM THEN
4587: IF p_act_metric_rec.last_calculated_date = Fnd_Api.G_MISS_DATE THEN
4588: x_complete_rec.last_calculated_date := l_act_metric_rec.last_calculated_date;
4589: END IF;
4590:
4591: IF p_act_metric_rec.variable_value = Fnd_Api.G_MISS_NUM THEN
4592: x_complete_rec.variable_value := l_act_metric_rec.variable_value;
4593: END IF;
4594:
4595: IF p_act_metric_rec.forecasted_variable_value = Fnd_Api.G_MISS_NUM THEN
4591: IF p_act_metric_rec.variable_value = Fnd_Api.G_MISS_NUM THEN
4592: x_complete_rec.variable_value := l_act_metric_rec.variable_value;
4593: END IF;
4594:
4595: IF p_act_metric_rec.forecasted_variable_value = Fnd_Api.G_MISS_NUM THEN
4596: x_complete_rec.forecasted_variable_value := l_act_metric_rec.forecasted_variable_value;
4597: END IF;
4598:
4599: IF p_act_metric_rec.computed_using_function_value = Fnd_Api.G_MISS_NUM THEN
4595: IF p_act_metric_rec.forecasted_variable_value = Fnd_Api.G_MISS_NUM THEN
4596: x_complete_rec.forecasted_variable_value := l_act_metric_rec.forecasted_variable_value;
4597: END IF;
4598:
4599: IF p_act_metric_rec.computed_using_function_value = Fnd_Api.G_MISS_NUM THEN
4600: x_complete_rec.computed_using_function_value := l_act_metric_rec.computed_using_function_value;
4601: END IF;
4602:
4603: IF p_act_metric_rec.metric_uom_code = Fnd_Api.G_MISS_CHAR THEN
4599: IF p_act_metric_rec.computed_using_function_value = Fnd_Api.G_MISS_NUM THEN
4600: x_complete_rec.computed_using_function_value := l_act_metric_rec.computed_using_function_value;
4601: END IF;
4602:
4603: IF p_act_metric_rec.metric_uom_code = Fnd_Api.G_MISS_CHAR THEN
4604: x_complete_rec.metric_uom_code := l_act_metric_rec.metric_uom_code;
4605: END IF;
4606:
4607: IF p_act_metric_rec.attribute_category = Fnd_Api.G_MISS_CHAR THEN
4603: IF p_act_metric_rec.metric_uom_code = Fnd_Api.G_MISS_CHAR THEN
4604: x_complete_rec.metric_uom_code := l_act_metric_rec.metric_uom_code;
4605: END IF;
4606:
4607: IF p_act_metric_rec.attribute_category = Fnd_Api.G_MISS_CHAR THEN
4608: x_complete_rec.attribute_category := l_act_metric_rec.attribute_category;
4609: END IF;
4610:
4611: IF p_act_metric_rec.difference_since_last_calc = Fnd_Api.G_MISS_NUM THEN
4607: IF p_act_metric_rec.attribute_category = Fnd_Api.G_MISS_CHAR THEN
4608: x_complete_rec.attribute_category := l_act_metric_rec.attribute_category;
4609: END IF;
4610:
4611: IF p_act_metric_rec.difference_since_last_calc = Fnd_Api.G_MISS_NUM THEN
4612: x_complete_rec.difference_since_last_calc := l_act_metric_rec.difference_since_last_calc;
4613: END IF;
4614:
4615: IF p_act_metric_rec.activity_metric_origin_id = Fnd_Api.G_MISS_NUM THEN
4611: IF p_act_metric_rec.difference_since_last_calc = Fnd_Api.G_MISS_NUM THEN
4612: x_complete_rec.difference_since_last_calc := l_act_metric_rec.difference_since_last_calc;
4613: END IF;
4614:
4615: IF p_act_metric_rec.activity_metric_origin_id = Fnd_Api.G_MISS_NUM THEN
4616: x_complete_rec.activity_metric_origin_id := l_act_metric_rec.activity_metric_origin_id;
4617: END IF;
4618:
4619: IF p_act_metric_rec.arc_activity_metric_origin = Fnd_Api.G_MISS_CHAR THEN
4615: IF p_act_metric_rec.activity_metric_origin_id = Fnd_Api.G_MISS_NUM THEN
4616: x_complete_rec.activity_metric_origin_id := l_act_metric_rec.activity_metric_origin_id;
4617: END IF;
4618:
4619: IF p_act_metric_rec.arc_activity_metric_origin = Fnd_Api.G_MISS_CHAR THEN
4620: x_complete_rec.arc_activity_metric_origin := l_act_metric_rec.arc_activity_metric_origin;
4621: END IF;
4622:
4623: IF p_act_metric_rec.days_since_last_refresh = Fnd_Api.G_MISS_NUM THEN
4619: IF p_act_metric_rec.arc_activity_metric_origin = Fnd_Api.G_MISS_CHAR THEN
4620: x_complete_rec.arc_activity_metric_origin := l_act_metric_rec.arc_activity_metric_origin;
4621: END IF;
4622:
4623: IF p_act_metric_rec.days_since_last_refresh = Fnd_Api.G_MISS_NUM THEN
4624: x_complete_rec.days_since_last_refresh := l_act_metric_rec.days_since_last_refresh;
4625: END IF;
4626:
4627: IF p_act_metric_rec.scenario_id = Fnd_Api.G_MISS_NUM THEN
4623: IF p_act_metric_rec.days_since_last_refresh = Fnd_Api.G_MISS_NUM THEN
4624: x_complete_rec.days_since_last_refresh := l_act_metric_rec.days_since_last_refresh;
4625: END IF;
4626:
4627: IF p_act_metric_rec.scenario_id = Fnd_Api.G_MISS_NUM THEN
4628: x_complete_rec.scenario_id := l_act_metric_rec.scenario_id;
4629: END IF;
4630:
4631: /***************************************************************/
4631: /***************************************************************/
4632: /*added 17-Apr-2000 tdonohoe@us support 11.5.2 columns */
4633: /***************************************************************/
4634:
4635: IF p_act_metric_rec.hierarchy_id = Fnd_Api.G_MISS_NUM THEN
4636: x_complete_rec.hierarchy_id := l_act_metric_rec.hierarchy_id;
4637: END IF;
4638:
4639: IF p_act_metric_rec.start_node = Fnd_Api.G_MISS_NUM THEN
4635: IF p_act_metric_rec.hierarchy_id = Fnd_Api.G_MISS_NUM THEN
4636: x_complete_rec.hierarchy_id := l_act_metric_rec.hierarchy_id;
4637: END IF;
4638:
4639: IF p_act_metric_rec.start_node = Fnd_Api.G_MISS_NUM THEN
4640: x_complete_rec.start_node := l_act_metric_rec.start_node;
4641: END IF;
4642:
4643: IF p_act_metric_rec.from_level = Fnd_Api.G_MISS_NUM THEN
4639: IF p_act_metric_rec.start_node = Fnd_Api.G_MISS_NUM THEN
4640: x_complete_rec.start_node := l_act_metric_rec.start_node;
4641: END IF;
4642:
4643: IF p_act_metric_rec.from_level = Fnd_Api.G_MISS_NUM THEN
4644: x_complete_rec.from_level := l_act_metric_rec.from_level;
4645: END IF;
4646:
4647: IF p_act_metric_rec.to_level = Fnd_Api.G_MISS_NUM THEN
4643: IF p_act_metric_rec.from_level = Fnd_Api.G_MISS_NUM THEN
4644: x_complete_rec.from_level := l_act_metric_rec.from_level;
4645: END IF;
4646:
4647: IF p_act_metric_rec.to_level = Fnd_Api.G_MISS_NUM THEN
4648: x_complete_rec.to_level := l_act_metric_rec.to_level;
4649: END IF;
4650:
4651: IF p_act_metric_rec.from_date = Fnd_Api.G_MISS_DATE THEN
4647: IF p_act_metric_rec.to_level = Fnd_Api.G_MISS_NUM THEN
4648: x_complete_rec.to_level := l_act_metric_rec.to_level;
4649: END IF;
4650:
4651: IF p_act_metric_rec.from_date = Fnd_Api.G_MISS_DATE THEN
4652: x_complete_rec.from_date := l_act_metric_rec.from_date;
4653: END IF;
4654:
4655: IF p_act_metric_rec.TO_DATE = Fnd_Api.G_MISS_DATE THEN
4651: IF p_act_metric_rec.from_date = Fnd_Api.G_MISS_DATE THEN
4652: x_complete_rec.from_date := l_act_metric_rec.from_date;
4653: END IF;
4654:
4655: IF p_act_metric_rec.TO_DATE = Fnd_Api.G_MISS_DATE THEN
4656: x_complete_rec.TO_DATE := l_act_metric_rec.TO_DATE;
4657: END IF;
4658:
4659: IF p_act_metric_rec.amount1 = Fnd_Api.G_MISS_NUM THEN
4655: IF p_act_metric_rec.TO_DATE = Fnd_Api.G_MISS_DATE THEN
4656: x_complete_rec.TO_DATE := l_act_metric_rec.TO_DATE;
4657: END IF;
4658:
4659: IF p_act_metric_rec.amount1 = Fnd_Api.G_MISS_NUM THEN
4660: x_complete_rec.amount1 := l_act_metric_rec.amount1;
4661: END IF;
4662:
4663: IF p_act_metric_rec.amount2 = Fnd_Api.G_MISS_NUM THEN
4659: IF p_act_metric_rec.amount1 = Fnd_Api.G_MISS_NUM THEN
4660: x_complete_rec.amount1 := l_act_metric_rec.amount1;
4661: END IF;
4662:
4663: IF p_act_metric_rec.amount2 = Fnd_Api.G_MISS_NUM THEN
4664: x_complete_rec.amount2 := l_act_metric_rec.amount2;
4665: END IF;
4666:
4667: IF p_act_metric_rec.amount3 = Fnd_Api.G_MISS_NUM THEN
4663: IF p_act_metric_rec.amount2 = Fnd_Api.G_MISS_NUM THEN
4664: x_complete_rec.amount2 := l_act_metric_rec.amount2;
4665: END IF;
4666:
4667: IF p_act_metric_rec.amount3 = Fnd_Api.G_MISS_NUM THEN
4668: x_complete_rec.amount3 := l_act_metric_rec.amount3;
4669: END IF;
4670:
4671: IF p_act_metric_rec.percent1 = Fnd_Api.G_MISS_NUM THEN
4667: IF p_act_metric_rec.amount3 = Fnd_Api.G_MISS_NUM THEN
4668: x_complete_rec.amount3 := l_act_metric_rec.amount3;
4669: END IF;
4670:
4671: IF p_act_metric_rec.percent1 = Fnd_Api.G_MISS_NUM THEN
4672: x_complete_rec.percent1 := l_act_metric_rec.percent1;
4673: END IF;
4674:
4675: IF p_act_metric_rec.percent2 = Fnd_Api.G_MISS_NUM THEN
4671: IF p_act_metric_rec.percent1 = Fnd_Api.G_MISS_NUM THEN
4672: x_complete_rec.percent1 := l_act_metric_rec.percent1;
4673: END IF;
4674:
4675: IF p_act_metric_rec.percent2 = Fnd_Api.G_MISS_NUM THEN
4676: x_complete_rec.percent2 := l_act_metric_rec.percent2;
4677: END IF;
4678:
4679: IF p_act_metric_rec.percent3 = Fnd_Api.G_MISS_NUM THEN
4675: IF p_act_metric_rec.percent2 = Fnd_Api.G_MISS_NUM THEN
4676: x_complete_rec.percent2 := l_act_metric_rec.percent2;
4677: END IF;
4678:
4679: IF p_act_metric_rec.percent3 = Fnd_Api.G_MISS_NUM THEN
4680: x_complete_rec.percent3 := l_act_metric_rec.percent3;
4681: END IF;
4682:
4683: IF p_act_metric_rec.published_flag = Fnd_Api.G_MISS_CHAR THEN
4679: IF p_act_metric_rec.percent3 = Fnd_Api.G_MISS_NUM THEN
4680: x_complete_rec.percent3 := l_act_metric_rec.percent3;
4681: END IF;
4682:
4683: IF p_act_metric_rec.published_flag = Fnd_Api.G_MISS_CHAR THEN
4684: x_complete_rec.published_flag := l_act_metric_rec.published_flag;
4685: END IF;
4686:
4687: IF p_act_metric_rec.pre_function_name = Fnd_Api.G_MISS_CHAR THEN
4683: IF p_act_metric_rec.published_flag = Fnd_Api.G_MISS_CHAR THEN
4684: x_complete_rec.published_flag := l_act_metric_rec.published_flag;
4685: END IF;
4686:
4687: IF p_act_metric_rec.pre_function_name = Fnd_Api.G_MISS_CHAR THEN
4688: x_complete_rec.pre_function_name := l_act_metric_rec.pre_function_name;
4689: END IF;
4690:
4691: IF p_act_metric_rec.post_function_name = Fnd_Api.G_MISS_CHAR THEN
4687: IF p_act_metric_rec.pre_function_name = Fnd_Api.G_MISS_CHAR THEN
4688: x_complete_rec.pre_function_name := l_act_metric_rec.pre_function_name;
4689: END IF;
4690:
4691: IF p_act_metric_rec.post_function_name = Fnd_Api.G_MISS_CHAR THEN
4692: x_complete_rec.post_function_name := l_act_metric_rec.post_function_name;
4693: END IF;
4694:
4695: IF p_act_metric_rec.attribute1 = Fnd_Api.G_MISS_CHAR THEN
4691: IF p_act_metric_rec.post_function_name = Fnd_Api.G_MISS_CHAR THEN
4692: x_complete_rec.post_function_name := l_act_metric_rec.post_function_name;
4693: END IF;
4694:
4695: IF p_act_metric_rec.attribute1 = Fnd_Api.G_MISS_CHAR THEN
4696: x_complete_rec.attribute1 := l_act_metric_rec.attribute1;
4697: END IF;
4698:
4699: IF p_act_metric_rec.attribute2 = Fnd_Api.G_MISS_CHAR THEN
4695: IF p_act_metric_rec.attribute1 = Fnd_Api.G_MISS_CHAR THEN
4696: x_complete_rec.attribute1 := l_act_metric_rec.attribute1;
4697: END IF;
4698:
4699: IF p_act_metric_rec.attribute2 = Fnd_Api.G_MISS_CHAR THEN
4700: x_complete_rec.attribute2 := l_act_metric_rec.attribute2;
4701: END IF;
4702:
4703: IF p_act_metric_rec.attribute3 = Fnd_Api.G_MISS_CHAR THEN
4699: IF p_act_metric_rec.attribute2 = Fnd_Api.G_MISS_CHAR THEN
4700: x_complete_rec.attribute2 := l_act_metric_rec.attribute2;
4701: END IF;
4702:
4703: IF p_act_metric_rec.attribute3 = Fnd_Api.G_MISS_CHAR THEN
4704: x_complete_rec.attribute3 := l_act_metric_rec.attribute3;
4705: END IF;
4706:
4707: IF p_act_metric_rec.attribute4 = Fnd_Api.G_MISS_CHAR THEN
4703: IF p_act_metric_rec.attribute3 = Fnd_Api.G_MISS_CHAR THEN
4704: x_complete_rec.attribute3 := l_act_metric_rec.attribute3;
4705: END IF;
4706:
4707: IF p_act_metric_rec.attribute4 = Fnd_Api.G_MISS_CHAR THEN
4708: x_complete_rec.attribute4 := l_act_metric_rec.attribute4;
4709: END IF;
4710:
4711: IF p_act_metric_rec.attribute5 = Fnd_Api.G_MISS_CHAR THEN
4707: IF p_act_metric_rec.attribute4 = Fnd_Api.G_MISS_CHAR THEN
4708: x_complete_rec.attribute4 := l_act_metric_rec.attribute4;
4709: END IF;
4710:
4711: IF p_act_metric_rec.attribute5 = Fnd_Api.G_MISS_CHAR THEN
4712: x_complete_rec.attribute5 := l_act_metric_rec.attribute5;
4713: END IF;
4714:
4715: IF p_act_metric_rec.attribute6 = Fnd_Api.G_MISS_CHAR THEN
4711: IF p_act_metric_rec.attribute5 = Fnd_Api.G_MISS_CHAR THEN
4712: x_complete_rec.attribute5 := l_act_metric_rec.attribute5;
4713: END IF;
4714:
4715: IF p_act_metric_rec.attribute6 = Fnd_Api.G_MISS_CHAR THEN
4716: x_complete_rec.attribute6 := l_act_metric_rec.attribute6;
4717: END IF;
4718:
4719: IF p_act_metric_rec.attribute7 = Fnd_Api.G_MISS_CHAR THEN
4715: IF p_act_metric_rec.attribute6 = Fnd_Api.G_MISS_CHAR THEN
4716: x_complete_rec.attribute6 := l_act_metric_rec.attribute6;
4717: END IF;
4718:
4719: IF p_act_metric_rec.attribute7 = Fnd_Api.G_MISS_CHAR THEN
4720: x_complete_rec.attribute7 := l_act_metric_rec.attribute7;
4721: END IF;
4722:
4723: IF p_act_metric_rec.attribute8 = Fnd_Api.G_MISS_CHAR THEN
4719: IF p_act_metric_rec.attribute7 = Fnd_Api.G_MISS_CHAR THEN
4720: x_complete_rec.attribute7 := l_act_metric_rec.attribute7;
4721: END IF;
4722:
4723: IF p_act_metric_rec.attribute8 = Fnd_Api.G_MISS_CHAR THEN
4724: x_complete_rec.attribute8 := l_act_metric_rec.attribute8;
4725: END IF;
4726:
4727: IF p_act_metric_rec.attribute9 = Fnd_Api.G_MISS_CHAR THEN
4723: IF p_act_metric_rec.attribute8 = Fnd_Api.G_MISS_CHAR THEN
4724: x_complete_rec.attribute8 := l_act_metric_rec.attribute8;
4725: END IF;
4726:
4727: IF p_act_metric_rec.attribute9 = Fnd_Api.G_MISS_CHAR THEN
4728: x_complete_rec.attribute9 := l_act_metric_rec.attribute9;
4729: END IF;
4730:
4731: IF p_act_metric_rec.attribute10 = Fnd_Api.G_MISS_CHAR THEN
4727: IF p_act_metric_rec.attribute9 = Fnd_Api.G_MISS_CHAR THEN
4728: x_complete_rec.attribute9 := l_act_metric_rec.attribute9;
4729: END IF;
4730:
4731: IF p_act_metric_rec.attribute10 = Fnd_Api.G_MISS_CHAR THEN
4732: x_complete_rec.attribute10 := l_act_metric_rec.attribute10;
4733: END IF;
4734:
4735: IF p_act_metric_rec.attribute11 = Fnd_Api.G_MISS_CHAR THEN
4731: IF p_act_metric_rec.attribute10 = Fnd_Api.G_MISS_CHAR THEN
4732: x_complete_rec.attribute10 := l_act_metric_rec.attribute10;
4733: END IF;
4734:
4735: IF p_act_metric_rec.attribute11 = Fnd_Api.G_MISS_CHAR THEN
4736: x_complete_rec.attribute11 := l_act_metric_rec.attribute11;
4737: END IF;
4738:
4739: IF p_act_metric_rec.attribute12 = Fnd_Api.G_MISS_CHAR THEN
4735: IF p_act_metric_rec.attribute11 = Fnd_Api.G_MISS_CHAR THEN
4736: x_complete_rec.attribute11 := l_act_metric_rec.attribute11;
4737: END IF;
4738:
4739: IF p_act_metric_rec.attribute12 = Fnd_Api.G_MISS_CHAR THEN
4740: x_complete_rec.attribute12 := l_act_metric_rec.attribute12;
4741: END IF;
4742:
4743: IF p_act_metric_rec.attribute13 = Fnd_Api.G_MISS_CHAR THEN
4739: IF p_act_metric_rec.attribute12 = Fnd_Api.G_MISS_CHAR THEN
4740: x_complete_rec.attribute12 := l_act_metric_rec.attribute12;
4741: END IF;
4742:
4743: IF p_act_metric_rec.attribute13 = Fnd_Api.G_MISS_CHAR THEN
4744: x_complete_rec.attribute13 := l_act_metric_rec.attribute13;
4745: END IF;
4746:
4747: IF p_act_metric_rec.attribute14 = Fnd_Api.G_MISS_CHAR THEN
4743: IF p_act_metric_rec.attribute13 = Fnd_Api.G_MISS_CHAR THEN
4744: x_complete_rec.attribute13 := l_act_metric_rec.attribute13;
4745: END IF;
4746:
4747: IF p_act_metric_rec.attribute14 = Fnd_Api.G_MISS_CHAR THEN
4748: x_complete_rec.attribute14 := l_act_metric_rec.attribute14;
4749: END IF;
4750:
4751: IF p_act_metric_rec.attribute15 = Fnd_Api.G_MISS_CHAR THEN
4747: IF p_act_metric_rec.attribute14 = Fnd_Api.G_MISS_CHAR THEN
4748: x_complete_rec.attribute14 := l_act_metric_rec.attribute14;
4749: END IF;
4750:
4751: IF p_act_metric_rec.attribute15 = Fnd_Api.G_MISS_CHAR THEN
4752: x_complete_rec.attribute15 := l_act_metric_rec.attribute15;
4753: END IF;
4754:
4755: -- DMVINCEN 05/01/2001: New columns.
4752: x_complete_rec.attribute15 := l_act_metric_rec.attribute15;
4753: END IF;
4754:
4755: -- DMVINCEN 05/01/2001: New columns.
4756: IF p_act_metric_rec.act_metric_date = Fnd_Api.G_MISS_DATE THEN
4757: x_complete_rec.act_metric_date := l_act_metric_rec.act_metric_date;
4758: END IF;
4759:
4760: IF p_act_metric_rec.description = Fnd_Api.G_MISS_CHAR THEN
4756: IF p_act_metric_rec.act_metric_date = Fnd_Api.G_MISS_DATE THEN
4757: x_complete_rec.act_metric_date := l_act_metric_rec.act_metric_date;
4758: END IF;
4759:
4760: IF p_act_metric_rec.description = Fnd_Api.G_MISS_CHAR THEN
4761: x_complete_rec.description := l_act_metric_rec.description;
4762: END IF;
4763:
4764: -- DMVINCEN 05/01/2001: End new columns.
4762: END IF;
4763:
4764: -- DMVINCEN 05/01/2001: End new columns.
4765:
4766: IF p_act_metric_rec.depend_act_metric = Fnd_Api.G_MISS_NUM THEN
4767: x_complete_rec.depend_act_metric := l_act_metric_rec.depend_act_metric;
4768: END IF;
4769:
4770: -- DMVINCEN 03/08/2002:
4768: END IF;
4769:
4770: -- DMVINCEN 03/08/2002:
4771:
4772: IF p_act_metric_rec.function_used_by_id = Fnd_Api.G_MISS_NUM THEN
4773: x_complete_rec.function_used_by_id := l_act_metric_rec.function_used_by_id;
4774: END IF;
4775:
4776: IF p_act_metric_rec.arc_function_used_by = Fnd_Api.G_MISS_CHAR THEN
4772: IF p_act_metric_rec.function_used_by_id = Fnd_Api.G_MISS_NUM THEN
4773: x_complete_rec.function_used_by_id := l_act_metric_rec.function_used_by_id;
4774: END IF;
4775:
4776: IF p_act_metric_rec.arc_function_used_by = Fnd_Api.G_MISS_CHAR THEN
4777: x_complete_rec.arc_function_used_by := l_act_metric_rec.arc_function_used_by;
4778: END IF;
4779:
4780: /* 05/15/2002 yzhao: add 6 new columns for top-down bottom-up budgeting */
4777: x_complete_rec.arc_function_used_by := l_act_metric_rec.arc_function_used_by;
4778: END IF;
4779:
4780: /* 05/15/2002 yzhao: add 6 new columns for top-down bottom-up budgeting */
4781: IF p_act_metric_rec.hierarchy_type = Fnd_Api.G_MISS_CHAR THEN
4782: x_complete_rec.hierarchy_type := l_act_metric_rec.hierarchy_type;
4783: END IF;
4784:
4785: IF p_act_metric_rec.status_code = Fnd_Api.G_MISS_CHAR THEN
4781: IF p_act_metric_rec.hierarchy_type = Fnd_Api.G_MISS_CHAR THEN
4782: x_complete_rec.hierarchy_type := l_act_metric_rec.hierarchy_type;
4783: END IF;
4784:
4785: IF p_act_metric_rec.status_code = Fnd_Api.G_MISS_CHAR THEN
4786: x_complete_rec.status_code := l_act_metric_rec.status_code;
4787: END IF;
4788:
4789: IF p_act_metric_rec.method_code = Fnd_Api.G_MISS_CHAR THEN
4785: IF p_act_metric_rec.status_code = Fnd_Api.G_MISS_CHAR THEN
4786: x_complete_rec.status_code := l_act_metric_rec.status_code;
4787: END IF;
4788:
4789: IF p_act_metric_rec.method_code = Fnd_Api.G_MISS_CHAR THEN
4790: x_complete_rec.method_code := l_act_metric_rec.method_code;
4791: END IF;
4792:
4793: IF p_act_metric_rec.action_code = Fnd_Api.G_MISS_CHAR THEN
4789: IF p_act_metric_rec.method_code = Fnd_Api.G_MISS_CHAR THEN
4790: x_complete_rec.method_code := l_act_metric_rec.method_code;
4791: END IF;
4792:
4793: IF p_act_metric_rec.action_code = Fnd_Api.G_MISS_CHAR THEN
4794: x_complete_rec.action_code := l_act_metric_rec.action_code;
4795: END IF;
4796:
4797: IF p_act_metric_rec.basis_year = Fnd_Api.G_MISS_NUM THEN
4793: IF p_act_metric_rec.action_code = Fnd_Api.G_MISS_CHAR THEN
4794: x_complete_rec.action_code := l_act_metric_rec.action_code;
4795: END IF;
4796:
4797: IF p_act_metric_rec.basis_year = Fnd_Api.G_MISS_NUM THEN
4798: x_complete_rec.basis_year := l_act_metric_rec.basis_year;
4799: END IF;
4800:
4801: IF p_act_metric_rec.ex_start_node = Fnd_Api.G_MISS_CHAR THEN
4797: IF p_act_metric_rec.basis_year = Fnd_Api.G_MISS_NUM THEN
4798: x_complete_rec.basis_year := l_act_metric_rec.basis_year;
4799: END IF;
4800:
4801: IF p_act_metric_rec.ex_start_node = Fnd_Api.G_MISS_CHAR THEN
4802: x_complete_rec.ex_start_node := l_act_metric_rec.ex_start_node;
4803: END IF;
4804: /* 05/15/2002 yzhao: add ends */
4805:
4824: --
4825:
4826: PROCEDURE SetCommittedVal (
4827: p_api_version IN NUMBER,
4828: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
4829: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
4830: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
4831:
4832: x_return_status OUT NOCOPY VARCHAR2,
4825:
4826: PROCEDURE SetCommittedVal (
4827: p_api_version IN NUMBER,
4828: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
4829: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
4830: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
4831:
4832: x_return_status OUT NOCOPY VARCHAR2,
4833: x_msg_count OUT NOCOPY NUMBER,
4826: PROCEDURE SetCommittedVal (
4827: p_api_version IN NUMBER,
4828: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
4829: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
4830: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
4831:
4832: x_return_status OUT NOCOPY VARCHAR2,
4833: x_msg_count OUT NOCOPY NUMBER,
4834: x_msg_data OUT NOCOPY VARCHAR2,
4860:
4861: --
4862: -- Initialize message list if p_init_msg_list is set to TRUE.
4863: --
4864: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN
4865: Fnd_Msg_Pub.Initialize;
4866: END IF;
4867:
4868: --
4867:
4868: --
4869: -- Standard check for API version compatibility.
4870: --
4871: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,
4872: p_api_version,
4873: L_API_NAME,
4874: G_PKG_NAME)
4875: THEN
4872: p_api_version,
4873: L_API_NAME,
4874: G_PKG_NAME)
4875: THEN
4876: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
4877: END IF;
4878:
4879: --
4880: -- Initialize API return status to success.
4878:
4879: --
4880: -- Initialize API return status to success.
4881: --
4882: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
4883:
4884: --
4885: -- Begin API Body.
4886: --
4900: IF SQL%NOTFOUND THEN
4901: --
4902: -- The metric for the given business entity does not
4903: -- exist. Add the proper message and raise an error.
4904: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
4905: END IF;
4906:
4907: --
4908: -- End API Body.
4910:
4911: --
4912: -- Standard check for commit request.
4913: --
4914: IF Fnd_Api.To_Boolean (p_commit) THEN
4915: COMMIT WORK;
4916: END IF;
4917:
4918:
4922: --
4923: Fnd_Msg_Pub.Count_And_Get (
4924: p_count => x_msg_count,
4925: p_data => x_msg_data,
4926: p_encoded => Fnd_Api.G_FALSE
4927: );
4928:
4929: --
4930: -- Output debug message.
4934: END IF;
4935:
4936:
4937: EXCEPTION
4938: WHEN Fnd_Api.G_EXC_ERROR THEN
4939: ROLLBACK TO SetCommittedVal_SavePoint;
4940: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4941: Fnd_Msg_Pub.Count_And_Get (
4942: p_count => x_msg_count,
4936:
4937: EXCEPTION
4938: WHEN Fnd_Api.G_EXC_ERROR THEN
4939: ROLLBACK TO SetCommittedVal_SavePoint;
4940: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4941: Fnd_Msg_Pub.Count_And_Get (
4942: p_count => x_msg_count,
4943: p_data => x_msg_data,
4944: p_encoded => FND_API.G_FALSE
4940: x_return_status := Fnd_Api.G_RET_STS_ERROR;
4941: Fnd_Msg_Pub.Count_And_Get (
4942: p_count => x_msg_count,
4943: p_data => x_msg_data,
4944: p_encoded => FND_API.G_FALSE
4945: );
4946: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4947: ROLLBACK TO SetCommittedVal_SavePoint;
4948: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4942: p_count => x_msg_count,
4943: p_data => x_msg_data,
4944: p_encoded => FND_API.G_FALSE
4945: );
4946: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4947: ROLLBACK TO SetCommittedVal_SavePoint;
4948: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4949: Fnd_Msg_Pub.Count_And_Get (
4950: p_count => x_msg_count,
4944: p_encoded => FND_API.G_FALSE
4945: );
4946: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
4947: ROLLBACK TO SetCommittedVal_SavePoint;
4948: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4949: Fnd_Msg_Pub.Count_And_Get (
4950: p_count => x_msg_count,
4951: p_data => x_msg_data,
4952: p_encoded => FND_API.G_FALSE
4948: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4949: Fnd_Msg_Pub.Count_And_Get (
4950: p_count => x_msg_count,
4951: p_data => x_msg_data,
4952: p_encoded => FND_API.G_FALSE
4953: );
4954: WHEN OTHERS THEN
4955: ROLLBACK TO SetCommittedVal_SavePoint;
4956: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4952: p_encoded => FND_API.G_FALSE
4953: );
4954: WHEN OTHERS THEN
4955: ROLLBACK TO SetCommittedVal_SavePoint;
4956: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
4957: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
4958: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
4959: END IF;
4960: Fnd_Msg_Pub.Count_And_Get (
4959: END IF;
4960: Fnd_Msg_Pub.Count_And_Get (
4961: p_count => x_msg_count,
4962: p_data => x_msg_data,
4963: p_encoded => FND_API.G_FALSE
4964: );
4965: END SetCommittedVal;
4966:
4967: --
5144: p_to_currency => l_default_func_curr_code,
5145: p_conv_date => l_current_date,
5146: p_from_amount => NVL(l_actmet_func_fore_amount,0),
5147: x_to_amount => l_actmet_func_fore_amount,
5148: p_round => Fnd_Api.G_FALSE);
5149: IF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
5150: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
5151: ELSIF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
5152: RAISE Fnd_Api.G_EXC_ERROR;
5145: p_conv_date => l_current_date,
5146: p_from_amount => NVL(l_actmet_func_fore_amount,0),
5147: x_to_amount => l_actmet_func_fore_amount,
5148: p_round => Fnd_Api.G_FALSE);
5149: IF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
5150: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
5151: ELSIF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
5152: RAISE Fnd_Api.G_EXC_ERROR;
5153: END IF;
5146: p_from_amount => NVL(l_actmet_func_fore_amount,0),
5147: x_to_amount => l_actmet_func_fore_amount,
5148: p_round => Fnd_Api.G_FALSE);
5149: IF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
5150: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
5151: ELSIF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
5152: RAISE Fnd_Api.G_EXC_ERROR;
5153: END IF;
5154: END IF;
5147: x_to_amount => l_actmet_func_fore_amount,
5148: p_round => Fnd_Api.G_FALSE);
5149: IF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
5150: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
5151: ELSIF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
5152: RAISE Fnd_Api.G_EXC_ERROR;
5153: END IF;
5154: END IF;
5155: l_sum_func_fore_amount := l_sum_func_fore_amount
5148: p_round => Fnd_Api.G_FALSE);
5149: IF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
5150: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
5151: ELSIF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
5152: RAISE Fnd_Api.G_EXC_ERROR;
5153: END IF;
5154: END IF;
5155: l_sum_func_fore_amount := l_sum_func_fore_amount
5156: + NVL(l_actmet_func_fore_amount,0);
5172: l_func_budget_amount,
5173: l_func_budget_curr_code;
5174: IF c_get_camp_budget_amounts%NOTFOUND THEN
5175: CLOSE c_get_camp_budget_amounts;
5176: RAISE Fnd_Api.G_EXC_ERROR;
5177: END IF;
5178: CLOSE c_get_camp_budget_amounts;
5179: -- for campaign schedules
5180: ELSIF p_obj_type = 'CSCH' THEN
5185: l_func_budget_amount,
5186: l_func_budget_curr_code;
5187: IF c_get_csch_budget_amounts%NOTFOUND THEN
5188: CLOSE c_get_csch_budget_amounts;
5189: RAISE Fnd_Api.G_EXC_ERROR;
5190: END IF;
5191: CLOSE c_get_csch_budget_amounts;
5192: -- for event offers
5193: ELSIF p_obj_type IN ('EONE', 'EVEO') THEN
5198: l_func_budget_amount,
5199: l_func_budget_curr_code;
5200: IF c_get_eveof_budget_amounts%NOTFOUND THEN
5201: CLOSE c_get_eveof_budget_amounts;
5202: RAISE Fnd_Api.G_EXC_ERROR;
5203: END IF;
5204: CLOSE c_get_eveof_budget_amounts;
5205: -- for event headers
5206: ELSIF p_obj_type = 'EVEH' THEN
5211: l_func_budget_amount,
5212: l_func_budget_curr_code;
5213: IF c_get_evehd_budget_amounts%NOTFOUND THEN
5214: CLOSE c_get_evehd_budget_amounts;
5215: RAISE Fnd_Api.G_EXC_ERROR;
5216: END IF;
5217: CLOSE c_get_evehd_budget_amounts;
5218: -- for deliverables
5219: ELSIF p_obj_type = 'DELV' THEN
5224: l_func_budget_amount,
5225: l_func_budget_curr_code;
5226: IF c_get_deliv_budget_amounts%NOTFOUND THEN
5227: CLOSE c_get_deliv_budget_amounts;
5228: RAISE Fnd_Api.G_EXC_ERROR;
5229: END IF;
5230: CLOSE c_get_deliv_budget_amounts;
5231:
5232: END IF; -- IF p_obj_type = 'CAMP'
5239: p_to_currency => l_trans_budget_curr_code,
5240: p_conv_date => l_current_date,
5241: p_from_amount => NVL(l_sum_func_fore_amount,0),
5242: x_to_amount => l_sum_tran_fore_amount,
5243: p_round => Fnd_Api.G_TRUE);
5244: IF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
5245: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
5246: ELSIF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
5247: RAISE Fnd_Api.G_EXC_ERROR;
5240: p_conv_date => l_current_date,
5241: p_from_amount => NVL(l_sum_func_fore_amount,0),
5242: x_to_amount => l_sum_tran_fore_amount,
5243: p_round => Fnd_Api.G_TRUE);
5244: IF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
5245: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
5246: ELSIF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
5247: RAISE Fnd_Api.G_EXC_ERROR;
5248: END IF;
5241: p_from_amount => NVL(l_sum_func_fore_amount,0),
5242: x_to_amount => l_sum_tran_fore_amount,
5243: p_round => Fnd_Api.G_TRUE);
5244: IF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
5245: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
5246: ELSIF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
5247: RAISE Fnd_Api.G_EXC_ERROR;
5248: END IF;
5249: END IF;
5242: x_to_amount => l_sum_tran_fore_amount,
5243: p_round => Fnd_Api.G_TRUE);
5244: IF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
5245: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
5246: ELSIF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
5247: RAISE Fnd_Api.G_EXC_ERROR;
5248: END IF;
5249: END IF;
5250:
5243: p_round => Fnd_Api.G_TRUE);
5244: IF l_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
5245: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
5246: ELSIF l_return_status = Fnd_Api.G_RET_STS_ERROR THEN
5247: RAISE Fnd_Api.G_EXC_ERROR;
5248: END IF;
5249: END IF;
5250:
5251: -- compare values in the same defualt functional currency
5255: END IF;
5256:
5257: IF x_exceeded = 'Y' THEN
5258: x_message := 'AMS_METR_EXCEED_FORECAST';
5259: END IF; -- IF x_exceeded = FND_API.G_TRUE
5260:
5261: END IF; -- IF p_category_id = 901
5262:
5263: END check_forecasted_cost;
5290: -- to a businness object.
5291: ----------------------------------------------------------------------
5292: PROCEDURE Invalidate_Rollup(
5293: p_api_version IN NUMBER,
5294: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
5295: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
5296:
5297: x_return_status OUT NOCOPY VARCHAR2,
5298: x_msg_count OUT NOCOPY NUMBER,
5291: ----------------------------------------------------------------------
5292: PROCEDURE Invalidate_Rollup(
5293: p_api_version IN NUMBER,
5294: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
5295: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
5296:
5297: x_return_status OUT NOCOPY VARCHAR2,
5298: x_msg_count OUT NOCOPY NUMBER,
5299: x_msg_data OUT NOCOPY VARCHAR2,
5339:
5340: --
5341: -- Initialize message list if p_init_msg_list is set to TRUE.
5342: --
5343: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN
5344: Fnd_Msg_Pub.Initialize;
5345: END IF;
5346:
5347: --
5346:
5347: --
5348: -- Standard check for API version compatibility.
5349: --
5350: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,
5351: p_api_version,
5352: L_API_NAME,
5353: G_PKG_NAME)
5354: THEN
5351: p_api_version,
5352: L_API_NAME,
5353: G_PKG_NAME)
5354: THEN
5355: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
5356: END IF;
5357:
5358: --
5359: -- Initialize API return status to success.
5357:
5358: --
5359: -- Initialize API return status to success.
5360: --
5361: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
5362:
5363: --
5364: -- Begin API Body
5365: --
5374: WHERE arc_act_metric_used_by = l_used_by_type
5375: AND act_metric_used_by_id = p_used_by_id
5376: AND rollup_to_metric IS NOT NULL;
5377:
5378: IF Fnd_Api.to_boolean(p_commit) THEN
5379: COMMIT;
5380: END IF;
5381:
5382: --
5385: --
5386: Fnd_Msg_Pub.Count_And_Get (
5387: p_count => x_msg_count,
5388: p_data => x_msg_data,
5389: p_encoded => Fnd_Api.G_FALSE
5390: );
5391:
5392: --
5393: -- Debug message.
5397: Ams_Utility_Pvt.debug_message(l_full_name ||': END');
5398: END IF;
5399:
5400: EXCEPTION
5401: WHEN Fnd_Api.G_EXC_ERROR THEN
5402: ROLLBACK TO Invalidate_Rollup_pvt;
5403: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5404: Fnd_Msg_Pub.Count_And_Get (
5405: p_count => x_msg_count,
5399:
5400: EXCEPTION
5401: WHEN Fnd_Api.G_EXC_ERROR THEN
5402: ROLLBACK TO Invalidate_Rollup_pvt;
5403: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5404: Fnd_Msg_Pub.Count_And_Get (
5405: p_count => x_msg_count,
5406: p_data => x_msg_data,
5407: p_encoded => FND_API.G_FALSE
5403: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5404: Fnd_Msg_Pub.Count_And_Get (
5405: p_count => x_msg_count,
5406: p_data => x_msg_data,
5407: p_encoded => FND_API.G_FALSE
5408: );
5409: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5410: ROLLBACK TO Invalidate_Rollup_pvt;
5411: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5405: p_count => x_msg_count,
5406: p_data => x_msg_data,
5407: p_encoded => FND_API.G_FALSE
5408: );
5409: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5410: ROLLBACK TO Invalidate_Rollup_pvt;
5411: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5412: Fnd_Msg_Pub.Count_And_Get (
5413: p_count => x_msg_count,
5407: p_encoded => FND_API.G_FALSE
5408: );
5409: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5410: ROLLBACK TO Invalidate_Rollup_pvt;
5411: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5412: Fnd_Msg_Pub.Count_And_Get (
5413: p_count => x_msg_count,
5414: p_data => x_msg_data,
5415: p_encoded => FND_API.G_FALSE
5411: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5412: Fnd_Msg_Pub.Count_And_Get (
5413: p_count => x_msg_count,
5414: p_data => x_msg_data,
5415: p_encoded => FND_API.G_FALSE
5416: );
5417: WHEN OTHERS THEN
5418: ROLLBACK TO Invalidate_Rollup_pvt;
5419: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5415: p_encoded => FND_API.G_FALSE
5416: );
5417: WHEN OTHERS THEN
5418: ROLLBACK TO Invalidate_Rollup_pvt;
5419: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5420: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
5421: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
5422: END IF;
5423: Fnd_Msg_Pub.Count_And_Get (
5422: END IF;
5423: Fnd_Msg_Pub.Count_And_Get (
5424: p_count => x_msg_count,
5425: p_data => x_msg_data,
5426: p_encoded => FND_API.G_FALSE
5427: );
5428: END Invalidate_Rollup;
5429:
5430: -- Start of comments
5442: -- End of comments
5443:
5444: PROCEDURE Post_Costs (
5445: p_api_version IN NUMBER,
5446: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
5447: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
5448: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
5449:
5450: x_return_status OUT NOCOPY VARCHAR2,
5443:
5444: PROCEDURE Post_Costs (
5445: p_api_version IN NUMBER,
5446: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
5447: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
5448: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
5449:
5450: x_return_status OUT NOCOPY VARCHAR2,
5451: x_msg_count OUT NOCOPY NUMBER,
5444: PROCEDURE Post_Costs (
5445: p_api_version IN NUMBER,
5446: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
5447: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
5448: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
5449:
5450: x_return_status OUT NOCOPY VARCHAR2,
5451: x_msg_count OUT NOCOPY NUMBER,
5452: x_msg_data OUT NOCOPY VARCHAR2,
5498:
5499: --
5500: -- Initialize message list if p_init_msg_list is set to TRUE.
5501: --
5502: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN
5503: Fnd_Msg_Pub.Initialize;
5504: END IF;
5505:
5506: --
5505:
5506: --
5507: -- Standard check for API version compatibility.
5508: --
5509: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,
5510: p_api_version,
5511: L_API_NAME,
5512: G_PKG_NAME)
5513: THEN
5510: p_api_version,
5511: L_API_NAME,
5512: G_PKG_NAME)
5513: THEN
5514: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
5515: END IF;
5516:
5517: --
5518: -- Initialize API return status to success.
5516:
5517: --
5518: -- Initialize API return status to success.
5519: --
5520: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
5521:
5522: --
5523: -- Begin API Body
5524: --
5553: --
5554: -- End API Body
5555: --
5556:
5557: IF Fnd_Api.to_boolean(p_commit) THEN
5558: COMMIT;
5559: END IF;
5560:
5561: --
5564: --
5565: Fnd_Msg_Pub.Count_And_Get (
5566: p_count => x_msg_count,
5567: p_data => x_msg_data,
5568: p_encoded => Fnd_Api.G_FALSE
5569: );
5570:
5571: --
5572: -- Debug message.
5576: END IF;
5577:
5578:
5579: EXCEPTION
5580: WHEN Fnd_Api.G_EXC_ERROR THEN
5581: ROLLBACK TO Post_ActMetric_pvt;
5582: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5583: Fnd_Msg_Pub.Count_And_Get (
5584: p_count => x_msg_count,
5578:
5579: EXCEPTION
5580: WHEN Fnd_Api.G_EXC_ERROR THEN
5581: ROLLBACK TO Post_ActMetric_pvt;
5582: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5583: Fnd_Msg_Pub.Count_And_Get (
5584: p_count => x_msg_count,
5585: p_data => x_msg_data,
5586: p_encoded => FND_API.G_FALSE
5582: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5583: Fnd_Msg_Pub.Count_And_Get (
5584: p_count => x_msg_count,
5585: p_data => x_msg_data,
5586: p_encoded => FND_API.G_FALSE
5587: );
5588: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5589: ROLLBACK TO Post_ActMetric_pvt;
5590: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5584: p_count => x_msg_count,
5585: p_data => x_msg_data,
5586: p_encoded => FND_API.G_FALSE
5587: );
5588: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5589: ROLLBACK TO Post_ActMetric_pvt;
5590: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5591: Fnd_Msg_Pub.Count_And_Get (
5592: p_count => x_msg_count,
5586: p_encoded => FND_API.G_FALSE
5587: );
5588: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
5589: ROLLBACK TO Post_ActMetric_pvt;
5590: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5591: Fnd_Msg_Pub.Count_And_Get (
5592: p_count => x_msg_count,
5593: p_data => x_msg_data,
5594: p_encoded => FND_API.G_FALSE
5590: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5591: Fnd_Msg_Pub.Count_And_Get (
5592: p_count => x_msg_count,
5593: p_data => x_msg_data,
5594: p_encoded => FND_API.G_FALSE
5595: );
5596: WHEN OTHERS THEN
5597: ROLLBACK TO Post_ActMetric_pvt;
5598: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5594: p_encoded => FND_API.G_FALSE
5595: );
5596: WHEN OTHERS THEN
5597: ROLLBACK TO Post_ActMetric_pvt;
5598: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
5599: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
5600: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
5601: END IF;
5602: Fnd_Msg_Pub.Count_And_Get (
5601: END IF;
5602: Fnd_Msg_Pub.Count_And_Get (
5603: p_count => x_msg_count,
5604: p_data => x_msg_data,
5605: p_encoded => FND_API.G_FALSE
5606: );
5607: END Post_Costs;
5608:
5609: --
5719: to_type VARCHAR2(8);
5720: l_conversion_type VARCHAR2(30); -- Currency conversion type; see API documention for details.
5721: BEGIN
5722: -- Initialize return status.
5723: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
5724:
5725: -- Get the currency conversion type from profile option
5726: l_conversion_type := Fnd_Profile.Value (L_CONVERSION_TYPE_PROFILE);
5727:
5729: IF ( p_from_currency = p_to_currency ) THEN
5730: -- l_denominator := 1;
5731: -- l_numerator := 1;
5732: -- l_rate := 1;
5733: IF p_round = Fnd_Api.G_TRUE THEN
5734: get_info( p_to_currency, to_mau, to_xau );
5735: IF p_from_amount IS NOT NULL THEN
5736: x_to_amount := ROUND( p_from_amount / to_mau ) * to_mau;
5737: END IF;
5765: -- Calculate the converted amount using triangulation method
5766: x_to_amount := ( p_from_amount / l_denominator ) * l_numerator;
5767: x_to_amount2 := ( p_from_amount2 / l_denominator ) * l_numerator;
5768:
5769: IF p_round = Fnd_Api.G_TRUE THEN
5770: -- Rounding to the correct precision and minumum accountable units
5771: x_to_amount := ROUND( x_to_amount / to_mau ) * to_mau;
5772: x_to_amount2 := ROUND( x_to_amount2 / to_mau ) * to_mau;
5773: END IF;
5779: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5780: Fnd_Message.Set_Token ('CURRENCY_TO', p_to_currency);
5781: Fnd_Msg_Pub.ADD;
5782: END IF;
5783: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5784: WHEN Gl_Currency_Api.INVALID_CURRENCY THEN
5785: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
5786: Fnd_Message.Set_Name ('AMS', 'AMS_INVALID_CURR');
5787: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5787: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5788: Fnd_Message.Set_Token ('CURRENCY_TO', p_to_currency);
5789: Fnd_Msg_Pub.ADD;
5790: END IF;
5791: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5792: END Convert_Currency2;
5793:
5794: ---------------------------------------------------------------------
5795: -- PROCEDURE
5827: l_conversion_type VARCHAR2(30); -- Currency conversion type; see API documention for details.
5828: l_index NUMBER;
5829: BEGIN
5830: -- Initialize return status.
5831: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
5832:
5833: -- Get the currency conversion type from profile option
5834: l_conversion_type := Fnd_Profile.Value (L_CONVERSION_TYPE_PROFILE);
5835:
5856: LOOP
5857: EXIT WHEN l_index IS NULL;
5858: IF p_amounts.EXISTS(l_index) AND p_amounts(l_index) IS NOT NULL THEN
5859: p_amounts(l_index) := ( p_amounts(l_index) / l_denominator ) * l_numerator;
5860: IF p_round = Fnd_Api.G_TRUE THEN
5861: p_amounts(l_index) := ROUND( p_amounts(l_index) / to_mau ) * to_mau;
5862: END IF;
5863: END IF;
5864: l_index := p_amounts.NEXT(l_index);
5871: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5872: Fnd_Message.Set_Token ('CURRENCY_TO', p_to_currency);
5873: Fnd_Msg_Pub.ADD;
5874: END IF;
5875: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5876: WHEN Gl_Currency_Api.INVALID_CURRENCY THEN
5877: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
5878: Fnd_Message.Set_Name ('AMS', 'AMS_INVALID_CURR');
5879: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5879: Fnd_Message.Set_Token ('CURRENCY_FROM', p_from_currency);
5880: Fnd_Message.Set_Token ('CURRENCY_TO', p_to_currency);
5881: Fnd_Msg_Pub.ADD;
5882: END IF;
5883: x_return_status := Fnd_Api.G_RET_STS_ERROR;
5884: END Convert_Currency_Vector;
5885:
5886: ---------------------------------------------------------------------
5887: -- PROCEDURE
5953: p_from_currency => l_func_curr_code,
5954: p_to_currency => l_trans_curr_code,
5955: p_from_amount => NVL(p_func_value,0),
5956: x_to_amount => l_return_value,
5957: p_round => Fnd_Api.G_TRUE
5958: );
5959: ELSE
5960: l_return_value := p_func_value;
5961: END IF;
6102: l_func_forecasted_value NUMBER;
6103: l_func_actual_value NUMBER;
6104: l_functional_currency_code VARCHAR2(15);
6105: l_last_update_date DATE;
6106: l_new_record CHAR(1) := FND_API.G_FALSE;
6107: l_act_met_hst_id NUMBER;
6108: l_history_id_count NUMBER;
6109: l_object_version_number NUMBER;
6110: l_func_forecasted_delta NUMBER;
6116:
6117: --
6118: -- Initialize API return status to success.
6119: --
6120: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
6121:
6122: OPEN c_actmet_details(p_actmet_id);
6123: FETCH c_actmet_details INTO l_actmet_rec;
6124: IF c_actmet_details%NOTFOUND THEN
6122: OPEN c_actmet_details(p_actmet_id);
6123: FETCH c_actmet_details INTO l_actmet_rec;
6124: IF c_actmet_details%NOTFOUND THEN
6125: CLOSE c_actmet_details;
6126: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
6127: END IF;
6128: CLOSE c_actmet_details;
6129:
6130: -- BUG2813600: Delete history, set to current date and zero.
6142: END IF;
6143: -- BUG2813600: end.
6144:
6145: IF p_action = G_CREATE THEN
6146: l_new_record := FND_API.G_TRUE;
6147: l_func_forecasted_delta := NVL(l_actmet_rec.func_forecasted_value,0);
6148: l_func_actual_delta := NVL(l_actmet_rec.func_actual_value,0);
6149: ELSE
6150: OPEN c_get_history_by_id(p_actmet_id);
6157: l_object_version_number,
6158: l_func_forecasted_delta,
6159: l_func_actual_delta;
6160: IF c_get_history_by_id%NOTFOUND THEN
6161: l_new_record := FND_API.G_TRUE;
6162: END IF;
6163: CLOSE c_get_history_by_id;
6164: END IF;
6165:
6163: CLOSE c_get_history_by_id;
6164: END IF;
6165:
6166: -- Validate a change since the last fact.
6167: IF l_new_record = FND_API.G_FALSE AND
6168: (p_action = G_DELETE OR
6169: NVL(l_func_forecasted_value,0) <>
6170: NVL(l_actmet_rec.func_forecasted_value,0) OR
6171: NVL(l_func_actual_value,0) <> NVL(l_actmet_rec.func_actual_value,0) OR
6267: WHERE act_met_hst_id = l_act_met_hst_id
6268: AND object_version_number = l_object_version_number;
6269: ELSE
6270: -- Values have not changed since yesterday, insert for today.
6271: l_new_record := FND_API.G_TRUE;
6272: END IF;
6273: END IF;
6274:
6275: IF l_new_record = FND_API.G_TRUE THEN
6271: l_new_record := FND_API.G_TRUE;
6272: END IF;
6273: END IF;
6274:
6275: IF l_new_record = FND_API.G_TRUE THEN
6276: -- Generate a new fact id.
6277: LOOP
6278: OPEN c_get_new_history_id;
6279: FETCH c_get_new_history_id INTO l_act_met_hst_id;
6461: );
6462: END IF;
6463:
6464: EXCEPTION
6465: WHEN Fnd_Api.G_EXC_ERROR THEN
6466: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6467: Fnd_Msg_Pub.Count_And_Get (
6468: p_count => x_msg_count,
6469: p_data => x_msg_data,
6462: END IF;
6463:
6464: EXCEPTION
6465: WHEN Fnd_Api.G_EXC_ERROR THEN
6466: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6467: Fnd_Msg_Pub.Count_And_Get (
6468: p_count => x_msg_count,
6469: p_data => x_msg_data,
6470: p_encoded => FND_API.G_FALSE
6466: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6467: Fnd_Msg_Pub.Count_And_Get (
6468: p_count => x_msg_count,
6469: p_data => x_msg_data,
6470: p_encoded => FND_API.G_FALSE
6471: );
6472: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6473: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6474: Fnd_Msg_Pub.Count_And_Get (
6468: p_count => x_msg_count,
6469: p_data => x_msg_data,
6470: p_encoded => FND_API.G_FALSE
6471: );
6472: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6473: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6474: Fnd_Msg_Pub.Count_And_Get (
6475: p_count => x_msg_count,
6476: p_data => x_msg_data,
6469: p_data => x_msg_data,
6470: p_encoded => FND_API.G_FALSE
6471: );
6472: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6473: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6474: Fnd_Msg_Pub.Count_And_Get (
6475: p_count => x_msg_count,
6476: p_data => x_msg_data,
6477: p_encoded => FND_API.G_FALSE
6473: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6474: Fnd_Msg_Pub.Count_And_Get (
6475: p_count => x_msg_count,
6476: p_data => x_msg_data,
6477: p_encoded => FND_API.G_FALSE
6478: );
6479: WHEN OTHERS THEN
6480: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6481: error_message := SQLERRM;
6476: p_data => x_msg_data,
6477: p_encoded => FND_API.G_FALSE
6478: );
6479: WHEN OTHERS THEN
6480: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6481: error_message := SQLERRM;
6482: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
6483: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
6484: END IF;
6484: END IF;
6485: Fnd_Msg_Pub.Count_And_Get (
6486: p_count => x_msg_count,
6487: p_data => x_msg_data,
6488: p_encoded => FND_API.G_FALSE
6489: );
6490: END Record_History;
6491:
6492: -- API Name Get_Date_Buckets
6526: BEGIN
6527: --
6528: -- Initialize API return status to success.
6529: --
6530: x_return_status := FND_API.G_RET_STS_SUCCESS;
6531:
6532: -- BUG 3815334: Use profile for max buckets.
6533: -- This is the same profile that DCF uses for report page length.
6534: l_max_bucket_count :=
6539: OR p_interval_amount IS NULL
6540: OR p_interval_amount < 0
6541: OR p_interval_unit IS NULL
6542: OR p_interval_unit NOT IN ('DAY', 'WEEK', 'MONTH', 'YEAR') THEN
6543: x_return_status := FND_API.G_RET_STS_ERROR;
6544: RETURN;
6545: END IF;
6546:
6547: -- Initialize first date bucket to the prior period for incrementals.
6594: -- 01-JAN-2006 dmvincen BUG4669529: Calculate first incremental value.
6595: ---------------------------------------------------------------------
6596: PROCEDURE GET_RESULTS(
6597: p_api_version IN NUMBER,
6598: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
6599: x_return_status OUT NOCOPY VARCHAR2,
6600: x_msg_count OUT NOCOPY NUMBER,
6601: x_msg_data OUT NOCOPY VARCHAR2,
6602:
6694:
6695: --
6696: -- Initialize message list if p_init_msg_list is set to TRUE.
6697: --
6698: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN
6699: Fnd_Msg_Pub.Initialize;
6700: END IF;
6701:
6702: --
6701:
6702: --
6703: -- Standard check for API version compatibility.
6704: --
6705: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,
6706: p_api_version,
6707: L_API_NAME,
6708: G_PKG_NAME)
6709: THEN
6706: p_api_version,
6707: L_API_NAME,
6708: G_PKG_NAME)
6709: THEN
6710: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
6711: END IF;
6712:
6713: --
6714: -- Initialize API return status to success.
6712:
6713: --
6714: -- Initialize API return status to success.
6715: --
6716: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
6717:
6718: --
6719: -- Begin API Body
6720: --
6727: OPEN c_metric_details(p_metric_id);
6728: FETCH c_metric_details INTO l_metric_details;
6729: IF c_metric_details%NOTFOUND THEN
6730: CLOSE c_metric_details;
6731: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6732: RAISE Fnd_Api.G_EXC_ERROR;
6733: END IF;
6734: CLOSE c_metric_details;
6735:
6728: FETCH c_metric_details INTO l_metric_details;
6729: IF c_metric_details%NOTFOUND THEN
6730: CLOSE c_metric_details;
6731: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6732: RAISE Fnd_Api.G_EXC_ERROR;
6733: END IF;
6734: CLOSE c_metric_details;
6735:
6736: OPEN c_get_hist_details(p_metric_id, p_object_type, p_object_id);
6736: OPEN c_get_hist_details(p_metric_id, p_object_type, p_object_id);
6737: FETCH c_get_hist_details INTO l_start_date;
6738: IF c_get_hist_details%NOTFOUND OR l_start_date IS NULL THEN
6739: CLOSE c_get_hist_details;
6740: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6741: RAISE Fnd_Api.G_EXC_ERROR;
6742: END IF;
6743: CLOSE c_get_hist_details;
6744:
6737: FETCH c_get_hist_details INTO l_start_date;
6738: IF c_get_hist_details%NOTFOUND OR l_start_date IS NULL THEN
6739: CLOSE c_get_hist_details;
6740: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6741: RAISE Fnd_Api.G_EXC_ERROR;
6742: END IF;
6743: CLOSE c_get_hist_details;
6744:
6745: IF TRUNC(p_from_date) > TRUNC(l_start_date) THEN
6767: p_interval_unit => p_interval_unit, -- 'DAY', 'WK', 'MTH', 'YR'
6768: x_date_buckets => l_date_buckets,
6769: x_return_status => x_return_status
6770: );
6771: IF x_return_status = Fnd_Api.G_RET_STS_ERROR THEN
6772: RETURN;
6773: END IF;
6774:
6775: l_result_table := result_table();
6810: p_from_amount => NVL(l_result_record.forecasted_value,0),
6811: x_to_amount => l_result_record.forecasted_value,
6812: p_from_amount2 => NVL(l_result_record.actual_value,0),
6813: x_to_amount2 => l_result_record.actual_value,
6814: p_round => Fnd_Api.G_TRUE
6815: );
6816: l_result_record.currency_code := l_trans_currency_code;
6817: END IF;
6818: l_result_table(l_result_index).forecasted_value :=
6840: p_from_amount => NVL(l_result_record.forecasted_value,0),
6841: x_to_amount => l_result_record.forecasted_value,
6842: p_from_amount2 => NVL(l_result_record.actual_value,0),
6843: x_to_amount2 => l_result_record.actual_value,
6844: p_round => Fnd_Api.G_TRUE
6845: );
6846: l_result_record.currency_code := l_trans_currency_code;
6847: END IF;
6848: l_result_table(l_result_index) := l_result_record;
6890: --
6891: Fnd_Msg_Pub.Count_And_Get (
6892: p_count => x_msg_count,
6893: p_data => x_msg_data,
6894: p_encoded => Fnd_Api.G_FALSE
6895: );
6896:
6897: --
6898: -- Debug message.
6901: Ams_Utility_Pvt.debug_message(l_full_name ||': END');
6902: END IF;
6903:
6904: EXCEPTION
6905: WHEN Fnd_Api.G_EXC_ERROR THEN
6906: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6907: Fnd_Msg_Pub.Count_And_Get (
6908: p_count => x_msg_count,
6909: p_data => x_msg_data,
6902: END IF;
6903:
6904: EXCEPTION
6905: WHEN Fnd_Api.G_EXC_ERROR THEN
6906: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6907: Fnd_Msg_Pub.Count_And_Get (
6908: p_count => x_msg_count,
6909: p_data => x_msg_data,
6910: p_encoded => FND_API.G_FALSE
6906: x_return_status := Fnd_Api.G_RET_STS_ERROR;
6907: Fnd_Msg_Pub.Count_And_Get (
6908: p_count => x_msg_count,
6909: p_data => x_msg_data,
6910: p_encoded => FND_API.G_FALSE
6911: );
6912: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6913: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6914: Fnd_Msg_Pub.Count_And_Get (
6908: p_count => x_msg_count,
6909: p_data => x_msg_data,
6910: p_encoded => FND_API.G_FALSE
6911: );
6912: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6913: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6914: Fnd_Msg_Pub.Count_And_Get (
6915: p_count => x_msg_count,
6916: p_data => x_msg_data,
6909: p_data => x_msg_data,
6910: p_encoded => FND_API.G_FALSE
6911: );
6912: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
6913: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6914: Fnd_Msg_Pub.Count_And_Get (
6915: p_count => x_msg_count,
6916: p_data => x_msg_data,
6917: p_encoded => FND_API.G_FALSE
6913: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6914: Fnd_Msg_Pub.Count_And_Get (
6915: p_count => x_msg_count,
6916: p_data => x_msg_data,
6917: p_encoded => FND_API.G_FALSE
6918: );
6919: WHEN OTHERS THEN
6920: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6921: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
6916: p_data => x_msg_data,
6917: p_encoded => FND_API.G_FALSE
6918: );
6919: WHEN OTHERS THEN
6920: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
6921: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
6922: Fnd_Msg_Pub.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
6923: END IF;
6924: Fnd_Msg_Pub.Count_And_Get (
6923: END IF;
6924: Fnd_Msg_Pub.Count_And_Get (
6925: p_count => x_msg_count,
6926: p_data => x_msg_data,
6927: p_encoded => FND_API.G_FALSE
6928: );
6929: END get_results;
6930:
6931: --======================================================================
6939: -- 13-may-2003 sunkumar created
6940: --======================================================================
6941: procedure copy_act_metrics (
6942: p_api_version IN NUMBER,
6943: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
6944: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
6945: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
6946: p_source_object_type IN VARCHAR2,
6947: p_source_object_id IN NUMBER,
6940: --======================================================================
6941: procedure copy_act_metrics (
6942: p_api_version IN NUMBER,
6943: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
6944: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
6945: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
6946: p_source_object_type IN VARCHAR2,
6947: p_source_object_id IN NUMBER,
6948: p_target_object_id IN NUMBER,
6941: procedure copy_act_metrics (
6942: p_api_version IN NUMBER,
6943: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
6944: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
6945: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
6946: p_source_object_type IN VARCHAR2,
6947: p_source_object_id IN NUMBER,
6948: p_target_object_id IN NUMBER,
6949: x_return_status OUT NOCOPY VARCHAR2,
6955: L_API_VERSION CONSTANT NUMBER := 1.0;
6956: L_API_NAME CONSTANT VARCHAR2(30) := 'COPY_ACT_METRICS';
6957: L_FULL_NAME CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
6958:
6959: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
6960:
6961: l_source_object_type VARCHAR2(30) := p_source_object_type;
6962: l_source_object_id NUMBER := p_source_object_id;
6963: l_target_object_id NUMBER := p_target_object_id;
7079: Ams_Utility_Pvt.Debug_Message(l_full_name||': start');
7080: END IF;
7081:
7082: -- Initialize message list if p_init_msg_list is set to TRUE.
7083: IF FND_API.To_Boolean (p_init_msg_list) THEN
7084: FND_MSG_PUB.Initialize;
7085: END IF;
7086:
7087: -- Standard check for API version compatibility.
7084: FND_MSG_PUB.Initialize;
7085: END IF;
7086:
7087: -- Standard check for API version compatibility.
7088: IF NOT FND_API.Compatible_API_Call (L_API_VERSION,
7089: p_api_version,
7090: L_API_NAME,
7091: G_PKG_NAME)
7092: THEN
7089: p_api_version,
7090: L_API_NAME,
7091: G_PKG_NAME)
7092: THEN
7093: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7094: END IF;
7095:
7096: -- Initialize API return status to success.
7097: x_return_status := FND_API.G_RET_STS_SUCCESS;
7093: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7094: END IF;
7095:
7096: -- Initialize API return status to success.
7097: x_return_status := FND_API.G_RET_STS_SUCCESS;
7098:
7099: validate_objects(
7100: p_api_version => p_api_version,
7101: p_init_msg_list => p_init_msg_list,
7108: x_msg_count => x_msg_count,
7109: x_msg_data => x_msg_data
7110: );
7111:
7112: IF x_return_status = Fnd_Api.G_RET_STS_ERROR THEN
7113: RAISE Fnd_Api.G_EXC_ERROR;
7114:
7115: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
7116: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
7109: x_msg_data => x_msg_data
7110: );
7111:
7112: IF x_return_status = Fnd_Api.G_RET_STS_ERROR THEN
7113: RAISE Fnd_Api.G_EXC_ERROR;
7114:
7115: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
7116: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
7117: END IF;
7111:
7112: IF x_return_status = Fnd_Api.G_RET_STS_ERROR THEN
7113: RAISE Fnd_Api.G_EXC_ERROR;
7114:
7115: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
7116: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
7117: END IF;
7118:
7119: open c_act_met_details(l_source_object_type,l_source_object_id);
7112: IF x_return_status = Fnd_Api.G_RET_STS_ERROR THEN
7113: RAISE Fnd_Api.G_EXC_ERROR;
7114:
7115: ELSIF x_return_status = Fnd_Api.G_RET_STS_UNEXP_ERROR THEN
7116: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
7117: END IF;
7118:
7119: open c_act_met_details(l_source_object_type,l_source_object_id);
7120: LOOP
7176: p_act_metric_rec => metrics_rec,
7177: x_activity_metric_id => x_activity_metric_id);
7178:
7179: -- If any errors happen abort API.
7180: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
7181: RAISE Fnd_Api.G_EXC_ERROR;
7182: END IF;
7183: END IF; --if activity metric exist for target.
7184:
7177: x_activity_metric_id => x_activity_metric_id);
7178:
7179: -- If any errors happen abort API.
7180: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
7181: RAISE Fnd_Api.G_EXC_ERROR;
7182: END IF;
7183: END IF; --if activity metric exist for target.
7184:
7185: END LOOP;
7187:
7188: -- End API Body.
7189:
7190: -- Standard check for commit request.
7191: IF FND_API.To_Boolean (p_commit) THEN
7192: COMMIT;
7193: END IF;
7194:
7195: Fnd_Msg_Pub.Count_And_Get (
7194:
7195: Fnd_Msg_Pub.Count_And_Get (
7196: p_count => x_msg_count,
7197: p_data => x_msg_data,
7198: p_encoded => Fnd_Api.G_FALSE
7199: );
7200:
7201: --
7202: -- Debug message.
7205: Ams_Utility_Pvt.debug_message(l_full_name ||': END');
7206: END IF;
7207:
7208: EXCEPTION
7209: WHEN FND_API.G_EXC_ERROR THEN
7210: ROLLBACK TO Copy_Metric_pvt;
7211: x_return_status := FND_API.G_RET_STS_ERROR;
7212: FND_MSG_PUB.Count_And_Get (
7213: p_encoded => FND_API.g_false,
7207:
7208: EXCEPTION
7209: WHEN FND_API.G_EXC_ERROR THEN
7210: ROLLBACK TO Copy_Metric_pvt;
7211: x_return_status := FND_API.G_RET_STS_ERROR;
7212: FND_MSG_PUB.Count_And_Get (
7213: p_encoded => FND_API.g_false,
7214: p_count => x_msg_count,
7215: p_data => x_msg_data
7209: WHEN FND_API.G_EXC_ERROR THEN
7210: ROLLBACK TO Copy_Metric_pvt;
7211: x_return_status := FND_API.G_RET_STS_ERROR;
7212: FND_MSG_PUB.Count_And_Get (
7213: p_encoded => FND_API.g_false,
7214: p_count => x_msg_count,
7215: p_data => x_msg_data
7216: );
7217:
7214: p_count => x_msg_count,
7215: p_data => x_msg_data
7216: );
7217:
7218: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7219: ROLLBACK TO Copy_Metric_pvt;
7220: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7221: FND_MSG_PUB.Count_And_Get (
7222: p_encoded => FND_API.g_false,
7216: );
7217:
7218: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7219: ROLLBACK TO Copy_Metric_pvt;
7220: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7221: FND_MSG_PUB.Count_And_Get (
7222: p_encoded => FND_API.g_false,
7223: p_count => x_msg_count,
7224: p_data => x_msg_data
7218: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7219: ROLLBACK TO Copy_Metric_pvt;
7220: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7221: FND_MSG_PUB.Count_And_Get (
7222: p_encoded => FND_API.g_false,
7223: p_count => x_msg_count,
7224: p_data => x_msg_data
7225: );
7226:
7225: );
7226:
7227: WHEN OTHERS THEN
7228: ROLLBACK TO Copy_Metric_pvt;
7229: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7230: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7231: THEN
7232: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
7233: END IF;
7232: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
7233: END IF;
7234:
7235: FND_MSG_PUB.Count_And_Get (
7236: p_encoded => FND_API.g_false,
7237: p_count => x_msg_count,
7238: p_data => x_msg_data
7239: );
7240:
7252: --======================================================================
7253:
7254: PROCEDURE validate_objects(
7255: p_api_version IN NUMBER,
7256: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
7257: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
7258: p_source_object_type IN VARCHAR2,
7259: p_source_object_id IN NUMBER,
7260: p_target_object_id IN NUMBER,
7253:
7254: PROCEDURE validate_objects(
7255: p_api_version IN NUMBER,
7256: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
7257: p_validation_level IN NUMBER := Fnd_Api.G_Valid_Level_Full,
7258: p_source_object_type IN VARCHAR2,
7259: p_source_object_id IN NUMBER,
7260: p_target_object_id IN NUMBER,
7261: x_return_status OUT NOCOPY VARCHAR2,
7267: L_API_VERSION CONSTANT NUMBER := 1.0;
7268: L_API_NAME CONSTANT VARCHAR2(30) := 'VALIDATE_OBJECTS';
7269: L_FULL_NAME CONSTANT VARCHAR2(60) := g_pkg_name ||'.'|| l_api_name;
7270:
7271: l_return_status VARCHAR2(1):=FND_API.G_RET_STS_SUCCESS;
7272: l_source_object_type VARCHAR2(30) := p_source_object_type;
7273: l_source_object_id NUMBER := p_source_object_id;
7274: l_target_object_id NUMBER := p_target_object_id;
7275:
7272: l_source_object_type VARCHAR2(30) := p_source_object_type;
7273: l_source_object_id NUMBER := p_source_object_id;
7274: l_target_object_id NUMBER := p_target_object_id;
7275:
7276: l_source_object_exists VARCHAR2(1) := Fnd_Api.G_FALSE;
7277: l_target_object_exists VARCHAR2(1) := Fnd_Api.G_FALSE;
7278: l_valid_object VARCHAR2(1) := Fnd_Api.G_FALSE;
7279:
7280: l_object_name AMS_LOOKUPS.MEANING%TYPE;
7273: l_source_object_id NUMBER := p_source_object_id;
7274: l_target_object_id NUMBER := p_target_object_id;
7275:
7276: l_source_object_exists VARCHAR2(1) := Fnd_Api.G_FALSE;
7277: l_target_object_exists VARCHAR2(1) := Fnd_Api.G_FALSE;
7278: l_valid_object VARCHAR2(1) := Fnd_Api.G_FALSE;
7279:
7280: l_object_name AMS_LOOKUPS.MEANING%TYPE;
7281: --cursors to check for existance of various objects.
7274: l_target_object_id NUMBER := p_target_object_id;
7275:
7276: l_source_object_exists VARCHAR2(1) := Fnd_Api.G_FALSE;
7277: l_target_object_exists VARCHAR2(1) := Fnd_Api.G_FALSE;
7278: l_valid_object VARCHAR2(1) := Fnd_Api.G_FALSE;
7279:
7280: l_object_name AMS_LOOKUPS.MEANING%TYPE;
7281: --cursors to check for existance of various objects.
7282: CURSOR c_check_camp(id NUMBER) IS
7279:
7280: l_object_name AMS_LOOKUPS.MEANING%TYPE;
7281: --cursors to check for existance of various objects.
7282: CURSOR c_check_camp(id NUMBER) IS
7283: SELECT Fnd_Api.G_TRUE
7284: FROM ams_campaigns_all_b
7285: WHERE campaign_id = id;
7286:
7287: CURSOR c_check_csch(id NUMBER) IS
7284: FROM ams_campaigns_all_b
7285: WHERE campaign_id = id;
7286:
7287: CURSOR c_check_csch(id NUMBER) IS
7288: SELECT Fnd_Api.G_TRUE
7289: FROM ams_campaign_schedules_b
7290: WHERE schedule_id = id;
7291:
7292: CURSOR c_check_delv(id NUMBER) IS
7289: FROM ams_campaign_schedules_b
7290: WHERE schedule_id = id;
7291:
7292: CURSOR c_check_delv(id NUMBER) IS
7293: SELECT Fnd_Api.G_TRUE
7294: FROM ams_deliverables_all_b
7295: WHERE deliverable_id = id;
7296:
7297: CURSOR c_check_eveh(id NUMBER) IS
7294: FROM ams_deliverables_all_b
7295: WHERE deliverable_id = id;
7296:
7297: CURSOR c_check_eveh(id NUMBER) IS
7298: SELECT Fnd_Api.G_TRUE
7299: FROM ams_event_headers_all_b
7300: WHERE event_header_id = id;
7301:
7302: CURSOR c_check_eveo(id NUMBER) IS
7299: FROM ams_event_headers_all_b
7300: WHERE event_header_id = id;
7301:
7302: CURSOR c_check_eveo(id NUMBER) IS
7303: SELECT Fnd_Api.G_TRUE
7304: FROM ams_event_offers_all_b
7305: WHERE event_offer_id = id;
7306:
7307: BEGIN
7311: Ams_Utility_Pvt.debug_message(l_full_name||': start');
7312: END IF;
7313:
7314: -- Initialize message list if p_init_msg_list is set to TRUE.
7315: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN
7316: Fnd_Msg_Pub.Initialize;
7317: END IF;
7318:
7319: -- Standard check for API version compatibility.
7316: Fnd_Msg_Pub.Initialize;
7317: END IF;
7318:
7319: -- Standard check for API version compatibility.
7320: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,
7321: p_api_version,
7322: L_API_NAME,
7323: G_PKG_NAME)
7324: THEN
7321: p_api_version,
7322: L_API_NAME,
7323: G_PKG_NAME)
7324: THEN
7325: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
7326: END IF;
7327:
7328: -- Initialize API return status to success.
7329: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
7325: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
7326: END IF;
7327:
7328: -- Initialize API return status to success.
7329: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
7330:
7331: -- Begin API Body.
7332: IF (AMS_DEBUG_HIGH_ON) THEN
7333: Ams_Utility_Pvt.debug_message(l_full_name||': Validate items');
7337: IF (l_source_object_type IN ('RCAM', 'CAMP')) THEN
7338: OPEN c_check_camp(l_source_object_id);
7339: FETCH c_check_camp INTO l_source_object_exists;
7340: CLOSE c_check_camp;
7341: l_valid_object := Fnd_Api.G_TRUE;
7342:
7343: ELSIF (l_source_object_type = 'CSCH') THEN
7344: OPEN c_check_csch(l_source_object_id);
7345: FETCH c_check_csch INTO l_source_object_exists;
7343: ELSIF (l_source_object_type = 'CSCH') THEN
7344: OPEN c_check_csch(l_source_object_id);
7345: FETCH c_check_csch INTO l_source_object_exists;
7346: CLOSE c_check_csch;
7347: l_valid_object := Fnd_Api.G_TRUE;
7348:
7349: ELSIF (l_source_object_type = 'DELV') THEN
7350: OPEN c_check_delv(l_source_object_id);
7351: FETCH c_check_delv INTO l_source_object_exists;
7349: ELSIF (l_source_object_type = 'DELV') THEN
7350: OPEN c_check_delv(l_source_object_id);
7351: FETCH c_check_delv INTO l_source_object_exists;
7352: CLOSE c_check_delv;
7353: l_valid_object := Fnd_Api.G_TRUE;
7354:
7355: ELSIF (l_source_object_type = 'EVEH') THEN
7356: OPEN c_check_eveh(l_source_object_id);
7357: FETCH c_check_eveh INTO l_source_object_exists;
7355: ELSIF (l_source_object_type = 'EVEH') THEN
7356: OPEN c_check_eveh(l_source_object_id);
7357: FETCH c_check_eveh INTO l_source_object_exists;
7358: CLOSE c_check_eveh;
7359: l_valid_object := Fnd_Api.G_TRUE;
7360:
7361: ELSIF (l_source_object_type IN ('EONE' , 'EVEO')) THEN
7362: OPEN c_check_eveo(l_source_object_id);
7363: FETCH c_check_eveo INTO l_source_object_exists;
7361: ELSIF (l_source_object_type IN ('EONE' , 'EVEO')) THEN
7362: OPEN c_check_eveo(l_source_object_id);
7363: FETCH c_check_eveo INTO l_source_object_exists;
7364: CLOSE c_check_eveo;
7365: l_valid_object := Fnd_Api.G_TRUE;
7366:
7367: END IF;
7368:
7369: l_object_name := ams_utility_pvt.get_lookup_meaning('AMS_SYS_ARC_QUALIFIER', l_source_object_type);
7368:
7369: l_object_name := ams_utility_pvt.get_lookup_meaning('AMS_SYS_ARC_QUALIFIER', l_source_object_type);
7370:
7371: --the object type passed is not a valid one for metrics.
7372: IF (l_valid_object = Fnd_Api.G_FALSE) THEN
7373: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
7374: Fnd_Message.Set_Name('AMS', 'AMS_COPY_INVALID_OBJECTS');
7375: Fnd_Msg_Pub.ADD;
7376: END IF;
7373: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
7374: Fnd_Message.Set_Name('AMS', 'AMS_COPY_INVALID_OBJECTS');
7375: Fnd_Msg_Pub.ADD;
7376: END IF;
7377: l_return_status := Fnd_Api.G_RET_STS_ERROR;
7378:
7379: END IF;
7380:
7381: --check if source object was not found
7378:
7379: END IF;
7380:
7381: --check if source object was not found
7382: IF (l_source_object_exists = Fnd_Api.G_FALSE) THEN
7383: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
7384: Fnd_Message.Set_Name('AMS', 'AMS_COPY_INVALID_SOURCE');
7385: Fnd_Message.set_token('OBJECT', l_object_name);
7386: Fnd_Msg_Pub.ADD;
7384: Fnd_Message.Set_Name('AMS', 'AMS_COPY_INVALID_SOURCE');
7385: Fnd_Message.set_token('OBJECT', l_object_name);
7386: Fnd_Msg_Pub.ADD;
7387: END IF;
7388: l_return_status := Fnd_Api.G_RET_STS_ERROR;
7389: END IF;
7390:
7391: --check target object exists
7392: IF (l_source_object_type IN ('RCAM', 'CAMP')) THEN
7416:
7417: END IF;
7418:
7419: --check if target object was not found
7420: IF (l_target_object_exists = Fnd_Api.G_FALSE) THEN
7421: IF Fnd_Msg_Pub.Check_Msg_Level (Fnd_Msg_Pub.G_MSG_LVL_ERROR) THEN
7422: Fnd_Message.Set_Name('AMS', 'AMS_COPY_INVALID_TARGET');
7423: Fnd_Message.set_token('OBJECT', l_object_name);
7424: Fnd_Msg_Pub.ADD;
7422: Fnd_Message.Set_Name('AMS', 'AMS_COPY_INVALID_TARGET');
7423: Fnd_Message.set_token('OBJECT', l_object_name);
7424: Fnd_Msg_Pub.ADD;
7425: END IF;
7426: l_return_status := Fnd_Api.G_RET_STS_ERROR;
7427:
7428: END IF;
7429:
7430: -- End API Body.
7433: -- set the message data OUT variable.
7434: FND_MSG_PUB.Count_And_Get (
7435: p_count => x_msg_count,
7436: p_data => x_msg_data,
7437: p_encoded => FND_API.G_FALSE
7438: );
7439:
7440: -- Add success message to message list.
7441: IF (AMS_DEBUG_HIGH_ON) THEN
7457: --
7458: --======================================================================
7459: FUNCTION Lock_Object(
7460: p_api_version IN NUMBER,
7461: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
7462: p_arc_act_metric_used_by IN VARCHAR2,
7463: p_act_metric_used_by_id IN NUMBER,
7464: x_return_status OUT NOCOPY VARCHAR2,
7465: x_msg_count OUT NOCOPY NUMBER,
7479: BEGIN
7480: --
7481: -- Initialize message list if p_init_msg_list is set to TRUE.
7482: --
7483: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN
7484: Fnd_Msg_Pub.Initialize;
7485: END IF;
7486:
7487: --
7486:
7487: --
7488: -- Standard check for API version compatibility.
7489: --
7490: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,
7491: p_api_version,
7492: L_API_NAME,
7493: G_PKG_NAME)
7494: THEN
7491: p_api_version,
7492: L_API_NAME,
7493: G_PKG_NAME)
7494: THEN
7495: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
7496: END IF;
7497:
7498: --
7499: -- Initialize API return status to success.
7497:
7498: --
7499: -- Initialize API return status to success.
7500: --
7501: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
7502: IF (p_arc_act_metric_used_by ='CSCH') THEN
7503: l_table_name := 'AMS_CAMPAIGN_SCHEDULES_B';
7504: l_pk_name := 'SCHEDULE_ID';
7505: ELSIF (p_arc_act_metric_used_by ='CAMP') THEN
7524: l_table_name := 'AMS_ACT_LISTS';
7525: l_pk_name := 'ACT_LIST_HEADER_ID';
7526: ELSE
7527: AMS_Utility_PVT.error_message ('AMS_INVALID_SYS_QUAL', 'SYS_QUALIFIER', p_arc_act_metric_used_by);
7528: x_return_status := FND_API.g_ret_sts_unexp_error;
7529: l_table_name := NULL;
7530: l_pk_name := NULL;
7531: END IF;
7532:
7530: l_pk_name := NULL;
7531: END IF;
7532:
7533: l_count := 0;
7534: if x_return_status = Fnd_Api.G_RET_STS_SUCCESS then
7535: l_sql := 'UPDATE ' || UPPER(l_table_name) ||
7536: ' SET object_version_number = object_version_number '||
7537: ' WHERE ' || UPPER(l_pk_name) || ' = :b1 ';
7538:
7559: l_count := 0;
7560: END;
7561:
7562: IF l_count = 0 THEN
7563: RETURN FND_API.g_false;
7564: ELSE
7565: RETURN FND_API.g_true;
7566: END IF;
7567:
7561:
7562: IF l_count = 0 THEN
7563: RETURN FND_API.g_false;
7564: ELSE
7565: RETURN FND_API.g_true;
7566: END IF;
7567:
7568: END Lock_Object;
7569:
7581: -- 30-Jan-2004 choang Created.
7582: --
7583: PROCEDURE delete_actmetrics_assoc (
7584: p_api_version IN NUMBER,
7585: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
7586: p_commit IN VARCHAR2 := FND_API.G_FALSE,
7587: p_object_type IN VARCHAR2,
7588: p_object_id IN NUMBER,
7589: x_return_status OUT NOCOPY VARCHAR2,
7582: --
7583: PROCEDURE delete_actmetrics_assoc (
7584: p_api_version IN NUMBER,
7585: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
7586: p_commit IN VARCHAR2 := FND_API.G_FALSE,
7587: p_object_type IN VARCHAR2,
7588: p_object_id IN NUMBER,
7589: x_return_status OUT NOCOPY VARCHAR2,
7590: x_msg_count OUT NOCOPY NUMBER,
7598:
7599: --
7600: -- Initialize message list if p_init_msg_list is set to TRUE.
7601: --
7602: IF Fnd_Api.To_Boolean (p_init_msg_list) THEN
7603: Fnd_Msg_Pub.Initialize;
7604: END IF;
7605:
7606: --
7605:
7606: --
7607: -- Standard check for API version compatibility.
7608: --
7609: IF NOT Fnd_Api.Compatible_API_Call (L_API_VERSION,
7610: p_api_version,
7611: L_API_NAME,
7612: G_PKG_NAME)
7613: THEN
7610: p_api_version,
7611: L_API_NAME,
7612: G_PKG_NAME)
7613: THEN
7614: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
7615: END IF;
7616:
7617: --
7618: -- Initialize API return status to success.
7616:
7617: --
7618: -- Initialize API return status to success.
7619: --
7620: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
7621:
7622: DELETE FROM ams_act_metrics_all
7623: WHERE arc_act_metric_used_by = p_object_type
7624: AND act_metric_used_by_id = p_object_id;
7622: DELETE FROM ams_act_metrics_all
7623: WHERE arc_act_metric_used_by = p_object_type
7624: AND act_metric_used_by_id = p_object_id;
7625:
7626: IF p_commit = FND_API.G_TRUE THEN
7627: COMMIT;
7628: END IF;
7629: EXCEPTION
7630: WHEN OTHERS THEN
7628: END IF;
7629: EXCEPTION
7630: WHEN OTHERS THEN
7631: ROLLBACK TO delete_actmetrics_assoc;
7632: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7633: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7634: THEN
7635: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
7636: END IF;
7635: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, L_API_NAME);
7636: END IF;
7637:
7638: FND_MSG_PUB.Count_And_Get (
7639: p_encoded => FND_API.g_false,
7640: p_count => x_msg_count,
7641: p_data => x_msg_data
7642: );
7643: END delete_actmetrics_assoc;
7775:
7776: END IF;
7777:
7778: IF l_count = 0 THEN
7779: RETURN FND_API.g_false;
7780: ELSE
7781: RETURN FND_API.g_true;
7782: END IF;
7783:
7777:
7778: IF l_count = 0 THEN
7779: RETURN FND_API.g_false;
7780: ELSE
7781: RETURN FND_API.g_true;
7782: END IF;
7783:
7784:
7785: END Validate_Object_Exists;
7812: and act_budget_used_by_id = l_object_id
7813: and budget_source_type = 'FUND'
7814: and status_code = 'APPROVED';
7815:
7816: l_return_val VARCHAR2(30) := FND_API.G_FALSE;
7817: l_budget_count NUMBER;
7818: l_status VARCHAR2(30);
7819: l_currency VARCHAR2(30);
7820: BEGIN
7829: x_currency => l_currency
7830: );
7831:
7832: IF l_budget_count > 0 AND l_status = 'Y' THEN
7833: l_return_val := FND_API.G_TRUE;
7834: END IF;
7835:
7836: return l_return_val;
7837: