[Home] [Help]
PACKAGE: APPS.PA_FCST_GLOBAL
Source
1 PACKAGE pa_fcst_global AUTHID CURRENT_USER as
2 /* $Header: PARFSGLS.pls 120.1 2005/08/19 16:52:37 mwasowic noship $ */
3
4 Global_Page_First_Flag VARCHAR2(30) :='Y';
5 Global_Project_Number VARCHAR2(30) :='ALL';
6 Global_Project_Name VARCHAR2(30) :='XXXXXXXXXXXXXXX';
7 Global_project_type VARCHAR2(30) := 'ALL';
8 Global_Orgnization_Id NUMBER := -99;
9 Global_Orgnization_Name VARCHAR2(30) := 'ALL';
10 Global_project_status VARCHAR2(30) := 'ALL';
11 Global_Project_Start_Date DATE :=to_date('01-01-1900','DD-MM-YYYY');
12 Global_Project_Start_Date_Opt VARCHAR2(30) := 'is';
13 Global_Project_Comp_Date DATE :=to_date('01-01-1900','DD-MM-YYYY');
14 Global_Project_Comp_Date_Opt VARCHAR2(30) := 'is';
15 Global_Project_Manager_Id NUMBER := NULL;
16 GLobal_Project_Manager_Name VARCHAR2(30) :='XXXXXXXXXXXXXXX';
17 GLobal_Project_Customer_Name VARCHAR2(30) :='XXXXXXXXXXXXXXX';
18 Global_proj_fcst_show_amt VARCHAR2(20) :='REVENUE';
19 Global_view_type VARCHAR2(30) := 'PERIODIC';
20 Global_ProbabilityPerFlag VARCHAR2(1):='N';
21 Global_proj_fcst_start_date DATE :=to_date('01-04-1950','DD-MM-YYYY');
22 Global_proj_fcst_end_date DATE := SYSDATE;
23 Global_ProbabilityPer NUMBER := 1;
24 Global_PeriodName VARCHAR2(30) := NULL;
25 Global_period_type VARCHAR2(30):= fnd_profile.value('PA_FORECASTING_PERIOD_TYPE');
26 Global_ProjectId NUMBER;
27 Global_pl_start_date DATE := to_date('01-04-1999','DD-MM-YYYY');
28 Global_pl_end_date DATE := SYSDATE;
29 Global_Period_Set_Name VARCHAR2(15) := NULL;
30 Global_project_type_class VARCHAR2(30) := 'CONTRACT';
31 Global_Class_category VARCHAR(30):=null;
32 Global_key_member_id NUMBER;
33
34 PROCEDURE GetDefaultValue(x_start_period OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
35 x_Show_amount OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
36 x_project_type OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
37 x_project_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
38 x_view_type OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
39 x_apply_prob_flag OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
40 x_class_display OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
41 x_prj_owner_display OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
42 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
43 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
44 x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
45 );
46
47
48 PROCEDURE pa_fcst_proj_get_default(p_project_id IN NUMBER,
49 x_show_amount_type OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
50 x_start_period_name OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
51 x_apply_prob_per_flag OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
52 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
53 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
54 x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
55 );
56
57
58
59 PROCEDURE Set_CrossProject_GlobalValue(p_start_period IN VARCHAR2,
60 p_Show_amount IN VARCHAR2,
61 p_apply_prob_flag IN VARCHAR2,
62 p_page_first_flag IN VARCHAR2,
63 p_project_number IN VARCHAR2,
64 p_project_name IN VARCHAR2,
65 p_project_type IN VARCHAR2,
66 p_organization_name IN VARCHAR2,
67 p_project_status IN VARCHAR2,
68 p_project_manager_name IN VARCHAR2,
69 p_project_customer_name IN VARCHAR2,
70 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
71 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
72 x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
73 );
74
75
76
77 PROCEDURE Set_Project_GlobalValue(p_project_id IN NUMBER,
78 p_start_period IN VARCHAR2,
79 p_Show_amount IN VARCHAR2,
80 p_apply_prob_flag IN VARCHAR2,
81 p_apply_prob_per IN NUMBER,
82 x_project_type_class OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
83 x_project_TM_flag OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
84 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
85 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
86 x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
87 );
88
89 PROCEDURE Set_Global_Project_Id(p_project_id IN NUMBER,
90 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
91 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
92 x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
93 );
94 PROCEDURE Get_Project_Info(p_project_id IN NUMBER,
95 x_project_name OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
96 x_project_number OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
97 x_FI_Date OUT NOCOPY Date, --File.Sql.39 bug 4440895
98 x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
99 x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
100 x_msg_data OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
101 );
102
103
104
105 PROCEDURE SetPeriodSetName;
106
107
108
109 FUNCTION GetProjFcstShowAmount RETURN VARCHAR2;
110 FUNCTION GetProjectId RETURN NUMBER;
111 FUNCTION GetProjFcstStartDate RETURN DATE;
112 FUNCTION GetProjFcstEndDate RETURN DATE;
113 FUNCTION GetProbabilityPerFlag RETURN VARCHAR2;
114 FUNCTION GetProbabilityPer RETURN NUMBER;
115 FUNCTION GetPeriodType RETURN VARCHAR2;
116 FUNCTION GetPageFirstFlag RETURN VARCHAR2;
117 FUNCTION GetProjectNumber RETURN VARCHAR2;
118 FUNCTION GetProjectName RETURN VARCHAR2;
119 FUNCTION GetProjType RETURN VARCHAR2;
120 FUNCTION GetProjectOrgId RETURN NUMBER;
121 FUNCTION GetProjectOrgName RETURN VARCHAR2;
122 FUNCTION GetProjStatusCode RETURN VARCHAR2;
123 FUNCTION GetProjectStartDate RETURN DATE;
124 FUNCTION GetProjectStartDateOpt RETURN VARCHAR2;
125 FUNCTION GetProjectCompDate RETURN DATE;
126 FUNCTION GetProjectCompDateOpt RETURN VARCHAR2;
127 FUNCTION GetProjectMangerName RETURN VARCHAR2;
128 FUNCTION GetProjectMangerId RETURN NUMBER;
129 FUNCTION GetProjectCustomerName RETURN VARCHAR2;
130 FUNCTION GetClassCatgory RETURN VARCHAR2;
131 FUNCTION GetKeyMemberId RETURN VARCHAR2;
132
133 FUNCTION GetPlStartDate RETURN DATE;
134 FUNCTION GetPlEndDate RETURN DATE;
135 FUNCTION GetPeriodSetName RETURN VARCHAR2;
136 FUNCTION GetProjectTypeClass RETURN VARCHAR2;
137
138 FUNCTION find_project_owner(
139 p_project_id IN NUMBER,
140 p_proj_start_date IN DATE,
141 p_proj_end_date IN DATE
142 )
143 RETURN VARCHAR2;
144 FUNCTION find_project_fixed_price(p_project_id IN NUMBER)
145 RETURN VARCHAR2;
146
147 /* Newly added for performance Issue */
148
149 Global_CrossProjectViewUser VARCHAR2(1):='N';
150
151 Function SetCrossProjectViewUser RETURN VARCHAR2;
152 Function IsCrossProjectViewUser RETURN VARCHAR2;
153 Procedure Populate_Fcst_Periods;
154
155 END pa_fcst_global;