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

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

Line: 16


    x_last_update_date IN DATE ,
    x_last_updated_by IN NUMBER ,
    x_last_update_login IN NUMBER ,
    x_closed_ind IN VARCHAR2 ,
    x_single_response_flag IN VARCHAR2 ,
    x_include_sr_in_rollover_flag IN VARCHAR2
  ) AS

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

Line: 37


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

Line: 39


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

Line: 55


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

Line: 62


    new_references.last_update_date := x_last_update_date;

Line: 63


    new_references.last_updated_by := x_last_updated_by;

Line: 64


    new_references.last_update_login := x_last_update_login;

Line: 140


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

Line: 156


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

Line: 200


      SELECT   rowid
      FROM     IGS_AD_PRD_AD_PRC_CA
      WHERE    adm_cal_type = x_adm_cal_type
      AND      adm_ci_sequence_number = x_adm_ci_sequence_number
      AND      admission_cat = x_admission_cat
      AND      s_admission_process_type = x_s_admission_process_type AND
               closed_ind = NVL(x_closed_ind,closed_ind);

Line: 230


      SELECT   rowid
      FROM     IGS_AD_PRD_AD_PRC_CA
      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: 259


      SELECT   rowid
      FROM     IGS_AD_PRD_AD_PRC_CA
      WHERE    admission_cat = x_admission_cat
      AND      s_admission_process_type = x_s_admission_process_type ;

Line: 290


    x_last_update_date IN DATE ,
    x_last_updated_by IN NUMBER ,
    x_last_update_login IN NUMBER ,
    x_closed_ind IN VARCHAR2,
    x_single_response_flag IN VARCHAR2,
    x_include_sr_in_rollover_flag IN VARCHAR2
  ) AS
  BEGIN

    Set_Column_Values (
      p_action,
      x_rowid,
      x_adm_cal_type,
      x_adm_ci_sequence_number,
      x_admission_cat,
      x_s_admission_process_type,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login ,
      x_closed_ind,
      x_single_response_flag,
      x_include_sr_in_rollover_flag
    );

Line: 316


 IF (p_action = 'INSERT') THEN
	Null;

Line: 330


 ELSIF (p_action = 'UPDATE') THEN
       Check_Constraints;

Line: 333


 ELSIF (p_action = 'DELETE') THEN
       Check_Child_Existance;

Line: 335


 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,
          new_references.s_admission_process_type
		) THEN
         Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 347


 ELSIF (p_action = 'VALIDATE_UPDATE') THEN
       Check_Constraints;

Line: 349


 ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Check_Child_Existance;

Line: 358


 IF p_action IN ('INSERT', 'UPDATE', 'VALIDATE_INSERT', 'VALIDATE_UPDATE') THEN
     IF NVL(new_references.include_sr_in_rollover_flag,'N')  = 'Y' AND NVL(new_references.single_response_flag,'N')  = 'N' THEN
       Fnd_Message.Set_Name ('IGS', 'IGS_AD_SR_CHECK_VALUE'); -- Single Response Rollover checkbox cannot be checked without checking Single Response checkbox.

Line: 378


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_S_ADMISSION_PROCESS_TYPE in VARCHAR2,
  X_MODE in VARCHAR2 ,
  x_closed_ind IN VARCHAR2,
  x_single_response_flag IN VARCHAR2,
  x_include_sr_in_rollover_flag IN VARCHAR2
  ) AS
    cursor C is select ROWID from IGS_AD_PRD_AD_PRC_CA
      where ADM_CAL_TYPE = X_ADM_CAL_TYPE
      and ADM_CI_SEQUENCE_NUMBER = X_ADM_CI_SEQUENCE_NUMBER
      and ADMISSION_CAT = X_ADMISSION_CAT
      and S_ADMISSION_PROCESS_TYPE = X_S_ADMISSION_PROCESS_TYPE;

Line: 394


    X_LAST_UPDATE_DATE DATE;

