DBA Data[Home] [Help]

APPS.IGS_AS_SU_ATMPT_PAT_PKG dependencies on IGS_AS_SU_ATMPT_PAT

Line 1: package body IGS_AS_SU_ATMPT_PAT_PKG AS

1: package body IGS_AS_SU_ATMPT_PAT_PKG AS
2: /* $Header: IGSDI07B.pls 120.0 2005/07/05 11:43:45 appldev noship $ */
3: -------------------------------------------------------------------------------------------
4: --Change History:
5: --Who When What

Line 14: old_references IGS_AS_SU_ATMPT_PAT%RowType;

10: -- (person_id,course_cd,uoo_id,ass_pattern_id,creation_dt)redefined FK
11: -- to (PERSON_ID, COURSE_CD,UOO_ID)as part of MUS build, # 2829262
12: -------------------------------------------------------------------------------------------
13: l_rowid VARCHAR2(25);
14: old_references IGS_AS_SU_ATMPT_PAT%RowType;
15: new_references IGS_AS_SU_ATMPT_PAT%RowType;
16: PROCEDURE Set_Column_Values (
17: p_action IN VARCHAR2,
18: x_rowid IN VARCHAR2 DEFAULT NULL,

Line 15: new_references IGS_AS_SU_ATMPT_PAT%RowType;

11: -- to (PERSON_ID, COURSE_CD,UOO_ID)as part of MUS build, # 2829262
12: -------------------------------------------------------------------------------------------
13: l_rowid VARCHAR2(25);
14: old_references IGS_AS_SU_ATMPT_PAT%RowType;
15: new_references IGS_AS_SU_ATMPT_PAT%RowType;
16: PROCEDURE Set_Column_Values (
17: p_action IN VARCHAR2,
18: x_rowid IN VARCHAR2 DEFAULT NULL,
19: x_person_id IN NUMBER DEFAULT NULL,

Line 37: FROM IGS_AS_SU_ATMPT_PAT

33: x_uoo_id IN NUMBER DEFAULT NULL
34: ) AS
35: CURSOR cur_old_ref_values IS
36: SELECT *
37: FROM IGS_AS_SU_ATMPT_PAT
38: WHERE rowid = x_rowid;
39: BEGIN
40: l_rowid := x_rowid;
41: -- Code for setting the Old and New Reference Values.

Line 130: IF IGS_AS_VAL_SUAAP.GENP_VAL_SDTT_SESS('IGS_AS_SU_ATMPT_PAT') AND

126: END IF;
127: CLOSE c_sua;
128: -- Check if IGS_AS_GEN_004.ASSP_INS_SUAAP_DFLT has not disabled the trigger
129: -- and the logical delete date is not set.
130: IF IGS_AS_VAL_SUAAP.GENP_VAL_SDTT_SESS('IGS_AS_SU_ATMPT_PAT') AND
131: (NVL(new_references.logical_delete_dt, IGS_GE_DATE.IGSDATE('1900/01/01'))
132: = NVL(old_references.logical_delete_dt, IGS_GE_DATE.IGSDATE('1900/01/01'))) THEN
133: -- Allocate unit_ass_pattern_items within the pattern to the student
134: -- (IGS_AS_SU_ATMPT_ITM).

Line 156: -- ON IGS_AS_SU_ATMPT_PAT

152: END BeforeRowInsertUpdate1;
153: -- Trigger description :-
154: -- "OSS_TST".trg_suaap_ar_iu
155: -- AFTER INSERT OR UPDATE
156: -- ON IGS_AS_SU_ATMPT_PAT
157: -- FOR EACH ROW
158: -------------------------------------------------------------------------------------------
159: --Change History:
160: --Who When What

Line 195: IF IGS_AS_VAL_SUAAP.GENP_VAL_SDTT_SESS('IGS_AS_SU_ATMPT_PAT') THEN

191: (NVL(new_references.logical_delete_dt, IGS_GE_DATE.IGSDATE('1900/01/01'))
192: <> NVL(old_references.logical_delete_dt, IGS_GE_DATE.IGSDATE('1900/01/01'))) THEN
193: -- If logically p_deleting the suaap record.
194: -- Check if IGS_AS_GEN_001.ASSP_DEL_SUAAP_DFLT has not disabled the trigger.
195: IF IGS_AS_VAL_SUAAP.GENP_VAL_SDTT_SESS('IGS_AS_SU_ATMPT_PAT') THEN
196: IF IGS_AS_GEN_001.ASSP_DEL_SUAAP_SUAAI( new_references.person_id,
197: new_references.course_cd,
198: new_references.unit_cd,
199: new_references.cal_type,

Line 227: -- ON IGS_AS_SU_ATMPT_PAT

223: END AfterRowInsertUpdate2;
224: -- Trigger description :-
225: -- "OSS_TST".trg_suaap_as_iu
226: -- AFTER INSERT OR UPDATE
227: -- ON IGS_AS_SU_ATMPT_PAT
228: PROCEDURE Check_Parent_Existance IS
229: BEGIN
230: IF (((old_references.person_id = new_references.person_id) AND
231: (old_references.course_cd = new_references.course_cd) AND

Line 273: FROM IGS_AS_SU_ATMPT_PAT

269: x_uoo_id IN NUMBER
270: ) RETURN BOOLEAN AS
271: CURSOR cur_rowid IS
272: SELECT rowid
273: FROM IGS_AS_SU_ATMPT_PAT
274: WHERE course_cd = x_course_cd
275: AND person_id = x_person_id
276: AND ass_pattern_id = x_ass_pattern_id
277: AND creation_dt = x_creation_dt

Line 299: FROM IGS_AS_SU_ATMPT_PAT

295: x_uoo_id IN NUMBER
296: ) IS
297: CURSOR cur_rowid IS
298: SELECT rowid
299: FROM IGS_AS_SU_ATMPT_PAT
300: WHERE person_id = x_person_id
301: AND course_cd = x_course_cd
302: AND uoo_id = x_uoo_id;
303: lv_rowid cur_rowid%RowType;

Line 322: FROM IGS_AS_SU_ATMPT_PAT

318: x_ass_pattern_id IN NUMBER
319: ) IS
320: CURSOR cur_rowid IS
321: SELECT rowid
322: FROM IGS_AS_SU_ATMPT_PAT
323: WHERE ass_pattern_id = x_ass_pattern_id ;
324: lv_rowid cur_rowid%RowType;
325: BEGIN
326: Open cur_rowid;

Line 439: cursor C is select ROWID from IGS_AS_SU_ATMPT_PAT

435: X_LOGICAL_DELETE_DT in DATE,
436: X_MODE in VARCHAR2 default 'R',
437: X_UOO_ID in NUMBER
438: ) AS
439: cursor C is select ROWID from IGS_AS_SU_ATMPT_PAT
440: where PERSON_ID = X_PERSON_ID
441: and COURSE_CD = X_COURSE_CD
442: and ASS_PATTERN_ID = X_ASS_PATTERN_ID
443: and CREATION_DT = X_CREATION_DT

