DBA Data[Home] [Help]

APPS.IGS_AD_AUS_SEC_ED_SU_PKG SQL Statements

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

Line: 23

    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_AUS_SEC_ED_SU
      WHERE    rowid = x_rowid;
Line: 41

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

	Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
Line: 185

	Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
Line: 201

      SELECT   rowid
      FROM     IGS_AD_AUS_SEC_ED_SU
      WHERE    person_id = x_person_id
      AND      ase_sequence_number = x_ase_sequence_number
      AND      subject_result_yr = x_subject_result_yr
      AND      subject_cd = x_subject_cd
      FOR UPDATE NOWAIT;
Line: 230

      SELECT   rowid
      FROM     IGS_AD_AUS_SEC_ED_SU
      WHERE    subject_ass_type = x_aus_scndry_edu_ass_type ;
Line: 257

      SELECT   rowid
      FROM     IGS_AD_AUS_SEC_ED_SU
      WHERE    person_id = x_person_id
      AND      ase_sequence_number = x_sequence_number ;
Line: 294

    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_ase_sequence_number,
      x_subject_result_yr,
      x_subject_cd,
      x_subject_desc,
      x_subject_mark,
      x_subject_mark_level,
      x_subject_weighting,
      x_subject_ass_type,
      x_notes,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );
Line: 320

    IF (p_action = 'INSERT') THEN
	IF Get_PK_For_Validation (
		new_references.person_id,
		new_references.ase_sequence_number,
		new_references.subject_result_yr,
		new_references.subject_cd
	) THEN
		Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
Line: 333

    ELSIF (p_action = 'UPDATE') THEN
	  Check_Constraints;
Line: 336

    ELSIF (p_action = 'VALIDATE_INSERT') THEN
      IF Get_PK_For_Validation (
		new_references.person_id,
		new_references.ase_sequence_number,
		new_references.subject_result_yr,
		new_references.subject_cd
  	  ) THEN
		Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
Line: 348

    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
	  Check_Constraints;
Line: 364

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_PERSON_ID in NUMBER,
  X_ASE_SEQUENCE_NUMBER in NUMBER,
  X_SUBJECT_RESULT_YR in NUMBER,
  X_SUBJECT_CD in VARCHAR2,
  X_SUBJECT_DESC in VARCHAR2,
  X_SUBJECT_MARK in VARCHAR2,
  X_SUBJECT_MARK_LEVEL in VARCHAR2,
  X_SUBJECT_WEIGHTING in VARCHAR2,
  X_SUBJECT_ASS_TYPE in VARCHAR2,
  X_NOTES in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_AD_AUS_SEC_ED_SU
      where PERSON_ID = X_PERSON_ID
      and ASE_SEQUENCE_NUMBER = X_ASE_SEQUENCE_NUMBER
      and SUBJECT_RESULT_YR = X_SUBJECT_RESULT_YR
      and SUBJECT_CD = X_SUBJECT_CD;
Line: 383

    X_LAST_UPDATE_DATE DATE;
Line: 384

    X_LAST_UPDATED_BY NUMBER;
Line: 385

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 389

    X_PROGRAM_UPDATE_DATE DATE;
Line: 391

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 393

    X_LAST_UPDATED_BY := 1;
Line: 394

    X_LAST_UPDATE_LOGIN := 0;
Line: 396

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 397

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;
Line: 400

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 401

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;
Line: 411

      X_PROGRAM_UPDATE_DATE := NULL;
Line: 413

      X_PROGRAM_UPDATE_DATE := SYSDATE;
Line: 422

   p_action=>'INSERT',
   x_rowid=>X_ROWID,
   x_person_id=>X_PERSON_ID,
   x_ase_sequence_number=>X_ASE_SEQUENCE_NUMBER,
   x_subject_result_yr=>X_SUBJECT_RESULT_YR,
   x_subject_cd=>X_SUBJECT_CD,
   x_subject_desc=>X_SUBJECT_DESC,
   x_subject_mark=>X_SUBJECT_MARK,
   x_subject_mark_level=>X_SUBJECT_MARK_LEVEL,
   x_subject_weighting=>X_SUBJECT_WEIGHTING,
   x_subject_ass_type=>X_SUBJECT_ASS_TYPE,
   x_notes=>X_NOTES,
   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: 441

  insert into IGS_AD_AUS_SEC_ED_SU (
    PERSON_ID,
    ASE_SEQUENCE_NUMBER,
    SUBJECT_RESULT_YR,
    SUBJECT_CD,
    SUBJECT_DESC,
    SUBJECT_MARK,
    SUBJECT_MARK_LEVEL,
    SUBJECT_WEIGHTING,
    SUBJECT_ASS_TYPE,
    NOTES,
    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.PERSON_ID,
    NEW_REFERENCES.ASE_SEQUENCE_NUMBER,
    NEW_REFERENCES.SUBJECT_RESULT_YR,
    NEW_REFERENCES.SUBJECT_CD,
    NEW_REFERENCES.SUBJECT_DESC,
    NEW_REFERENCES.SUBJECT_MARK,
    NEW_REFERENCES.SUBJECT_MARK_LEVEL,
    NEW_REFERENCES.SUBJECT_WEIGHTING,
    NEW_REFERENCES.SUBJECT_ASS_TYPE,
    NEW_REFERENCES.NOTES,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_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: 492

    p_action => 'INSERT',
    x_rowid => X_ROWID);
