DBA Data[Home] [Help]
Skip to content

PACKAGE BODY: APPS.IGS_PR_STDNT_PR_OU_BE_PKG

Source


1 PACKAGE BODY igs_pr_stdnt_pr_ou_be_pkg AS
2 /* $Header: IGSPR35B.pls 115.0 2002/10/04 14:53:15 ddey noship $ */
3 
4 
5 
6 PROCEDURE approve_otcm(
7                          p_person_id                  IN NUMBER,
8                          p_course_cd                  IN VARCHAR2,
9                          p_sequence_number            IN NUMBER,
10                          p_decision_status            IN VARCHAR2,
11                          p_decision_dt                IN VARCHAR2,
12                          p_progression_outcome_type   IN VARCHAR2,
13                          p_description                IN VARCHAR2,
14                          p_appeal_expiry_dt           IN VARCHAR2,
15                          p_show_cause_expiry_dt       IN VARCHAR2
16 			 )      AS
17   /******************************************************************
18    Created By         : Deepankar Dey
19    Date Created By    : 30-Sept-2002
20    Purpose            : This procedure will be used for launching
21                         the workflow process.
22    Change History
23    Who      When        What
24   ******************************************************************/
25 
26 
27     l_event_t             wf_event_t;
28     l_parameter_list_t    wf_parameter_list_t;
29     l_itemKey             varchar2(100);
30     ln_seq_val            NUMBER;
31 
32     -- Gets a unique sequence number
33     CURSOR
34           c_seq_num
35      IS
36           SELECT
37 	         igs_pr_progout_ntf_s.NEXTVAL
38           FROM
39 	        dual;
40 
41 
42   BEGIN
43 
44 
45     -- Get the sequence value
46     OPEN  c_seq_num;
47     FETCH c_seq_num INTO ln_seq_val ;
48     CLOSE c_seq_num ;
49 
50 
51      --
52      -- initialize the wf_event_t object
53      --
54 
55 	 wf_event_t.Initialize(l_event_t);
56 
57 
58 
59       --
60       -- Adding the parameters to the parameter list
61       --
62 
63 
64          wf_event.AddParameterToList ( p_name => 'IA_PERSON_ID',p_value=>p_person_id,p_parameterlist=>l_parameter_list_t);
65          wf_event.AddParameterToList ( p_Name => 'IA_COURSE_CD', p_Value => p_course_cd, p_parameterlist => l_parameter_list_t);
66          wf_event.AddParameterToList ( p_Name => 'IA_SEQUENCE_NUMBER', p_Value => p_sequence_number, p_parameterlist => l_parameter_list_t);
67          wf_event.AddParameterToList ( p_Name => 'IA_DECISION_STATUS', p_Value => p_decision_status, p_parameterlist => l_parameter_list_t);
68          wf_event.AddParameterToList ( p_name => 'IA_DECISION_DT',p_value=>p_decision_dt,p_parameterlist=>l_parameter_list_t);
69          wf_event.AddParameterToList ( p_Name => 'IA_PROGRESSION_OUTCOME_TYPE', p_Value => p_progression_outcome_type, p_parameterlist => l_parameter_list_t);
70          wf_event.AddParameterToList ( p_Name => 'IA_DESCRIPTION', p_Value => p_description, p_parameterlist => l_parameter_list_t);
71          wf_event.AddParameterToList ( p_Name => 'IA_APPEAL_EXPIRY_DT', p_Value => p_appeal_expiry_dt, p_parameterlist => l_parameter_list_t);
72          wf_event.AddParameterToList ( p_Name => 'IA_SHOW_CAUSE_EXPIRY_DT', p_Value => p_show_cause_expiry_dt, p_parameterlist => l_parameter_list_t);
73          wf_event.AddParameterToList ( p_Name => 'IA_EVENT_NAME', p_Value => 'oracle.apps.igs.pr.approve_otcm', p_parameterlist => l_parameter_list_t);
74 
75      -- Raise the Event
76 
77 
78      WF_EVENT.RAISE (p_event_name => 'oracle.apps.igs.pr.approve_otcm' ,
79                      p_event_key  => 'PR001'||ln_seq_val,
80                      p_parameters => l_parameter_list_t);
81 
82    --
83    -- Deleting the Parameter list after the event is raised
84    --
85 
86      l_parameter_list_t.delete;
87 
88  END approve_otcm;
89 
90 
91  PROCEDURE apply_positive_otcm(
92 			 p_person_id                 IN NUMBER,
93 			 p_course_cd		     IN VARCHAR2,
94 			 p_sequence_number	     IN NUMBER,
95 			 p_decision_status	     IN VARCHAR2,
96 			 p_decision_dt		     IN VARCHAR2,
97 			 p_progression_outcome_type  IN VARCHAR2,
98 			 p_description               IN VARCHAR2,
99 			 p_applied_dt		     IN VARCHAR2
100 			)  AS
101   /******************************************************************
102    Created By         : Deepankar Dey
103    Date Created By    : 30-Sept-2002
104    Purpose            : This procedure will be used for launching
105                         the workflow process.
106    Change History
107    Who      When        What
108   ******************************************************************/
109 
110 
111     l_event_t             wf_event_t;
112     l_parameter_list_t    wf_parameter_list_t;
113     l_itemKey             varchar2(100);
114     ln_seq_val            NUMBER;
115 
116     -- Gets a unique sequence number
117     CURSOR
118           c_seq_num
119      IS
120           SELECT
121 	         igs_pr_progout_ntf_s.NEXTVAL
122           FROM
123 	        dual;
124 
125 
126   BEGIN
127 
128 
129 
130     -- Get the sequence value
131     OPEN  c_seq_num;
132     FETCH c_seq_num INTO ln_seq_val ;
133     CLOSE c_seq_num ;
134 
135 
136      --
137      -- initialize the wf_event_t object
138      --
139 
140 	 wf_event_t.Initialize(l_event_t);
141 
142 
143 
144       --
145       -- Adding the parameters to the parameter list
146       --
147 
148          wf_event.AddParameterToList ( p_name => 'IA_PERSON_ID',p_value=>p_person_id,p_parameterlist=>l_parameter_list_t);
149          wf_event.AddParameterToList ( p_Name => 'IA_COURSE_CD', p_Value => p_course_cd, p_parameterlist => l_parameter_list_t);
150          wf_event.AddParameterToList ( p_Name => 'IA_SEQUENCE_NUMBER', p_Value => p_sequence_number, p_parameterlist => l_parameter_list_t);
151          wf_event.AddParameterToList ( p_Name => 'IA_DECISION_STATUS', p_Value => p_decision_status, p_parameterlist => l_parameter_list_t);
152          wf_event.AddParameterToList ( p_name => 'IA_DECISION_DT',p_value=>p_decision_dt,p_parameterlist=>l_parameter_list_t);
153          wf_event.AddParameterToList ( p_Name => 'IA_PROGRESSION_OUTCOME_TYPE', p_Value => p_progression_outcome_type, p_parameterlist => l_parameter_list_t);
154          wf_event.AddParameterToList ( p_Name => 'IA_APPLIED_DT', p_Value => p_applied_dt, p_parameterlist => l_parameter_list_t);
155          wf_event.AddParameterToList ( p_Name => 'IA_EVENT_NAME', p_Value => 'oracle.apps.igs.pr.apply_positive_otcm', p_parameterlist => l_parameter_list_t);
156 	 wf_event.AddParameterToList ( p_Name => 'IA_DESCRIPTION', p_Value => p_description, p_parameterlist => l_parameter_list_t);
157        -- Raise the Event
158 
159 
160      WF_EVENT.RAISE (p_event_name => 'oracle.apps.igs.pr.apply_positive_otcm' ,
161                      p_event_key  => 'PR001'||ln_seq_val,
162                      p_parameters => l_parameter_list_t);
163 
164 
165    --
166    -- Deleting the Parameter list after the event is raised
167    --
168 
169      l_parameter_list_t.delete;
170 
171  END apply_positive_otcm;
172 
173 
174 
175  PROCEDURE apply_otcm(
176 			 p_person_id                 IN NUMBER,
177 			 p_course_cd		     IN VARCHAR2,
178 			 p_sequence_number	     IN NUMBER,
179 			 p_decision_status	     IN VARCHAR2,
180 			 p_decision_dt		     IN VARCHAR2,
181 			 p_progression_outcome_type  IN VARCHAR2,
182 			 p_appeal_expiry_dt	     IN VARCHAR2,
183 			 p_show_cause_expiry_dt	     IN VARCHAR2,
184 			 p_applied_dt		     IN VARCHAR2,
185 			 p_description               IN VARCHAR2
186 			)    AS
187   /******************************************************************
188    Created By         : Deepankar Dey
189    Date Created By    : 30-Sept-2002
190    Purpose            : This procedure will be used for launching
191                         the workflow process.
192    Change History
193    Who      When        What
194   ******************************************************************/
195 
196 
197     l_event_t             wf_event_t;
198     l_parameter_list_t    wf_parameter_list_t;
199     l_itemKey             varchar2(100);
200     ln_seq_val            NUMBER;
201 
202     -- Gets a unique sequence number
203     CURSOR
204           c_seq_num
205      IS
206           SELECT
207 	         igs_pr_progout_ntf_s.NEXTVAL
208           FROM
209 	        dual;
210 
211 
212   BEGIN
213 
214 
215 
216     -- Get the sequence value
217     OPEN  c_seq_num;
218     FETCH c_seq_num INTO ln_seq_val ;
219     CLOSE c_seq_num ;
220 
221 
222      --
223      -- initialize the wf_event_t object
224      --
225 
226 	 wf_event_t.Initialize(l_event_t);
227 
228 
229 
230       --
231       -- Adding the parameters to the parameter list
232       --
233 
234          wf_event.AddParameterToList ( p_name => 'IA_PERSON_ID',p_value=>p_person_id,p_parameterlist=>l_parameter_list_t);
235          wf_event.AddParameterToList ( p_Name => 'IA_COURSE_CD', p_Value => p_course_cd, p_parameterlist => l_parameter_list_t);
236          wf_event.AddParameterToList ( p_Name => 'IA_SEQUENCE_NUMBER', p_Value => p_sequence_number, p_parameterlist => l_parameter_list_t);
237          wf_event.AddParameterToList ( p_Name => 'IA_DECISION_STATUS', p_Value => p_decision_status, p_parameterlist => l_parameter_list_t);
238          wf_event.AddParameterToList ( p_name => 'IA_DECISION_DT',p_value=>p_decision_dt,p_parameterlist=>l_parameter_list_t);
239          wf_event.AddParameterToList ( p_Name => 'IA_PROGRESSION_OUTCOME_TYPE', p_Value => p_progression_outcome_type, p_parameterlist => l_parameter_list_t);
240          wf_event.AddParameterToList ( p_Name => 'IA_APPEAL_EXPIRY_DT', p_Value => p_appeal_expiry_dt, p_parameterlist => l_parameter_list_t);
241          wf_event.AddParameterToList ( p_Name => 'IA_SHOW_CAUSE_EXPIRY_DT', p_Value => p_show_cause_expiry_dt, p_parameterlist => l_parameter_list_t);
242          wf_event.AddParameterToList ( p_Name => 'IA_APPLIED_DT', p_Value => p_applied_dt, p_parameterlist => l_parameter_list_t);
243          wf_event.AddParameterToList ( p_Name => 'IA_EVENT_NAME', p_Value => 'oracle.apps.igs.pr.apply_otcm', p_parameterlist => l_parameter_list_t);
244 	 wf_event.AddParameterToList ( p_Name => 'IA_DESCRIPTION', p_Value => p_description, p_parameterlist => l_parameter_list_t);
245 
246        -- Raise the Event
247 
248 
249      WF_EVENT.RAISE (p_event_name => 'oracle.apps.igs.pr.apply_otcm' ,
250                      p_event_key  => 'PR001'||ln_seq_val,
251                      p_parameters => l_parameter_list_t);
252 
253 
254    --
255    -- Deleting the Parameter list after the event is raised
256    --
257 
258      l_parameter_list_t.delete;
259 
260  END apply_otcm;
261 
262 
263 
264  PROCEDURE show_cause_uph_dsm(
265 			p_person_id                    IN NUMBER,
266 			p_course_cd		       IN VARCHAR2,
267 			p_sequence_number	       IN NUMBER,
268 			p_decision_status	       IN VARCHAR2,
269 			p_decision_dt		       IN VARCHAR2,
270 			p_progression_outcome_type     IN VARCHAR2,
271 			p_description		       IN VARCHAR2,
272 			p_applied_dt		       IN VARCHAR2,
273 			p_show_cause_dt		       IN VARCHAR2,
274 			p_show_cause_outcome_dt        IN VARCHAR2,
275 			p_show_cause_outcome_type      IN VARCHAR2
276                           ) AS
277   /******************************************************************
278    Created By         : Deepankar Dey
279    Date Created By    : 30-Sept-2002
280    Purpose            : This procedure will be used for launching
281                         the workflow process.
282    Change History
283    Who      When        What
284   ******************************************************************/
285 
286 
287     l_event_t             wf_event_t;
288     l_parameter_list_t    wf_parameter_list_t;
289     l_itemKey             varchar2(100);
290     ln_seq_val            NUMBER;
291 
292     -- Gets a unique sequence number
293     CURSOR
294           c_seq_num
295      IS
296           SELECT
297 	         igs_pr_progout_ntf_s.NEXTVAL
298           FROM
299 	        dual;
300 
301 
302   BEGIN
303 
304 
305 
306     -- Get the sequence value
307     OPEN  c_seq_num;
308     FETCH c_seq_num INTO ln_seq_val ;
309     CLOSE c_seq_num ;
310 
311 
312      --
313      -- initialize the wf_event_t object
314      --
315 
316 	 wf_event_t.Initialize(l_event_t);
317 
318 
319 
320       --
321       -- Adding the parameters to the parameter list
322       --
323 
324          wf_event.AddParameterToList ( p_name => 'IA_PERSON_ID',p_value=>p_person_id,p_parameterlist=>l_parameter_list_t);
325          wf_event.AddParameterToList ( p_Name => 'IA_COURSE_CD', p_Value => p_course_cd, p_parameterlist => l_parameter_list_t);
326          wf_event.AddParameterToList ( p_Name => 'IA_SEQUENCE_NUMBER', p_Value => p_sequence_number, p_parameterlist => l_parameter_list_t);
327          wf_event.AddParameterToList ( p_Name => 'IA_DECISION_STATUS', p_Value => p_decision_status, p_parameterlist => l_parameter_list_t);
328          wf_event.AddParameterToList ( p_name => 'IA_DECISION_DT',p_value=>p_decision_dt,p_parameterlist=>l_parameter_list_t);
329          wf_event.AddParameterToList ( p_Name => 'IA_PROGRESSION_OUTCOME_TYPE', p_Value => p_progression_outcome_type, p_parameterlist => l_parameter_list_t);
330          wf_event.AddParameterToList ( p_Name => 'IA_DESCRIPTION', p_Value => p_description, p_parameterlist => l_parameter_list_t);
331          wf_event.AddParameterToList ( p_Name => 'IA_APPLIED_DT', p_Value => p_applied_dt, p_parameterlist => l_parameter_list_t);
332          wf_event.AddParameterToList ( p_Name => 'IA_SHOW_CAUSE_DT', p_Value => p_show_cause_dt, p_parameterlist => l_parameter_list_t);
333          wf_event.AddParameterToList ( p_Name => 'IA_SHOW_CAUSE_OUTCOME_DT', p_Value => p_show_cause_outcome_dt, p_parameterlist => l_parameter_list_t);
334          wf_event.AddParameterToList ( p_Name => 'IA_SHOW_CAUSE_OUTCOME_TYPE', p_Value => p_show_cause_outcome_type, p_parameterlist => l_parameter_list_t);
335          wf_event.AddParameterToList ( p_Name => 'IA_EVENT_NAME', p_Value => 'oracle.apps.igs.pr.showcause_uph_dsm', p_parameterlist => l_parameter_list_t);
336 
337        -- Raise the Event
338 
339 
340      WF_EVENT.RAISE (p_event_name => 'oracle.apps.igs.pr.showcause_uph_dsm' ,
341                      p_event_key  => 'PR001'||ln_seq_val,
342                      p_parameters => l_parameter_list_t);
343 
344 
345    --
346    -- Deleting the Parameter list after the event is raised
347    --
348 
349      l_parameter_list_t.delete;
350 
351  END show_cause_uph_dsm;
352 
353 
354 
355  PROCEDURE appeal_uph_dsm(
356 			p_person_id                    IN NUMBER,
357 			p_course_cd                    IN VARCHAR2,
358 			p_sequence_number              IN NUMBER,
359 			p_decision_status              IN VARCHAR2,
360 			p_decision_dt                  IN VARCHAR2,
361 			p_progression_outcome_type     IN VARCHAR2,
362 			p_description                  IN VARCHAR2,
363 			p_applied_dt                   IN VARCHAR2,
364 			p_appeal_dt                    IN VARCHAR2,
365 			p_appeal_outcome_dt            IN VARCHAR2,
366 			p_appeal_outcome_type          IN VARCHAR2
367                           ) AS
368   /******************************************************************
369    Created By         : Deepankar Dey
370    Date Created By    : 30-Sept-2002
371    Purpose            : This procedure will be used for launching
372                         the workflow process.
373    Change History
374    Who      When        What
375   ******************************************************************/
376 
377 
378     l_event_t             wf_event_t;
379     l_parameter_list_t    wf_parameter_list_t;
380     l_itemKey             varchar2(100);
381     ln_seq_val            NUMBER;
382 
383     -- Gets a unique sequence number
384     CURSOR
385           c_seq_num
386      IS
387           SELECT
388 	         igs_pr_progout_ntf_s.NEXTVAL
389           FROM
390 	        dual;
391 
392 
393   BEGIN
394 
395 
396 
397     -- Get the sequence value
398     OPEN  c_seq_num;
399     FETCH c_seq_num INTO ln_seq_val ;
400     CLOSE c_seq_num ;
401 
402 
403      --
404      -- initialize the wf_event_t object
405      --
406 
407 	 wf_event_t.Initialize(l_event_t);
408 
409 
410 
411       --
412       -- Adding the parameters to the parameter list
413       --
414 
415          wf_event.AddParameterToList ( p_name => 'IA_PERSON_ID',p_value=>p_person_id,p_parameterlist=>l_parameter_list_t);
416          wf_event.AddParameterToList ( p_Name => 'IA_COURSE_CD', p_Value => p_course_cd, p_parameterlist => l_parameter_list_t);
417          wf_event.AddParameterToList ( p_Name => 'IA_SEQUENCE_NUMBER', p_Value => p_sequence_number, p_parameterlist => l_parameter_list_t);
418          wf_event.AddParameterToList ( p_Name => 'IA_DECISION_STATUS', p_Value => p_decision_status, p_parameterlist => l_parameter_list_t);
419          wf_event.AddParameterToList ( p_name => 'IA_DECISION_DT',p_value=>p_decision_dt,p_parameterlist=>l_parameter_list_t);
423          wf_event.AddParameterToList ( p_Name => 'IA_APPEAL_DT', p_Value => p_appeal_dt, p_parameterlist => l_parameter_list_t);
420          wf_event.AddParameterToList ( p_Name => 'IA_PROGRESSION_OUTCOME_TYPE', p_Value => p_progression_outcome_type, p_parameterlist => l_parameter_list_t);
421          wf_event.AddParameterToList ( p_Name => 'IA_DESCRIPTION', p_Value => p_description, p_parameterlist => l_parameter_list_t);
422          wf_event.AddParameterToList ( p_Name => 'IA_APPLIED_DT', p_Value => p_applied_dt, p_parameterlist => l_parameter_list_t);
424          wf_event.AddParameterToList ( p_Name => 'IA_APPEAL_OUTCOME_DT', p_Value => p_appeal_outcome_dt, p_parameterlist => l_parameter_list_t);
425          wf_event.AddParameterToList ( p_Name => 'IA_APPEAL_OUTCOME_TYPE', p_Value => p_appeal_outcome_type, p_parameterlist => l_parameter_list_t);
426          wf_event.AddParameterToList ( p_Name => 'IA_EVENT_NAME', p_Value => 'oracle.apps.igs.pr.appeal_uph_dsm', p_parameterlist => l_parameter_list_t);
427        -- Raise the Event
428 
429 
430      WF_EVENT.RAISE (p_event_name => 'oracle.apps.igs.pr.appeal_uph_dsm' ,
431                      p_event_key  => 'PR001'||ln_seq_val,
432                      p_parameters => l_parameter_list_t);
433 
434 
435    --
436    -- Deleting the Parameter list after the event is raised
437    --
438 
439      l_parameter_list_t.delete;
440 
441  END appeal_uph_dsm;
442 
443 
444  PROCEDURE remove_waive_cancel_otcm(
445                          p_person_id                  IN NUMBER,
446                          p_course_cd		      IN VARCHAR2,
447                          p_sequence_number	      IN NUMBER,
448                          p_decision_status	      IN VARCHAR2,
449                          p_decision_dt		      IN VARCHAR2,
450                          p_progression_outcome_type   IN VARCHAR2,
451                          p_applied_dt                 IN VARCHAR2,
452 			 p_description                IN VARCHAR2
453                           ) AS
454   /******************************************************************
455    Created By         : Deepankar Dey
456    Date Created By    : 30-Sept-2002
457    Purpose            : This procedure will be used for launching
458                         the workflow process.
459    Change History
460    Who      When        What
461   ******************************************************************/
462 
463 
464     l_event_t             wf_event_t;
465     l_parameter_list_t    wf_parameter_list_t;
466     l_itemKey             varchar2(100);
467     ln_seq_val            NUMBER;
468 
469     -- Gets a unique sequence number
470     CURSOR
471           c_seq_num
472      IS
473           SELECT
474 	         igs_pr_progout_ntf_s.NEXTVAL
475           FROM
476 	        dual;
477 
478 
479   BEGIN
480 
481 
482 
483     -- Get the sequence value
484     OPEN  c_seq_num;
485     FETCH c_seq_num INTO ln_seq_val ;
486     CLOSE c_seq_num ;
487 
488 
489      --
490      -- initialize the wf_event_t object
491      --
492 
493 	 wf_event_t.Initialize(l_event_t);
494 
495 
496 
497       --
498       -- Adding the parameters to the parameter list
499       --
500 
501          wf_event.AddParameterToList ( p_name => 'IA_PERSON_ID',p_value=>p_person_id,p_parameterlist=>l_parameter_list_t);
502          wf_event.AddParameterToList ( p_Name => 'IA_COURSE_CD', p_Value => p_course_cd, p_parameterlist => l_parameter_list_t);
503          wf_event.AddParameterToList ( p_Name => 'IA_SEQUENCE_NUMBER', p_Value => p_sequence_number, p_parameterlist => l_parameter_list_t);
504          wf_event.AddParameterToList ( p_Name => 'IA_DECISION_STATUS', p_Value => p_decision_status, p_parameterlist => l_parameter_list_t);
505          wf_event.AddParameterToList ( p_name => 'IA_DECISION_DT',p_value=>p_decision_dt,p_parameterlist=>l_parameter_list_t);
506          wf_event.AddParameterToList ( p_Name => 'IA_PROGRESSION_OUTCOME_TYPE', p_Value => p_progression_outcome_type, p_parameterlist => l_parameter_list_t);
507          wf_event.AddParameterToList ( p_Name => 'IA_APPLIED_DT', p_Value => p_applied_dt, p_parameterlist => l_parameter_list_t);
508          wf_event.AddParameterToList ( p_Name => 'IA_EVENT_NAME', p_Value => 'oracle.apps.igs.pr.remove_waive_cancel_otcm', p_parameterlist => l_parameter_list_t);
509 	 wf_event.AddParameterToList ( p_Name => 'IA_DESCRIPTION', p_Value => p_description, p_parameterlist => l_parameter_list_t);
510 
511 
512       -- Raise the Event
513 
514 
515      WF_EVENT.RAISE (p_event_name => 'oracle.apps.igs.pr.remove_waive_cancel_otcm' ,
516                      p_event_key  => 'PR001'||ln_seq_val,
517                      p_parameters => l_parameter_list_t);
518 
519 
520    --
521    -- Deleting the Parameter list after the event is raised
522    --
523 
524      l_parameter_list_t.delete;
525 
526  END remove_waive_cancel_otcm;
527 
528 
529 END igs_pr_stdnt_pr_ou_be_pkg;