DBA Data[Home] [Help]

APPS.IGS_PS_STDNT_SPL_REQ_PKG SQL Statements

The following lines contain the word 'select', 'insert', 'update' or 'delete':

Line: 19

    x_last_update_date IN DATE DEFAULT NULL,
    x_last_updated_by IN NUMBER DEFAULT NULL,
    x_last_update_login IN NUMBER DEFAULT NULL
  ) AS

    CURSOR cur_old_ref_values IS
      SELECT   *
      FROM     IGS_PS_STDNT_SPL_REQ
      WHERE    rowid = x_rowid;
Line: 37

    IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
      Close cur_old_ref_values;
Line: 39

      Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Line: 54

    IF (p_action = 'UPDATE') THEN
      new_references.creation_date := old_references.creation_date;
Line: 61

    new_references.last_update_date := x_last_update_date;
Line: 62

    new_references.last_updated_by := x_last_updated_by;
Line: 63

    new_references.last_update_login := x_last_update_login;
Line: 67

  PROCEDURE BeforeRowInsertUpdateDelete1(
    p_inserting IN BOOLEAN DEFAULT FALSE,
    p_updating IN BOOLEAN DEFAULT FALSE,
    p_deleting IN BOOLEAN DEFAULT FALSE
    ) AS
	v_message_name	VARCHAR2(30);
Line: 76

	IF p_inserting OR p_updating THEN
		IF  IGS_EN_VAL_SCSR.enrp_val_scsr_scas(
				new_references.person_id,
				new_references.course_cd,
				v_message_name) = FALSE THEN
					Fnd_Message.Set_Name('IGS', v_message_name);
Line: 97

	IF p_inserting THEN
		IF  IGS_EN_VAL_SCSR.enrp_val_scsr_cmp_dt(
				new_references.completed_dt,
				v_message_name) = FALSE THEN
					Fnd_Message.Set_Name('IGS', v_message_name);
Line: 107

	IF p_inserting OR p_updating THEN
		IF new_references.expiry_dt IS NOT NULL THEN
			IF  IGS_EN_VAL_SCSR.enrp_val_scsr_exp_dt(
					new_references.completed_dt,
					new_references.expiry_dt,
					v_message_name) = FALSE THEN
						Fnd_Message.Set_Name('IGS', v_message_name);
Line: 120

	IF p_inserting THEN
		IF  IGS_EN_VAL_SCSR.enrp_val_srq_closed(
				new_references.special_requirement_cd,
				v_message_name) = FALSE THEN
					Fnd_Message.Set_Name('IGS', v_message_name);
Line: 131

  END BeforeRowInsertUpdateDelete1;
Line: 133

 PROCEDURE AfterRowInsertUpdate2(
    p_inserting IN BOOLEAN DEFAULT FALSE,
    p_updating IN BOOLEAN DEFAULT FALSE,
    p_deleting IN BOOLEAN DEFAULT FALSE
    ) AS
	v_message_name	VARCHAR2(30);
Line: 141

	IF p_inserting OR p_updating THEN
  		-- Validate the Student course Special Requirement dates
  		IF IGS_EN_VAL_SCSR.enrp_val_scsr_dates(
  				new_references.person_id,
  				new_references.course_cd,
  				new_references.special_requirement_cd,
  				new_references.completed_dt,
  				new_references.expiry_dt,
  				v_message_name) = FALSE THEN
					Fnd_Message.Set_Name('IGS', v_message_name);
Line: 156

  END AfterRowInsertUpdate2;
Line: 216

		    Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Line: 229

		    Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Line: 244

      SELECT   rowid
      FROM     IGS_PS_STDNT_SPL_REQ
      WHERE    person_id = x_person_id
      AND      course_cd = x_course_cd
      AND      special_requirement_cd = x_special_requirement_cd
      AND      completed_dt = x_completed_dt
      FOR UPDATE NOWAIT;
Line: 273

      SELECT   rowid
      FROM     IGS_PS_STDNT_SPL_REQ
      WHERE    person_id = x_person_id
      AND      course_cd = x_course_cd ;
