1 PACKAGE OKS_PM_PROGRAMS_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKSRPMPS.pls 120.1 2005/07/01 07:44:44 jvorugan noship $ */
3 --------- ------ ------------------------------------------
4 -- GLOBAL VARIABLES
5 ---------------------------------------------------------------------------
6 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKS_PM_PROGRAMS_PVT';
7 G_APP_NAME CONSTANT VARCHAR2(3) := OKC_API.G_APP_NAME;
8 G_APP_NAME_OKS CONSTANT VARCHAR2(3) := 'OKS';
9 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_CONTRACTS_UNEXPECTED_ERROR';
10 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
11 G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'SQLerrm';
12 G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'SQLcode';
13 G_REQUIRED_VALUE CONSTANT VARCHAR2(200) := OKC_API.G_REQUIRED_VALUE;
14 G_COL_NAME_TOKEN CONSTANT VARCHAR2(200) := OKC_API.G_COL_NAME_TOKEN;
15
16 --for debug log
17 G_DEBUG_ENABLED VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
18
19 -- Global Data Structures
20
21 TYPE pms_rec_type is RECORD
22 (SCHEDULE_DATE OKS_PM_SCHEDULES.SCHEDULE_DATE%TYPE);
23
24 TYPE pms_tbl_type is TABLE of pms_rec_type INDEX BY BINARY_INTEGER;
25 subtype pmstapi_rec_type is OKS_PMS_PVT.oks_pm_schedules_rec_type;
26
27 --Added for QA Check
28 TYPE act_rec_type is RECORD
29 (ACTIVITY_ID OKX_PM_ACTIVITIES_V.ID1%TYPE);
30
31 TYPE act_tbl_type is TABLE of act_rec_type INDEX BY BINARY_INTEGER;
32
33 TYPE pmsch_refresh_rec_type is RECORD
34 (SEQ_NO NUMBER DEFAULT NULL
35 ,RULE_ID NUMBER DEFAULT NULL
36 --ph2
37 ,PMP_RULE_ID NUMBER DEFAULT NULL
38 ,PMA_RULE_ID NUMBER DEFAULT NULL
39 ,OBJECT_VERSION_NUMBER NUMBER(9) DEFAULT NULL
40 ,DNZ_CHR_ID NUMBER DEFAULT NULL
41 ,CLE_ID NUMBER DEFAULT NULL
42 ,SCH_SEQUENCE NUMBER DEFAULT NULL
43 ,SCHEDULE_DATE DATE DEFAULT NULL
44 ,SCHEDULE_DATE_FROM DATE DEFAULT NULL
45 ,SCHEDULE_DATE_TO DATE DEFAULT NULL
46 ,ACTIVITY_LINE_ID NUMBER DEFAULT NULL
47 ,STREAM_LINE_ID NUMBER DEFAULT NULL
48 ,PROGRAM_ID NUMBER DEFAULT NULL
49 );
50
51 TYPE pmsch_refresh_tbl_type is TABLE of pmsch_refresh_rec_type INDEX BY BINARY_INTEGER;
52
53 TYPE rule_act_rec is RECORD
54 (CTR_START NUMBER,
55 CTR_END NUMBER,
56 START_DATE DATE,
57 END_DATE DATE,
58 SCH_AUTO OKC_RULES_B.RULE_INFORMATION9%TYPE,
59 ACTION VARCHAR2(30));
60
61 TYPE rule_act_tbl is TABLE of rule_act_rec INDEX BY BINARY_INTEGER;
62
63 TYPE pma_rec_type is RECORD
64 (ACTIVITY_LINE_ID OKS_PM_ACTIVITIES.ID%TYPE);
65
66 TYPE pma_tbl_type IS TABLE OF pma_rec_type INDEX BY BINARY_INTEGER;
67
68 TYPE pm_rec_type is RECORD
69 ( ID NUMBER,
70 TYPE VARCHAR2(80));
71
72 TYPE pm_tbl_type IS TABLE OF pm_rec_type INDEX BY BINARY_INTEGER;
73
74 PROCEDURE GENERATE_SCHEDULE
75 (p_api_version IN NUMBER,
76 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
77 x_return_status OUT NOCOPY VARCHAR2,
78 x_msg_count OUT NOCOPY NUMBER,
79 x_msg_data OUT NOCOPY VARCHAR2,
80 p_periods IN NUMBER,
81 p_start_date IN DATE,
82 p_end_date IN DATE,
83 p_duration IN NUMBER,
84 p_period IN VARCHAR2,
85 p_first_sch_date IN DATE,
86 x_periods OUT NOCOPY NUMBER,
87 x_last_date OUT NOCOPY DATE,
88 x_pms_tbl OUT NOCOPY pms_tbl_type);
89
90 PROCEDURE RENEW_PM_PROGRAM_SCHEDULE
91 (p_api_version IN NUMBER,
92 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
93 x_return_status OUT NOCOPY VARCHAR2,
94 x_msg_count OUT NOCOPY NUMBER,
95 x_msg_data OUT NOCOPY VARCHAR2,
96 p_contract_line_id IN NUMBER);
97
98 PROCEDURE ADJUST_PM_PROGRAM_SCHEDULE
99 (p_api_version IN NUMBER,
100 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
101 p_contract_line_id IN NUMBER,
102 p_new_start_date IN DATE,
103 p_new_end_date IN DATE,
104 x_return_status OUT NOCOPY VARCHAR2,
105 x_msg_count OUT NOCOPY NUMBER,
106 x_msg_data OUT NOCOPY VARCHAR2);
107
108
109 /* --for upgrade from Phase I - this needs to be changed for rules rearchitecture
110 PROCEDURE update_pmp_rule_id(p_api_version IN NUMBER,
111 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
112 x_return_status OUT NOCOPY VARCHAR2,
113 x_msg_count OUT NOCOPY NUMBER,
114 x_msg_data OUT NOCOPY VARCHAR2);*/
115
116 PROCEDURE CREATE_PM_PROGRAM_SCHEDULE
117 (p_api_version IN NUMBER,
118 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
119 x_return_status OUT NOCOPY VARCHAR2,
120 x_msg_count OUT NOCOPY NUMBER,
121 x_msg_data OUT NOCOPY VARCHAR2,
122 p_template_cle_id IN NUMBER,
123 p_cle_id IN NUMBER, --instantiated cle id
124 p_cov_start_date IN DATE,
125 p_cov_end_date IN DATE);
126
127 PROCEDURE REFRESH_PM_PROGRAM_SCHEDULE
128 (p_api_version IN NUMBER,
129 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
130 x_return_status OUT NOCOPY VARCHAR2,
131 x_msg_count OUT NOCOPY NUMBER,
132 x_msg_data OUT NOCOPY VARCHAR2,
133 p_cov_tbl IN okc_contract_pub.clev_tbl_type,
134 p_pmlrulv_tbl IN oks_pml_pvt.pmlv_tbl_type,
135 x_pmlrulv_tbl OUT NOCOPY oks_pml_pvt.pmlv_tbl_type,
136 x_pmschv_tbl OUT NOCOPY pmsch_refresh_tbl_type);
137
138 PROCEDURE POPULATE_SCHEDULE
139 (p_api_version IN NUMBER,
140 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
141 x_return_status OUT NOCOPY VARCHAR2,
142 x_msg_count OUT NOCOPY NUMBER,
143 x_msg_data OUT NOCOPY VARCHAR2,
144 p_pmlrulv_tbl IN oks_pml_pvt.pmlv_tbl_type,
145 p_sch_tbl IN OKS_PMS_PVT.oks_pm_schedules_v_tbl_type,
146 p_pma_tbl IN pma_tbl_type,
147 p_is_template IN VARCHAR2);
148
149 PROCEDURE migrate_to_program
150 ( p_start_rowid IN ROWID,
151 p_end_rowid IN ROWID,
152 p_api_version IN NUMBER,
153 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
154 x_msg_count OUT NOCOPY NUMBER,
155 x_return_status OUT NOCOPY VARCHAR2,
156 x_msg_data OUT NOCOPY VARCHAR2);
157
158 PROCEDURE migrate_to_activities
159 ( p_start_rowid IN ROWID,
160 p_end_rowid IN ROWID,
161 p_api_version IN NUMBER,
162 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
163 x_msg_count OUT NOCOPY NUMBER,
164 x_return_status OUT NOCOPY VARCHAR2,
165 x_msg_data OUT NOCOPY VARCHAR2);
166
167 --New procedure to be called from coverage comparison code
168 PROCEDURE check_pm_match
169 ( p_api_version IN NUMBER,
170 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
171 x_return_status OUT NOCOPY VARCHAR2,
172 x_msg_count OUT NOCOPY NUMBER,
173 x_msg_data OUT NOCOPY VARCHAR2,
174 P_Source_coverage_Line_Id IN NUMBER,
175 P_Target_coverage_Line_Id IN NUMBER,
176 x_pm_match OUT NOCOPY VARCHAR2);
177
178
179 PROCEDURE check_pm_schedule
180 (
181 x_return_status OUT NOCOPY VARCHAR2,
182 p_chr_id IN NUMBER);
183
184 PROCEDURE check_pm_program_effectivity
185 (
186 x_return_status OUT NOCOPY VARCHAR2,
187 p_chr_id IN NUMBER);
188 -- added new qa check
189
190 PROCEDURE CHECK_PM_REQUIRED_VALUES (
191 x_return_status OUT NOCOPY VARCHAR2,
192 p_chr_id IN NUMBER);
193
194 --02/18/04 added new qa check
195 PROCEDURE check_pm_new_activities(
196 x_return_status OUT NOCOPY VARCHAR2,
197 p_chr_id IN NUMBER);
198
199 PROCEDURE UNDO_PM_LINE
200 (
201 p_api_version IN NUMBER,
202 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
203 x_return_status OUT NOCOPY VARCHAR2,
204 x_msg_count OUT NOCOPY NUMBER,
205 x_msg_data OUT NOCOPY VARCHAR2,
206 p_cle_id IN NUMBER);
207
208 PROCEDURE INIT_OKS_K_LINE(x_klnv_tbl OUT NOCOPY OKS_KLN_PVT.klnv_tbl_type);
209 PROCEDURE version_PM(
210 p_api_version IN NUMBER,
211 p_init_msg_list IN VARCHAR2,
212 x_return_status OUT NOCOPY VARCHAR2,
213 x_msg_count OUT NOCOPY NUMBER,
214 x_msg_data OUT NOCOPY VARCHAR2,
215 p_chr_id IN NUMBER,
216 p_major_version IN NUMBER);
217
218
219 PROCEDURE Restore_PM(
220 p_api_version IN NUMBER,
221 p_init_msg_list IN VARCHAR2,
222 x_return_status OUT NOCOPY VARCHAR2,
223 x_msg_count OUT NOCOPY NUMBER,
224 x_msg_data OUT NOCOPY VARCHAR2,
225 p_chr_id IN NUMBER);
226
227
228 PROCEDURE Delete_PMHistory(
229 p_api_version IN NUMBER,
230 p_init_msg_list IN VARCHAR2,
231 x_return_status OUT NOCOPY VARCHAR2,
232 x_msg_count OUT NOCOPY NUMBER,
233 x_msg_data OUT NOCOPY VARCHAR2,
234 p_chr_id IN NUMBER);
235
236 PROCEDURE Delete_PMSaved_Version(
237 p_api_version IN NUMBER,
238 p_init_msg_list IN VARCHAR2,
239 x_return_status OUT NOCOPY VARCHAR2,
240 x_msg_count OUT NOCOPY NUMBER,
241 x_msg_data OUT NOCOPY VARCHAR2,
242 p_chr_id IN NUMBER);
243
244 -- New procedure for copying PM for coverage template
245 PROCEDURE Copy_PM_Template (
246 p_api_version IN NUMBER,
247 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
248 x_return_status OUT NOCOPY VARCHAR2,
249 x_msg_count OUT NOCOPY NUMBER,
250 x_msg_data OUT NOCOPY VARCHAR2,
251 p_old_coverage_id IN NUMBER,
252 p_new_coverage_id IN NUMBER); --instantiated cle id
253
254
255 END OKS_PM_PROGRAMS_PVT;
[Home] [Help]