DBA Data[Home] [Help]

APPS.IGS_AD_OS_SEC_ED_SUB_PKG SQL Statements

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

Line: 22

    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_OS_SEC_ED_SUB
      WHERE    rowid = x_rowid;
Line: 40

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

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

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

    new_references.last_update_date := x_last_update_date;
Line: 66

    new_references.last_updated_by := x_last_updated_by;
Line: 67

    new_references.last_update_login := x_last_update_login;
Line: 72

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

	IF p_inserting OR p_updating THEN
		IF IGS_AD_VAL_OSES.admp_val_oses_subj(
					new_references.subject_cd,
					new_references.subject_desc,
					v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);
Line: 91

	IF p_inserting OR (old_references.result_type <> new_references.result_type) THEN
		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: 102

  END BeforeRowInsertUpdate1;
Line: 193

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

      SELECT   rowid
      FROM     IGS_AD_OS_SEC_ED_SUB
      WHERE    person_id = x_person_id
      AND      ose_sequence_number = x_ose_sequence_number
      AND      sequence_number = x_sequence_number
      FOR UPDATE NOWAIT;
Line: 237

      SELECT   rowid
      FROM     IGS_AD_OS_SEC_ED_SUB
      WHERE    person_id = x_person_id
      AND      ose_sequence_number = x_sequence_number ;
Line: 272

    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_ose_sequence_number,
      x_sequence_number,
      x_subject_cd,
      x_subject_desc,
      x_result_type,
      x_result,
      x_subject_result_yr,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );
Line: 296

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

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

    ELSIF (p_action = 'VALIDATE_INSERT') THEN
	IF Get_PK_For_Validation (
		new_references.person_id,
		new_references.ose_sequence_number,
		new_references.sequence_number
	) THEN
		Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
Line: 324

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

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_PERSON_ID in NUMBER,
  X_OSE_SEQUENCE_NUMBER in NUMBER,
  X_SEQUENCE_NUMBER in NUMBER,
  X_SUBJECT_CD in VARCHAR2,
  X_SUBJECT_DESC in VARCHAR2,
  X_RESULT_TYPE in VARCHAR2,
  X_RESULT in VARCHAR2,
  X_SUBJECT_RESULT_YR in NUMBER,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_AD_OS_SEC_ED_SUB
      where PERSON_ID = X_PERSON_ID
      and OSE_SEQUENCE_NUMBER = X_OSE_SEQUENCE_NUMBER
      and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER;
Line: 358

    X_LAST_UPDATE_DATE DATE;
Line: 359

    X_LAST_UPDATED_BY NUMBER;
Line: 360

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 362

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 364

    X_LAST_UPDATED_BY := 1;
Line: 365

    X_LAST_UPDATE_LOGIN := 0;
Line: 367

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 368

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 372

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

    p_action=>'INSERT' ,
    x_rowid=>X_ROWID ,
    x_person_id => X_PERSON_ID ,
    x_ose_sequence_number => X_OSE_SEQUENCE_NUMBER ,
    x_sequence_number => X_SEQUENCE_NUMBER ,
    x_subject_cd => X_SUBJECT_CD ,
    x_subject_desc => X_SUBJECT_DESC ,
    x_result_type => X_RESULT_TYPE ,
    x_result => X_RESULT ,
    x_subject_result_yr => X_SUBJECT_RESULT_YR ,
    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: 400

  insert into IGS_AD_OS_SEC_ED_SUB (
    PERSON_ID,
    OSE_SEQUENCE_NUMBER,
    SEQUENCE_NUMBER,
    SUBJECT_CD,
    SUBJECT_DESC,
    RESULT_TYPE,
    RESULT,
    SUBJECT_RESULT_YR,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.PERSON_ID,
    NEW_REFERENCES.OSE_SEQUENCE_NUMBER,
    NEW_REFERENCES.SEQUENCE_NUMBER,
    NEW_REFERENCES.SUBJECT_CD,
    NEW_REFERENCES.SUBJECT_DESC,
    NEW_REFERENCES.RESULT_TYPE,
    NEW_REFERENCES.RESULT,
    NEW_REFERENCES.SUBJECT_RESULT_YR,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );
