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

Line: 42


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

Line: 44


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

Line: 62


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

Line: 69


    new_references.last_update_date := x_last_update_date;

Line: 70


    new_references.last_updated_by := x_last_updated_by;

Line: 71


    new_references.last_update_login := x_last_update_login;

Line: 75


  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


	IF p_inserting
	OR (old_references.result_type <> new_references.result_type) THEN
		-- Validate Result Type
		IF IGS_AD_VAL_OSES.admp_val_teua_sret(
				new_references.result_type,
				v_message_name) = FALSE THEN
		    Fnd_Message.Set_Name('IGS', v_message_name);

Line: 98


  END BeforeRowInsertUpdate1;

Line: 205


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

Line: 221


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

Line: 237


      SELECT   rowid
      FROM     IGS_AD_TER_ED_UNI_AT
      WHERE    person_id = x_person_id
      AND      te_sequence_number = x_te_sequence_number
      AND      unit_cd = x_unit_cd
      AND      sequence_number = x_sequence_number
      FOR UPDATE NOWAIT;

Line: 266


      SELECT   rowid
      FROM     IGS_AD_TER_ED_UNI_AT
      WHERE    discipline_group_cd = x_discipline_group_cd ;

Line: 293


      SELECT   rowid
      FROM     IGS_AD_TER_ED_UNI_AT
      WHERE    person_id = x_person_id
      AND      te_sequence_number = x_sequence_number ;

Line: 330


    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_te_sequence_number,
      x_unit_cd,
      x_sequence_number,
      x_enrolled_yr,
      x_result_type,
      x_title,
      x_credit_points,
      x_grade,
      x_discipline_group_cd,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 356


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

Line: 371


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

Line: 376


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

Line: 379


    ELSIF (p_action = 'VALIDATE_INSERT') THEN
	IF Get_PK_For_Validation (
		new_references.person_id,
		new_references.te_sequence_number,
		new_references.unit_cd,
		new_references.sequence_number
	) THEN
		Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');

Line: 391


    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
	Check_Constraints;

Line: 393


    ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Null;

Line: 407


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_PERSON_ID in NUMBER,
  X_TE_SEQUENCE_NUMBER in NUMBER,
  X_UNIT_CD in VARCHAR2,
  X_SEQUENCE_NUMBER in NUMBER,
  X_ENROLLED_YR in NUMBER,
  X_RESULT_TYPE in VARCHAR2,
  X_TITLE in VARCHAR2,
  X_CREDIT_POINTS in NUMBER,
  X_GRADE in VARCHAR2,
  X_DISCIPLINE_GROUP_CD in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) As
    cursor C is select ROWID from IGS_AD_TER_ED_UNI_AT
      where PERSON_ID = X_PERSON_ID
      and TE_SEQUENCE_NUMBER = X_TE_SEQUENCE_NUMBER
      and UNIT_CD = X_UNIT_CD
      and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER;

Line: 426


    X_LAST_UPDATE_DATE DATE;

Line: 427


    X_LAST_UPDATED_BY NUMBER;

Line: 428


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 430


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 432


    X_LAST_UPDATED_BY := 1;

Line: 433


    X_LAST_UPDATE_LOGIN := 0;