Line: 300

      SELECT   rowid
      FROM     IGS_PS_STDNT_SPL_REQ
      WHERE    special_requirement_cd = x_special_requirement_cd ;
Line: 333

    x_last_update_date IN DATE DEFAULT NULL,
    x_last_updated_by IN NUMBER DEFAULT NULL,
    x_last_update_login IN NUMBER DEFAULT NULL
  ) AS
  BEGIN

    Set_Column_Values (
      p_action,
      x_rowid,
      x_person_id,
      x_course_cd,
      x_special_requirement_cd,
      x_completed_dt,
      x_expiry_dt,
      x_reference,
      x_comments,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );
Line: 356

 IF (p_action = 'INSERT') THEN
       -- Call all the procedures related to Before Insert.
      BeforeRowInsertUpdateDelete1 ( p_inserting => TRUE );
Line: 371

 ELSIF (p_action = 'UPDATE') THEN
       -- Call all the procedures related to Before Update.
      BeforeRowInsertUpdateDelete1 ( p_updating => TRUE );
Line: 376

 ELSIF (p_action = 'DELETE') THEN
       -- Call all the procedures related to Before Delete.
	BeforeRowInsertUpdateDelete1 ( p_deleting => TRUE );
Line: 379

 ELSIF (p_action = 'VALIDATE_INSERT') THEN
      IF  Get_PK_For_Validation (
			    new_references.person_id,
			    new_references.course_cd,
			    new_references.special_requirement_cd,
			    new_references.completed_dt
					  ) THEN
         Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
Line: 391

 ELSIF (p_action = 'VALIDATE_UPDATE') THEN
       Check_Constraints;
Line: 406

    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to After Insert.
      AfterRowInsertUpdate2 ( p_inserting => TRUE );
Line: 409

    ELSIF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to After Update.
      AfterRowInsertUpdate2 ( p_updating => TRUE );
Line: 417

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_PERSON_ID in NUMBER,
  X_SPECIAL_REQUIREMENT_CD in VARCHAR2,
  X_COMPLETED_DT in DATE,
  X_COURSE_CD in VARCHAR2,
  X_EXPIRY_DT in DATE,
  X_REFERENCE in VARCHAR2,
  X_COMMENTS in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) as
    cursor C is select ROWID from IGS_PS_STDNT_SPL_REQ
      where PERSON_ID = X_PERSON_ID
      and SPECIAL_REQUIREMENT_CD = X_SPECIAL_REQUIREMENT_CD
      and COMPLETED_DT = X_COMPLETED_DT
      and COURSE_CD = X_COURSE_CD;
Line: 433

    X_LAST_UPDATE_DATE DATE;
Line: 434

    X_LAST_UPDATED_BY NUMBER;
Line: 435

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 437

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 439

    X_LAST_UPDATED_BY := 1;
Line: 440

    X_LAST_UPDATE_LOGIN := 0;
Line: 442

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 443

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;
Line: 446

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 447

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;
Line: 457

  p_action => 'INSERT',
  x_rowid => X_ROWID,
  x_person_id => X_PERSON_ID,
  x_course_cd => X_COURSE_CD,
  x_special_requirement_cd => X_SPECIAL_REQUIREMENT_CD,
  x_completed_dt => X_COMPLETED_DT,
  x_expiry_dt => X_EXPIRY_DT,
  x_reference => X_REFERENCE,
  x_comments => X_COMMENTS,
  x_creation_date => X_LAST_UPDATE_DATE,
  x_created_by => X_LAST_UPDATED_BY,
  x_last_update_date => X_LAST_UPDATE_DATE,
  x_last_updated_by => X_LAST_UPDATED_BY,
  x_last_update_login => X_LAST_UPDATE_LOGIN
  );
Line: 477

  insert into IGS_PS_STDNT_SPL_REQ (
    PERSON_ID,
    COURSE_CD,
    SPECIAL_REQUIREMENT_CD,
    COMPLETED_DT,
    EXPIRY_DT,
    REFERENCE,
    COMMENTS,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.PERSON_ID,
    NEW_REFERENCES.COURSE_CD,
    NEW_REFERENCES.SPECIAL_REQUIREMENT_CD,
    NEW_REFERENCES.COMPLETED_DT,
    NEW_REFERENCES.EXPIRY_DT,
    NEW_REFERENCES.REFERENCE,
    NEW_REFERENCES.COMMENTS,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );
Line: 518

     p_action => 'INSERT',
     x_rowid => X_ROWID
    );
Line: 535

end INSERT_ROW;
Line: 547

  cursor c1 is select
      EXPIRY_DT,
      REFERENCE,
      COMMENTS
    from IGS_PS_STDNT_SPL_REQ
    where ROWID = X_ROWID
    for update nowait;
Line: 561

    fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
Line: 587

procedure UPDATE_ROW (
  X_ROWID IN VARCHAR2,
  X_PERSON_ID in NUMBER,
  X_SPECIAL_REQUIREMENT_CD in VARCHAR2,
  X_COMPLETED_DT in DATE,
  X_COURSE_CD in VARCHAR2,
  X_EXPIRY_DT in DATE,
  X_REFERENCE in VARCHAR2,
  X_COMMENTS in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) as
    X_LAST_UPDATE_DATE DATE;
Line: 599

    X_LAST_UPDATED_BY NUMBER;
Line: 600

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 602

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 604

    X_LAST_UPDATED_BY := 1;
Line: 605

    X_LAST_UPDATE_LOGIN := 0;
Line: 607

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 608

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;
Line: 611

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 612

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;
Line: 622

  p_action => 'UPDATE',
  x_rowid => X_ROWID,
  x_person_id =>X_PERSON_ID,
  x_course_cd => X_COURSE_CD,
  x_special_requirement_cd => X_SPECIAL_REQUIREMENT_CD,
  x_completed_dt => X_COMPLETED_DT,
  x_expiry_dt => X_EXPIRY_DT,
  x_reference => X_REFERENCE,
  x_comments => X_COMMENTS,
  x_creation_date => X_LAST_UPDATE_DATE,
  x_created_by => X_LAST_UPDATED_BY,
  x_last_update_date => X_LAST_UPDATE_DATE,
  x_last_updated_by => X_LAST_UPDATED_BY,
  x_last_update_login => X_LAST_UPDATE_LOGIN
  );
Line: 641

  update IGS_PS_STDNT_SPL_REQ set
    EXPIRY_DT = NEW_REFERENCES.EXPIRY_DT,
    REFERENCE = NEW_REFERENCES.REFERENCE,
    COMMENTS = NEW_REFERENCES.COMMENTS,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
    where ROWID = X_ROWID
  ;
Line: 661

     p_action => 'UPDATE',
     x_rowid => X_ROWID
    );
Line: 678

end UPDATE_ROW;
Line: 691

  cursor c1 is select rowid from IGS_PS_STDNT_SPL_REQ
     where PERSON_ID = X_PERSON_ID
     and SPECIAL_REQUIREMENT_CD = X_SPECIAL_REQUIREMENT_CD
     and COMPLETED_DT = X_COMPLETED_DT
     and COURSE_CD = X_COURSE_CD
  ;
Line: 702

    INSERT_ROW (
     X_ROWID,
     X_PERSON_ID,
     X_SPECIAL_REQUIREMENT_CD,
     X_COMPLETED_DT,
     X_COURSE_CD,
     X_EXPIRY_DT,
     X_REFERENCE,
     X_COMMENTS,
     X_MODE);
Line: 715

  UPDATE_ROW (
   X_ROWID,
   X_PERSON_ID,
   X_SPECIAL_REQUIREMENT_CD,
   X_COMPLETED_DT,
   X_COURSE_CD,
   X_EXPIRY_DT,
   X_REFERENCE,
   X_COMMENTS,
   X_MODE);
Line: 727

procedure DELETE_ROW (
  X_ROWID in VARCHAR2,
  x_mode IN VARCHAR2
) as
begin
  Before_DML(
  p_action => 'DELETE',
  x_rowid => X_ROWID
  );
Line: 740

  delete from IGS_PS_STDNT_SPL_REQ
    where ROWID = X_ROWID;
Line: 754

  p_action => 'DELETE',
  x_rowid => X_ROWID
  );
Line: 758

end DELETE_ROW;