Line 501: insert into IGS_AS_SU_ATMPT_PAT (

497: x_last_updated_by=>X_LAST_UPDATED_BY,
498: x_last_update_login=>X_LAST_UPDATE_LOGIN,
499: x_uoo_id=>X_UOO_ID
500: );
501: insert into IGS_AS_SU_ATMPT_PAT (
502: PERSON_ID,
503: COURSE_CD,
504: UNIT_CD,
505: CAL_TYPE,

Line 567: from IGS_AS_SU_ATMPT_PAT

563: ) AS
564: cursor c1 is select
565: S_DEFAULT_IND,
566: LOGICAL_DELETE_DT
567: from IGS_AS_SU_ATMPT_PAT
568: where ROWID = X_ROWID for update nowait;
569: tlinfo c1%rowtype;
570: begin
571: open c1;

Line 666: update IGS_AS_SU_ATMPT_PAT set

662: else
663: X_PROGRAM_UPDATE_DATE := SYSDATE;
664: end if;
665: end if;
666: update IGS_AS_SU_ATMPT_PAT set
667: S_DEFAULT_IND = NEW_REFERENCES.S_DEFAULT_IND,
668: LOGICAL_DELETE_DT = NEW_REFERENCES.LOGICAL_DELETE_DT,
669: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
670: LAST_UPDATED_BY = X_LAST_UPDATED_BY,

Line 696: cursor c1 is select rowid from IGS_AS_SU_ATMPT_PAT

692: X_LOGICAL_DELETE_DT in DATE,
693: X_MODE in VARCHAR2 default 'R',
694: X_UOO_ID in NUMBER
695: ) AS
696: cursor c1 is select rowid from IGS_AS_SU_ATMPT_PAT
697: where PERSON_ID = X_PERSON_ID
698: and COURSE_CD = X_COURSE_CD
699: and ASS_PATTERN_ID = X_ASS_PATTERN_ID
700: and CREATION_DT = X_CREATION_DT

Line 745: delete from IGS_AS_SU_ATMPT_PAT

741: Before_DML(
742: p_action => 'DELETE',
743: x_rowid => X_ROWID
744: );
745: delete from IGS_AS_SU_ATMPT_PAT
746: where ROWID = X_ROWID;
747: if (sql%notfound) then
748: raise no_data_found;
749: end if;

Line 788: end IGS_AS_SU_ATMPT_PAT_PKG;

784: END IF;
785:
786:
787: END Check_Constraints;
788: end IGS_AS_SU_ATMPT_PAT_PKG;