DBA Data[Home] [Help]

PACKAGE BODY: APPS.IGS_UC_INST_CONTROL_PKG

Source


1 PACKAGE BODY igs_uc_inst_control_pkg AS
2 /* $Header: IGSXI20B.pls 115.6 2003/07/10 13:45:39 smaddali noship $ */
3 
4   l_rowid VARCHAR2(25);
5   old_references igs_uc_inst_control%ROWTYPE;
6   new_references igs_uc_inst_control%ROWTYPE;
7 
8   PROCEDURE set_column_values (
9     p_action                            IN     VARCHAR2,
10     x_rowid                             IN     VARCHAR2,
11     x_updater                           IN     VARCHAR2,
12     x_inst_type                         IN     VARCHAR2,
13     x_inst_short_name                   IN     VARCHAR2,
14     x_inst_name                         IN     VARCHAR2,
15     x_inst_full_name                    IN     VARCHAR2,
16     x_switchboard_tel_no                IN     VARCHAR2,
17     x_decision_cards                    IN     VARCHAR2,
18     x_record_cards                      IN     VARCHAR2,
19     x_labels                            IN     VARCHAR2,
20     x_weekly_mov_list_seq               IN     VARCHAR2,
21     x_weekly_mov_paging                 IN     VARCHAR2,
22     x_form_seq                          IN     VARCHAR2,
23     x_ebl_required                      IN     VARCHAR2,
24     x_ebl_media_1or2                    IN     VARCHAR2,
25     x_ebl_media_3                       IN     VARCHAR2,
26     x_ebl_1or2_merged                   IN     VARCHAR2,
27     x_ebl_1or2_board_group              IN     VARCHAR2,
28     x_ebl_3_board_group                 IN     VARCHAR2,
29     x_ebl_nc_app                        IN     VARCHAR2,
30     x_ebl_major_key1                    IN     VARCHAR2,
31     x_ebl_major_key2                    IN     VARCHAR2,
32     x_ebl_major_key3                    IN     VARCHAR2,
33     x_ebl_minor_key1                    IN     VARCHAR2,
34     x_ebl_minor_key2                    IN     VARCHAR2,
35     x_ebl_minor_key3                    IN     VARCHAR2,
36     x_ebl_final_key                     IN     VARCHAR2,
37     x_odl1                              IN     VARCHAR2,
38     x_odl1a                             IN     VARCHAR2,
39     x_odl2                              IN     VARCHAR2,
40     x_odl3                              IN     VARCHAR2,
41     x_odl_summer                        IN     VARCHAR2,
42     x_odl_route_b                       IN     VARCHAR2,
43     x_monthly_seq                       IN     VARCHAR2,
44     x_monthly_paper                     IN     VARCHAR2,
45     x_monthly_page                      IN     VARCHAR2,
46     x_monthly_type                      IN     VARCHAR2,
47     x_june_list_seq                     IN     VARCHAR2,
48     x_june_labels                       IN     VARCHAR2,
49     x_june_num_labels                   IN     VARCHAR2,
50     x_course_analysis                   IN     VARCHAR2,
51     x_campus_used                       IN     VARCHAR2,
52     x_d3_doc_required                   IN     VARCHAR2,
53     x_clearing_accept_copy_form         IN     VARCHAR2,
54     x_online_message                    IN     VARCHAR2,
55     x_ethnic_list_seq                   IN     VARCHAR2,
56     x_creation_date                     IN     DATE    ,
57     x_created_by                        IN     NUMBER  ,
58     x_last_update_date                  IN     DATE    ,
59     x_last_updated_by                   IN     NUMBER  ,
60     x_last_update_login                 IN     NUMBER   ,
61     x_starx				IN     VARCHAR2
62   ) AS
63   /*
64   ||  Created By : rgopalan
65   ||  Created On : 01-OCT-2001
66   ||  Purpose : Initialises the Old and New references for the columns of the table.
67   ||  Known limitations, enhancements or remarks :
68   ||  Change History :
69   ||  Who             When            What
70   || smaddali 10-jun-03  Obsoleting datetimestamp column for ucfd203 -multiple cycled build ,bug#2669208
71   ||  (reverse chronological order - newest change first)
72   */
73 
74     CURSOR cur_old_ref_values IS
75       SELECT   *
76       FROM     IGS_UC_INST_CONTROL
77       WHERE    rowid = x_rowid;
78 
79   BEGIN
80 
81     l_rowid := x_rowid;
82 
83     -- Code for setting the Old and New Reference Values.
84     -- Populate Old Values.
85     OPEN cur_old_ref_values;
86     FETCH cur_old_ref_values INTO old_references;
87     IF ((cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT'))) THEN
88       CLOSE cur_old_ref_values;
89       fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
90       igs_ge_msg_stack.add;
91       app_exception.raise_exception;
92       RETURN;
93     END IF;
94     CLOSE cur_old_ref_values;
95 
96     -- Populate New Values.
97     new_references.updater                           := x_updater;
98     new_references.inst_type                         := x_inst_type;
99     new_references.inst_short_name                   := x_inst_short_name;
100     new_references.inst_name                         := x_inst_name;
101     new_references.inst_full_name                    := x_inst_full_name;
102     new_references.switchboard_tel_no                := x_switchboard_tel_no;
103     new_references.decision_cards                    := x_decision_cards;
104     new_references.record_cards                      := x_record_cards;
105     new_references.labels                            := x_labels;
106     new_references.weekly_mov_list_seq               := x_weekly_mov_list_seq;
107     new_references.weekly_mov_paging                 := x_weekly_mov_paging;
108     new_references.form_seq                          := x_form_seq;
109     new_references.ebl_required                      := x_ebl_required;
110     new_references.ebl_media_1or2                    := x_ebl_media_1or2;
111     new_references.ebl_media_3                       := x_ebl_media_3;
112     new_references.ebl_1or2_merged                   := x_ebl_1or2_merged;
113     new_references.ebl_1or2_board_group              := x_ebl_1or2_board_group;
114     new_references.ebl_3_board_group                 := x_ebl_3_board_group;
115     new_references.ebl_nc_app                        := x_ebl_nc_app;
116     new_references.ebl_major_key1                    := x_ebl_major_key1;
117     new_references.ebl_major_key2                    := x_ebl_major_key2;
118     new_references.ebl_major_key3                    := x_ebl_major_key3;
119     new_references.ebl_minor_key1                    := x_ebl_minor_key1;
120     new_references.ebl_minor_key2                    := x_ebl_minor_key2;
121     new_references.ebl_minor_key3                    := x_ebl_minor_key3;
122     new_references.ebl_final_key                     := x_ebl_final_key;
123     new_references.odl1                              := x_odl1;
124     new_references.odl1a                             := x_odl1a;
125     new_references.odl2                              := x_odl2;
126     new_references.odl3                              := x_odl3;
127     new_references.odl_summer                        := x_odl_summer;
128     new_references.odl_route_b                       := x_odl_route_b;
129     new_references.monthly_seq                       := x_monthly_seq;
130     new_references.monthly_paper                     := x_monthly_paper;
131     new_references.monthly_page                      := x_monthly_page;
132     new_references.monthly_type                      := x_monthly_type;
133     new_references.june_list_seq                     := x_june_list_seq;
134     new_references.june_labels                       := x_june_labels;
135     new_references.june_num_labels                   := x_june_num_labels;
136     new_references.course_analysis                   := x_course_analysis;
137     new_references.campus_used                       := x_campus_used;
138     new_references.d3_doc_required                   := x_d3_doc_required;
139     new_references.clearing_accept_copy_form         := x_clearing_accept_copy_form;
140     new_references.online_message                    := x_online_message;
141     new_references.ethnic_list_seq                   := x_ethnic_list_seq;
142     new_references.starx			     := x_starx ;
143 
144     IF (p_action = 'UPDATE') THEN
145       new_references.creation_date                   := old_references.creation_date;
146       new_references.created_by                      := old_references.created_by;
147     ELSE
148       new_references.creation_date                   := x_creation_date;
149       new_references.created_by                      := x_created_by;
150     END IF;
151 
152     new_references.last_update_date                  := x_last_update_date;
153     new_references.last_updated_by                   := x_last_updated_by;
154     new_references.last_update_login                 := x_last_update_login;
155 
156   END set_column_values;
157 
158 
159   PROCEDURE before_dml (
160     p_action                            IN     VARCHAR2,
161     x_rowid                             IN     VARCHAR2,
162     x_updater                           IN     VARCHAR2,
163     x_inst_type                         IN     VARCHAR2,
164     x_inst_short_name                   IN     VARCHAR2,
165     x_inst_name                         IN     VARCHAR2,
166     x_inst_full_name                    IN     VARCHAR2,
167     x_switchboard_tel_no                IN     VARCHAR2,
168     x_decision_cards                    IN     VARCHAR2,
169     x_record_cards                      IN     VARCHAR2,
170     x_labels                            IN     VARCHAR2,
171     x_weekly_mov_list_seq               IN     VARCHAR2,
172     x_weekly_mov_paging                 IN     VARCHAR2,
173     x_form_seq                          IN     VARCHAR2,
174     x_ebl_required                      IN     VARCHAR2,
175     x_ebl_media_1or2                    IN     VARCHAR2,
176     x_ebl_media_3                       IN     VARCHAR2,
177     x_ebl_1or2_merged                   IN     VARCHAR2,
178     x_ebl_1or2_board_group              IN     VARCHAR2,
179     x_ebl_3_board_group                 IN     VARCHAR2,
180     x_ebl_nc_app                        IN     VARCHAR2,
181     x_ebl_major_key1                    IN     VARCHAR2,
182     x_ebl_major_key2                    IN     VARCHAR2,
183     x_ebl_major_key3                    IN     VARCHAR2,
184     x_ebl_minor_key1                    IN     VARCHAR2,
185     x_ebl_minor_key2                    IN     VARCHAR2,
186     x_ebl_minor_key3                    IN     VARCHAR2,
187     x_ebl_final_key                     IN     VARCHAR2,
188     x_odl1                              IN     VARCHAR2,
189     x_odl1a                             IN     VARCHAR2,
190     x_odl2                              IN     VARCHAR2,
191     x_odl3                              IN     VARCHAR2,
192     x_odl_summer                        IN     VARCHAR2,
193     x_odl_route_b                       IN     VARCHAR2,
194     x_monthly_seq                       IN     VARCHAR2,
195     x_monthly_paper                     IN     VARCHAR2,
196     x_monthly_page                      IN     VARCHAR2,
197     x_monthly_type                      IN     VARCHAR2,
198     x_june_list_seq                     IN     VARCHAR2,
199     x_june_labels                       IN     VARCHAR2,
200     x_june_num_labels                   IN     VARCHAR2,
201     x_course_analysis                   IN     VARCHAR2,
202     x_campus_used                       IN     VARCHAR2,
203     x_d3_doc_required                   IN     VARCHAR2,
204     x_clearing_accept_copy_form         IN     VARCHAR2,
205     x_online_message                    IN     VARCHAR2,
206     x_ethnic_list_seq                   IN     VARCHAR2,
207     x_creation_date                     IN     DATE    ,
208     x_created_by                        IN     NUMBER  ,
209     x_last_update_date                  IN     DATE    ,
210     x_last_updated_by                   IN     NUMBER  ,
211     x_last_update_login                 IN     NUMBER  ,
212     x_starx				IN     VARCHAR2
213   ) AS
214   /*
215   ||  Created By : rgopalan
216   ||  Created On : 01-OCT-2001
217   ||  Purpose : Initialises the columns, Checks Constraints, Calls the
218   ||            Trigger Handlers for the table, before any DML operation.
219   ||  Known limitations, enhancements or remarks :
220   ||  Change History :
221   ||  Who             When            What
222   || smaddali 10-jun-03  Obsoleting datetimestamp column for ucfd203 -multiple cycled build ,bug#2669208
223   ||  (reverse chronological order - newest change first)
224   */
225   BEGIN
226 
227     set_column_values (
228       p_action,
229       x_rowid,
230       x_updater,
234       x_inst_full_name,
231       x_inst_type,
232       x_inst_short_name,
233       x_inst_name,
235       x_switchboard_tel_no,
236       x_decision_cards,
237       x_record_cards,
238       x_labels,
239       x_weekly_mov_list_seq,
240       x_weekly_mov_paging,
241       x_form_seq,
242       x_ebl_required,
243       x_ebl_media_1or2,
244       x_ebl_media_3,
245       x_ebl_1or2_merged,
246       x_ebl_1or2_board_group,
247       x_ebl_3_board_group,
248       x_ebl_nc_app,
249       x_ebl_major_key1,
250       x_ebl_major_key2,
251       x_ebl_major_key3,
252       x_ebl_minor_key1,
253       x_ebl_minor_key2,
254       x_ebl_minor_key3,
255       x_ebl_final_key,
256       x_odl1,
257       x_odl1a,
258       x_odl2,
259       x_odl3,
260       x_odl_summer,
261       x_odl_route_b,
262       x_monthly_seq,
263       x_monthly_paper,
264       x_monthly_page,
265       x_monthly_type,
266       x_june_list_seq,
267       x_june_labels,
268       x_june_num_labels,
269       x_course_analysis,
270       x_campus_used,
271       x_d3_doc_required,
272       x_clearing_accept_copy_form,
273       x_online_message,
274       x_ethnic_list_seq,
275       x_creation_date,
276       x_created_by,
277       x_last_update_date,
278       x_last_updated_by,
279       x_last_update_login ,
280       x_starx
281     );
282 
283     IF (p_action = 'INSERT') THEN
284       -- Call all the procedures related to Before Insert.
285 
286 /* commented because theree is no primary key for this table */
287 /* rgopalan 1-OCT-2001 */
288 
289 /*      IF ( get_pk_for_validation(
290 
291            )
292          ) THEN
293         fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
294         igs_ge_msg_stack.add;
295         app_exception.raise_exception;
296       END IF;
297 */
298 		NULL;
299     ELSIF (p_action = 'VALIDATE_INSERT') THEN
300       -- Call all the procedures related to Before Insert.
301 /*      IF ( get_pk_for_validation (
302 
303            )
304          ) THEN
305         fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
306         igs_ge_msg_stack.add;
307         app_exception.raise_exception;
308       END IF;
309 */
310 	NULL;
311     END IF;
312 
313   END before_dml;
314 
315 
316   PROCEDURE insert_row (
317     x_rowid                             IN OUT NOCOPY VARCHAR2,
318     x_updater                           IN     VARCHAR2,
319     x_inst_type                         IN     VARCHAR2,
320     x_inst_short_name                   IN     VARCHAR2,
321     x_inst_name                         IN     VARCHAR2,
322     x_inst_full_name                    IN     VARCHAR2,
323     x_switchboard_tel_no                IN     VARCHAR2,
324     x_decision_cards                    IN     VARCHAR2,
325     x_record_cards                      IN     VARCHAR2,
326     x_labels                            IN     VARCHAR2,
327     x_weekly_mov_list_seq               IN     VARCHAR2,
328     x_weekly_mov_paging                 IN     VARCHAR2,
329     x_form_seq                          IN     VARCHAR2,
330     x_ebl_required                      IN     VARCHAR2,
331     x_ebl_media_1or2                    IN     VARCHAR2,
332     x_ebl_media_3                       IN     VARCHAR2,
333     x_ebl_1or2_merged                   IN     VARCHAR2,
334     x_ebl_1or2_board_group              IN     VARCHAR2,
335     x_ebl_3_board_group                 IN     VARCHAR2,
336     x_ebl_nc_app                        IN     VARCHAR2,
337     x_ebl_major_key1                    IN     VARCHAR2,
338     x_ebl_major_key2                    IN     VARCHAR2,
339     x_ebl_major_key3                    IN     VARCHAR2,
340     x_ebl_minor_key1                    IN     VARCHAR2,
341     x_ebl_minor_key2                    IN     VARCHAR2,
342     x_ebl_minor_key3                    IN     VARCHAR2,
343     x_ebl_final_key                     IN     VARCHAR2,
344     x_odl1                              IN     VARCHAR2,
345     x_odl1a                             IN     VARCHAR2,
346     x_odl2                              IN     VARCHAR2,
347     x_odl3                              IN     VARCHAR2,
348     x_odl_summer                        IN     VARCHAR2,
349     x_odl_route_b                       IN     VARCHAR2,
350     x_monthly_seq                       IN     VARCHAR2,
351     x_monthly_paper                     IN     VARCHAR2,
352     x_monthly_page                      IN     VARCHAR2,
353     x_monthly_type                      IN     VARCHAR2,
354     x_june_list_seq                     IN     VARCHAR2,
355     x_june_labels                       IN     VARCHAR2,
356     x_june_num_labels                   IN     VARCHAR2,
357     x_course_analysis                   IN     VARCHAR2,
358     x_campus_used                       IN     VARCHAR2,
359     x_d3_doc_required                   IN     VARCHAR2,
360     x_clearing_accept_copy_form         IN     VARCHAR2,
361     x_online_message                    IN     VARCHAR2,
362     x_ethnic_list_seq                   IN     VARCHAR2,
363     x_mode                              IN     VARCHAR2,
364     x_starx				IN     VARCHAR2
365   ) AS
366   /*
367   ||  Created By : rgopalan
368   ||  Created On : 01-OCT-2001
372   ||  Who             When            What
369   ||  Purpose : Handles the INSERT DML logic for the table.
370   ||  Known limitations, enhancements or remarks :
371   ||  Change History :
373   || smaddali 10-jun-03  Obsoleting datetimestamp column for ucfd203 -multiple cycled build ,bug#2669208
374   ||  (reverse chronological order - newest change first)
375   */
376     CURSOR c IS
377       SELECT   rowid
378       FROM     igs_uc_inst_control;
379 
380 
381     x_last_update_date           DATE;
382     x_last_updated_by            NUMBER;
383     x_last_update_login          NUMBER;
384 
385   BEGIN
386 
387     x_last_update_date := SYSDATE;
388     IF (x_mode = 'I') THEN
389       x_last_updated_by := 1;
390       x_last_update_login := 0;
391     ELSIF (x_mode = 'R') THEN
392       x_last_updated_by := fnd_global.user_id;
393       IF (x_last_updated_by IS NULL) THEN
394         x_last_updated_by := -1;
395       END IF;
396       x_last_update_login := fnd_global.login_id;
397       IF (x_last_update_login IS NULL) THEN
398         x_last_update_login := -1;
399       END IF;
400     ELSE
401       fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
402       igs_ge_msg_stack.add;
403       app_exception.raise_exception;
404     END IF;
405 
406     before_dml(
407       p_action                            => 'INSERT',
408       x_rowid                             => x_rowid,
409       x_updater                           => x_updater,
410       x_inst_type                         => x_inst_type,
411       x_inst_short_name                   => x_inst_short_name,
412       x_inst_name                         => x_inst_name,
413       x_inst_full_name                    => x_inst_full_name,
414       x_switchboard_tel_no                => x_switchboard_tel_no,
415       x_decision_cards                    => x_decision_cards,
416       x_record_cards                      => x_record_cards,
417       x_labels                            => x_labels,
418       x_weekly_mov_list_seq               => x_weekly_mov_list_seq,
419       x_weekly_mov_paging                 => x_weekly_mov_paging,
420       x_form_seq                          => x_form_seq,
421       x_ebl_required                      => x_ebl_required,
422       x_ebl_media_1or2                    => x_ebl_media_1or2,
423       x_ebl_media_3                       => x_ebl_media_3,
424       x_ebl_1or2_merged                   => x_ebl_1or2_merged,
425       x_ebl_1or2_board_group              => x_ebl_1or2_board_group,
426       x_ebl_3_board_group                 => x_ebl_3_board_group,
427       x_ebl_nc_app                        => x_ebl_nc_app,
428       x_ebl_major_key1                    => x_ebl_major_key1,
429       x_ebl_major_key2                    => x_ebl_major_key2,
430       x_ebl_major_key3                    => x_ebl_major_key3,
431       x_ebl_minor_key1                    => x_ebl_minor_key1,
432       x_ebl_minor_key2                    => x_ebl_minor_key2,
433       x_ebl_minor_key3                    => x_ebl_minor_key3,
434       x_ebl_final_key                     => x_ebl_final_key,
435       x_odl1                              => x_odl1,
436       x_odl1a                             => x_odl1a,
437       x_odl2                              => x_odl2,
438       x_odl3                              => x_odl3,
439       x_odl_summer                        => x_odl_summer,
440       x_odl_route_b                       => x_odl_route_b,
441       x_monthly_seq                       => x_monthly_seq,
442       x_monthly_paper                     => x_monthly_paper,
443       x_monthly_page                      => x_monthly_page,
444       x_monthly_type                      => x_monthly_type,
445       x_june_list_seq                     => x_june_list_seq,
446       x_june_labels                       => x_june_labels,
447       x_june_num_labels                   => x_june_num_labels,
448       x_course_analysis                   => x_course_analysis,
449       x_campus_used                       => x_campus_used,
450       x_d3_doc_required                   => x_d3_doc_required,
451       x_clearing_accept_copy_form         => x_clearing_accept_copy_form,
452       x_online_message                    => x_online_message,
453       x_ethnic_list_seq                   => x_ethnic_list_seq,
454       x_creation_date                     => x_last_update_date,
455       x_created_by                        => x_last_updated_by,
456       x_last_update_date                  => x_last_update_date,
457       x_last_updated_by                   => x_last_updated_by,
458       x_last_update_login                 => x_last_update_login ,
459       x_starx				  => x_starx
460     );
461 
462     INSERT INTO igs_uc_inst_control (
463       updater,
464       inst_type,
465       inst_short_name,
466       inst_name,
467       inst_full_name,
468       switchboard_tel_no,
469       decision_cards,
470       record_cards,
471       labels,
472       weekly_mov_list_seq,
473       weekly_mov_paging,
474       form_seq,
475       ebl_required,
476       ebl_media_1or2,
477       ebl_media_3,
478       ebl_1or2_merged,
479       ebl_1or2_board_group,
480       ebl_3_board_group,
481       ebl_nc_app,
482       ebl_major_key1,
483       ebl_major_key2,
484       ebl_major_key3,
485       ebl_minor_key1,
486       ebl_minor_key2,
487       ebl_minor_key3,
488       ebl_final_key,
489       odl1,
490       odl1a,
491       odl2,
492       odl3,
493       odl_summer,
497       monthly_page,
494       odl_route_b,
495       monthly_seq,
496       monthly_paper,
498       monthly_type,
499       june_list_seq,
500       june_labels,
501       june_num_labels,
502       course_analysis,
503       campus_used,
504       d3_doc_required,
505       clearing_accept_copy_form,
506       online_message,
507       ethnic_list_seq,
508       creation_date,
509       created_by,
510       last_update_date,
511       last_updated_by,
512       last_update_login,
513       starx
514     ) VALUES (
515       new_references.updater,
516       new_references.inst_type,
517       new_references.inst_short_name,
518       new_references.inst_name,
519       new_references.inst_full_name,
520       new_references.switchboard_tel_no,
521       new_references.decision_cards,
522       new_references.record_cards,
523       new_references.labels,
524       new_references.weekly_mov_list_seq,
525       new_references.weekly_mov_paging,
526       new_references.form_seq,
527       new_references.ebl_required,
528       new_references.ebl_media_1or2,
529       new_references.ebl_media_3,
530       new_references.ebl_1or2_merged,
531       new_references.ebl_1or2_board_group,
532       new_references.ebl_3_board_group,
533       new_references.ebl_nc_app,
534       new_references.ebl_major_key1,
535       new_references.ebl_major_key2,
536       new_references.ebl_major_key3,
537       new_references.ebl_minor_key1,
538       new_references.ebl_minor_key2,
539       new_references.ebl_minor_key3,
540       new_references.ebl_final_key,
541       new_references.odl1,
542       new_references.odl1a,
543       new_references.odl2,
544       new_references.odl3,
545       new_references.odl_summer,
546       new_references.odl_route_b,
547       new_references.monthly_seq,
548       new_references.monthly_paper,
549       new_references.monthly_page,
550       new_references.monthly_type,
551       new_references.june_list_seq,
552       new_references.june_labels,
553       new_references.june_num_labels,
554       new_references.course_analysis,
555       new_references.campus_used,
556       new_references.d3_doc_required,
557       new_references.clearing_accept_copy_form,
558       new_references.online_message,
559       new_references.ethnic_list_seq,
560       x_last_update_date,
561       x_last_updated_by,
562       x_last_update_date,
563       x_last_updated_by,
564       x_last_update_login ,
565       new_references.starx
566     );
567 
568     OPEN c;
569     FETCH c INTO x_rowid;
570     IF (c%NOTFOUND) THEN
571       CLOSE c;
572       RAISE NO_DATA_FOUND;
573     END IF;
574     CLOSE c;
575 
576   END insert_row;
577 
578 
579   PROCEDURE lock_row (
580     x_rowid                             IN     VARCHAR2,
581     x_updater                           IN     VARCHAR2,
582     x_inst_type                         IN     VARCHAR2,
583     x_inst_short_name                   IN     VARCHAR2,
584     x_inst_name                         IN     VARCHAR2,
585     x_inst_full_name                    IN     VARCHAR2,
586     x_switchboard_tel_no                IN     VARCHAR2,
587     x_decision_cards                    IN     VARCHAR2,
588     x_record_cards                      IN     VARCHAR2,
589     x_labels                            IN     VARCHAR2,
590     x_weekly_mov_list_seq               IN     VARCHAR2,
591     x_weekly_mov_paging                 IN     VARCHAR2,
592     x_form_seq                          IN     VARCHAR2,
593     x_ebl_required                      IN     VARCHAR2,
594     x_ebl_media_1or2                    IN     VARCHAR2,
595     x_ebl_media_3                       IN     VARCHAR2,
596     x_ebl_1or2_merged                   IN     VARCHAR2,
597     x_ebl_1or2_board_group              IN     VARCHAR2,
598     x_ebl_3_board_group                 IN     VARCHAR2,
599     x_ebl_nc_app                        IN     VARCHAR2,
600     x_ebl_major_key1                    IN     VARCHAR2,
601     x_ebl_major_key2                    IN     VARCHAR2,
602     x_ebl_major_key3                    IN     VARCHAR2,
603     x_ebl_minor_key1                    IN     VARCHAR2,
604     x_ebl_minor_key2                    IN     VARCHAR2,
605     x_ebl_minor_key3                    IN     VARCHAR2,
606     x_ebl_final_key                     IN     VARCHAR2,
607     x_odl1                              IN     VARCHAR2,
608     x_odl1a                             IN     VARCHAR2,
609     x_odl2                              IN     VARCHAR2,
610     x_odl3                              IN     VARCHAR2,
611     x_odl_summer                        IN     VARCHAR2,
612     x_odl_route_b                       IN     VARCHAR2,
613     x_monthly_seq                       IN     VARCHAR2,
614     x_monthly_paper                     IN     VARCHAR2,
615     x_monthly_page                      IN     VARCHAR2,
616     x_monthly_type                      IN     VARCHAR2,
617     x_june_list_seq                     IN     VARCHAR2,
618     x_june_labels                       IN     VARCHAR2,
619     x_june_num_labels                   IN     VARCHAR2,
620     x_course_analysis                   IN     VARCHAR2,
621     x_campus_used                       IN     VARCHAR2,
625     x_ethnic_list_seq                   IN     VARCHAR2,
622     x_d3_doc_required                   IN     VARCHAR2,
623     x_clearing_accept_copy_form         IN     VARCHAR2,
624     x_online_message                    IN     VARCHAR2,
626     x_starx				IN     VARCHAR2
627   ) AS
628   /*
629   ||  Created By : rgopalan
630   ||  Created On : 01-OCT-2001
631   ||  Purpose : Handles the LOCK mechanism for the table.
632   ||  Known limitations, enhancements or remarks :
633   ||  Change History :
634   ||  Who             When            What
635   || smaddali 10-jun-03  Obsoleting datetimestamp column for ucfd203 -multiple cycled build ,bug#2669208
636   ||  (reverse chronological order - newest change first)
637   */
638     CURSOR c1 IS
639       SELECT
640         updater,
641         inst_type,
642         inst_short_name,
643         inst_name,
644         inst_full_name,
645         switchboard_tel_no,
646         decision_cards,
647         record_cards,
648         labels,
649         weekly_mov_list_seq,
650         weekly_mov_paging,
651         form_seq,
652         ebl_required,
653         ebl_media_1or2,
654         ebl_media_3,
655         ebl_1or2_merged,
656         ebl_1or2_board_group,
657         ebl_3_board_group,
658         ebl_nc_app,
659         ebl_major_key1,
660         ebl_major_key2,
661         ebl_major_key3,
662         ebl_minor_key1,
663         ebl_minor_key2,
664         ebl_minor_key3,
665         ebl_final_key,
666         odl1,
667         odl1a,
668         odl2,
669         odl3,
670         odl_summer,
671         odl_route_b,
672         monthly_seq,
673         monthly_paper,
674         monthly_page,
675         monthly_type,
676         june_list_seq,
677         june_labels,
678         june_num_labels,
679         course_analysis,
680         campus_used,
681         d3_doc_required,
682         clearing_accept_copy_form,
683         online_message,
684         ethnic_list_seq,
685 	starx
686       FROM  igs_uc_inst_control
687       WHERE rowid = x_rowid
688       FOR UPDATE NOWAIT;
689 
690     tlinfo c1%ROWTYPE;
691 
692   BEGIN
693 
694     OPEN c1;
695     FETCH c1 INTO tlinfo;
696     IF (c1%notfound) THEN
697       fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
698       igs_ge_msg_stack.add;
699       CLOSE c1;
700       app_exception.raise_exception;
701       RETURN;
702     END IF;
703     CLOSE c1;
704 
705     IF (
706         (tlinfo.updater = x_updater)
707         AND (tlinfo.inst_type = x_inst_type)
708         AND ((tlinfo.inst_short_name = x_inst_short_name) OR ((tlinfo.inst_short_name IS NULL) AND (X_inst_short_name IS NULL)))
709         AND ((tlinfo.inst_name = x_inst_name) OR ((tlinfo.inst_name IS NULL) AND (X_inst_name IS NULL)))
710         AND ((tlinfo.inst_full_name = x_inst_full_name) OR ((tlinfo.inst_full_name IS NULL) AND (X_inst_full_name IS NULL)))
711         AND ((tlinfo.switchboard_tel_no = x_switchboard_tel_no) OR ((tlinfo.switchboard_tel_no IS NULL) AND (X_switchboard_tel_no IS NULL)))
712         AND ((tlinfo.decision_cards = x_decision_cards) OR ((tlinfo.decision_cards IS NULL) AND (X_decision_cards IS NULL)))
713         AND ((tlinfo.record_cards = x_record_cards) OR ((tlinfo.record_cards IS NULL) AND (X_record_cards IS NULL)))
714         AND ((tlinfo.labels = x_labels) OR ((tlinfo.labels IS NULL) AND (X_labels IS NULL)))
715         AND ((tlinfo.weekly_mov_list_seq = x_weekly_mov_list_seq) OR ((tlinfo.weekly_mov_list_seq IS NULL) AND (X_weekly_mov_list_seq IS NULL)))
716         AND ((tlinfo.weekly_mov_paging = x_weekly_mov_paging) OR ((tlinfo.weekly_mov_paging IS NULL) AND (X_weekly_mov_paging IS NULL)))
717         AND ((tlinfo.form_seq = x_form_seq) OR ((tlinfo.form_seq IS NULL) AND (X_form_seq IS NULL)))
718         AND ((tlinfo.ebl_required = x_ebl_required) OR ((tlinfo.ebl_required IS NULL) AND (X_ebl_required IS NULL)))
719         AND ((tlinfo.ebl_media_1or2 = x_ebl_media_1or2) OR ((tlinfo.ebl_media_1or2 IS NULL) AND (X_ebl_media_1or2 IS NULL)))
720         AND ((tlinfo.ebl_media_3 = x_ebl_media_3) OR ((tlinfo.ebl_media_3 IS NULL) AND (X_ebl_media_3 IS NULL)))
721         AND ((tlinfo.ebl_1or2_merged = x_ebl_1or2_merged) OR ((tlinfo.ebl_1or2_merged IS NULL) AND (X_ebl_1or2_merged IS NULL)))
722         AND ((tlinfo.ebl_1or2_board_group = x_ebl_1or2_board_group) OR ((tlinfo.ebl_1or2_board_group IS NULL) AND (X_ebl_1or2_board_group IS NULL)))
723         AND ((tlinfo.ebl_3_board_group = x_ebl_3_board_group) OR ((tlinfo.ebl_3_board_group IS NULL) AND (X_ebl_3_board_group IS NULL)))
724         AND ((tlinfo.ebl_nc_app = x_ebl_nc_app) OR ((tlinfo.ebl_nc_app IS NULL) AND (X_ebl_nc_app IS NULL)))
725         AND ((tlinfo.ebl_major_key1 = x_ebl_major_key1) OR ((tlinfo.ebl_major_key1 IS NULL) AND (X_ebl_major_key1 IS NULL)))
726         AND ((tlinfo.ebl_major_key2 = x_ebl_major_key2) OR ((tlinfo.ebl_major_key2 IS NULL) AND (X_ebl_major_key2 IS NULL)))
727         AND ((tlinfo.ebl_major_key3 = x_ebl_major_key3) OR ((tlinfo.ebl_major_key3 IS NULL) AND (X_ebl_major_key3 IS NULL)))
728         AND ((tlinfo.ebl_minor_key1 = x_ebl_minor_key1) OR ((tlinfo.ebl_minor_key1 IS NULL) AND (X_ebl_minor_key1 IS NULL)))
729         AND ((tlinfo.ebl_minor_key2 = x_ebl_minor_key2) OR ((tlinfo.ebl_minor_key2 IS NULL) AND (X_ebl_minor_key2 IS NULL)))
730         AND ((tlinfo.ebl_minor_key3 = x_ebl_minor_key3) OR ((tlinfo.ebl_minor_key3 IS NULL) AND (X_ebl_minor_key3 IS NULL)))
734         AND ((tlinfo.odl2 = x_odl2) OR ((tlinfo.odl2 IS NULL) AND (X_odl2 IS NULL)))
731         AND ((tlinfo.ebl_final_key = x_ebl_final_key) OR ((tlinfo.ebl_final_key IS NULL) AND (X_ebl_final_key IS NULL)))
732         AND ((tlinfo.odl1 = x_odl1) OR ((tlinfo.odl1 IS NULL) AND (X_odl1 IS NULL)))
733         AND ((tlinfo.odl1a = x_odl1a) OR ((tlinfo.odl1a IS NULL) AND (X_odl1a IS NULL)))
735         AND ((tlinfo.odl3 = x_odl3) OR ((tlinfo.odl3 IS NULL) AND (X_odl3 IS NULL)))
736         AND ((tlinfo.odl_summer = x_odl_summer) OR ((tlinfo.odl_summer IS NULL) AND (X_odl_summer IS NULL)))
737         AND ((tlinfo.odl_route_b = x_odl_route_b) OR ((tlinfo.odl_route_b IS NULL) AND (X_odl_route_b IS NULL)))
738         AND ((tlinfo.monthly_seq = x_monthly_seq) OR ((tlinfo.monthly_seq IS NULL) AND (X_monthly_seq IS NULL)))
739         AND ((tlinfo.monthly_paper = x_monthly_paper) OR ((tlinfo.monthly_paper IS NULL) AND (X_monthly_paper IS NULL)))
740         AND ((tlinfo.monthly_page = x_monthly_page) OR ((tlinfo.monthly_page IS NULL) AND (X_monthly_page IS NULL)))
741         AND ((tlinfo.monthly_type = x_monthly_type) OR ((tlinfo.monthly_type IS NULL) AND (X_monthly_type IS NULL)))
742         AND ((tlinfo.june_list_seq = x_june_list_seq) OR ((tlinfo.june_list_seq IS NULL) AND (X_june_list_seq IS NULL)))
743         AND ((tlinfo.june_labels = x_june_labels) OR ((tlinfo.june_labels IS NULL) AND (X_june_labels IS NULL)))
744         AND ((tlinfo.june_num_labels = x_june_num_labels) OR ((tlinfo.june_num_labels IS NULL) AND (X_june_num_labels IS NULL)))
745         AND ((tlinfo.course_analysis = x_course_analysis) OR ((tlinfo.course_analysis IS NULL) AND (X_course_analysis IS NULL)))
746         AND ((tlinfo.campus_used = x_campus_used) OR ((tlinfo.campus_used IS NULL) AND (X_campus_used IS NULL)))
747         AND ((tlinfo.d3_doc_required = x_d3_doc_required) OR ((tlinfo.d3_doc_required IS NULL) AND (X_d3_doc_required IS NULL)))
748         AND ((tlinfo.clearing_accept_copy_form = x_clearing_accept_copy_form) OR ((tlinfo.clearing_accept_copy_form IS NULL) AND (X_clearing_accept_copy_form IS NULL)))
749         AND ((tlinfo.online_message = x_online_message) OR ((tlinfo.online_message IS NULL) AND (X_online_message IS NULL)))
750         AND ((tlinfo.ethnic_list_seq = x_ethnic_list_seq) OR ((tlinfo.ethnic_list_seq IS NULL) AND (X_ethnic_list_seq IS NULL)))
751         AND ((tlinfo.starx = x_starx) OR ((tlinfo.starx IS NULL) AND (X_starx IS NULL)))
752        ) THEN
753       NULL;
754     ELSE
755       fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
756       igs_ge_msg_stack.add;
757       app_exception.raise_exception;
758     END IF;
759 
760     RETURN;
761 
762   END lock_row;
763 
764 
765   PROCEDURE update_row (
766     x_rowid                             IN     VARCHAR2,
767     x_updater                           IN     VARCHAR2,
768     x_inst_type                         IN     VARCHAR2,
769     x_inst_short_name                   IN     VARCHAR2,
770     x_inst_name                         IN     VARCHAR2,
771     x_inst_full_name                    IN     VARCHAR2,
772     x_switchboard_tel_no                IN     VARCHAR2,
773     x_decision_cards                    IN     VARCHAR2,
774     x_record_cards                      IN     VARCHAR2,
775     x_labels                            IN     VARCHAR2,
776     x_weekly_mov_list_seq               IN     VARCHAR2,
777     x_weekly_mov_paging                 IN     VARCHAR2,
778     x_form_seq                          IN     VARCHAR2,
779     x_ebl_required                      IN     VARCHAR2,
780     x_ebl_media_1or2                    IN     VARCHAR2,
781     x_ebl_media_3                       IN     VARCHAR2,
782     x_ebl_1or2_merged                   IN     VARCHAR2,
783     x_ebl_1or2_board_group              IN     VARCHAR2,
784     x_ebl_3_board_group                 IN     VARCHAR2,
785     x_ebl_nc_app                        IN     VARCHAR2,
786     x_ebl_major_key1                    IN     VARCHAR2,
787     x_ebl_major_key2                    IN     VARCHAR2,
788     x_ebl_major_key3                    IN     VARCHAR2,
789     x_ebl_minor_key1                    IN     VARCHAR2,
790     x_ebl_minor_key2                    IN     VARCHAR2,
791     x_ebl_minor_key3                    IN     VARCHAR2,
792     x_ebl_final_key                     IN     VARCHAR2,
793     x_odl1                              IN     VARCHAR2,
794     x_odl1a                             IN     VARCHAR2,
795     x_odl2                              IN     VARCHAR2,
796     x_odl3                              IN     VARCHAR2,
797     x_odl_summer                        IN     VARCHAR2,
798     x_odl_route_b                       IN     VARCHAR2,
799     x_monthly_seq                       IN     VARCHAR2,
800     x_monthly_paper                     IN     VARCHAR2,
801     x_monthly_page                      IN     VARCHAR2,
802     x_monthly_type                      IN     VARCHAR2,
803     x_june_list_seq                     IN     VARCHAR2,
804     x_june_labels                       IN     VARCHAR2,
805     x_june_num_labels                   IN     VARCHAR2,
806     x_course_analysis                   IN     VARCHAR2,
807     x_campus_used                       IN     VARCHAR2,
808     x_d3_doc_required                   IN     VARCHAR2,
809     x_clearing_accept_copy_form         IN     VARCHAR2,
810     x_online_message                    IN     VARCHAR2,
811     x_ethnic_list_seq                   IN     VARCHAR2,
812     x_mode                              IN     VARCHAR2,
813     x_starx				IN     VARCHAR2
814   ) AS
815   /*
816   ||  Created By : rgopalan
817   ||  Created On : 01-OCT-2001
821   ||  Who             When            What
818   ||  Purpose : Handles the UPDATE DML logic for the table.
819   ||  Known limitations, enhancements or remarks :
820   ||  Change History :
822   || smaddali 10-jun-03  Obsoleting datetimestamp column for ucfd203 -multiple cycled build ,bug#2669208
823   ||  (reverse chronological order - newest change first)
824   */
825     x_last_update_date           DATE ;
826     x_last_updated_by            NUMBER;
827     x_last_update_login          NUMBER;
828 
829   BEGIN
830 
831     x_last_update_date := SYSDATE;
832     IF (X_MODE = 'I') THEN
833       x_last_updated_by := 1;
834       x_last_update_login := 0;
835     ELSIF (x_mode = 'R') THEN
836       x_last_updated_by := fnd_global.user_id;
837       IF x_last_updated_by IS NULL THEN
838         x_last_updated_by := -1;
839       END IF;
840       x_last_update_login := fnd_global.login_id;
841       IF (x_last_update_login IS NULL) THEN
842         x_last_update_login := -1;
843       END IF;
844     ELSE
845       fnd_message.set_name( 'FND', 'SYSTEM-INVALID ARGS');
846       igs_ge_msg_stack.add;
847       app_exception.raise_exception;
848     END IF;
849 
850     before_dml(
851       p_action                            => 'UPDATE',
852       x_rowid                             => x_rowid,
853       x_updater                           => x_updater,
854       x_inst_type                         => x_inst_type,
855       x_inst_short_name                   => x_inst_short_name,
856       x_inst_name                         => x_inst_name,
857       x_inst_full_name                    => x_inst_full_name,
858       x_switchboard_tel_no                => x_switchboard_tel_no,
859       x_decision_cards                    => x_decision_cards,
860       x_record_cards                      => x_record_cards,
861       x_labels                            => x_labels,
862       x_weekly_mov_list_seq               => x_weekly_mov_list_seq,
863       x_weekly_mov_paging                 => x_weekly_mov_paging,
864       x_form_seq                          => x_form_seq,
865       x_ebl_required                      => x_ebl_required,
866       x_ebl_media_1or2                    => x_ebl_media_1or2,
867       x_ebl_media_3                       => x_ebl_media_3,
868       x_ebl_1or2_merged                   => x_ebl_1or2_merged,
869       x_ebl_1or2_board_group              => x_ebl_1or2_board_group,
870       x_ebl_3_board_group                 => x_ebl_3_board_group,
871       x_ebl_nc_app                        => x_ebl_nc_app,
872       x_ebl_major_key1                    => x_ebl_major_key1,
873       x_ebl_major_key2                    => x_ebl_major_key2,
874       x_ebl_major_key3                    => x_ebl_major_key3,
875       x_ebl_minor_key1                    => x_ebl_minor_key1,
876       x_ebl_minor_key2                    => x_ebl_minor_key2,
877       x_ebl_minor_key3                    => x_ebl_minor_key3,
878       x_ebl_final_key                     => x_ebl_final_key,
879       x_odl1                              => x_odl1,
880       x_odl1a                             => x_odl1a,
881       x_odl2                              => x_odl2,
882       x_odl3                              => x_odl3,
883       x_odl_summer                        => x_odl_summer,
884       x_odl_route_b                       => x_odl_route_b,
885       x_monthly_seq                       => x_monthly_seq,
886       x_monthly_paper                     => x_monthly_paper,
887       x_monthly_page                      => x_monthly_page,
888       x_monthly_type                      => x_monthly_type,
889       x_june_list_seq                     => x_june_list_seq,
890       x_june_labels                       => x_june_labels,
891       x_june_num_labels                   => x_june_num_labels,
892       x_course_analysis                   => x_course_analysis,
893       x_campus_used                       => x_campus_used,
894       x_d3_doc_required                   => x_d3_doc_required,
895       x_clearing_accept_copy_form         => x_clearing_accept_copy_form,
896       x_online_message                    => x_online_message,
897       x_ethnic_list_seq                   => x_ethnic_list_seq,
898       x_creation_date                     => x_last_update_date,
899       x_created_by                        => x_last_updated_by,
900       x_last_update_date                  => x_last_update_date,
901       x_last_updated_by                   => x_last_updated_by,
902       x_last_update_login                 => x_last_update_login ,
903       x_starx				  => x_starx
904     );
905 
906     UPDATE igs_uc_inst_control
907       SET
908         updater                           = new_references.updater,
909         inst_type                         = new_references.inst_type,
910         inst_short_name                   = new_references.inst_short_name,
911         inst_name                         = new_references.inst_name,
912         inst_full_name                    = new_references.inst_full_name,
913         switchboard_tel_no                = new_references.switchboard_tel_no,
914         decision_cards                    = new_references.decision_cards,
915         record_cards                      = new_references.record_cards,
916         labels                            = new_references.labels,
917         weekly_mov_list_seq               = new_references.weekly_mov_list_seq,
918         weekly_mov_paging                 = new_references.weekly_mov_paging,
922         ebl_media_3                       = new_references.ebl_media_3,
919         form_seq                          = new_references.form_seq,
920         ebl_required                      = new_references.ebl_required,
921         ebl_media_1or2                    = new_references.ebl_media_1or2,
923         ebl_1or2_merged                   = new_references.ebl_1or2_merged,
924         ebl_1or2_board_group              = new_references.ebl_1or2_board_group,
925         ebl_3_board_group                 = new_references.ebl_3_board_group,
926         ebl_nc_app                        = new_references.ebl_nc_app,
927         ebl_major_key1                    = new_references.ebl_major_key1,
928         ebl_major_key2                    = new_references.ebl_major_key2,
929         ebl_major_key3                    = new_references.ebl_major_key3,
930         ebl_minor_key1                    = new_references.ebl_minor_key1,
931         ebl_minor_key2                    = new_references.ebl_minor_key2,
932         ebl_minor_key3                    = new_references.ebl_minor_key3,
933         ebl_final_key                     = new_references.ebl_final_key,
934         odl1                              = new_references.odl1,
935         odl1a                             = new_references.odl1a,
936         odl2                              = new_references.odl2,
937         odl3                              = new_references.odl3,
938         odl_summer                        = new_references.odl_summer,
939         odl_route_b                       = new_references.odl_route_b,
940         monthly_seq                       = new_references.monthly_seq,
941         monthly_paper                     = new_references.monthly_paper,
942         monthly_page                      = new_references.monthly_page,
943         monthly_type                      = new_references.monthly_type,
944         june_list_seq                     = new_references.june_list_seq,
945         june_labels                       = new_references.june_labels,
946         june_num_labels                   = new_references.june_num_labels,
947         course_analysis                   = new_references.course_analysis,
948         campus_used                       = new_references.campus_used,
949         d3_doc_required                   = new_references.d3_doc_required,
950         clearing_accept_copy_form         = new_references.clearing_accept_copy_form,
951         online_message                    = new_references.online_message,
952         ethnic_list_seq                   = new_references.ethnic_list_seq,
953         last_update_date                  = x_last_update_date,
954         last_updated_by                   = x_last_updated_by,
955         last_update_login                 = x_last_update_login ,
956 	starx				  = x_starx
957       WHERE rowid = x_rowid;
958 
959     IF (SQL%NOTFOUND) THEN
960       RAISE NO_DATA_FOUND;
961     END IF;
962 
963   END update_row;
964 
965 
966   PROCEDURE add_row (
967     x_rowid                             IN OUT NOCOPY VARCHAR2,
968     x_updater                           IN     VARCHAR2,
969     x_inst_type                         IN     VARCHAR2,
970     x_inst_short_name                   IN     VARCHAR2,
971     x_inst_name                         IN     VARCHAR2,
972     x_inst_full_name                    IN     VARCHAR2,
973     x_switchboard_tel_no                IN     VARCHAR2,
974     x_decision_cards                    IN     VARCHAR2,
975     x_record_cards                      IN     VARCHAR2,
976     x_labels                            IN     VARCHAR2,
977     x_weekly_mov_list_seq               IN     VARCHAR2,
978     x_weekly_mov_paging                 IN     VARCHAR2,
979     x_form_seq                          IN     VARCHAR2,
980     x_ebl_required                      IN     VARCHAR2,
981     x_ebl_media_1or2                    IN     VARCHAR2,
982     x_ebl_media_3                       IN     VARCHAR2,
983     x_ebl_1or2_merged                   IN     VARCHAR2,
984     x_ebl_1or2_board_group              IN     VARCHAR2,
985     x_ebl_3_board_group                 IN     VARCHAR2,
986     x_ebl_nc_app                        IN     VARCHAR2,
987     x_ebl_major_key1                    IN     VARCHAR2,
988     x_ebl_major_key2                    IN     VARCHAR2,
989     x_ebl_major_key3                    IN     VARCHAR2,
990     x_ebl_minor_key1                    IN     VARCHAR2,
991     x_ebl_minor_key2                    IN     VARCHAR2,
992     x_ebl_minor_key3                    IN     VARCHAR2,
993     x_ebl_final_key                     IN     VARCHAR2,
994     x_odl1                              IN     VARCHAR2,
995     x_odl1a                             IN     VARCHAR2,
996     x_odl2                              IN     VARCHAR2,
997     x_odl3                              IN     VARCHAR2,
998     x_odl_summer                        IN     VARCHAR2,
999     x_odl_route_b                       IN     VARCHAR2,
1000     x_monthly_seq                       IN     VARCHAR2,
1001     x_monthly_paper                     IN     VARCHAR2,
1002     x_monthly_page                      IN     VARCHAR2,
1003     x_monthly_type                      IN     VARCHAR2,
1004     x_june_list_seq                     IN     VARCHAR2,
1005     x_june_labels                       IN     VARCHAR2,
1006     x_june_num_labels                   IN     VARCHAR2,
1007     x_course_analysis                   IN     VARCHAR2,
1008     x_campus_used                       IN     VARCHAR2,
1009     x_d3_doc_required                   IN     VARCHAR2,
1010     x_clearing_accept_copy_form         IN     VARCHAR2,
1011     x_online_message                    IN     VARCHAR2,
1012     x_ethnic_list_seq                   IN     VARCHAR2,
1013     x_mode                              IN     VARCHAR2,
1017   ||  Created By : rgopalan
1014     x_starx				IN     VARCHAR2
1015   ) AS
1016   /*
1018   ||  Created On : 01-OCT-2001
1019   ||  Purpose : Adds a row if there is no existing row, otherwise updates existing row in the table.
1020   ||  Known limitations, enhancements or remarks :
1021   ||  Change History :
1022   ||  Who             When            What
1023   || smaddali 10-jun-03  Obsoleting datetimestamp column for ucfd203 -multiple cycled build ,bug#2669208
1024   ||  (reverse chronological order - newest change first)
1025   */
1026     CURSOR c1 IS
1027       SELECT   rowid
1028       FROM     igs_uc_inst_control;
1029 
1030 
1031   BEGIN
1032 
1033     OPEN c1;
1034     FETCH c1 INTO x_rowid;
1035     IF (c1%NOTFOUND) THEN
1036       CLOSE c1;
1037 
1038       insert_row (
1039         x_rowid,
1040         x_updater,
1041         x_inst_type,
1042         x_inst_short_name,
1043         x_inst_name,
1044         x_inst_full_name,
1045         x_switchboard_tel_no,
1046         x_decision_cards,
1047         x_record_cards,
1048         x_labels,
1049         x_weekly_mov_list_seq,
1050         x_weekly_mov_paging,
1051         x_form_seq,
1052         x_ebl_required,
1053         x_ebl_media_1or2,
1054         x_ebl_media_3,
1055         x_ebl_1or2_merged,
1056         x_ebl_1or2_board_group,
1057         x_ebl_3_board_group,
1058         x_ebl_nc_app,
1059         x_ebl_major_key1,
1060         x_ebl_major_key2,
1061         x_ebl_major_key3,
1062         x_ebl_minor_key1,
1063         x_ebl_minor_key2,
1064         x_ebl_minor_key3,
1065         x_ebl_final_key,
1066         x_odl1,
1067         x_odl1a,
1068         x_odl2,
1069         x_odl3,
1070         x_odl_summer,
1071         x_odl_route_b,
1072         x_monthly_seq,
1073         x_monthly_paper,
1074         x_monthly_page,
1075         x_monthly_type,
1076         x_june_list_seq,
1077         x_june_labels,
1078         x_june_num_labels,
1079         x_course_analysis,
1080         x_campus_used,
1081         x_d3_doc_required,
1082         x_clearing_accept_copy_form,
1083         x_online_message,
1084         x_ethnic_list_seq,
1085         x_mode ,
1086 	x_starx
1087       );
1088       RETURN;
1089     END IF;
1090     CLOSE c1;
1091 
1092     update_row (
1093       x_rowid,
1094       x_updater,
1095       x_inst_type,
1096       x_inst_short_name,
1097       x_inst_name,
1098       x_inst_full_name,
1099       x_switchboard_tel_no,
1100       x_decision_cards,
1101       x_record_cards,
1102       x_labels,
1103       x_weekly_mov_list_seq,
1104       x_weekly_mov_paging,
1105       x_form_seq,
1106       x_ebl_required,
1107       x_ebl_media_1or2,
1108       x_ebl_media_3,
1109       x_ebl_1or2_merged,
1110       x_ebl_1or2_board_group,
1111       x_ebl_3_board_group,
1112       x_ebl_nc_app,
1113       x_ebl_major_key1,
1114       x_ebl_major_key2,
1115       x_ebl_major_key3,
1116       x_ebl_minor_key1,
1117       x_ebl_minor_key2,
1118       x_ebl_minor_key3,
1119       x_ebl_final_key,
1120       x_odl1,
1121       x_odl1a,
1122       x_odl2,
1123       x_odl3,
1124       x_odl_summer,
1125       x_odl_route_b,
1126       x_monthly_seq,
1127       x_monthly_paper,
1128       x_monthly_page,
1129       x_monthly_type,
1130       x_june_list_seq,
1131       x_june_labels,
1132       x_june_num_labels,
1133       x_course_analysis,
1134       x_campus_used,
1135       x_d3_doc_required,
1136       x_clearing_accept_copy_form,
1137       x_online_message,
1138       x_ethnic_list_seq,
1139       x_mode ,
1140       x_starx
1141     );
1142 
1143   END add_row;
1144 
1145 
1146   PROCEDURE delete_row (
1147     x_rowid IN VARCHAR2
1148   ) AS
1149   /*
1150   ||  Created By : rgopalan
1151   ||  Created On : 01-OCT-2001
1152   ||  Purpose : Handles the DELETE DML logic for the table.
1153   ||  Known limitations, enhancements or remarks :
1154   ||  Change History :
1155   ||  Who             When            What
1156   ||  (reverse chronological order - newest change first)
1157   */
1158   BEGIN
1159 
1160     before_dml (
1161       p_action => 'DELETE',
1162       x_rowid => x_rowid
1163     );
1164 
1165     DELETE FROM igs_uc_inst_control
1166     WHERE rowid = x_rowid;
1167 
1168     IF (SQL%NOTFOUND) THEN
1169       RAISE NO_DATA_FOUND;
1170     END IF;
1171 
1172   END delete_row;
1173 
1174 
1175 END igs_uc_inst_control_pkg;