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

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

Line: 7


  PROCEDURE beforerowdelete;

Line: 17


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

Line: 35


    IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
      Close cur_old_ref_values;

Line: 37


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

Line: 48


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

Line: 55


    new_references.last_update_date := x_last_update_date;

Line: 56


    new_references.last_updated_by := x_last_updated_by;

Line: 57


    new_references.last_update_login := x_last_update_login;

Line: 67


  PROCEDURE BeforeRowUpdate1(
    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: 74


	-- Validate update of closed indicator.
	IF old_references.closed_ind <> new_references.closed_ind THEN
		IF IGS_EN_VAL_EC.enrp_val_ec_clsd_upd (
				new_references.enrolment_cat,
				new_references.closed_ind,
				v_message_name) = FALSE THEN
				fnd_message.set_name('IGS',v_message_name);

Line: 87


  END BeforeRowUpdate1;

Line: 155


      SELECT   rowid
      FROM     IGS_EN_ENROLMENT_CAT
      WHERE    enrolment_cat = x_enrolment_cat;

Line: 183


    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_enrolment_cat,
      x_description,
      x_closed_ind,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 202


    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to Before Insert.
	IF Get_PK_For_Validation (
	    new_references.enrolment_cat
    	) then
 	 Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 212


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

Line: 216


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

Line: 220


   ELSIF (p_action = 'VALIDATE_INSERT') then
	IF Get_PK_For_Validation (
	    new_references.enrolment_cat
    	) then
 	 Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 229


    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
	 Check_constraints;

Line: 231


   ELSIF (p_action = 'VALIDATE_DELETE') THEN
     Check_Child_Existance;

Line: 245


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

Line: 248


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

Line: 251


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

Line: 257


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_ENROLMENT_CAT in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_CLOSED_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_EN_ENROLMENT_CAT
      where ENROLMENT_CAT = X_ENROLMENT_CAT;

Line: 266


    X_LAST_UPDATE_DATE DATE;

Line: 267


    X_LAST_UPDATED_BY NUMBER;

Line: 268


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 270


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 272


    X_LAST_UPDATED_BY := 1;

Line: 273


    X_LAST_UPDATE_LOGIN := 0;

Line: 275


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 276


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 279


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 280


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 289


    p_action => 'INSERT',
    x_rowid =>   X_ROWID,
    x_enrolment_cat => X_ENROLMENT_CAT,
    x_description => X_DESCRIPTION,
    x_closed_ind => NVL(X_CLOSED_IND,'N'),
    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: 300


  insert into IGS_EN_ENROLMENT_CAT (
    ENROLMENT_CAT,
    DESCRIPTION,
    CLOSED_IND,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.ENROLMENT_CAT,
    NEW_REFERENCES.DESCRIPTION,
    NEW_REFERENCES.CLOSED_IND,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 328


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

Line: 332


end INSERT_ROW;

Line: 340


  cursor c1 is select
      DESCRIPTION,
      CLOSED_IND
    from IGS_EN_ENROLMENT_CAT
    where ROWID = X_ROWID for update  nowait;

Line: 352


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

Line: 371


procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_ENROLMENT_CAT in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_CLOSED_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;

Line: 379


    X_LAST_UPDATED_BY NUMBER;

Line: 380


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 382


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 384


    X_LAST_UPDATED_BY := 1;

Line: 385


    X_LAST_UPDATE_LOGIN := 0;

Line: 387


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 388


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 391


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 392


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 401


    p_action => 'UPDATE',
    x_rowid =>   X_ROWID,
    x_enrolment_cat => X_ENROLMENT_CAT,
    x_description => X_DESCRIPTION,
    x_closed_ind => X_CLOSED_IND,
    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: 412


  update IGS_EN_ENROLMENT_CAT set
    DESCRIPTION = NEW_REFERENCES.DESCRIPTION,
    CLOSED_IND = NEW_REFERENCES.CLOSED_IND,
    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: 423


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

Line: 426


end UPDATE_ROW;

Line: 435


  cursor c1 is select rowid from IGS_EN_ENROLMENT_CAT
     where ENROLMENT_CAT = X_ENROLMENT_CAT
  ;

Line: 444


    INSERT_ROW (
     X_ROWID,
     X_ENROLMENT_CAT,
     X_DESCRIPTION,
     X_CLOSED_IND,
     X_MODE);

Line: 453


  UPDATE_ROW (
   X_ROWID,
   X_ENROLMENT_CAT,
   X_DESCRIPTION,
   X_CLOSED_IND,
   X_MODE);

Line: 461


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

Line: 468


  delete from IGS_EN_ENROLMENT_CAT
  where ROWID = X_ROWID;

Line: 474


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

Line: 477


end DELETE_ROW;

Line: 479


PROCEDURE beforerowdelete AS
  ------------------------------------------------------------------
  --Created by  : rnirwani
  --Date created: 03-Jan-03
  --
  --Purpose: Validation to ensure that delation is not allowed
  --
  --
  --Known limitations/enhancements and/or remarks:
  --
  --Change History:
  --Who         When            What
  -------------------------------------------------------------------

BEGIN

-- Deletion is not allowed in this table.
-- this change has been done since in the PK check the lock has been
-- removed. Hence to avoid data inconsistency the deletion should not
-- be done. The record should be closed instead by checking the closed
-- indicator.

  FND_MESSAGE.SET_NAME('IGS','IGS_FI_DEL_NOT_ALLWD');

Line: 505


END beforerowdelete;