APPS.IGS_PS_STAGE_PKG dependencies on IGS_PS_STAGE

Line 1: package body IGS_PS_STAGE_PKG AS

1: package body IGS_PS_STAGE_PKG AS
2: /* $Header: IGSPI32B.pls 115.5 2002/11/29 02:21:46 nsidana ship $ */
3: l_rowid VARCHAR2(25);
4: old_references IGS_PS_STAGE%RowType;
5: new_references IGS_PS_STAGE%RowType;

Line 4: old_references IGS_PS_STAGE%RowType;

1: package body IGS_PS_STAGE_PKG AS
2: /* $Header: IGSPI32B.pls 115.5 2002/11/29 02:21:46 nsidana ship $ */
3: l_rowid VARCHAR2(25);
4: old_references IGS_PS_STAGE%RowType;
5: new_references IGS_PS_STAGE%RowType;
6:
7: PROCEDURE Set_Column_Values (
8: p_action IN VARCHAR2,

Line 5: new_references IGS_PS_STAGE%RowType;

1: package body IGS_PS_STAGE_PKG AS
2: /* $Header: IGSPI32B.pls 115.5 2002/11/29 02:21:46 nsidana ship $ */
3: l_rowid VARCHAR2(25);
4: old_references IGS_PS_STAGE%RowType;
5: new_references IGS_PS_STAGE%RowType;
6:
7: PROCEDURE Set_Column_Values (
8: p_action IN VARCHAR2,
9: x_rowid IN VARCHAR2 DEFAULT NULL,

Line 25: FROM IGS_PS_STAGE

21: ) AS
22:
23: CURSOR cur_old_ref_values IS
24: SELECT *
25: FROM IGS_PS_STAGE
26: WHERE rowid = x_rowid;
27:
28: BEGIN
29:

Line 115: -- Validate the IGS_PS_STAGE_TYPE is unique for this IGS_PS_COURSE version

111: BEGIN
112: -- Validate the student IGS_PS_COURSE special requirement dates
113: IF p_inserting OR p_updating THEN
114: -- Save the rowid of the current row.
115: -- Validate the IGS_PS_STAGE_TYPE is unique for this IGS_PS_COURSE version
116: IF IGS_PS_VAL_CST.crsp_val_cst_cstt(
117: NEW_REFERENCES.course_cd,
118: NEW_REFERENCES.version_number,
119: NEW_REFERENCES.sequence_number,

Line 202: IF NOT IGS_PS_STAGE_TYPE_PKG.Get_PK_For_Validation (

198: IF (((old_references.course_stage_type = new_references.course_stage_type)) OR
199: ((new_references.course_stage_type IS NULL))) THEN
200: NULL;
201: ELSE
202: IF NOT IGS_PS_STAGE_TYPE_PKG.Get_PK_For_Validation (
203: new_references.course_stage_type
204: )THEN
205: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
206: IGS_GE_MSG_STACK.ADD;

Line 216: IGS_PS_STAGE_RU_PKG.GET_FK_IGS_PS_STAGE (

212:
213: PROCEDURE Check_Child_Existance AS
214: BEGIN
215:
216: IGS_PS_STAGE_RU_PKG.GET_FK_IGS_PS_STAGE (
217: old_references.version_number,
218: old_references.course_cd,
219: old_references.sequence_number
220: );

Line 232: FROM IGS_PS_STAGE

228: ) RETURN BOOLEAN AS
229:
230: CURSOR cur_rowid IS
231: SELECT rowid
232: FROM IGS_PS_STAGE
233: WHERE version_number = x_version_number
234: AND course_cd = x_course_cd
235: AND sequence_number = x_sequence_number
236: FOR UPDATE NOWAIT;

Line 261: FROM IGS_PS_STAGE

257: ) AS
258:
259: CURSOR cur_rowid IS
260: SELECT rowid
261: FROM IGS_PS_STAGE
262: WHERE course_cd = x_course_cd
263: AND version_number = x_version_number ;
264:
265: lv_rowid cur_rowid%RowType;

Line 282: PROCEDURE GET_FK_IGS_PS_STAGE_TYPE (

278: Close cur_rowid;
279:
280: END GET_FK_IGS_PS_VER;
281:
282: PROCEDURE GET_FK_IGS_PS_STAGE_TYPE (
283: x_course_stage_type IN VARCHAR2
284: ) AS
285:
286: CURSOR cur_rowid IS

Line 288: FROM IGS_PS_STAGE

284: ) AS
285:
286: CURSOR cur_rowid IS
287: SELECT rowid
288: FROM IGS_PS_STAGE
289: WHERE course_stage_type = x_course_stage_type ;
290:
291: lv_rowid cur_rowid%RowType;
292:

Line 306: END GET_FK_IGS_PS_STAGE_TYPE;

302: Return;
303: END IF;
304: Close cur_rowid;
305:
306: END GET_FK_IGS_PS_STAGE_TYPE;
307:
308: PROCEDURE Before_DML (
309: p_action IN VARCHAR2,
310: x_rowid IN VARCHAR2 DEFAULT NULL,

Line 409: cursor C is select ROWID from IGS_PS_STAGE

405: X_DESCRIPTION in VARCHAR2,
406: X_COMMENTS in VARCHAR2,
407: X_MODE in VARCHAR2 default 'R'
408: ) AS
409: cursor C is select ROWID from IGS_PS_STAGE
410: where COURSE_CD = X_COURSE_CD
411: and VERSION_NUMBER = X_VERSION_NUMBER
412: and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER;
413: X_LAST_UPDATE_DATE DATE;

Line 450: insert into IGS_PS_STAGE (

446: x_last_update_date => X_LAST_UPDATE_DATE,
447: x_last_updated_by => X_LAST_UPDATED_BY,
448: x_last_update_login => X_LAST_UPDATE_LOGIN
449: );
450: insert into IGS_PS_STAGE (
451: COURSE_CD,
452: VERSION_NUMBER,
453: SEQUENCE_NUMBER,
454: COURSE_STAGE_TYPE,

Line 504: from IGS_PS_STAGE

500: cursor c1 is select
501: COURSE_STAGE_TYPE,
502: DESCRIPTION,
503: COMMENTS
504: from IGS_PS_STAGE
505: where ROWID = X_ROWID
506: for update nowait;
507: tlinfo c1%rowtype;
508:

Line 586: update IGS_PS_STAGE set

582: x_last_updated_by => X_LAST_UPDATED_BY,
583: x_last_update_login => X_LAST_UPDATE_LOGIN
584: );
585:
586: update IGS_PS_STAGE set
587: COURSE_STAGE_TYPE = NEW_REFERENCES.COURSE_STAGE_TYPE,
588: DESCRIPTION = NEW_REFERENCES.DESCRIPTION,
589: COMMENTS = NEW_REFERENCES.COMMENTS,
590: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,

Line 615: cursor c1 is select rowid from IGS_PS_STAGE

611: X_DESCRIPTION in VARCHAR2,
612: X_COMMENTS in VARCHAR2,
613: X_MODE in VARCHAR2 default 'R'
614: ) AS
615: cursor c1 is select rowid from IGS_PS_STAGE
616: where COURSE_CD = X_COURSE_CD
617: and VERSION_NUMBER = X_VERSION_NUMBER
618: and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER
619: ;

Line 656: delete from IGS_PS_STAGE

652: Before_DML(
653: p_action => 'DELETE',
654: x_rowid => X_ROWID
655: );
656: delete from IGS_PS_STAGE
657: where ROWID = X_ROWID;
658: if (sql%notfound) then
659: raise no_data_found;
660: end if;

Line 667: end IGS_PS_STAGE_PKG;

663: x_rowid => X_ROWID
664: );
665: end DELETE_ROW;
666:
667: end IGS_PS_STAGE_PKG;