eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IGS_PR_OU_UNIT_SET_PKG SQL Statements

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

Line: 18


    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_UNIT_SET_ALL
      WHERE    rowid = x_rowid;

Line: 37


    IF (cur_old_ref_values%NOTFOUND) AND (p_action not in ('INSERT','VALIDATE_INSERT')) THEN
      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: 82


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

Line: 99


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

Line: 117


      SELECT   rowid
      FROM     IGS_PR_OU_UNIT_SET_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      unit_set_cd = x_unit_set_cd
      AND      us_version_number = x_us_version_number
      FOR UPDATE NOWAIT;

Line: 149


      SELECT   rowid
      FROM     IGS_PR_OU_UNIT_SET_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: 178


      SELECT   rowid
      FROM     IGS_PR_OU_UNIT_SET_ALL
      WHERE    unit_set_cd = x_unit_set_cd
      AND      us_version_number = x_version_number ;

Line: 200


	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: 224


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

Line: 229


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

Line: 234


   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: 242


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

Line: 250


  END BeforeInsertUpdate;

Line: 262


    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_unit_set_cd,
      x_us_version_number,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login ,
      x_org_id
    );

Line: 285


    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to Before Insert.
	Check_Parent_Existance;

Line: 300


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

Line: 304


	ELSIF (p_action = 'VALIDATE_INSERT') THEN
		IF Get_PK_For_Validation (
		    new_references.progression_rule_cat,
		    new_references.pra_sequence_number,
		    new_references.pro_sequence_number,
		    new_references.unit_set_cd,
		    new_references.us_version_number)  THEN
			Fnd_Message.Set_Name('IGS','IGS_GE_MULTI_ORG_DUP_REC');

Line: 317


	ELSIF (p_action = 'VALIDATE_UPDATE') THEN
	CHECK_CONSTRAINTS;

Line: 322


   BeforeInsertUpdate(p_action);

Line: 326


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_UNIT_SET_CD in VARCHAR2,
  X_US_VERSION_NUMBER in NUMBER,
  X_MODE in VARCHAR2 default 'R',
  X_ORG_ID IN NUMBER
  ) AS
    cursor C is select ROWID from IGS_PR_OU_UNIT_SET_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 UNIT_SET_CD = X_UNIT_SET_CD
      and US_VERSION_NUMBER = X_US_VERSION_NUMBER;

Line: 342


    X_LAST_UPDATE_DATE DATE;

Line: 343


    X_LAST_UPDATED_BY NUMBER;

Line: 344


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 346


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 348


    X_LAST_UPDATED_BY := 1;

Line: 349


    X_LAST_UPDATE_LOGIN := 0;

Line: 351


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 352


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 355


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 356


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 365


    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_unit_set_cd => x_unit_set_cd ,
    x_us_version_number => x_us_version_number ,
    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: 379


  insert into IGS_PR_OU_UNIT_SET_ALL (
    PROGRESSION_RULE_CAT,
    PRA_SEQUENCE_NUMBER,
    PRO_SEQUENCE_NUMBER,
    UNIT_SET_CD,
    US_VERSION_NUMBER,
    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.UNIT_SET_CD,
    NEW_REFERENCES.US_VERSION_NUMBER,
    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: 412


end INSERT_ROW;

Line: 422


  cursor c1 is select
        rowid
    from IGS_PR_OU_UNIT_SET_ALL
    where ROWID = X_ROWID for update nowait;

Line: 432


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

Line: 442


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

Line: 451


  delete from IGS_PR_OU_UNIT_SET_ALL
  where ROWID  = X_ROWID;

Line: 457


end DELETE_ROW;