Line: 439

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

end INSERT_ROW;
Line: 457

  cursor c1 is select
      SUBJECT_CD,
      SUBJECT_DESC,
      RESULT_TYPE,
      RESULT,
      SUBJECT_RESULT_YR
    from IGS_AD_OS_SEC_ED_SUB
   WHERE  ROWID = X_ROWID  for update nowait ;
Line: 472

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

procedure UPDATE_ROW (
  X_ROWID in VARCHAR2 ,
  X_PERSON_ID in NUMBER,
  X_OSE_SEQUENCE_NUMBER in NUMBER,
  X_SEQUENCE_NUMBER in NUMBER,
  X_SUBJECT_CD in VARCHAR2,
  X_SUBJECT_DESC in VARCHAR2,
  X_RESULT_TYPE in VARCHAR2,
  X_RESULT in VARCHAR2,
  X_SUBJECT_RESULT_YR in NUMBER,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    X_LAST_UPDATE_DATE DATE;
Line: 515

    X_LAST_UPDATED_BY NUMBER;
Line: 516

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 518

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 520

    X_LAST_UPDATED_BY := 1;
Line: 521

    X_LAST_UPDATE_LOGIN := 0;
Line: 523

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 524

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 528

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

    p_action=>'UPDATE' ,
    x_rowid=>X_ROWID ,
    x_person_id => X_PERSON_ID ,
    x_ose_sequence_number => X_OSE_SEQUENCE_NUMBER ,
    x_sequence_number => X_SEQUENCE_NUMBER ,
    x_subject_cd => X_SUBJECT_CD ,
    x_subject_desc => X_SUBJECT_DESC ,
    x_result_type => X_RESULT_TYPE ,
    x_result => X_RESULT ,
    x_subject_result_yr => X_SUBJECT_RESULT_YR ,
    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: 557

  update IGS_AD_OS_SEC_ED_SUB set
    SUBJECT_CD = NEW_REFERENCES.SUBJECT_CD,
    SUBJECT_DESC = NEW_REFERENCES.SUBJECT_DESC,
    RESULT_TYPE = NEW_REFERENCES.RESULT_TYPE,
    RESULT = NEW_REFERENCES.RESULT,
    SUBJECT_RESULT_YR = NEW_REFERENCES.SUBJECT_RESULT_YR,
    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: 572

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

end UPDATE_ROW;
Line: 590

  cursor c1 is select rowid from IGS_AD_OS_SEC_ED_SUB
     where PERSON_ID = X_PERSON_ID
     and OSE_SEQUENCE_NUMBER = X_OSE_SEQUENCE_NUMBER
     and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER
  ;
Line: 601

    INSERT_ROW (
     X_ROWID,
     X_PERSON_ID,
     X_OSE_SEQUENCE_NUMBER,
     X_SEQUENCE_NUMBER,
     X_SUBJECT_CD,
     X_SUBJECT_DESC,
     X_RESULT_TYPE,
     X_RESULT,
     X_SUBJECT_RESULT_YR,
     X_MODE);
Line: 615

  UPDATE_ROW (
   X_ROWID  ,
   X_PERSON_ID,
   X_OSE_SEQUENCE_NUMBER,
   X_SEQUENCE_NUMBER,
   X_SUBJECT_CD,
   X_SUBJECT_DESC,
   X_RESULT_TYPE,
   X_RESULT,
   X_SUBJECT_RESULT_YR,
   X_MODE);
Line: 628

procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) AS
begin


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

  delete from IGS_AD_OS_SEC_ED_SUB
  where ROWID = X_ROWID;
Line: 647

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

end DELETE_ROW;