DBA Data[Home] [Help]

PACKAGE: APPS.PA_RETENTION_UTIL

Source


1 PACKAGE pa_retention_util AUTHID CURRENT_USER as
2 /* $Header: PAXIRUTS.pls 120.1 2005/08/19 17:14:53 mwasowic noship $ */
3    FUNCTION IsBillingCycleQualified(p_project_id IN NUMBER,
4 				 p_task_id	IN NUMBER,
5                                  P_bill_thru_date IN DATE,
6                                  p_billing_cycle_id IN NUMBER) RETURN VARCHAR2;
7 
8    PROCEDURE Write_Log(p_message IN VARCHAR2);
9 
10    PROCEDURE copy_retention_setup (
11             p_fr_project_id                  IN      NUMBER DEFAULT NULL, /* bug 2463257 */
12             p_to_project_id                  IN      NUMBER  DEFAULT NULL, /* bug 2463257 */
13             p_fr_customer_id                 IN      NUMBER DEFAULT NULL,
14             p_to_customer_id                 IN      NUMBER DEFAULT NULL,
15             p_fr_date                        IN      DATE DEFAULT NULL,
16             p_to_date                        IN      DATE DEFAULT NULL,
17             p_call_mode                      IN      VARCHAR2 DEFAULT 'PROJECT',
18             x_return_status                  OUT     NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
19             x_msg_count                      OUT     NOCOPY NUMBER, --File.Sql.39 bug 4440895
20             x_msg_data                       OUT     NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
21 
22    PROCEDURE copy_retention_setup (
23             p_fr_project_id                  IN      NUMBER ,
24             p_to_project_id                  IN      NUMBER DEFAULT NULL,
25             p_fr_customer_id                 IN      NUMBER DEFAULT NULL,
26             p_to_customer_id_tab             IN      PA_NUM_1000_NUM,
27             p_rec_version_tab                IN      PA_NUM_1000_NUM,
28             p_fr_date                        IN      DATE DEFAULT NULL,
29             p_to_date                        IN      DATE DEFAULT NULL,
30             p_call_mode                      IN      VARCHAR2 DEFAULT 'PROJECT',
31             x_return_status                  OUT     NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
32             x_msg_count                      OUT     NOCOPY NUMBER, --File.Sql.39 bug 4440895
33             x_msg_data                       OUT     NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
34 
35    PROCEDURE delete_retn_rules_customer (
36             p_project_id                  IN      NUMBER,
37             p_customer_id                 IN      NUMBER,
38             x_return_status               OUT     NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
39             x_msg_count                   OUT     NOCOPY NUMBER, --File.Sql.39 bug 4440895
40             x_msg_data                    OUT     NOCOPY VARCHAR2);  --File.Sql.39 bug 4440895
41 
42    PROCEDURE delete_retention_rules (
43             p_project_id                  IN      NUMBER,
44             p_task_id                     IN      NUMBER DEFAULT NULL,
45             x_return_status               OUT     NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
46             x_msg_count                   OUT     NOCOPY NUMBER, --File.Sql.39 bug 4440895
47             x_msg_data                    OUT     NOCOPY VARCHAR2);  --File.Sql.39 bug 4440895
48 
49    PROCEDURE insert_retention_rules (
50             p_fr_project_id               IN      NUMBER,
51             p_fr_customer_id              IN      NUMBER,
52             p_to_project_id               IN      NUMBER,
53             p_to_customer_id              IN      NUMBER,
54             p_fr_date                     IN      DATE,
55             p_to_date                     IN      DATE,
56             p_delta                       IN      NUMBER,
57             x_return_status               OUT     NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
58             x_msg_count                   OUT     NOCOPY NUMBER, --File.Sql.39 bug 4440895
59             x_msg_data                    OUT     NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
60 
61    PROCEDURE get_currency_code(
62             p_project_id               IN      NUMBER,
63             x_invproc_currency_type       OUT     NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
64             x_project_currency_code       OUT     NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
65             x_projfunc_currency_code      OUT     NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
66             x_funding_currency_code       OUT     NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
67             x_invproc_currency_code       OUT     NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
68             x_return_status               OUT     NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
69             x_msg_count                   OUT     NOCOPY NUMBER, --File.Sql.39 bug 4440895
70             x_msg_data                    OUT     NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
71 
72    PROCEDURE get_corresponding_task (
73             p_fr_project_id    IN NUMBER,
74             p_fr_task_id       IN NUMBER,
75             p_to_project_id    IN NUMBER,
76             x_task_id          OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
77             x_fr_start_date    OUT NOCOPY DATE, --File.Sql.39 bug 4440895
78             x_to_start_date    OUT NOCOPY DATE, --File.Sql.39 bug 4440895
79             x_return_status    OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
80             x_msg_count        OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
81             x_msg_data         OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
82 
83    PROCEDURE get_project_info (
84             p_project_id              IN     NUMBER,
85             x_project_name            OUT     NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
86             x_project_number          OUT     NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
87             x_invproc_currency_type   OUT    NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
88             x_invproc_currency_code   OUT    NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
89             x_projfunc_currency_code  OUT    NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
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 calculate_date_factor (
95             p_fr_project_id               IN      NUMBER,
96             p_to_project_id               IN      NUMBER,
97             x_delta                       OUT     NOCOPY NUMBER, --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    PROCEDURE get_rec_version_num ( p_project_id          IN NUMBER,
103                                     p_customer_id         IN NUMBER,
104                                     x_version_num         OUT NOCOPY NUMBER); --File.Sql.39 bug 4440895
105 
106    FUNCTION check_rec_version_num ( p_project_id          IN NUMBER,
107                                     p_customer_id         IN NUMBER,
108                                     p_version_num         IN NUMBER) RETURN VARCHAR2;
109 
110    PROCEDURE set_rec_version_num ( p_project_id          IN NUMBER,
111                                    p_customer_id         IN NUMBER,
112                                    p_version_num         IN NUMBER,
113 /*                                 x_version_num         OUT NUMBER, */
114                                    x_return_status       OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
115                                    x_msg_count           OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
116                                    x_msg_data            OUT NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
117 
118 
119 PROCEDURE retn_billing_method_single(
120                           p_billing_mode                IN      VARCHAR2,
121                           P_retention_level             IN      VARCHAR2,
122                           p_project_id                  IN      VARCHAR2,
123                           p_task_id                     IN      VARCHAR2,
124                           p_customer_id                 IN      VARCHAR2,
125                           p_retn_billing_cycle_id       IN      VARCHAR2,
126                           p_billing_method_code         IN      VARCHAR2,
127                           p_invproc_currency_code       IN      VARCHAR2,
128                           p_completed_percentage        IN      VARCHAR2,
129                           p_total_retention_amount      IN      VARCHAR2,
130                           p_client_extension_flag       IN      VARCHAR2,
131                           p_retn_billing_percentage     IN      VARCHAR2,
132                           p_retn_billing_amount         IN      VARCHAR2,
133                           p_version_num                 IN      NUMBER,
134                           x_return_status               OUT     NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
135                           x_msg_count                   OUT     NOCOPY NUMBER, --File.Sql.39 bug 4440895
136                           x_msg_data                    OUT     NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
137 
138 
139 PROCEDURE retn_billing_method_PerComp(
140                           p_billing_mode                IN      VARCHAR2,
141                           P_retention_level             IN      VARCHAR2,
142                           p_project_id                  IN      VARCHAR2,
143                           p_task_id                     IN      VARCHAR2,
144                           p_customer_id                 IN      VARCHAR2,
145                           p_retn_billing_cycle_id       IN      VARCHAR2,
146                           p_billing_method_code         IN      VARCHAR2,
147                           p_invproc_currency_code       IN      VARCHAR2,
148                           p_completed_percentage        IN      PA_VC_1000_25,
149                           p_total_retention_amount      IN      VARCHAR2,
150                           p_client_extension_flag       IN      VARCHAR2,
151                           p_retn_billing_percentage     IN      PA_VC_1000_25,
152                           p_retn_billing_amount         IN      PA_VC_1000_25,
153                           p_version_num                 IN      NUMBER,
154                           x_return_status               OUT     NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
155                           x_msg_count                   OUT     NOCOPY NUMBER, --File.Sql.39 bug 4440895
156                           x_msg_data                    OUT     NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
157 
158 
159 PROCEDURE retn_billing_task_validate(
160                           p_project_id                  IN      VARCHAR2,
161                           P_task_name                   IN      VARCHAR2,
162                           p_task_no                     IN      VARCHAR2,
163                           p_customer_id                 IN      VARCHAR2,
164                           p_retention_level             IN      VARCHAR2,
165                           x_task_id                     OUT     NOCOPY NUMBER, --File.Sql.39 bug 4440895
166                           x_return_status               OUT     NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
167                           x_msg_count                   OUT     NOCOPY NUMBER, --File.Sql.39 bug 4440895
168                           x_msg_data                    OUT     NOCOPY VARCHAR2); --File.Sql.39 bug 4440895
169 
170 ----- Following APIs are added by Bhumesh K.
171 
172   PROCEDURE Check_For_Overlap_Dates (
173     P_RowID				VARCHAR2,
174     P_Project_ID			NUMBER,
175     P_Task_ID				NUMBER,
176     P_Customer_ID			NUMBER,
177     P_Retention_Level_Code		VARCHAR2,
178     P_Expenditure_Category		VARCHAR2,
179     P_Expenditure_Type			VARCHAR2,
180     P_Non_Labor_Resource		VARCHAR2,
181     P_Revenue_Category_Code		VARCHAR2,
182     P_Event_Type			VARCHAR2,
183     P_Effective_Start_Date		DATE,
184     P_Effective_End_Date		DATE,
185     X_Return_Status_Code	IN OUT	NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
186     X_Error_Message_Code 	IN OUT	NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
187   );
188 
189   PROCEDURE Validate_Expenditure_Category (
190     P_Expenditure_Category	IN OUT	NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
191     P_Expenditure_Type		IN OUT	NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
192     P_Non_Labor_Resource	IN OUT	NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
193     X_Return_Status_Code	IN OUT	NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
194     X_Error_Message_Code	IN OUT	NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
195   );
196 
197   PROCEDURE Validate_Revenue_Category (
198     P_Revenue_Category_Code	   OUT  NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
199     P_Revenue_Category		IN OUT	NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
200     P_Event_Type		IN OUT	NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
201     X_Return_Status_Code	IN OUT	NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
202     X_Error_Message_Code	IN OUT	NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
203   );
204 
205   PROCEDURE Delete_Retentions (
206     P_Project_ID			NUMBER,
207     P_Customer_ID			NUMBER,
208     X_Return_Status_Code	IN OUT	NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
209     X_Error_Message_Code	IN OUT	NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
210   );
211 
212   PROCEDURE Delete_Bill_Retentions (
213     P_Bill_Rule_ID                      NUMBER,
214     X_Return_Status_Code	IN OUT	NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
215     X_Error_Message_Code	IN OUT	NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
216   );
217 
218   PROCEDURE Check_Top_Task_Details (
219     P_Project_ID			NUMBER,
220     P_Task_Number			VARCHAR2,
221     P_Task_Name				VARCHAR2,
222     X_Task_ID			IN OUT  NOCOPY NUMBER, --File.Sql.39 bug 4440895
223     X_Return_Status_Code	IN OUT	NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
224     X_Error_Message_Code	IN OUT	NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
225   );
226 
227 
228   PROCEDURE Validate_Retention_Data (
229     P_RowID                         VARCHAR2,
230     P_Project_ID                    NUMBER,
231     P_Task_Number		    VARCHAR2,
232     P_Task_Name			    VARCHAR2,
233     P_Customer_ID                   NUMBER,
234     P_Retention_Level_Code  IN OUT  NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
235     P_Expenditure_Category  IN OUT  NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
236     P_Expenditure_Type      IN OUT  NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
237     P_Non_Labor_Resource    IN OUT  NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
238     P_Revenue_Category      IN OUT  NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
239     P_Event_Type            IN OUT  NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
240     P_Retention_Percentage          NUMBER,
241     P_Retention_Amount              NUMBER,
242     P_Threshold_Amount              NUMBER,
243     P_Effective_Start_Date          DATE,
244     P_Effective_End_Date            DATE,
245     P_Task_Flag			    VARCHAR2,
246     X_Task_ID               IN OUT  NOCOPY NUMBER, --File.Sql.39 bug 4440895
250   );
247     X_Revenue_Category_Code IN OUT  NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
248     X_Return_Status_code    IN OUT  NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
249     X_Error_Message_Code    IN OUT  NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
251 
252   PROCEDURE Check_Retention_Rules  (
253     P_Project_ID			NUMBER,
254     P_Customer_ID			NUMBER,
255     X_Return_Value              IN OUT  NOCOPY NUMBER, --File.Sql.39 bug 4440895
256     X_Return_Status_Code	IN OUT	NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
257     X_Error_Message_Code	IN OUT	NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
258   );
259 
260   PROCEDURE Check_Billing_Retentions  (
261     P_Project_ID			NUMBER,
262     P_Customer_ID			NUMBER,
263     X_Return_Status_Code	IN OUT	NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
264     X_Error_Message_Code	IN OUT	NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
265   );
266    FUNCTION CheckRetnInvFormat(p_project_id IN NUMBER,
267 			      p_retn_inv_fmt IN NUMBER) RETURN NUMBER;
268 
269 END pa_retention_util;