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_AD_PERD_AD_CAT_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
  ) AS

    CURSOR cur_old_ref_values IS
      SELECT   *
      FROM     IGS_AD_PERD_AD_CAT
      WHERE    rowid = x_rowid;

Line: 36


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

Line: 38


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

Line: 51


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

Line: 58


    new_references.last_update_date := x_last_update_date;

Line: 59


    new_references.last_updated_by := x_last_updated_by;

Line: 60


    new_references.last_update_login := x_last_update_login;

Line: 64


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


	IF p_inserting THEN
		-- Validate the admission calendar instance
		IF IGS_AD_VAL_APAC.admp_val_apac_ci(
			new_references.adm_cal_type,
			new_references.adm_ci_sequence_number,
			new_references.admission_cat,
			v_ci_start_dt,
			v_ci_end_dt,
			v_message_name) = FALSE THEN
		Fnd_Message.Set_Name('IGS',v_message_name);

Line: 102


  END BeforeRowInsertUpdate1;

Line: 146


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

Line: 169


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

Line: 201


      SELECT   rowid
      FROM     IGS_AD_PERD_AD_CAT
      WHERE    adm_cal_type = x_adm_cal_type
      AND      adm_ci_sequence_number = x_adm_ci_sequence_number
      AND      admission_cat = x_admission_cat;

Line: 227


      SELECT   rowid
      FROM     IGS_AD_PERD_AD_CAT
      WHERE    admission_cat = x_admission_cat ;

Line: 256


      SELECT   rowid
      FROM     IGS_AD_PERD_AD_CAT
      WHERE    adm_cal_type = x_cal_type
      AND      adm_ci_sequence_number = x_sequence_number
      AND      TRUNC(ci_start_dt) = TRUNC(x_start_dt)
      AND      TRUNC(ci_end_dt) = TRUNC(x_end_dt) ;

Line: 290


    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_adm_cal_type,
      x_adm_ci_sequence_number,
      x_admission_cat,
      x_ci_start_dt,
      x_ci_end_dt,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 311


 IF (p_action = 'INSERT') THEN
     BeforeRowInsertUpdate1 ( p_inserting => TRUE );

Line: 324


 ELSIF (p_action = 'UPDATE') THEN
       BeforeRowInsertUpdate1 ( p_updating => TRUE );

Line: 328


 ELSIF (p_action = 'DELETE') THEN
       Check_Child_Existance;

Line: 330


 ELSIF (p_action = 'VALIDATE_INSERT') THEN
      IF  Get_PK_For_Validation (
          new_references.adm_cal_type,
          new_references.adm_ci_sequence_number,
          new_references.admission_cat
          ) THEN
         Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 341


 ELSIF (p_action = 'VALIDATE_UPDATE') THEN
       Check_Constraints;

Line: 343


 ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Check_Child_Existance;

Line: 348


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_ADM_CAL_TYPE in VARCHAR2,
  X_ADM_CI_SEQUENCE_NUMBER in NUMBER,
  X_ADMISSION_CAT in VARCHAR2,
  X_CI_START_DT in DATE,
  X_CI_END_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_AD_PERD_AD_CAT
      where ADM_CAL_TYPE = X_ADM_CAL_TYPE
      and ADM_CI_SEQUENCE_NUMBER = X_ADM_CI_SEQUENCE_NUMBER
      and ADMISSION_CAT = X_ADMISSION_CAT;

Line: 361


    X_LAST_UPDATE_DATE DATE;

Line: 362


    X_LAST_UPDATED_BY NUMBER;

Line: 363


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 367


    X_PROGRAM_UPDATE_DATE DATE;

Line: 369


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 371


    X_LAST_UPDATED_BY := 1;

Line: 372


    X_LAST_UPDATE_LOGIN := 0;

Line: 374


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 375


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 378


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 379


    if X_LAST_UPDATE_LOGIN is NULL then
	X_LAST_UPDATE_LOGIN := -1;

Line: 389


        X_PROGRAM_UPDATE_DATE := NULL;

Line: 391


        X_PROGRAM_UPDATE_DATE := SYSDATE;

