DBA Data[Home] [Help]

PACKAGE BODY: APPS.PSP_ERD_EXT

Source


1 PACKAGE BODY PSP_ERD_EXT as
2 /* $Header: PSPERCXB.pls 120.5 2006/01/30 22:33 dpaudel noship $ */
3 -- WARNING:
4 --          Please note that any PL/SQL statements that cause Commit/Rollback
5 --          are not allowed in the user extension code. Commit/Rollback's
6 --          will interfere with the Commit cycle of the main
7 --          process and Restart/Recover process will not work properly.
8 --
9 --         ------------------------------------------------------
10 Procedure UPDATE_EFF_REPORT_DETAILS_EXT( p_effort_report_detail_id	in  Number
11 		,p_Assignment_id                in VARCHAR2
12 		,p_GL_SEGMENT1                in VARCHAR2
13 		,p_GL_SEGMENT2                in VARCHAR2
14 		,p_GL_SEGMENT3                in VARCHAR2
15 		,p_GL_SEGMENT4                in VARCHAR2
16 		,p_GL_SEGMENT5                in VARCHAR2
17 		,p_GL_SEGMENT6                in VARCHAR2
18 		,p_GL_SEGMENT7                in VARCHAR2
19 		,p_GL_SEGMENT8                in VARCHAR2
20 		,p_GL_SEGMENT9                in VARCHAR2
21 		,p_GL_SEGMENT10               in VARCHAR2
22 		,p_GL_SEGMENT11               in VARCHAR2
23 		,p_GL_SEGMENT12               in VARCHAR2
24 		,p_GL_SEGMENT13               in VARCHAR2
25 		,p_GL_SEGMENT14               in VARCHAR2
26 		,p_GL_SEGMENT15               in VARCHAR2
27 		,p_GL_SEGMENT16               in VARCHAR2
28 		,p_GL_SEGMENT17               in VARCHAR2
29 		,p_GL_SEGMENT18               in VARCHAR2
30 		,p_GL_SEGMENT19               in VARCHAR2
31 		,p_GL_SEGMENT20               in VARCHAR2
32 		,p_GL_SEGMENT21               in VARCHAR2
33 		,p_GL_SEGMENT22               in VARCHAR2
34 		,p_GL_SEGMENT23               in VARCHAR2
35 		,p_GL_SEGMENT24               in VARCHAR2
36 		,p_GL_SEGMENT25               in VARCHAR2
37 		,p_GL_SEGMENT26               in VARCHAR2
38 		,p_GL_SEGMENT27               in VARCHAR2
39 		,p_GL_SEGMENT28               in VARCHAR2
40 		,p_GL_SEGMENT29               in VARCHAR2
41 		,p_GL_SEGMENT30               in VARCHAR2
42 		,p_Project_id		      in Number
43 		,p_expenditure_org_id	      in Number
44 		,p_expenditure_type           in VARCHAR2
45 		,p_task_id		      in Number
46 		,p_award_id			in Number
47 		,p_count_eff_detail_id		in Number
48                 ,p_effort_start_date            in date
49                 ,p_effort_end_date              in date
50                 ,p_investigator_person_id           in number
51                 ,p_INVESTIGATOR_NAME           in varchar2
52                 ,p_INVESTIGATOR_ORG_NAME  in varchar2
53                 ,p_INVESTIGATOR_PRIMARY_ORG_ID  in number
54          ) as
55 BEGIN
56 	PSP_EFF_REPORT_DETAILS_API.g_er_proposed_salary_amt(p_count_eff_detail_id)     := hr_api.g_number;
57 	PSP_EFF_REPORT_DETAILS_API.g_er_proposed_effort_percent(p_count_eff_detail_id) := hr_api.g_number;
58 	PSP_EFF_REPORT_DETAILS_API.g_er_committed_cost_share(p_count_eff_detail_id)    := hr_api.g_number;
59 	PSP_EFF_REPORT_DETAILS_API.g_er_value1(p_count_eff_detail_id)                  := hr_api.g_number;
60 	PSP_EFF_REPORT_DETAILS_API.g_er_value2(p_count_eff_detail_id)  		       := hr_api.g_number;
61 	PSP_EFF_REPORT_DETAILS_API.g_er_value3(p_count_eff_detail_id)  		       := hr_api.g_number;
62 	PSP_EFF_REPORT_DETAILS_API.g_er_value4(p_count_eff_detail_id)  		       := hr_api.g_number;
63 	PSP_EFF_REPORT_DETAILS_API.g_er_value5(p_count_eff_detail_id)  		       := hr_api.g_number;
64 	PSP_EFF_REPORT_DETAILS_API.g_er_value6(p_count_eff_detail_id)  		       := hr_api.g_number;
65 	PSP_EFF_REPORT_DETAILS_API.g_er_value7(p_count_eff_detail_id)  		       := hr_api.g_number;
66 	PSP_EFF_REPORT_DETAILS_API.g_er_value8(p_count_eff_detail_id)  		       := hr_api.g_number;
67 	PSP_EFF_REPORT_DETAILS_API.g_er_value9(p_count_eff_detail_id)  		       := hr_api.g_number;
68 	PSP_EFF_REPORT_DETAILS_API.g_er_value10(p_count_eff_detail_id) 		       := hr_api.g_number;
69 	PSP_EFF_REPORT_DETAILS_API.g_er_attribute1(p_count_eff_detail_id) 	       := hr_api.g_varchar2;
70 	PSP_EFF_REPORT_DETAILS_API.g_er_attribute2(p_count_eff_detail_id) 	       := hr_api.g_varchar2;
71 	PSP_EFF_REPORT_DETAILS_API.g_er_attribute3(p_count_eff_detail_id) 	       := hr_api.g_varchar2;
72 	PSP_EFF_REPORT_DETAILS_API.g_er_attribute4(p_count_eff_detail_id) 	       := hr_api.g_varchar2;
73 	PSP_EFF_REPORT_DETAILS_API.g_er_attribute5(p_count_eff_detail_id) 	       := hr_api.g_varchar2;
74 	PSP_EFF_REPORT_DETAILS_API.g_er_attribute6(p_count_eff_detail_id) 	       := hr_api.g_varchar2;
75 	PSP_EFF_REPORT_DETAILS_API.g_er_attribute7(p_count_eff_detail_id) 	       := hr_api.g_varchar2;
76 	PSP_EFF_REPORT_DETAILS_API.g_er_attribute8(p_count_eff_detail_id) 	       := hr_api.g_varchar2;
77 	PSP_EFF_REPORT_DETAILS_API.g_er_attribute9(p_count_eff_detail_id) 	       := hr_api.g_varchar2;
78 	PSP_EFF_REPORT_DETAILS_API.g_er_attribute10(p_count_eff_detail_id)	       := hr_api.g_varchar2;
79 	PSP_EFF_REPORT_DETAILS_API.g_er_grouping_category(p_count_eff_detail_id)       := hr_api.g_varchar2;    -- Add for Hospital Effort Report
80 
81 	-- EDIT:Add your code here
82 	--p_EFFORT_REPORT_DETAIL_ID is the Effort Report Detail id
83 
84 /*        --- Sample code to stick Grant Project PI to non-Grant Project
85             if p_investigator_person_id is null then
86                select INVESTIGATOR_PERSON_ID,
87                               INVESTIGATOR_NAME,
88                               INVESTIGATOR_ORG_NAME,
89                               INVESTIGATOR_PRIMARY_ORG_ID
90                into psp_eff_report_details_api.g_er_approver_person_id(p_count_eff_detail_id),
91                               psp_eff_report_details_api.g_er_investigator_name(p_count_eff_detail_id),
92                               psp_eff_report_details_api.g_er_investigator_org_name(p_count_eff_detail_id),
93                               psp_eff_report_details_api.g_er_inv_primary_org_id(p_count_eff_detail_id)
94                  from psp_eff_report_details
95                  where effort_report_id in
96                       (select effort_report_id
97                         from psp_eff_report_details
98                          where effort_report_detail_id = p_effort_report_detail_id)
99                     and investigator_person_id is not null
100                     and rownum = 1
101                     order by payroll_percent desc;
102              end if;
103 
104            --- if you are setting PI (overriding the approver), donot forget
105                to set PI org id , PI org name, PI name .. otherwise these info could be
106                missing in the PDF report
107 */
108 	exception
109 	   when others then
110 	   fnd_msg_pub.add_exc_msg('PSP_ERD_EXT','UPDATE_EFF_REPORT_DETAILS_EXT');
111 	   raise FND_API.G_EXC_UNEXPECTED_ERROR;
112 end;
113 END PSP_ERD_EXT;