[Home] [Help]
PACKAGE BODY: APPS.HR_VETS_REPORTS
Source
1 package body hr_vets_reports as
2 /* $Header: pervetsr.pkb 120.3.12000000.1 2007/01/22 03:59:51 appldev noship $ */
3 --------------------------------------------------------------------------------
4 /*
5 +==============================================================================+
6 | Copyright (c) 1997 Oracle Corporation |
7 | Redwood Shores, California, USA |
8 | All rights reserved. |
9 +==============================================================================+
10
11 Name
12 Batch Reporting
13 Purpose
14 This package is used to perform reporting for batch processes.
15 History
16 Date Who Version What?
17 ---- --- ------- -----
18 06/05/2001 vshukhat 115.0 Created
19 06/12/2002 eumenyio 115.2 Added nocopy, dbdrv and
20 whenever oserror
21 06/28/2005 ynegoro 115.3 Added p_audit_report
22 07/25/2005 ynegoro 115.4 Added p_audit_report to PERUSVEL
23 05/19/2006 ssouresr 115.5 Added template
24 */
25 -----------------------------------------------------------------------
26 procedure submit
27 (errbuf out nocopy varchar2,
28 retcode out nocopy number,
29 p_business_group_id in number,
30 p_hierarchy_id in number,
31 p_hierarchy_version_id in number,
32 p_date_start in varchar2,
33 p_date_end in varchar2,
34 p_state in varchar2,
35 p_show_new_hires in varchar2,
36 p_show_totals in varchar2,
37 p_audit_report in varchar2) is
38 --
39 l_request_id number;
40 l_set_template boolean;
41 --
42 begin
43 --
44 -- Fire off all the vets reports
45 --
46 -- VETS-100 Veterans Employment Report
47 --
48 l_set_template :=
49 fnd_request.add_layout ('PER',
50 'PERRPVTS',
51 'US',
52 'US',
53 'PDF');
54
55 l_request_id := fnd_request.submit_request
56 (application => 'PER',
57 program => 'PERRPVTS',
58 description => NULL,
59 sub_request => FALSE,
60 argument1 => p_business_group_id,
61 argument2 => p_date_start,
62 argument3 => p_date_end,
63 argument4 => p_hierarchy_id,
64 argument5 => p_hierarchy_version_id,
65 argument6 => p_show_totals,
66 argument7 => p_show_new_hires,
67 argument8 => p_state,
68 argument9 => p_audit_report);
69 --
70 if l_request_id = 0 then
71 --
72 fnd_message.set_name('PER','PER_52992_CANNOT_SUBMIT_REPORT');
73 fnd_message.raise_error;
74 --
75 end if;
76 --
77 commit;
78 --
79 -- VETS-100 Consolidated Veterans Employment Report
80 --
81 l_set_template :=
82 fnd_request.add_layout ('PER',
83 'PERRPVTC',
84 'US',
85 'US',
86 'PDF');
87
88 l_request_id := fnd_request.submit_request
89 (application => 'PER',
90 program => 'PERRPVTC',
91 description => NULL,
92 sub_request => FALSE,
93 argument1 => p_business_group_id,
94 argument2 => p_date_start,
95 argument3 => p_date_end,
96 argument4 => p_hierarchy_id,
97 argument5 => p_hierarchy_version_id,
98 argument6 => p_state,
99 argument7 => p_show_totals,
100 argument8 => p_show_new_hires,
101 argument9 => p_audit_report);
102 --
103 if l_request_id = 0 then
104 --
105 fnd_message.set_name('PER','PER_52993_CANNOT_SUBMIT_REPORT');
106 fnd_message.raise_error;
107 --
108 end if;
109 --
110 commit;
111 --
112 -- VETS-100 Employment Listing
113 --
114 l_set_template :=
115 fnd_request.add_layout ('PER',
116 'PERUSVEL',
117 'US',
118 'US',
119 'PDF');
120
121 l_request_id := fnd_request.submit_request
122 (application => 'PER',
123 program => 'PERUSVEL',
124 description => NULL,
125 sub_request => FALSE,
126 argument1 => p_business_group_id,
127 argument2 => p_hierarchy_id,
128 argument3 => p_hierarchy_version_id,
129 argument4 => p_date_start,
130 argument5 => p_date_end,
131 argument6 => p_state,
132 argument7 => p_show_totals,
133 argument8 => p_show_new_hires,
134 argument9 => p_audit_report);
135 --
136 if l_request_id = 0 then
137 --
138 fnd_message.set_name('PER','PER_52994_CANNOT_SUBMIT_REPORT');
139 fnd_message.raise_error;
140 --
141 end if;
142 --
143 commit;
144 --
145 end submit;
146 -----------------------------------------------------------------------
147 end hr_vets_reports;