Line: 435


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 436


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 439


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 440


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 449


     p_action => 'INSERT',
     x_rowid => X_ROWID,
     x_person_id => X_PERSON_ID,
     x_te_sequence_number => X_TE_SEQUENCE_NUMBER,
     x_unit_cd => X_UNIT_CD,
     x_sequence_number => X_SEQUENCE_NUMBER,
     x_enrolled_yr => X_ENROLLED_YR,
     x_result_type => X_RESULT_TYPE,
     x_title => X_TITLE,
     x_credit_points => X_CREDIT_POINTS,
     x_grade => X_GRADE,
     x_discipline_group_cd => X_DISCIPLINE_GROUP_CD,
     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: 468


  insert into IGS_AD_TER_ED_UNI_AT (
    PERSON_ID,
    TE_SEQUENCE_NUMBER,
    UNIT_CD,
    SEQUENCE_NUMBER,
    ENROLLED_YR,
    RESULT_TYPE,
    TITLE,
    CREDIT_POINTS,
    GRADE,
    DISCIPLINE_GROUP_CD,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.PERSON_ID,
    NEW_REFERENCES.TE_SEQUENCE_NUMBER,
    NEW_REFERENCES.UNIT_CD,
    NEW_REFERENCES.SEQUENCE_NUMBER,
    NEW_REFERENCES.ENROLLED_YR,
    NEW_REFERENCES.RESULT_TYPE,
    NEW_REFERENCES.TITLE,
    NEW_REFERENCES.CREDIT_POINTS,
    NEW_REFERENCES.GRADE,
    NEW_REFERENCES.DISCIPLINE_GROUP_CD,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 511


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

Line: 514


  end INSERT_ROW;

Line: 529


  cursor c1 is select
      ENROLLED_YR,
      RESULT_TYPE,
      TITLE,
      CREDIT_POINTS,
      GRADE,
      DISCIPLINE_GROUP_CD
    from IGS_AD_TER_ED_UNI_AT
    where ROWID = X_ROWID for update nowait;

Line: 545


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

Line: 576


procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_PERSON_ID in NUMBER,
  X_TE_SEQUENCE_NUMBER in NUMBER,
  X_UNIT_CD in VARCHAR2,
  X_SEQUENCE_NUMBER in NUMBER,
  X_ENROLLED_YR in NUMBER,
  X_RESULT_TYPE in VARCHAR2,
  X_TITLE in VARCHAR2,
  X_CREDIT_POINTS in NUMBER,
  X_GRADE in VARCHAR2,
  X_DISCIPLINE_GROUP_CD in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) As
    X_LAST_UPDATE_DATE DATE;

Line: 591


    X_LAST_UPDATED_BY NUMBER;

Line: 592


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 594


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 596


    X_LAST_UPDATED_BY := 1;

Line: 597


    X_LAST_UPDATE_LOGIN := 0;

Line: 599


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 600


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 603


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 604


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 613


     p_action => 'UPDATE',
     x_rowid => X_ROWID,
     x_person_id => X_PERSON_ID,
     x_te_sequence_number => X_TE_SEQUENCE_NUMBER,
     x_unit_cd => X_UNIT_CD,
     x_sequence_number => X_SEQUENCE_NUMBER,
     x_enrolled_yr => X_ENROLLED_YR,
     x_result_type => X_RESULT_TYPE,
     x_title => X_TITLE,
     x_credit_points => X_CREDIT_POINTS,
     x_grade => X_GRADE,
     x_discipline_group_cd => X_DISCIPLINE_GROUP_CD,
     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: 632


  update IGS_AD_TER_ED_UNI_AT set
    ENROLLED_YR = NEW_REFERENCES.ENROLLED_YR,
    RESULT_TYPE = NEW_REFERENCES.RESULT_TYPE,
    TITLE = NEW_REFERENCES.TITLE,
    CREDIT_POINTS = NEW_REFERENCES.CREDIT_POINTS,
    GRADE = NEW_REFERENCES.GRADE,
    DISCIPLINE_GROUP_CD = NEW_REFERENCES.DISCIPLINE_GROUP_CD,
    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: 648


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

Line: 652


end UPDATE_ROW;

Line: 668


  cursor c1 is select rowid from IGS_AD_TER_ED_UNI_AT
     where PERSON_ID = X_PERSON_ID
     and TE_SEQUENCE_NUMBER = X_TE_SEQUENCE_NUMBER
     and UNIT_CD = X_UNIT_CD
     and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER
  ;

Line: 679


    INSERT_ROW (
     X_ROWID,
     X_PERSON_ID,
     X_TE_SEQUENCE_NUMBER,
     X_UNIT_CD,
     X_SEQUENCE_NUMBER,
     X_ENROLLED_YR,
     X_RESULT_TYPE,
     X_TITLE,
     X_CREDIT_POINTS,
     X_GRADE,
     X_DISCIPLINE_GROUP_CD,
     X_MODE);

Line: 695


  UPDATE_ROW (
   X_ROWID,
   X_PERSON_ID,
   X_TE_SEQUENCE_NUMBER,
   X_UNIT_CD,
   X_SEQUENCE_NUMBER,
   X_ENROLLED_YR,
   X_RESULT_TYPE,
   X_TITLE,
   X_CREDIT_POINTS,
   X_GRADE,
   X_DISCIPLINE_GROUP_CD,
   X_MODE);

Line: 710


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

Line: 719


  delete from IGS_AD_TER_ED_UNI_AT
  where ROWID = X_ROWID;

Line: 726


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

Line: 729


end DELETE_ROW;