DBA Data[Home] [Help]

APPS.IGS_AS_ASSESSMNT_TYP_PKG SQL Statements

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

Line: 19

    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_AS_ASSESSMNT_TYP
      WHERE    rowid = x_rowid;
Line: 37

    IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
      Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Line: 54

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

    new_references.last_update_date := x_last_update_date;
Line: 62

    new_references.last_updated_by := x_last_updated_by;
Line: 63

    new_references.last_update_login := x_last_update_login;
Line: 73

  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

	-- Validate that inserts/updates are allowed
	IF  p_inserting OR p_updating THEN
	    IF	IGS_AS_VAL_ATYP.ASSP_VAL_SAT_CLOSED(new_references.assessment_type
						,v_message_name) = FALSE THEN
                     Fnd_Message.Set_Name('IGS', v_message_name);
Line: 89

	-- Validate that updates are allowed
	IF  p_updating THEN
		IF  new_references.examinable_ind <> old_references.examinable_ind THEN
			IF  IGS_AS_VAL_ATYP.ASSP_VAL_AI_EXIST2(
							new_references.assessment_type
							,v_message_name) = FALSE THEN
                     Fnd_Message.Set_Name('IGS', v_message_name);
Line: 101

	-- Validate that updates are allowed
	IF  p_updating THEN
		IF  NVL(new_references.assessment_type, 'NULL') <>
			NVL(old_references.assessment_type, 'NULL') THEN
			IF  IGS_AS_VAL_ATYP.ASSP_VAL_AI_EXIST2(
							new_references.assessment_type
							,v_message_name) = FALSE THEN
                     Fnd_Message.Set_Name('IGS', 'IGS_AS_SYS_ASSTYPE_NOTCHG');
Line: 117

  END BeforeRowInsertUpdate1;
Line: 130

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

      SELECT   rowid
      FROM     IGS_AS_ASSESSMNT_TYP
      WHERE    assessment_type = x_assessment_type
      FOR UPDATE NOWAIT;
Line: 240

      SELECT   rowid
      FROM     IGS_AS_ASSESSMNT_TYP
      WHERE    assessment_type = x_s_assessment_type ;
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_assessment_type,
      x_s_assessment_type,
      x_description,
      x_examinable_ind,
      x_closed_ind,
      x_anon_grading_ind,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );
Line: 294

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

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

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

    ELSIF (p_action = 'VALIDATE_INSERT') THEN
IF  Get_PK_For_Validation (
             new_references.assessment_type
			             ) THEN
Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
Line: 325

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

    ELSIF (p_action = 'VALIDATE_DELETE') THEN
              Check_Child_Existance;
Line: 340

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_ASSESSMENT_TYPE in VARCHAR2,
  X_S_ASSESSMENT_TYPE in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_EXAMINABLE_IND in VARCHAR2,
  X_CLOSED_IND in VARCHAR2,
  X_ANON_GRADING_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) as
    cursor C is select ROWID from IGS_AS_ASSESSMNT_TYP
      where ASSESSMENT_TYPE = X_ASSESSMENT_TYPE;
Line: 352

    X_LAST_UPDATE_DATE DATE;
Line: 353

    X_LAST_UPDATED_BY NUMBER;
Line: 354

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 356

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 358

    X_LAST_UPDATED_BY := 1;
Line: 359

    X_LAST_UPDATE_LOGIN := 0;
Line: 361

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 362

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 366

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

 p_action=>'INSERT',
 x_rowid=>X_ROWID,
 x_assessment_type=>X_ASSESSMENT_TYPE,
 x_closed_ind=> NVL(X_CLOSED_IND,'N'),
 x_description=>X_DESCRIPTION,
 x_examinable_ind=> NVL(X_EXAMINABLE_IND,'N'),
 x_s_assessment_type=>X_S_ASSESSMENT_TYPE,
 x_anon_grading_ind=>X_ANON_GRADING_IND,
 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: 389

  insert into IGS_AS_ASSESSMNT_TYP (
    ASSESSMENT_TYPE,
    S_ASSESSMENT_TYPE,
    DESCRIPTION,
    EXAMINABLE_IND,
    CLOSED_IND,
    ANON_GRADING_IND,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.ASSESSMENT_TYPE,
    NEW_REFERENCES.S_ASSESSMENT_TYPE,
    NEW_REFERENCES.DESCRIPTION,
    NEW_REFERENCES.EXAMINABLE_IND,
    NEW_REFERENCES.CLOSED_IND,
    NEW_REFERENCES.ANON_GRADING_IND,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );
Line: 423

end INSERT_ROW;
Line: 434

  cursor c1 is select
      S_ASSESSMENT_TYPE,
      DESCRIPTION,
      EXAMINABLE_IND,
      CLOSED_IND,
      ANON_GRADING_IND
    from IGS_AS_ASSESSMNT_TYP
    where ROWID = X_ROWID  for update  nowait;
Line: 448

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

procedure UPDATE_ROW (
  X_ROWID in  VARCHAR2,
  X_ASSESSMENT_TYPE in VARCHAR2,
  X_S_ASSESSMENT_TYPE in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_EXAMINABLE_IND in VARCHAR2,
  X_CLOSED_IND in VARCHAR2,
  X_ANON_GRADING_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) as
    X_LAST_UPDATE_DATE DATE;
Line: 482

    X_LAST_UPDATED_BY NUMBER;
Line: 483

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 485

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 487

    X_LAST_UPDATED_BY := 1;
Line: 488

    X_LAST_UPDATE_LOGIN := 0;
Line: 490

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 491

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 495

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

 p_action=>'UPDATE',
 x_rowid=>X_ROWID,
 x_assessment_type=>X_ASSESSMENT_TYPE,
 x_closed_ind=>X_CLOSED_IND,
 x_description=>X_DESCRIPTION,
 x_examinable_ind=>X_EXAMINABLE_IND,
 x_s_assessment_type=>X_S_ASSESSMENT_TYPE,
 x_anon_grading_ind=>X_ANON_GRADING_IND,
 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: 519

  update IGS_AS_ASSESSMNT_TYP set
    S_ASSESSMENT_TYPE = NEW_REFERENCES.S_ASSESSMENT_TYPE,
    DESCRIPTION = NEW_REFERENCES.DESCRIPTION,
    EXAMINABLE_IND = NEW_REFERENCES.EXAMINABLE_IND,
    CLOSED_IND = NEW_REFERENCES.CLOSED_IND,
    ANON_GRADING_IND = NEW_REFERENCES.ANON_GRADING_IND,
    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: 534

end UPDATE_ROW;
Line: 546

  cursor c1 is select rowid from IGS_AS_ASSESSMNT_TYP
     where ASSESSMENT_TYPE = X_ASSESSMENT_TYPE
  ;
Line: 554

    INSERT_ROW (
     X_ROWID,
     X_ASSESSMENT_TYPE,
     X_S_ASSESSMENT_TYPE,
     X_DESCRIPTION,
     X_EXAMINABLE_IND,
     X_CLOSED_IND,
     X_ANON_GRADING_IND,
     X_MODE);
Line: 566

  UPDATE_ROW (
   X_ROWID,
   X_ASSESSMENT_TYPE,
   X_S_ASSESSMENT_TYPE,
   X_DESCRIPTION,
   X_EXAMINABLE_IND,
   X_CLOSED_IND,
   X_ANON_GRADING_IND,
   X_MODE);
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_AS_ASSESSMNT_TYP
 where ROWID = X_ROWID;
Line: 592

end DELETE_ROW;