DBA Data[Home] [Help]

PACKAGE: APPS.PA_FP_ADJUSTMENT_UTILS

Source


1 PACKAGE PA_FP_ADJUSTMENT_UTILS AUTHID CURRENT_USER AS
2 -- $Header: PAFPADJS.pls 120.1 2005/08/19 16:23:44 mwasowic noship $
3 
4 
5 -- This procedure will Get Summary Information on a
6 -- given Budget Version Id/Name
7 
8 
9 
10 PROCEDURE Get_Summary_Info
11 (  p_project_id                  IN  NUMBER
12   ,p_cost_budget_version_id      IN  NUMBER
13   ,p_rev_budget_version_id       IN  NUMBER
14   ,p_WBS_Element_Id              IN  NUMBER    DEFAULT NULL
15   ,p_RBS_Element_Id              IN  NUMBER    DEFAULT NULL
16   ,p_WBS_Structure_Version_Id    IN  NUMBER    DEFAULT NULL
17   ,p_RBS_Version_Id              IN  NUMBER    DEFAULT NULL
18   ,p_WBS_Rollup_Flag             IN  VARCHAR2
19   ,p_RBS_Rollup_Flag             IN  VARCHAR2
20   ,p_resource_tbl_flag           IN  VARCHAR2  DEFAULT 'N'
21   ,p_resource_assignment_id_tbl  IN  SYSTEM.PA_NUM_TBL_TYPE DEFAULT SYSTEM.PA_NUM_TBL_TYPE()
22   ,p_txn_currency_code_tbl       IN  SYSTEM.PA_VARCHAR2_15_TBL_TYPE DEFAULT SYSTEM.PA_VARCHAR2_15_TBL_TYPE()
23   ,x_version                     OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
24   ,x_version_name                OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
25   ,x_project_id                  OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
26   ,x_structure_version_id        OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
27   ,x_rev_version                 OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
28   ,x_rev_version_name            OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
29   ,x_task_number                 OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
30   ,x_task_name                   OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
31   ,x_resource_name               OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
32   ,x_plan_setup                  OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
33   ,x_plan_type_name              OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
34   ,x_fin_plan_type_id            OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
35   ,x_version_type                OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
36   ,x_rev_plan_type_name          OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
37   ,x_rev_workplan_flag           OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
38   ,x_rev_plan_setup              OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
39   ,x_rev_plan_class_code         OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
40   ,x_rev_fin_plan_type_id        OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
41   ,x_rev_version_type            OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
42   ,x_workplan_flag               OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
43   ,x_plan_class_code             OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
44   ,x_pc_raw_cost                 OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
45   ,x_pc_burdened_cost            OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
46   ,x_pc_revenue                  OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
47   ,x_pc_currency                 OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
48   ,x_pfc_raw_cost                OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
49   ,x_pfc_burdened_cost           OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
50   ,x_pfc_revenue                 OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
51   ,x_pfc_currency                OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
52   ,x_pc_margin                   OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
53   ,x_pfc_margin                  OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
54   ,x_margin_percent              OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
55   ,x_total_labor_hours           OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
56   ,x_total_equip_hours           OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
57   ,x_rev_total_labor_hours       OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
58   ,x_rev_total_equip_hours       OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
59   ,x_resource_assignment_id_tbl  OUT NOCOPY SYSTEM.PA_NUM_TBL_TYPE --File.Sql.39 bug 4440895
60   ,x_txn_currency_code_tbl       OUT NOCOPY SYSTEM.PA_VARCHAR2_15_TBL_TYPE --File.Sql.39 bug 4440895
61   ,x_workplan_costs_enabled_flag OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
62   ,x_return_status               OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
63   ,x_msg_count                   OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
64   ,x_msg_data                    OUT NOCOPY VARCHAR2 ) ; --File.Sql.39 bug 4440895
65 
66 
67 -- Purpose: Private Specific to compute relevant planning transaction id's affected in computing summary amounts/adjusting plan via Adjust/Mass Adjust.
68 --          Called by Get_Summary_Info and AMG Adjust Interface API.
69 PROCEDURE COMPUTE_HIERARCHY(
70      p_cost_budget_version_id    IN  NUMBER
71     ,p_rev_budget_version_id     IN  NUMBER
72     ,p_WBS_Element_Id	         IN  NUMBER DEFAULT NULL
73     ,p_RBS_Element_Id	         IN  NUMBER DEFAULT NULL
74     ,p_WBS_Structure_Version_Id  IN  NUMBER DEFAULT NULL
75     ,p_RBS_Version_Id            IN  NUMBER DEFAULT NULL
76     ,p_WBS_Rollup_Flag           IN  VARCHAR2
77     ,p_RBS_Rollup_Flag           IN  VARCHAR2
78     ,X_res_assignment_id_tbl     OUT NOCOPY SYSTEM.PA_NUM_TBL_TYPE --File.Sql.39 bug 4440895
79     ,X_txn_currency_code_tbl     OUT NOCOPY SYSTEM.pa_varchar2_15_tbl_type --File.Sql.39 bug 4440895
80     ,X_rev_res_assignment_id_tbl OUT NOCOPY SYSTEM.PA_NUM_TBL_TYPE --File.Sql.39 bug 4440895
81     ,X_rev_txn_currency_code_tbl OUT NOCOPY SYSTEM.pa_varchar2_15_tbl_type --File.Sql.39 bug 4440895
82     ,X_return_status             OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
83     )   ;
84 
85 
86 -- This procedure is an interface to Adjust the relevant Planning Versions /transactions
87 -- based on a percentage
88 -- for the relevant parameters
89 
90 PROCEDURE Adjust_Planning_Transactions
91 (
92      p_Project_Id                   IN  NUMBER
93     ,p_Context                      IN  VARCHAR2
94     ,p_user_id                      IN  NUMBER DEFAULT FND_GLOBAL.USER_ID
95     ,p_cost_budget_version_id	    IN  NUMBER
96     ,p_rev_budget_version_id        IN  NUMBER   DEFAULT NULL
97     ,p_cost_fin_plan_type_id	    IN	NUMBER
98     ,p_cost_version_type	    IN	VARCHAR2
99     ,p_cost_plan_setup              IN  VARCHAR2
100     ,p_rev_fin_plan_type_id	    IN	NUMBER	 DEFAULT NULL
101     ,p_rev_version_type		    IN	VARCHAR2 DEFAULT NULL
102     ,p_rev_plan_setup               IN  VARCHAR2 DEFAULT NULL
103     ,p_new_version_flag	            IN  VARCHAR2 DEFAULT 'N'
104     ,p_new_version_name	            IN  VARCHAR2 DEFAULT NULL
105     ,p_new_version_desc	            IN  VARCHAR2 DEFAULT NULL
106     ,p_adjustment_type	            IN  VARCHAR2 DEFAULT NULL
107     ,p_adjustment_percentage	    IN  NUMBER
108     ,p_WBS_Element_Id	            IN  NUMBER DEFAULT NULL
109     ,p_RBS_Element_Id	            IN  NUMBER DEFAULT NULL
110     ,p_WBS_Structure_Version_Id     IN  NUMBER DEFAULT NULL
111     ,p_RBS_Version_Id               IN  NUMBER DEFAULT NULL
112     ,p_WBS_Rollup_Flag              IN  VARCHAR2
113     ,p_RBS_Rollup_Flag              IN  VARCHAR2
114     ,p_resource_assignment_id_tbl   IN  SYSTEM.PA_NUM_TBL_TYPE
115     ,p_txn_currency_code_tbl        IN  SYSTEM.pa_varchar2_15_tbl_type
116     ,x_cost_budget_version_id	    OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
117     ,x_rev_budget_version_id        OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
118     ,x_return_status                OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
119     ,x_msg_count                    OUT NOCOPY NUMBER --File.Sql.39 bug 4440895
120     ,x_msg_data                     OUT NOCOPY VARCHAR2 ); --File.Sql.39 bug 4440895
121 
122 FUNCTION CLASS_HOURS(p_current_budget_version_id IN NUMBER, p_input_budget_version_id IN NUMBER,
123                      p_rev_budget_version_id IN NUMBER, p_report_using IN VARCHAR2,
124 					 p_mode IN VARCHAR2, p_resource_class_code IN VARCHAR2,
125 					 p_total_plan_quantity IN NUMBER, p_rate_based_flag IN VARCHAR2 ) RETURN NUMBER ;
126 
127 FUNCTION REVENUE(p_current_budget_version_id IN NUMBER, p_input_budget_version_id IN NUMBER,
128                  p_rev_budget_version_id IN NUMBER, p_REVENUE IN NUMBER) RETURN NUMBER ;
129 
130 
131 end  PA_FP_ADJUSTMENT_UTILS ;