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_PE_UNT_SET_EXCL_PKG SQL Statements

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

Line: 23


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

Line: 41


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

Line: 61


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

Line: 68


    new_references.last_update_date := x_last_update_date;

Line: 69


    new_references.last_updated_by := x_last_updated_by;

Line: 70


    new_references.last_update_login := x_last_update_login;

Line: 74


  PROCEDURE BeforeRowInsertUpdate1(
    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: 83


		(p_inserting OR (p_updating AND
		(NVL(old_references.puse_start_dt, IGS_GE_DATE.IGSDATE('1900/01/01'))
		<> new_references.puse_start_dt)))
		THEN
		IF IGS_EN_VAL_PCE.enrp_val_encmb_dt (
			 	new_references.puse_start_dt,
			 	v_message_name ) = FALSE THEN
			  Fnd_Message.Set_Name('IGS', v_message_name);

Line: 97


	IF p_inserting THEN
		IF IGS_EN_VAL_PCE.enrp_val_encmb_dts (
			 	new_references.pee_start_dt,
			 	new_references.puse_start_dt,
			 	v_message_name ) = FALSE THEN
			  Fnd_Message.Set_Name('IGS', v_message_name);

Line: 110


		(p_inserting OR (p_updating AND
		(NVL(old_references.expiry_dt, IGS_GE_DATE.IGSDATE('1900/01/01'))
		<> new_references.expiry_dt)))
		THEN
		IF IGS_EN_VAL_PCE.enrp_val_strt_exp_dt (
			 	new_references.puse_start_dt,
			 	new_references.expiry_dt,
			 	v_message_name ) = FALSE THEN
			 	IGS_GE_MSG_STACK.ADD;

Line: 133


	IF p_inserting THEN
		IF IGS_EN_VAL_PCE.enrp_val_pee_table (
			 	new_references.s_encmb_effect_type,
			 	'IGS_PE_UNT_SET_EXCL',
			 	v_message_name ) = FALSE THEN
			  Fnd_Message.Set_Name('IGS', v_message_name);

Line: 145


	IF p_inserting THEN
		IF IGS_EN_VAL_PUSE.enrp_val_puse_us (
				new_references.person_id,
				new_references.unit_set_cd,
				new_references.us_version_number,
				null,
				v_message_name ) = FALSE THEN
			 Fnd_Message.Set_Name('IGS', v_message_name);

Line: 159


  END BeforeRowInsertUpdate1;

Line: 167


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


  END AfterRowInsertUpdate2;

Line: 276


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

Line: 291


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

Line: 312


      SELECT   rowid
      FROM     IGS_PE_UNT_SET_EXCL
      WHERE    s_encmb_effect_type = x_s_encmb_effect_type
      AND      pen_start_dt = x_pen_start_dt
      AND      person_id = x_person_id
      AND      encumbrance_type = x_encumbrance_type
      AND      pee_start_dt = x_pee_start_dt
      AND      pee_sequence_number = x_pee_sequence_number
      AND      unit_set_cd = x_unit_set_cd
      AND      us_version_number = x_us_version_number
      AND      puse_start_dt = x_puse_start_dt
      FOR UPDATE NOWAIT;

Line: 351


      SELECT   rowid
      FROM     IGS_PE_UNT_SET_EXCL
      WHERE    person_id = x_person_id
      AND      encumbrance_type = x_encumbrance_type
      AND      pen_start_dt = x_pen_start_dt
      AND      s_encmb_effect_type = x_s_encmb_effect_type
      AND      pee_start_dt = x_pee_start_dt
      AND      pee_sequence_number = x_pee_sequence_number ;

Line: 383


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

Line: 420


    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_pee_sequence_number,
      x_unit_set_cd,
      x_us_version_number,
      x_puse_start_dt,
      x_expiry_dt,
      x_person_id,
      x_encumbrance_type,
      x_pen_start_dt,
      x_s_encmb_effect_type,
      x_pee_start_dt,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 446


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

Line: 466


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

Line: 473


 ELSIF (p_action = 'DELETE') THEN
       -- Call all the procedures related to Before Delete.

       NULL;

Line: 477


 ELSIF (p_action = 'VALIDATE_INSERT') THEN
      IF  Get_PK_For_Validation (
          new_references.s_encmb_effect_type ,
    new_references.pen_start_dt ,
    new_references.person_id ,
    new_references.encumbrance_type ,
    new_references.pee_start_dt ,
    new_references.pee_sequence_number ,
    new_references.unit_set_cd ,
    new_references.us_version_number ,
    new_references.puse_start_dt ) THEN
         Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 494


 ELSIF (p_action = 'VALIDATE_UPDATE') THEN

       Check_Constraints; -- if procedure present

Line: 498


ELSIF (p_action = 'VALIDATE_DELETE') THEN
      NULL;

Line: 512


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

Line: 516


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

Line: 519


    ELSIF (p_action = 'DELETE') THEN
      -- Call all the procedures related to After Delete.
      Null;

Line: 526


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_PERSON_ID in NUMBER,
  X_ENCUMBRANCE_TYPE in VARCHAR2,
  X_PEN_START_DT in DATE,
  X_S_ENCMB_EFFECT_TYPE in VARCHAR2,
  X_PEE_START_DT in DATE,
  X_PEE_SEQUENCE_NUMBER in NUMBER,
  X_UNIT_SET_CD in VARCHAR2,
  X_US_VERSION_NUMBER in NUMBER,
  X_PUSE_START_DT in DATE,
  X_EXPIRY_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_PE_UNT_SET_EXCL
      where PERSON_ID = X_PERSON_ID
      and ENCUMBRANCE_TYPE = X_ENCUMBRANCE_TYPE
      and PEN_START_DT = X_PEN_START_DT
      and S_ENCMB_EFFECT_TYPE = X_S_ENCMB_EFFECT_TYPE
      and PEE_START_DT = X_PEE_START_DT
      and PEE_SEQUENCE_NUMBER = X_PEE_SEQUENCE_NUMBER
      and UNIT_SET_CD = X_UNIT_SET_CD
      and US_VERSION_NUMBER = X_US_VERSION_NUMBER
      and PUSE_START_DT = X_PUSE_START_DT;

Line: 550


    X_LAST_UPDATE_DATE DATE;

Line: 551


    X_LAST_UPDATED_BY NUMBER;

Line: 552


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 554


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 556


    X_LAST_UPDATED_BY := 1;

Line: 557


    X_LAST_UPDATE_LOGIN := 0;

Line: 559


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 560


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 563


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 564


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 574


   p_action=>'INSERT',
   x_rowid=>X_ROWID,
   x_encumbrance_type=>X_ENCUMBRANCE_TYPE,
   x_expiry_dt=>X_EXPIRY_DT,
   x_pee_sequence_number=>X_PEE_SEQUENCE_NUMBER,
   x_pee_start_dt=>X_PEE_START_DT,
   x_pen_start_dt=>X_PEN_START_DT,
   x_person_id=>X_PERSON_ID,
   x_puse_start_dt=>X_PUSE_START_DT,
   x_s_encmb_effect_type=>X_S_ENCMB_EFFECT_TYPE,
   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
   );

