APPS.IGS_PR_OU_PS_PKG SQL Statements

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

Line: 16

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

    CURSOR cur_old_ref_values IS
      SELECT   *
      FROM     IGS_PR_OU_PS_ALL
      WHERE    rowid = x_rowid;

Line: 35

    IF (cur_old_ref_values%NOTFOUND) AND (p_action not in ('INSERT','VALIDATE_INSERT')) THEN
      Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 51

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

Line: 58

    new_references.last_update_date := x_last_update_date;

Line: 59

    new_references.last_updated_by := x_last_updated_by;

Line: 60

    new_references.last_update_login := x_last_update_login;

Line: 75

        Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 94

        Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 110

      SELECT   rowid
      FROM     IGS_PR_OU_PS_ALL
      WHERE    progression_rule_cat = x_progression_rule_cat
      AND      pra_sequence_number = x_pra_sequence_number
      AND      pro_sequence_number = x_pro_sequence_number
      AND      course_cd = x_course_cd
      FOR UPDATE NOWAIT;

Line: 137

      SELECT   rowid
      FROM     IGS_PR_OU_PS_ALL
      WHERE    course_cd = x_course_cd ;

Line: 165

      SELECT   rowid
      FROM     IGS_PR_OU_PS_ALL
      WHERE    progression_rule_cat = x_progression_rule_cat
      AND      pra_sequence_number = x_pra_sequence_number
      AND      pro_sequence_number = x_sequence_number ;

Line: 188

  PROCEDURE BeforeInsertUpdate( p_action VARCHAR2 ) AS
  /*
  ||  Created By : anilk
  ||  Created On : 25-FEB-2003
  ||  Known limitations, enhancements or remarks :
  ||  Change History :
  ||  Who             When            What
  ||  (reverse chronological order - newest change first)
  */
    CURSOR c_parent (
         cp_progression_rule_cat    IGS_PR_RU_OU.progression_rule_cat%TYPE,
         cp_pra_sequence_number     IGS_PR_RU_OU.pra_sequence_number%TYPE,
         cp_sequence_number         IGS_PR_RU_OU.sequence_number%TYPE  ) IS
     SELECT 1
     FROM   IGS_PR_RU_OU pro
     WHERE  pro.progression_rule_cat = cp_progression_rule_cat    AND
            pro.pra_sequence_number  = cp_pra_sequence_number AND
            pro.sequence_number      = cp_sequence_number     AND
            pro.logical_delete_dt is NULL;

Line: 212

   IF (p_action = 'INSERT') THEN
      OPEN c_parent( new_references.progression_rule_cat, new_references.pra_sequence_number, new_references.pro_sequence_number );

Line: 217

          FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');

Line: 222

   ELSIF(p_action = 'UPDATE') THEN
      IF new_references.progression_rule_cat <> old_references.progression_rule_cat  OR
         new_references.pra_sequence_number <> old_references.pra_sequence_number  OR
         new_references.pro_sequence_number <> old_references.pro_sequence_number  THEN
        OPEN c_parent( new_references.progression_rule_cat,  new_references.pra_sequence_number, new_references.pro_sequence_number );

Line: 230

          FND_MESSAGE.SET_NAME('FND', 'FORM_RECORD_DELETED');

Line: 238

  END BeforeInsertUpdate;

Line: 249

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

    Set_Column_Values (
      p_action,
      x_rowid,
      x_progression_rule_cat,
      x_pra_sequence_number,
      x_pro_sequence_number,
      x_course_cd,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login ,
      x_org_id
    );

Line: 271

    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to Before Insert.
	IF Get_PK_For_Validation (
         new_references.progression_rule_cat,
         new_references.pra_sequence_number,
         new_references.pro_sequence_number,
         new_references.course_cd
         ) THEN
         Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');

Line: 285

    ELSIF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to Before Update.
      Check_Constraints;

Line: 289

    ELSIF (p_action = 'VALIDATE_INSERT') THEN
      -- Call all the procedures related to Before Insert.
	IF Get_PK_For_Validation (
         new_references.progression_rule_cat,
         new_references.pra_sequence_number,
         new_references.pro_sequence_number,
         new_references.course_cd
         ) THEN
         Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');

Line: 302

    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
      -- Call all the procedures related to Before Update.
      Check_Constraints;

Line: 308

    BeforeInsertUpdate(p_action);

Line: 312

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_PROGRESSION_RULE_CAT in VARCHAR2,
  X_PRA_SEQUENCE_NUMBER in NUMBER,
  X_PRO_SEQUENCE_NUMBER in NUMBER,
  X_COURSE_CD in VARCHAR2,
  X_MODE in VARCHAR2 default 'R',
  X_ORG_ID in NUMBER
  ) as
    cursor C is select ROWID from IGS_PR_OU_PS_ALL
      where PROGRESSION_RULE_CAT = X_PROGRESSION_RULE_CAT
      and PRA_SEQUENCE_NUMBER = X_PRA_SEQUENCE_NUMBER
      and PRO_SEQUENCE_NUMBER = X_PRO_SEQUENCE_NUMBER
      and COURSE_CD = X_COURSE_CD;

Line: 326

    X_LAST_UPDATE_DATE DATE;

Line: 327

    X_LAST_UPDATED_BY NUMBER;

Line: 328

    X_LAST_UPDATE_LOGIN NUMBER;

Line: 330

  X_LAST_UPDATE_DATE := SYSDATE;

Line: 332

    X_LAST_UPDATED_BY := 1;

Line: 333

    X_LAST_UPDATE_LOGIN := 0;

Line: 335

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 336

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 339

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 340

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 350

    p_action => 'INSERT',
    x_rowid => x_rowid,
    x_progression_rule_cat => x_progression_rule_cat,
    x_pra_sequence_number => x_pra_sequence_number,
    x_pro_sequence_number => x_pro_sequence_number,
    x_course_cd => x_course_cd,
    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,
    x_org_id => igs_ge_gen_003.get_org_id
  );

Line: 364

  insert into IGS_PR_OU_PS_ALL (
    PROGRESSION_RULE_CAT,
    PRA_SEQUENCE_NUMBER,
    PRO_SEQUENCE_NUMBER,
    COURSE_CD,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    ORG_ID
  ) values (
    NEW_REFERENCES.PROGRESSION_RULE_CAT,
    NEW_REFERENCES.PRA_SEQUENCE_NUMBER,
    NEW_REFERENCES.PRO_SEQUENCE_NUMBER,
    NEW_REFERENCES.COURSE_CD,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN,
    NEW_REFERENCES.ORG_ID
  );

Line: 395

end INSERT_ROW;

Line: 404

  cursor c1 is select
        rowid
    from IGS_PR_OU_PS_ALL
    Where ROWID = X_ROWID for update nowait;

Line: 414

    fnd_message.set_name('FND', 'FORM_RECORD_DELETED');

Line: 424

procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) as
begin
Before_DML (
    p_action => 'DELETE',
    x_rowid => X_ROWID
  );

Line: 433

  delete from IGS_PR_OU_PS_ALL
  where ROWID = X_ROWID;

Line: 440

end DELETE_ROW;