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

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

Line: 24


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

Line: 42


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


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

Line: 99


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

Line: 112


		(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.pce_start_dt,
			 	new_references.expiry_dt,
			 	v_message_name) = FALSE THEN
			  Fnd_Message.Set_Name('IGS', v_message_name);

Line: 134


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

Line: 146


  END BeforeRowInsertUpdate1;

Line: 154


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


  END AfterRowInsertUpdate2;

Line: 252


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

Line: 280


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

Line: 300


      SELECT   rowid
      FROM     IGS_PE_COURSE_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      course_cd = x_course_cd
      AND      pce_start_dt = x_pce_start_dt
      FOR UPDATE NOWAIT;

Line: 333


      SELECT   rowid
      FROM     IGS_PE_COURSE_EXCL
      WHERE    course_cd = x_course_cd ;

Line: 364


      SELECT   rowid
      FROM     IGS_PE_COURSE_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: 404


    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_encumbrance_type,
      x_pen_start_dt,
      x_s_encmb_effect_type,
      x_pee_start_dt,
      x_pee_sequence_number,
      x_course_cd,
      x_pce_start_dt,
      x_expiry_dt,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 429


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

Line: 447


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

Line: 453


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

       NULL;

Line: 457


    ELSIF (p_action = 'VALIDATE_INSERT') THEN
      IF  Get_PK_For_Validation (
          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.course_cd ,
    		new_references.pce_start_dt ) THEN
         Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 474


        ELSIF (p_action = 'VALIDATE_UPDATE') THEN
       Check_Constraints; -- if procedure present

Line: 476


	ELSIF (p_action = 'VALIDATE_DELETE') THEN
     NULL;

Line: 491


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

Line: 495


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

Line: 499


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

Line: 506


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_COURSE_CD in VARCHAR2,
  X_PCE_START_DT in DATE,
  X_EXPIRY_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_PE_COURSE_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 COURSE_CD = X_COURSE_CD
      and PCE_START_DT = X_PCE_START_DT;

Line: 528


    X_LAST_UPDATE_DATE DATE;

Line: 529


    X_LAST_UPDATED_BY NUMBER;

Line: 530


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 532


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 534


    X_LAST_UPDATED_BY := 1;

Line: 535


    X_LAST_UPDATE_LOGIN := 0;

Line: 537


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 538


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 541


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 542


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 551


  p_action=>'INSERT',
  x_rowid=>X_ROWID,
  x_course_cd=>X_COURSE_CD,
  x_encumbrance_type=>X_ENCUMBRANCE_TYPE,
  x_expiry_dt=>X_EXPIRY_DT,
  x_pce_start_dt=>X_PCE_START_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_s_encmb_effect_type=>X_S_ENCMB_EFFECT_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: 568


  insert into IGS_PE_COURSE_EXCL (
    PERSON_ID,
    ENCUMBRANCE_TYPE,
    PEN_START_DT,
    S_ENCMB_EFFECT_TYPE,
    PEE_START_DT,
    PEE_SEQUENCE_NUMBER,
    COURSE_CD,
    PCE_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.COURSE_CD,
    NEW_REFERENCES.PCE_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: 609


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

Line: 613


end INSERT_ROW;

Line: 627


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

Line: 638


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

Line: 658


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_COURSE_CD in VARCHAR2,
  X_PCE_START_DT in DATE,
  X_EXPIRY_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;

Line: 672


    X_LAST_UPDATED_BY NUMBER;

Line: 673


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 675


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 677


    X_LAST_UPDATED_BY := 1;

Line: 678


    X_LAST_UPDATE_LOGIN := 0;

Line: 680


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 681


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 684


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 685


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 694


  p_action=>'UPDATE',
  x_rowid=>X_ROWID,
  x_course_cd=>X_COURSE_CD,
  x_encumbrance_type=>X_ENCUMBRANCE_TYPE,
  x_expiry_dt=>X_EXPIRY_DT,
  x_pce_start_dt=>X_PCE_START_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_s_encmb_effect_type=>X_S_ENCMB_EFFECT_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: 711


  update IGS_PE_COURSE_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: 722


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

Line: 725


end UPDATE_ROW;

Line: 740


  cursor c1 is select rowid from IGS_PE_COURSE_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 COURSE_CD = X_COURSE_CD
     and PCE_START_DT = X_PCE_START_DT
  ;

Line: 756


    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_COURSE_CD,
     X_PCE_START_DT,
     X_EXPIRY_DT,
     X_MODE);

Line: 771


  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_COURSE_CD,
   X_PCE_START_DT,
   X_EXPIRY_DT,
   X_MODE);

Line: 785


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

Line: 793


  delete from IGS_PE_COURSE_EXCL
  where ROWID = X_ROWID;

Line: 799


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

Line: 802


end DELETE_ROW;