Line: 495

end INSERT_ROW;
Line: 510

  cursor c1 is select
      SUBJECT_DESC,
      SUBJECT_MARK,
      SUBJECT_MARK_LEVEL,
      SUBJECT_WEIGHTING,
      SUBJECT_ASS_TYPE,
      NOTES
    from IGS_AD_AUS_SEC_ED_SU
    where ROWID = X_ROWID for update nowait;
Line: 525

    fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
Line: 561

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_PERSON_ID in NUMBER,
  X_ASE_SEQUENCE_NUMBER in NUMBER,
  X_SUBJECT_RESULT_YR in NUMBER,
  X_SUBJECT_CD in VARCHAR2,
  X_SUBJECT_DESC in VARCHAR2,
  X_SUBJECT_MARK in VARCHAR2,
  X_SUBJECT_MARK_LEVEL in VARCHAR2,
  X_SUBJECT_WEIGHTING in VARCHAR2,
  X_SUBJECT_ASS_TYPE in VARCHAR2,
  X_NOTES in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) as
    X_LAST_UPDATE_DATE DATE;
Line: 576

    X_LAST_UPDATED_BY NUMBER;
Line: 577

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 581

    X_PROGRAM_UPDATE_DATE DATE;
Line: 583

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 585

    X_LAST_UPDATED_BY := 1;
Line: 586

    X_LAST_UPDATE_LOGIN := 0;
Line: 588

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 589

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;
Line: 592

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 593

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;
Line: 603

   p_action=>'UPDATE',
   x_rowid=>X_ROWID,
   x_person_id=>X_PERSON_ID,
   x_ase_sequence_number=>X_ASE_SEQUENCE_NUMBER,
   x_subject_result_yr=>X_SUBJECT_RESULT_YR,
   x_subject_cd=>X_SUBJECT_CD,
   x_subject_desc=>X_SUBJECT_DESC,
   x_subject_mark=>X_SUBJECT_MARK,
   x_subject_mark_level=>X_SUBJECT_MARK_LEVEL,
   x_subject_weighting=>X_SUBJECT_WEIGHTING,
   x_subject_ass_type=>X_SUBJECT_ASS_TYPE,
   x_notes=>X_NOTES,
   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: 630

      X_PROGRAM_UPDATE_DATE := OLD_REFERENCES.PROGRAM_UPDATE_DATE;
Line: 632

      X_PROGRAM_UPDATE_DATE := SYSDATE;
Line: 635

  update IGS_AD_AUS_SEC_ED_SU set
    SUBJECT_DESC = NEW_REFERENCES.SUBJECT_DESC,
    SUBJECT_MARK = NEW_REFERENCES.SUBJECT_MARK,
    SUBJECT_MARK_LEVEL = NEW_REFERENCES.SUBJECT_MARK_LEVEL,
    SUBJECT_WEIGHTING = NEW_REFERENCES.SUBJECT_WEIGHTING,
    SUBJECT_ASS_TYPE = NEW_REFERENCES.SUBJECT_ASS_TYPE,
    NOTES = NEW_REFERENCES.NOTES,
    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: 657

    p_action => 'UPDATE',
    x_rowid => X_ROWID);
Line: 660

end UPDATE_ROW;
Line: 676

  cursor c1 is select rowid from IGS_AD_AUS_SEC_ED_SU
     where PERSON_ID = X_PERSON_ID
     and ASE_SEQUENCE_NUMBER = X_ASE_SEQUENCE_NUMBER
     and SUBJECT_RESULT_YR = X_SUBJECT_RESULT_YR
     and SUBJECT_CD = X_SUBJECT_CD
  ;
Line: 687

    INSERT_ROW (
     X_ROWID,
     X_PERSON_ID,
     X_ASE_SEQUENCE_NUMBER,
     X_SUBJECT_RESULT_YR,
     X_SUBJECT_CD,
     X_SUBJECT_DESC,
     X_SUBJECT_MARK,
     X_SUBJECT_MARK_LEVEL,
     X_SUBJECT_WEIGHTING,
     X_SUBJECT_ASS_TYPE,
     X_NOTES,
     X_MODE);
Line: 703

  UPDATE_ROW (
   X_ROWID,
   X_PERSON_ID,
   X_ASE_SEQUENCE_NUMBER,
   X_SUBJECT_RESULT_YR,
   X_SUBJECT_CD,
   X_SUBJECT_DESC,
   X_SUBJECT_MARK,
   X_SUBJECT_MARK_LEVEL,
   X_SUBJECT_WEIGHTING,
   X_SUBJECT_ASS_TYPE,
   X_NOTES,
   X_MODE);
Line: 718

procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) AS
begin

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

  delete from IGS_AD_AUS_SEC_ED_SU
  where ROWID = X_ROWID;
Line: 734

    p_action => 'DELETE',
    x_rowid => X_ROWID);
Line: 736

end DELETE_ROW;