Line: 592


  insert into IGS_PE_UNT_SET_EXCL (
    PERSON_ID,
    ENCUMBRANCE_TYPE,
    PEN_START_DT,
    S_ENCMB_EFFECT_TYPE,
    PEE_START_DT,
    PEE_SEQUENCE_NUMBER,
    UNIT_SET_CD,
    US_VERSION_NUMBER,
    PUSE_START_DT,
    EXPIRY_DT,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.PERSON_ID,
    NEW_REFERENCES.ENCUMBRANCE_TYPE,
    NEW_REFERENCES.PEN_START_DT,
    NEW_REFERENCES.S_ENCMB_EFFECT_TYPE,
    NEW_REFERENCES.PEE_START_DT,
    NEW_REFERENCES.PEE_SEQUENCE_NUMBER,
    NEW_REFERENCES.UNIT_SET_CD,
    NEW_REFERENCES.US_VERSION_NUMBER,
    NEW_REFERENCES.PUSE_START_DT,
    NEW_REFERENCES.EXPIRY_DT,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 634


  p_action => 'INSERT',
  x_rowid => X_ROWID
  );

Line: 637


end INSERT_ROW;

Line: 652


  cursor c1 is select
      EXPIRY_DT
    from IGS_PE_UNT_SET_EXCL
    where ROWID = X_ROWID
    for update nowait;

