eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.PA_TASK_TYPE_PKG

Source


1 PACKAGE BODY PA_TASK_TYPE_PKG AS
2 /*$Header: PATTPKGB.pls 120.1 2005/08/19 17:06:14 mwasowic noship $*/
3 
4 PROCEDURE insert_row
5  (p_task_type_id                  IN    pa_task_types.task_type_id%TYPE             :=0 --3279978 FP M Development avaithia 29-Dec-2003
6  ,p_task_type                     IN    pa_task_types.task_type%TYPE
7  ,p_start_date_active             IN    pa_task_types.start_date_active%TYPE
8  ,p_end_date_active               IN    pa_task_types.end_date_active%TYPE          := NULL
9  ,p_description                   IN    pa_task_types.description%TYPE              := NULL
10  ,p_task_type_class_code          IN    pa_task_types.task_type_class_code%TYPE
11  ,p_initial_status_code           IN    pa_task_types.initial_status_code%TYPE      := NULL
12  ,p_prog_entry_enable_flag        IN    pa_task_types.prog_entry_enable_flag%TYPE   := NULL
13  ,p_prog_entry_req_flag           IN    pa_task_types.prog_entry_req_flag%TYPE      := NULL
14  ,p_initial_progress_status_code  IN    pa_task_types.initial_progress_status_code%TYPE  := NULL
15  ,p_task_prog_entry_page_id       IN    pa_task_types.task_progress_entry_page_id%TYPE   := NULL
16  ,p_task_prog_entry_page_name     IN    pa_page_layouts.page_name%TYPE               := NULL
17  ,p_wq_enable_flag                IN    pa_task_types.wq_enable_flag%TYPE            := NULL
18  ,p_work_item_code                IN    pa_task_types.work_item_code%TYPE            := NULL
19  ,p_uom_code                      IN    pa_task_types.uom_code%TYPE                  := NULL
20  ,p_actual_wq_entry_code          IN    pa_task_types.actual_wq_entry_code%TYPE      := NULL
21  ,p_percent_comp_enable_flag      IN    pa_task_types.percent_comp_enable_flag%TYPE  := NULL
22  ,p_base_percent_comp_deriv_code  IN    pa_task_types.base_percent_comp_deriv_code%TYPE  := NULL
23  ,p_task_weighting_deriv_code     IN    pa_task_types.task_weighting_deriv_code%TYPE     := NULL
24  ,p_remain_effort_enable_flag     IN    pa_task_types.remain_effort_enable_flag%TYPE     := NULL
25  ,p_attribute_category     IN    pa_task_types.attribute_category%TYPE       := NULL
26  ,p_attribute1             IN    pa_task_types.attribute1%TYPE               := NULL
27  ,p_attribute2             IN    pa_task_types.attribute2%TYPE               := NULL
28  ,p_attribute3             IN    pa_task_types.attribute3%TYPE               := NULL
29  ,p_attribute4             IN    pa_task_types.attribute4%TYPE               := NULL
30  ,p_attribute5             IN    pa_task_types.attribute5%TYPE               := NULL
31  ,p_attribute6             IN    pa_task_types.attribute6%TYPE               := NULL
32  ,p_attribute7             IN    pa_task_types.attribute7%TYPE               := NULL
33  ,p_attribute8             IN    pa_task_types.attribute8%TYPE               := NULL
34  ,p_attribute9             IN    pa_task_types.attribute9%TYPE               := NULL
35  ,p_attribute10            IN    pa_task_types.attribute10%TYPE              := NULL
36  ,p_attribute11            IN    pa_task_types.attribute11%TYPE              := NULL
37  ,p_attribute12            IN    pa_task_types.attribute12%TYPE              := NULL
38  ,p_attribute13            IN    pa_task_types.attribute13%TYPE              := NULL
39  ,p_attribute14            IN    pa_task_types.attribute14%TYPE              := NULL
40  ,p_attribute15            IN    pa_task_types.attribute15%TYPE              := NULL
41  ,p_object_type            IN    pa_task_types.object_type%TYPE              := 'PA_TASKS'    -- 3279987 : Added Object Type, Progress Rollup Method,
42  ,p_enable_dlvr_actions_flag IN    pa_task_types.enable_dlvr_actions_flag%TYPE      :=NULL           --           Method code columns--3279978 modified avaithia 28-dec-2003
43  ,p_record_version_number   IN   pa_task_types.record_version_number%TYPE     :=1 -- 3279978 inserted avaithia 28-dec-2003
44  ,p_wf_item_type            IN    pa_task_types.wf_item_type%TYPE           :=NULL
45  ,p_wf_process              IN    pa_task_types.wf_process%TYPE             :=NULL
46  ,p_wf_lead_days            IN    pa_task_types.wf_start_lead_days%TYPE     :=NULL
47  ,x_task_type_id          OUT    NOCOPY NUMBER --File.Sql.39 bug 4440895
48  ,x_return_status         OUT    NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
49  ,x_msg_count             OUT    NOCOPY NUMBER --File.Sql.39 bug 4440895
50  ,x_msg_data              OUT    NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
51 )
52 IS
53 ------------------------------------------------------------------------------------------------------------
54 --3279978 FP M Development avaithia 29-Dec-2003
55 l_task_type_id pa_task_types.task_type_id%TYPE :=p_task_type_id;
56 
57 CURSOR c_task_type_id IS
58 SELECT pa_task_types_s.nextval FROM sys.dual;
59  ---end of insert by avaithia
60 ------------------------------------------------------------------------------------------------------------
61 BEGIN
62 
63   -- Initialize the return status to success
64   x_return_status := FND_API.G_RET_STS_SUCCESS;
65  -----------------------------------------------------------------------------------------------------------
66   --3279978 FP M Development avaithia 29-Dec-2003
67   --If p_task_type_id is zero then take the value from sequence
68   IF (p_task_type_id =0)
69   THEN
70   OPEN c_task_type_id;
71   FETCH c_task_type_id into l_task_type_id;
72   CLOSE c_task_type_id;
73   END IF;
74      PA_DEBUG.WRITE('Inside Table handler','Before Insert',3);
75      PA_DEBUG.WRITE('Inside Table handler','Task Type Id'||l_task_type_id,3);
76      PA_DEBUG.WRITE('Inside Table handler','pa_task_type '||p_task_type,3);
77      PA_DEBUG.WRITE('Inside Table handler','eff from '||p_start_date_active,3);
78      PA_DEBUG.WRITE('Inside Table handler','eff to '||p_end_date_active,3);
79      PA_DEBUG.WRITE('Inside Table handler','p_task_type_class_code '||p_task_type_class_code,3);
80      PA_DEBUG.WRITE('Inside Table handler','p_initial_status_code '||p_initial_status_code,3);
81      PA_DEBUG.WRITE('Inside Table handler','p_prog_entry_enable_flag '||p_prog_entry_enable_flag,3);
82      PA_DEBUG.WRITE('Inside Table handler','p_record_version_number '||p_record_version_number,3);
83  ---end of insert by avaithia
84 -------------------------------------------------------------------------------------------------------------
85 
86   INSERT INTO pa_task_types
87              (task_type_id                  --3279978 :Inserted avaithia 29-Dec-2003 FP M
88              ,task_type
89              ,start_date_active
90              ,end_date_active
91              ,description
92              ,task_type_class_code
93              ,initial_status_code
94              ,prog_entry_enable_flag
95              ,prog_entry_req_flag
96              ,initial_progress_status_code
97              ,task_progress_entry_page_id
98              ,wq_enable_flag
99              ,work_item_code
100              ,uom_code
101              ,actual_wq_entry_code
102              ,percent_comp_enable_flag
103              ,base_percent_comp_deriv_code
104              ,task_weighting_deriv_code
105              ,remain_effort_enable_flag
106              ,attribute_category
107              ,attribute1
108              ,attribute2
109              ,attribute3
110              ,attribute4
111              ,attribute5
112              ,attribute6
113              ,attribute7
114              ,attribute8
115              ,attribute9
116              ,attribute10
117              ,attribute11
118              ,attribute12
119              ,attribute13
120              ,attribute14
121              ,attribute15
122              ,object_type                   -- 3279978 : Added Object Type, Progress Rollup Method,
123              ,enable_dlvr_actions_flag      -- Method code columns--3279978 commented avaithia 28-dec-2003
124              ,record_version_number         -- 3279978 inserted avaithia 28-dec-2003 FP M
125              ,creation_date
126              ,created_by
127              ,last_update_date
128              ,last_updated_by
129              ,last_update_login
130              ,wf_item_type
131              ,wf_process
132              ,wf_start_lead_days
133              )
134        VALUES
135             ( l_task_type_id                -- 3279978 inserted avaithia 28-dec-2003 FP M
136              ,p_task_type
137              ,p_start_date_active
138              ,p_end_date_active
139              ,p_description
140              ,p_task_type_class_code
141              ,p_initial_status_code
142              ,p_prog_entry_enable_flag
143              ,p_prog_entry_req_flag
144              ,p_initial_progress_status_code
145              ,p_task_prog_entry_page_id
146              ,p_wq_enable_flag
147              ,p_work_item_code
148              ,p_uom_code
149              ,p_actual_wq_entry_code
150              ,p_percent_comp_enable_flag
151              ,p_base_percent_comp_deriv_code
152              ,p_task_weighting_deriv_code
153              ,p_remain_effort_enable_flag
154              ,p_attribute_category
155              ,p_attribute1
156              ,p_attribute2
157              ,p_attribute3
158              ,p_attribute4
159              ,p_attribute5
160              ,p_attribute6
161              ,p_attribute7
162              ,p_attribute8
163              ,p_attribute9
164              ,p_attribute10
165              ,p_attribute11
166              ,p_attribute12
167              ,p_attribute13
168              ,p_attribute14
169              ,p_attribute15
170              ,p_object_type
171              ,p_enable_dlvr_actions_flag
172              ,p_record_version_number      -- 3279978 inserted avaithia 28-dec-2003 FP M
173              ,sysdate
174              ,fnd_global.user_id
175              ,sysdate
176              ,fnd_global.user_id
177              ,fnd_global.login_id
178              ,p_wf_item_type
179              ,p_wf_process
180              ,p_wf_lead_days
181             )
182             RETURNING l_task_type_id INTO x_task_type_id;
183 
184 
185    PA_DEBUG.WRITE('Inside Table handler','After Insert'||l_task_type_id,
186                                      3);
187 
188 
189   EXCEPTION
190     WHEN OTHERS THEN
191        -- Set the excetption Message and the stack
192        FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_TASK_TYPE_PKG.insert_row'
193                                 ,p_procedure_name => PA_DEBUG.G_Err_Stack );
194        --
195        x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
196        RAISE;
197 
198 END insert_row;
199 
200 
201 PROCEDURE update_row
202 ( p_task_type_id                  IN    pa_task_types.task_type_id%TYPE
203  ,p_task_type                     IN    pa_task_types.task_type%TYPE
204  ,p_start_date_active             IN    pa_task_types.start_date_active%TYPE
205  ,p_end_date_active               IN    pa_task_types.end_date_active%TYPE          := NULL
206  ,p_description                   IN    pa_task_types.description%TYPE              := NULL
207  ,p_task_type_class_code          IN    pa_task_types.task_type_class_code%TYPE
208  ,p_initial_status_code           IN    pa_task_types.initial_status_code%TYPE      := NULL
209  ,p_prog_entry_enable_flag        IN    pa_task_types.prog_entry_enable_flag%TYPE   := NULL
210  ,p_prog_entry_req_flag           IN    pa_task_types.prog_entry_req_flag%TYPE      := NULL
211  ,p_initial_progress_status_code  IN    pa_task_types.initial_progress_status_code%TYPE  := NULL
212  ,p_task_prog_entry_page_id       IN    pa_task_types.task_progress_entry_page_id%TYPE   := NULL
213  ,p_task_prog_entry_page_name     IN    pa_page_layouts.page_name%TYPE              := NULL
214  ,p_wq_enable_flag                IN    pa_task_types.wq_enable_flag%TYPE           := NULL
215  ,p_work_item_code                IN    pa_task_types.work_item_code%TYPE           := NULL
216  ,p_uom_code                      IN    pa_task_types.uom_code%TYPE                 := NULL
217  ,p_actual_wq_entry_code          IN    pa_task_types.actual_wq_entry_code%TYPE     := NULL
218  ,p_percent_comp_enable_flag      IN    pa_task_types.percent_comp_enable_flag%TYPE := NULL
219  ,p_base_percent_comp_deriv_code  IN    pa_task_types.base_percent_comp_deriv_code%TYPE  := NULL
220  ,p_task_weighting_deriv_code     IN    pa_task_types.task_weighting_deriv_code%TYPE     := NULL
221  ,p_remain_effort_enable_flag     IN    pa_task_types.remain_effort_enable_flag%TYPE     := NULL
222  ,p_attribute_category     IN    pa_task_types.attribute_category%TYPE       := NULL
223  ,p_attribute1             IN    pa_task_types.attribute1%TYPE               := NULL
224  ,p_attribute2             IN    pa_task_types.attribute2%TYPE               := NULL
225  ,p_attribute3             IN    pa_task_types.attribute3%TYPE               := NULL
226  ,p_attribute4             IN    pa_task_types.attribute4%TYPE               := NULL
227  ,p_attribute5             IN    pa_task_types.attribute5%TYPE               := NULL
228  ,p_attribute6             IN    pa_task_types.attribute6%TYPE               := NULL
229  ,p_attribute7             IN    pa_task_types.attribute7%TYPE               := NULL
230  ,p_attribute8             IN    pa_task_types.attribute8%TYPE               := NULL
231  ,p_attribute9             IN    pa_task_types.attribute9%TYPE               := NULL
232  ,p_attribute10            IN    pa_task_types.attribute10%TYPE              := NULL
233  ,p_attribute11            IN    pa_task_types.attribute11%TYPE              := NULL
234  ,p_attribute12            IN    pa_task_types.attribute12%TYPE              := NULL
235  ,p_attribute13            IN    pa_task_types.attribute13%TYPE              := NULL
236  ,p_attribute14            IN    pa_task_types.attribute14%TYPE              := NULL
237  ,p_attribute15            IN    pa_task_types.attribute15%TYPE              := NULL
238  ,p_object_type            IN    pa_task_types.object_type%TYPE              := 'PA_TASKS'    -- 3279987 : Added Object Type, Progress Rollup Method,
239  ,p_enable_dlvr_actions_flag    IN    pa_task_types.enable_dlvr_actions_flag%TYPE :=NULL           --           Method code columns--modified 3279978 avaithia 28-dec-2003
240  ,p_record_version_number   IN   pa_task_types.record_version_number%TYPE    := 1
241  ,p_wf_item_type           IN    pa_task_types.wf_item_type%TYPE           :=NULL
242  ,p_wf_process             IN    pa_task_types.wf_process%TYPE             :=NULL
243  ,p_wf_lead_days           IN    pa_task_types.wf_start_lead_days%TYPE     :=NULL
244  ,x_return_status         OUT    NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
245  ,x_msg_count             OUT    NOCOPY NUMBER --File.Sql.39 bug 4440895
246  ,x_msg_data              OUT    NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
247 )
248 
249 IS
250 
251 BEGIN
252 
253   -- Initialize the return status to success
254   x_return_status := FND_API.G_RET_STS_SUCCESS;
255 
256   UPDATE pa_task_types
257   SET
258              task_type                        = p_task_type
259              ,start_date_active               = p_start_date_active
260              ,end_date_active                 = p_end_date_active
261              ,description                     = p_description
262              ,task_type_class_code            = p_task_type_class_code
263              ,initial_status_code             = p_initial_status_code
264              ,prog_entry_enable_flag          = p_prog_entry_enable_flag
265              ,prog_entry_req_flag             = p_prog_entry_req_flag
266              ,initial_progress_status_code    = p_initial_progress_status_code
267              ,task_progress_entry_page_id     = p_task_prog_entry_page_id
268              ,wq_enable_flag                  = p_wq_enable_flag
269              ,work_item_code                  = p_work_item_code
270              ,uom_code                        = p_uom_code
271              ,actual_wq_entry_code            = p_actual_wq_entry_code
272              ,percent_comp_enable_flag        = p_percent_comp_enable_flag
273              ,base_percent_comp_deriv_code    = p_base_percent_comp_deriv_code
274              ,task_weighting_deriv_code       = p_task_weighting_deriv_code
275              ,remain_effort_enable_flag       = p_remain_effort_enable_flag
276              ,attribute_category              = p_attribute_category
277              ,attribute1                      = p_attribute1
278              ,attribute2                      = p_attribute2
279              ,attribute3                      = p_attribute3
280              ,attribute4                      = p_attribute4
281              ,attribute5                      = p_attribute5
282              ,attribute6                      = p_attribute6
283              ,attribute7                      = p_attribute7
284              ,attribute8                      = p_attribute8
285              ,attribute9                      = p_attribute9
286              ,attribute10                     = p_attribute10
287              ,attribute11                     = p_attribute11
288              ,attribute12                     = p_attribute12
289              ,attribute13                     = p_attribute13
290              ,attribute14                     = p_attribute14
291              ,attribute15                     = p_attribute15
292              ,object_type                     = p_object_type               -- 3279978 : Added Object Type, Progress Rollup Method,
293              ,enable_dlvr_actions_flag        = p_enable_dlvr_actions_flag       --           Method code columns  -3279978 avaithia 28-dec-2003
294              ,record_version_number           = p_record_version_number + 1  -- 3279978 inserted avaithia 28-dec-2003
295              ,wf_item_type                    = p_wf_item_type
296              ,wf_process                      = p_wf_process
297              ,wf_start_lead_days              = p_wf_lead_days
298              ,last_update_date                = sysdate
299              ,last_updated_by                 = fnd_global.user_id
300              ,last_update_login               = fnd_global.login_id
301     WHERE    task_type_id = p_task_type_id;
302 
303   EXCEPTION
304     WHEN OTHERS THEN
305        -- Set the excetption Message and the stack
306        FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_TASK_TYPE_PKG.update_row'
307                                 ,p_procedure_name => PA_DEBUG.G_Err_Stack );
308        --
309        x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
310        RAISE;
311 
312 END update_row;
313 
314 
315 PROCEDURE delete_row
316  (p_task_type_id           IN    pa_task_types.task_type_id%TYPE
317  ,p_record_version_number  IN    pa_task_types.record_version_number%TYPE  :=0 -- 3279978 inserted avaithia 7-Jan-2004
318  ,x_return_status         OUT    NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
319  ,x_msg_count             OUT    NOCOPY NUMBER --File.Sql.39 bug 4440895
320  ,x_msg_data              OUT    NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
321 )
322 IS
323 
324 BEGIN
325 
326   -- Initialize the return status to success
327   x_return_status := FND_API.G_RET_STS_SUCCESS;
328 
329   IF(p_record_version_number =0) THEN
330        DELETE FROM  pa_task_types
331                WHERE  task_type_id = p_task_type_id;
332   ELSE
333        DELETE FROM  pa_task_types
334                WHERE  task_type_id = p_task_type_id
335                AND    record_version_number=p_record_version_number;
336   END IF;
337 
338   IF (SQL%NOTFOUND) THEN
339 
340        PA_UTILS.Add_Message ( p_app_short_name => 'PA'
341                              ,p_msg_name => 'PA_XC_RECORD_CHANGED');
342        x_return_status := FND_API.G_RET_STS_ERROR;
343 
344   END IF;
345 
346   EXCEPTION
347     WHEN OTHERS THEN
348        -- Set the excetption Message and the stack
349        FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_TASK_TYPE_PKG.delete_row'
350                                 ,p_procedure_name => PA_DEBUG.G_Err_Stack );
351        x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
352     RAISE;
353 
354  END delete_row;
355 
356 
357 END PA_TASK_TYPE_PKG;