Line: 395


    X_LAST_UPDATED_BY NUMBER;

Line: 396


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 398


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 400


    X_LAST_UPDATED_BY := 1;

Line: 401


    X_LAST_UPDATE_LOGIN := 0;

Line: 403


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 404


    IF X_LAST_UPDATED_BY is NULL THEN
      X_LAST_UPDATED_BY := -1;

Line: 407


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 408


    IF X_LAST_UPDATE_LOGIN is NULL THEN
      X_LAST_UPDATE_LOGIN := -1;

Line: 416


  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_s_admission_process_type => X_S_ADMISSION_PROCESS_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_closed_ind => x_closed_ind,
  x_single_response_flag =>  x_single_response_flag,
  x_include_sr_in_rollover_flag => x_include_sr_in_rollover_flag
  );

Line: 432


  INSERT INTO IGS_AD_PRD_AD_PRC_CA (
    ADM_CAL_TYPE,
    ADM_CI_SEQUENCE_NUMBER,
    ADMISSION_CAT,
    S_ADMISSION_PROCESS_TYPE,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    CLOSED_IND,
    SINGLE_RESPONSE_FLAG,
    INCLUDE_SR_IN_ROLLOVER_FLAG
  ) values (
    NEW_REFERENCES.ADM_CAL_TYPE,
    NEW_REFERENCES.ADM_CI_SEQUENCE_NUMBER,
    NEW_REFERENCES.ADMISSION_CAT,
    NEW_REFERENCES.S_ADMISSION_PROCESS_TYPE,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN,
    NEW_REFERENCES.CLOSED_IND,
    NEW_REFERENCES.SINGLE_RESPONSE_FLAG,
    NEW_REFERENCES.INCLUDE_SR_IN_ROLLOVER_FLAG
  );

Line: 468


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

Line: 471


END INSERT_ROW;

Line: 474


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_S_ADMISSION_PROCESS_TYPE in VARCHAR2,
  X_MODE in VARCHAR2 ,
  x_closed_ind IN VARCHAR2,
  x_single_response_flag IN VARCHAR2,
  x_include_sr_in_rollover_flag IN VARCHAR2
  ) AS
    X_LAST_UPDATE_DATE DATE;

Line: 486


    X_LAST_UPDATED_BY NUMBER;

Line: 487


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 489


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 491


    X_LAST_UPDATED_BY := 1;

Line: 492


    X_LAST_UPDATE_LOGIN := 0;

Line: 494


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 495


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 498


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 499


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 507


  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_s_admission_process_type => X_S_ADMISSION_PROCESS_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_closed_ind => x_closed_ind,
  x_single_response_flag =>  x_single_response_flag,
  x_include_sr_in_rollover_flag => x_include_sr_in_rollover_flag
  );

Line: 523


  UPDATE IGS_AD_PRD_AD_PRC_CA SET
    ADM_CAL_TYPE = new_references.adm_cal_type,
    ADM_CI_SEQUENCE_NUMBER = new_references.adm_ci_sequence_number,
    ADMISSION_CAT = new_references.admission_cat,
    S_ADMISSION_PROCESS_TYPE = new_references.s_admission_process_type,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
    CLOSED_IND = X_CLOSED_IND,
    SINGLE_RESPONSE_FLAG = X_SINGLE_RESPONSE_FLAG,
    INCLUDE_SR_IN_ROLLOVER_FLAG = X_INCLUDE_SR_IN_ROLLOVER_FLAG
  WHERE
    ROWID = X_ROWID;

Line: 542


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

Line: 545


END update_row;

Line: 557


  CURSOR c1 IS SELECT
    rowid
    FROM IGS_AD_PRD_AD_PRC_CA
    WHERE ROWID = X_ROWID for update nowait;

Line: 568


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

Line: 577


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

Line: 585


  DELETE FROM IGS_AD_PRD_AD_PRC_CA
  WHERE ROWID = X_ROWID;

Line: 591


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

Line: 595


END DELETE_ROW;