Line: 399


  Before_DML(p_action =>'INSERT',
  x_rowid => X_ROWID,
  x_adm_cal_type => X_ADM_CAL_TYPE,
  x_adm_ci_sequence_number => X_ADM_CI_SEQUENCE_NUMBER,
  x_admission_cat => X_ADMISSION_CAT,
  x_ci_start_dt => X_CI_START_DT,
  x_ci_end_dt => X_CI_END_DT,
  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: 413


  insert into IGS_AD_PERD_AD_CAT (
    ADM_CAL_TYPE,
    ADM_CI_SEQUENCE_NUMBER,
    ADMISSION_CAT,
    CI_START_DT,
    CI_END_DT,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    REQUEST_ID,
    PROGRAM_ID,
    PROGRAM_APPLICATION_ID,
    PROGRAM_UPDATE_DATE
  ) values (
    NEW_REFERENCES.ADM_CAL_TYPE,
    NEW_REFERENCES.ADM_CI_SEQUENCE_NUMBER,
    NEW_REFERENCES.ADMISSION_CAT,
    NEW_REFERENCES.CI_START_DT,
    NEW_REFERENCES.CI_END_DT,
    NEW_REFERENCES.CREATION_DATE,
    NEW_REFERENCES.CREATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN,
    X_REQUEST_ID,
    X_PROGRAM_ID,
    X_PROGRAM_APPLICATION_ID,
    X_PROGRAM_UPDATE_DATE
 );

Line: 452


end INSERT_ROW;

Line: 462


  cursor c1 is select
      CI_START_DT,
      CI_END_DT
    from IGS_AD_PERD_AD_CAT
    where ROWID = X_ROWID  for update nowait;

Line: 474


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

Line: 493


procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_ADM_CAL_TYPE in VARCHAR2,
  X_ADM_CI_SEQUENCE_NUMBER in NUMBER,
  X_ADMISSION_CAT in VARCHAR2,
  X_CI_START_DT in DATE,
  X_CI_END_DT in DATE,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;

Line: 503


    X_LAST_UPDATED_BY NUMBER;

Line: 504


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 508


    X_PROGRAM_UPDATE_DATE DATE;

Line: 510


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 512


    X_LAST_UPDATED_BY := 1;

Line: 513


    X_LAST_UPDATE_LOGIN := 0;

Line: 515


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 516


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 519


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 520


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 529


  Before_DML(p_action =>'UPDATE',
  x_rowid =>X_ROWID,
  x_adm_cal_type => X_ADM_CAL_TYPE,
  x_adm_ci_sequence_number => X_ADM_CI_SEQUENCE_NUMBER,
  x_admission_cat => X_ADMISSION_CAT,
  x_ci_start_dt => X_CI_START_DT,
  x_ci_end_dt => X_CI_END_DT,
  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: 552


		X_PROGRAM_UPDATE_DATE := SYSDATE;

Line: 555


  update IGS_AD_PERD_AD_CAT set
    CI_START_DT = NEW_REFERENCES.CI_START_DT,
    CI_END_DT = NEW_REFERENCES.CI_END_DT,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
    REQUEST_ID = X_REQUEST_ID,
    PROGRAM_ID = X_PROGRAM_ID,
    PROGRAM_APPLICATION_ID = X_PROGRAM_APPLICATION_ID,
    PROGRAM_UPDATE_DATE = X_PROGRAM_UPDATE_DATE
  where ROWID = X_ROWID
  ;

Line: 570


end UPDATE_ROW;

Line: 581


  cursor c1 is select rowid from IGS_AD_PERD_AD_CAT
     where ADM_CAL_TYPE = X_ADM_CAL_TYPE
     and ADM_CI_SEQUENCE_NUMBER = X_ADM_CI_SEQUENCE_NUMBER
     and ADMISSION_CAT = X_ADMISSION_CAT
  ;

Line: 591


    INSERT_ROW (
     X_ROWID,
     X_ADM_CAL_TYPE,
     X_ADM_CI_SEQUENCE_NUMBER,
     X_ADMISSION_CAT,
     X_CI_START_DT,
     X_CI_END_DT,
     X_MODE);

Line: 602


  UPDATE_ROW (
   X_ROWID,
   X_ADM_CAL_TYPE,
   X_ADM_CI_SEQUENCE_NUMBER,
   X_ADMISSION_CAT,
   X_CI_START_DT,
   X_CI_END_DT,
   X_MODE);

Line: 612


procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) AS
begin

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

Line: 621


  delete from IGS_AD_PERD_AD_CAT
  where ROWID = X_ROWID;

Line: 626


end DELETE_ROW;