Line: 663


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

Line: 683


procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_PERSON_ID in NUMBER,
  X_ENCUMBRANCE_TYPE in VARCHAR2,
  X_PEN_START_DT in DATE,
  X_S_ENCMB_EFFECT_TYPE in VARCHAR2,
  X_PEE_START_DT in DATE,
  X_PEE_SEQUENCE_NUMBER in NUMBER,
  X_UNIT_SET_CD in VARCHAR2,
  X_US_VERSION_NUMBER in NUMBER,
  X_PUSE_START_DT in DATE,
  X_EXPIRY_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;

Line: 698


    X_LAST_UPDATED_BY NUMBER;

Line: 699


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 701


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 703


    X_LAST_UPDATED_BY := 1;

Line: 704


    X_LAST_UPDATE_LOGIN := 0;

Line: 706


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 707


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 710


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 711


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 720


   p_action=>'UPDATE',
   x_rowid=>X_ROWID,
   x_encumbrance_type=>X_ENCUMBRANCE_TYPE,
   x_expiry_dt=>X_EXPIRY_DT,
   x_pee_sequence_number=>X_PEE_SEQUENCE_NUMBER,
   x_pee_start_dt=>X_PEE_START_DT,
   x_pen_start_dt=>X_PEN_START_DT,
   x_person_id=>X_PERSON_ID,
   x_puse_start_dt=>X_PUSE_START_DT,
   x_s_encmb_effect_type=>X_S_ENCMB_EFFECT_TYPE,
   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
   );

Line: 738


  update IGS_PE_UNT_SET_EXCL set
    EXPIRY_DT = NEW_REFERENCES.EXPIRY_DT,
    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: 749


  p_action => 'UPDATE',
  x_rowid => X_ROWID
  );

Line: 752


end UPDATE_ROW;

Line: 768


  cursor c1 is select rowid from IGS_PE_UNT_SET_EXCL
     where PERSON_ID = X_PERSON_ID
     and ENCUMBRANCE_TYPE = X_ENCUMBRANCE_TYPE
     and PEN_START_DT = X_PEN_START_DT
     and S_ENCMB_EFFECT_TYPE = X_S_ENCMB_EFFECT_TYPE
     and PEE_START_DT = X_PEE_START_DT
     and PEE_SEQUENCE_NUMBER = X_PEE_SEQUENCE_NUMBER
     and UNIT_SET_CD = X_UNIT_SET_CD
     and US_VERSION_NUMBER = X_US_VERSION_NUMBER
     and PUSE_START_DT = X_PUSE_START_DT
  ;

Line: 785


    INSERT_ROW (
     X_ROWID,
     X_PERSON_ID,
     X_ENCUMBRANCE_TYPE,
     X_PEN_START_DT,
     X_S_ENCMB_EFFECT_TYPE,
     X_PEE_START_DT,
     X_PEE_SEQUENCE_NUMBER,
     X_UNIT_SET_CD,
     X_US_VERSION_NUMBER,
     X_PUSE_START_DT,
     X_EXPIRY_DT,
     X_MODE);

Line: 801


  UPDATE_ROW (
   X_ROWID,
   X_PERSON_ID,
   X_ENCUMBRANCE_TYPE,
   X_PEN_START_DT,
   X_S_ENCMB_EFFECT_TYPE,
   X_PEE_START_DT,
   X_PEE_SEQUENCE_NUMBER,
   X_UNIT_SET_CD,
   X_US_VERSION_NUMBER,
   X_PUSE_START_DT,
   X_EXPIRY_DT,
   X_MODE);

Line: 816


procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) AS
begin

 Before_DML(
  p_action => 'DELETE',
  x_rowid => X_ROWID
  );

Line: 825


  delete from IGS_PE_UNT_SET_EXCL
  where ROWID = X_ROWID;

Line: 831


  p_action => 'DELETE',
  x_rowid => X_ROWID
  );

Line: 834


end DELETE_ROW;