1: PACKAGE BODY AMS_ACTMETRIC_PVT AS
2: /* $Header: amsvamtb.pls 120.14 2006/01/25 13:45:40 dmvincen noship $ */
3:
4: ------------------------------------------------------------------------------
5: --
3:
4: ------------------------------------------------------------------------------
5: --
6: -- NAME
7: -- AMS_ActMetric_PVT 12.0
8: --
9: -- HISTORY
10: -- 20-Jun-1999 choang@us Created package.
11: -- 11-Oct-1999 ptendulk@us Made changes according to new standards.
118:
119: --
120: -- Global variables and constants.
121:
122: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AMS_ACTMETRIC_PVT'; -- Name of the current package.
123: G_DEBUG_FLAG VARCHAR2(1) := 'N';
124: G_CREATE CONSTANT VARCHAR2(30) := 'CREATE';
125: G_UPDATE CONSTANT VARCHAR2(30) := 'UPDATE';
126: G_DELETE CONSTANT VARCHAR2(30) := 'DELETE';
531: --
532: -- End of comments
533:
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 ;
929: l_act_metric_id NUMBER;
930: l_act_metric_trans_curr VARCHAR2(15);
931: l_actual_val NUMBER;
932: l_forecasted_val NUMBER;
933: l_act_metric_rec Ams_Actmetric_Pvt.act_metric_rec_type;
934: l_obj_trans_curr VARCHAR2(15);
935:
936: BEGIN
937:
954: l_act_metric_rec.trans_actual_value := NULL;
955: l_act_metric_rec.trans_forecasted_value := NULL;
956:
957: -- Call the update API
958: Ams_Actmetric_Pvt.update_actmetric (
959: p_api_version => 1.0,
960: p_act_metric_rec => l_act_metric_rec,
961: x_return_status => x_return_status,
962: x_msg_count => l_msg_count,
6964:
6965: l_activity_metric_id NUMBER;
6966: l_metric_id NUMBER;
6967: l_accrual_type VARCHAR2(30);
6968: metrics_rec AMS_ACTMETRIC_PVT.act_metric_rec_type;
6969: x_activity_metric_id NUMBER;
6970:
6971: --select the details from the source object
6972: CURSOR c_act_met_details(c_source_object_type varchar2, c_source_object_id NUMBER) IS
7836: return l_return_val;
7837:
7838: END can_post_to_budget;
7839:
7840: END Ams_Actmetric_Pvt;