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_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_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: 84


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

Line: 97


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

Line: 113


      SELECT   rowid
      FROM     IGS_PR_OU_UNIT_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_cd = x_unit_cd
      FOR UPDATE NOWAIT;

Line: 144


      SELECT   rowid
      FROM     IGS_PR_OU_UNIT_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: 172


      SELECT   rowid
      FROM     IGS_PR_OU_UNIT_ALL
      WHERE    unit_cd = x_unit_cd ;

Line: 193


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


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

Line: 222


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

Line: 227


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


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

Line: 243


  END BeforeInsertUpdate;

Line: 255


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

Line: 278


    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.unit_cd
         ) THEN
        Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');

Line: 292


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

Line: 296


    ELSIF (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.unit_cd
         ) THEN
        Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');

Line: 309


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

Line: 315


    BeforeInsertUpdate(p_action);

Line: 319


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_CD in VARCHAR2,
  X_S_UNIT_TYPE in VARCHAR2,
  X_MODE in VARCHAR2 default 'R',
  X_ORG_ID IN NUMBER
  ) AS
    cursor C is select ROWID from IGS_PR_OU_UNIT_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_CD = X_UNIT_CD;

Line: 334


    X_LAST_UPDATE_DATE DATE;

Line: 335


    X_LAST_UPDATED_BY NUMBER;

Line: 336


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 338


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 340


    X_LAST_UPDATED_BY := 1;

Line: 341


    X_LAST_UPDATE_LOGIN := 0;

Line: 343


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 344


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 347


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 348


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 357


    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_cd => x_unit_cd,
    x_s_unit_type => x_s_unit_type,
    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: 371


  insert into IGS_PR_OU_UNIT_ALL (
    PROGRESSION_RULE_CAT,
    PRA_SEQUENCE_NUMBER,
    PRO_SEQUENCE_NUMBER,
    UNIT_CD,
    S_UNIT_TYPE,
    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_CD,
    NEW_REFERENCES.S_UNIT_TYPE,
    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: 404


end INSERT_ROW;

Line: 414


  cursor c1 is select
      S_UNIT_TYPE
    from IGS_PR_OU_UNIT_ALL
    where ROWID = X_ROWID for update nowait;

Line: 424


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

Line: 443


procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_PROGRESSION_RULE_CAT in VARCHAR2,
  X_PRA_SEQUENCE_NUMBER in NUMBER,
  X_PRO_SEQUENCE_NUMBER in NUMBER,
  X_UNIT_CD in VARCHAR2,
  X_S_UNIT_TYPE in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;

Line: 453


    X_LAST_UPDATED_BY NUMBER;

Line: 454


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 456


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 458


    X_LAST_UPDATED_BY := 1;

Line: 459


    X_LAST_UPDATE_LOGIN := 0;

Line: 461


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 462


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 465


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 466


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 475


    p_action => 'UPDATE',
    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_cd => x_unit_cd,
    x_s_unit_type => x_s_unit_type,
    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: 489


  update IGS_PR_OU_UNIT_ALL set
    S_UNIT_TYPE = NEW_REFERENCES.S_UNIT_TYPE,
    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: 499


end UPDATE_ROW;

Line: 511


  cursor c1 is select rowid from IGS_PR_OU_UNIT_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_CD = X_UNIT_CD
  ;

Line: 522


    INSERT_ROW (
     X_ROWID,
     X_PROGRESSION_RULE_CAT,
     X_PRA_SEQUENCE_NUMBER,
     X_PRO_SEQUENCE_NUMBER,
     X_UNIT_CD,
     X_S_UNIT_TYPE,
     X_MODE,
     X_ORG_ID);

Line: 534


  UPDATE_ROW (
   X_ROWID ,
   X_PROGRESSION_RULE_CAT,
   X_PRA_SEQUENCE_NUMBER,
   X_PRO_SEQUENCE_NUMBER,
   X_UNIT_CD,
   X_S_UNIT_TYPE,
   X_MODE );

Line: 544


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

Line: 553


  delete from IGS_PR_OU_UNIT_ALL
  where ROWID = X_ROWID;

Line: 559


end DELETE_ROW;