1 PACKAGE GMS_RES_MAP AUTHID CURRENT_USER AS
2 -- $Header: gmsfcrms.pls 115.7 2002/11/26 22:35:47 jmuthuku ship $
3 -- Standard who
4 x_last_updated_by NUMBER(15) := FND_GLOBAL.USER_ID;
5 x_last_update_date NUMBER(15) := FND_GLOBAL.USER_ID;
6 x_created_by NUMBER(15) := FND_GLOBAL.USER_ID;
7 x_last_update_login NUMBER(15) := FND_GLOBAL.LOGIN_ID;
8 x_request_id NUMBER(15) := FND_GLOBAL.CONC_REQUEST_ID;
9 x_program_application_id NUMBER(15) := FND_GLOBAL.PROG_APPL_ID;
10 x_program_id NUMBER(15) := FND_GLOBAL.CONC_PROGRAM_ID;
11
12 TYPE resource_list_asgn_id_tabtype IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
13 TYPE resource_list_id_tabtype IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
14 TYPE member_id_tabtype IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
15 TYPE member_level_tabtype IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
16 TYPE resource_id_tabtype IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
17 TYPE person_id_tabtype IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
18 TYPE job_id_tabtype IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
19 TYPE organization_id_tabtype IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
20 TYPE vendor_id_tabtype IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
21 TYPE expenditure_type_tabtype IS TABLE OF
22 pa_txn_accum.expenditure_type%TYPE INDEX BY BINARY_INTEGER;
23 TYPE event_type_tabtype IS TABLE OF
24 pa_txn_accum.event_type%TYPE INDEX BY BINARY_INTEGER;
25 TYPE non_labor_resource_tabtype IS TABLE OF
26 pa_txn_accum.non_labor_resource%TYPE INDEX BY BINARY_INTEGER;
27 TYPE expenditure_category_tabtype IS TABLE OF
28 pa_txn_accum.expenditure_category%TYPE INDEX BY BINARY_INTEGER;
29 TYPE revenue_category_tabtype IS TABLE OF
30 pa_txn_accum.revenue_category%TYPE INDEX BY BINARY_INTEGER;
31 TYPE nlr_org_id_tabtype IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
32 TYPE event_type_class_tabtype IS TABLE OF
33 pa_txn_accum.event_type_classification%TYPE INDEX BY BINARY_INTEGER;
34 TYPE system_linkage_tabtype IS TABLE OF
35 pa_txn_accum.system_linkage_function%TYPE INDEX BY BINARY_INTEGER;
36 TYPE resource_format_id_tabtype IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
37 TYPE resource_type_code_tabtype IS TABLE OF
38 pa_resource_types.resource_type_code%TYPE INDEX BY BINARY_INTEGER;
39
40 FUNCTION Initialize RETURN NUMBER;
41
42 PROCEDURE get_resource_map
43 (x_resource_list_id IN NUMBER,
44 x_resource_list_assignment_id IN NUMBER,
45 x_person_id IN NUMBER,
46 x_job_id IN NUMBER,
47 x_organization_id IN NUMBER,
48 x_vendor_id IN NUMBER,
49 x_expenditure_type IN VARCHAR2,
50 x_event_type IN VARCHAR2,
51 x_non_labor_resource IN VARCHAR2,
52 x_expenditure_category IN VARCHAR2,
53 x_revenue_category IN VARCHAR2,
54 x_non_labor_resource_org_id IN NUMBER,
55 x_event_type_classification IN VARCHAR2,
56 x_system_linkage_function IN VARCHAR2,
57 x_resource_list_member_id IN OUT NOCOPY NUMBER,
58 x_resource_id IN OUT NOCOPY NUMBER,
59 x_resource_map_found IN OUT NOCOPY BOOLEAN,
60 x_err_stage IN OUT NOCOPY VARCHAR2,
61 x_err_code IN OUT NOCOPY NUMBER);
62
63 -- deleting the resource maps
64
65 PROCEDURE delete_res_maps_on_asgn_id
66 (x_resource_list_assignment_id IN NUMBER,
67 x_err_stage IN OUT NOCOPY VARCHAR2,
68 x_err_code IN OUT NOCOPY NUMBER);
69
70 PROCEDURE delete_res_maps_on_prj_id
71 (x_project_id IN NUMBER,
72 x_resource_list_id IN NUMBER,
73 x_err_stage IN OUT NOCOPY VARCHAR2,
74 x_err_code IN OUT NOCOPY NUMBER);
75
76 -- the function given below creates a resource map
77
78 PROCEDURE create_resource_map
79 (x_resource_list_id IN NUMBER,
80 x_resource_list_assignment_id IN NUMBER,
81 x_resource_list_member_id IN NUMBER,
82 x_resource_id IN NUMBER,
83 x_person_id IN NUMBER,
84 x_job_id IN NUMBER,
85 x_organization_id IN NUMBER,
86 x_vendor_id IN NUMBER,
87 x_expenditure_type IN VARCHAR2,
88 x_event_type IN VARCHAR2,
89 x_non_labor_resource IN VARCHAR2,
90 x_expenditure_category IN VARCHAR2,
91 x_revenue_category IN VARCHAR2,
92 x_non_labor_resource_org_id IN NUMBER,
93 x_event_type_classification IN VARCHAR2,
94 x_system_linkage_function IN VARCHAR2,
95 x_err_stage IN OUT NOCOPY VARCHAR2,
96 x_err_code IN OUT NOCOPY NUMBER);
97
98 -- change resource list assignment
99
100 PROCEDURE change_resource_list_status
101 (x_resource_list_assignment_id IN NUMBER,
102 x_err_stage IN OUT NOCOPY VARCHAR2,
103 x_err_code IN OUT NOCOPY NUMBER);
104
105 FUNCTION get_resource_list_status
106 (x_resource_list_assignment_id IN NUMBER)
107 RETURN VARCHAR2 ;
108
109 FUNCTION get_resource_rank
110 (x_resource_format_id IN NUMBER,
111 x_txn_class_code IN VARCHAR2)
112 RETURN NUMBER ;
113
114 FUNCTION get_group_resource_type_code
115 (x_resource_list_id IN NUMBER)
116 RETURN VARCHAR2 ;
117
118 PROCEDURE create_resource_accum_details
119 (x_resource_list_id IN NUMBER,
120 x_resource_list_assignment_id IN NUMBER,
121 x_resource_list_member_id IN NUMBER,
122 x_resource_id IN NUMBER,
123 x_txn_accum_id IN NUMBER,
124 x_project_id IN NUMBER,
125 x_task_id IN NUMBER,
126 x_err_stage IN OUT NOCOPY VARCHAR2,
127 x_err_code IN OUT NOCOPY NUMBER);
128
129 PROCEDURE delete_resource_accum_details
130 (x_resource_list_assignment_id IN NUMBER,
131 x_resource_list_id IN NUMBER,
132 x_project_id IN NUMBER,
133 x_err_stage IN OUT NOCOPY VARCHAR2,
134 x_err_code IN OUT NOCOPY NUMBER);
135
136 PROCEDURE get_mappable_resources
137 (x_project_id IN NUMBER,
138 x_res_list_id IN NUMBER,
139 x_resource_list_id IN OUT NOCOPY resource_list_id_tabtype,
140 x_resource_list_assignment_id IN OUT NOCOPY resource_list_asgn_id_tabtype,
141 x_resource_list_member_id IN OUT NOCOPY member_id_tabtype,
142 x_resource_id IN OUT NOCOPY resource_id_tabtype,
143 x_member_level IN OUT NOCOPY member_level_tabtype,
144 x_person_id IN OUT NOCOPY person_id_tabtype,
145 x_job_id IN OUT NOCOPY job_id_tabtype,
146 x_organization_id IN OUT NOCOPY organization_id_tabtype,
147 x_vendor_id IN OUT NOCOPY vendor_id_tabtype,
148 x_expenditure_type IN OUT NOCOPY expenditure_type_tabtype,
149 x_event_type IN OUT NOCOPY event_type_tabtype,
150 x_non_labor_resource IN OUT NOCOPY non_labor_resource_tabtype,
151 x_expenditure_category IN OUT NOCOPY expenditure_category_tabtype,
152 x_revenue_category IN OUT NOCOPY revenue_category_tabtype,
153 x_non_labor_resource_org_id IN OUT NOCOPY nlr_org_id_tabtype,
154 x_event_type_classification IN OUT NOCOPY event_type_class_tabtype,
155 x_system_linkage_function IN OUT NOCOPY system_linkage_tabtype,
156 x_resource_format_id IN OUT NOCOPY resource_format_id_tabtype,
157 x_resource_type_code IN OUT NOCOPY resource_type_code_tabtype,
158 x_no_of_resources IN OUT NOCOPY BINARY_INTEGER,
159 x_err_stage IN OUT NOCOPY VARCHAR2,
160 x_err_code IN OUT NOCOPY NUMBER,
161 x_exp_type IN VARCHAR2 DEFAULT NULL);
162
163 PROCEDURE map_trans
164 ( x_project_id IN NUMBER,
165 x_res_list_id IN NUMBER,
166 x_person_id IN NUMBER,
167 x_job_id IN NUMBER,
168 x_organization_id IN NUMBER,
169 x_vendor_id IN NUMBER,
170 x_expenditure_type IN VARCHAR2,
171 x_event_type IN VARCHAR2,
172 x_non_labor_resource IN VARCHAR2,
173 x_expenditure_category IN VARCHAR2,
174 x_revenue_category IN VARCHAR2,
175 x_non_labor_resource_org_id IN NUMBER,
176 x_event_type_classification IN VARCHAR2,
177 x_system_linkage_function IN VARCHAR2 ,
178 x_exptype IN VARCHAR2 DEFAULT NULL,
179 x_resource_list_member_id IN OUT NOCOPY NUMBER,
180 x_err_stage IN OUT NOCOPY VARCHAR2,
181 x_err_code IN OUT NOCOPY NUMBER);
182
183 /* -------------------------------------------------------------------
184 || Procedure MAP_RESOURCES is the new API for resource mapping
185 || All codes calling this API must define a plsql table of type
186 || "resource_type_table" defined below...
187 || K.Biju - 27 march 2001
188 --------------------------------------------------------------------- */
189
190 Type resource_type_table is TABLE of VARCHAR2(60) INDEX by binary_integer;
191
192 Procedure map_resources(x_document_type IN varchar2,
193 x_document_header_id IN number default NULL,
194 x_document_distribution_id IN number default NULL,
195 x_expenditure_type IN varchar2 default NULL,
196 x_expenditure_org_id IN number default NULL,
197 x_categorization_code IN varchar2 default NULL,
198 x_resource_list_id IN number default NULL,
199 x_event_type IN varchar2 default NULL,
200 x_prev_list_processed IN OUT NOCOPY number,
201 x_group_resource_type_id IN OUT NOCOPY number,
202 x_group_resource_type_name IN OUT NOCOPY varchar2,
203 resource_type_tab IN OUT NOCOPY gms_res_map.resource_type_table,
204 x_resource_list_member_id OUT NOCOPY number,
205 x_error_code OUT NOCOPY number,
206 x_error_buff OUT NOCOPY varchar2);
207
208
209 Procedure map_resources_group(x_document_type IN varchar2,
210 x_expenditure_type IN varchar2 default NULL,
211 x_expenditure_org_id IN number default NULL,
212 x_person_id IN number default NULL,
213 x_job_id IN number default NULL,
214 x_vendor_id IN number default NULL,
215 x_expenditure_category IN varchar2 default NULL,
216 x_revenue_category IN varchar2 default NULL,
217 x_categorization_code IN varchar2 default NULL,
218 x_resource_list_id IN number default NULL,
219 x_event_type IN varchar2 default NULL,
220 x_prev_list_processed IN OUT NOCOPY number,
221 x_group_resource_type_id IN OUT NOCOPY number,
222 x_group_resource_type_name IN OUT NOCOPY varchar2,
223 resource_type_tab IN OUT NOCOPY gms_res_map.resource_type_table,
224 x_resource_list_member_id OUT NOCOPY number,
225 x_error_code OUT NOCOPY number,
226 x_error_buff OUT NOCOPY varchar2);
227
228
229 END GMS_RES_MAP;