DBA Data[Home] [Help]

APPS.IGS_PS_AWD_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 ,
    x_grading_schema_cd IN VARCHAR2 DEFAULT NULL ,
    x_gs_version_number IN NUMBER DEFAULT NULL
  ) AS

    CURSOR cur_old_ref_values IS
      SELECT   *
      FROM     IGS_PS_AWD
      WHERE    ROWID = x_rowid;
Line: 39

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

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

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

	IF p_inserting OR p_updating THEN
		IF NVL(new_references.testamur_type, 'NULL') <> NVL(old_references.testamur_type, 'NULL') THEN
			IF new_references.testamur_type IS NOT NULL THEN
				IF IGS_PS_VAL_AW.crsp_val_tt_closed(
						new_references.testamur_type,
						v_message_name) = FALSE THEN
					Fnd_Message.Set_Name('IGS',v_message_name);
Line: 92

	-- Validate update to IGS_PS_AWD system IGS_PS_AWD type
	IF p_updating THEN
		IF IGS_PS_VAL_AW.crsp_val_aw_upd(
					new_references.award_cd,
					new_references.s_award_type,
					old_references.s_award_type,
					v_message_name) = FALSE THEN
				Fnd_Message.Set_Name('IGS',v_message_name);
Line: 105

  END BeforeRowInsertUpdate1;
Line: 215

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

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

      SELECT   ROWID
      FROM     IGS_PS_AWD
      WHERE    award_cd = x_award_cd;
Line: 282

      SELECT   ROWID
      FROM     IGS_PS_AWD
      WHERE    testamur_type = x_testamur_type ;
Line: 311

      SELECT   ROWID
      FROM     IGS_PS_AWD
      WHERE    grading_schema_cd =  x_grading_schema_cd
               AND
               gs_version_number =  x_gs_version_number;
Line: 345

    x_last_update_date IN DATE DEFAULT NULL,
    x_last_updated_by IN NUMBER DEFAULT NULL,
    x_last_update_login IN NUMBER DEFAULT NULL ,
    x_grading_schema_cd IN VARCHAR2 DEFAULT NULL ,
    x_gs_version_number IN NUMBER DEFAULT NULL
  ) AS
  BEGIN

    Set_Column_Values (
      p_action,
      x_rowid,
      x_award_cd,
      x_award_title,
      x_s_award_type,
      x_testamur_type,
      x_closed_ind,
      x_notes,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login ,
      x_grading_schema_cd ,
      x_gs_version_number
    );
Line: 371

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

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

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

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

PROCEDURE INSERT_ROW (
  X_ROWID IN OUT NOCOPY VARCHAR2,
  X_AWARD_CD IN VARCHAR2,
  X_AWARD_TITLE IN VARCHAR2,
  X_S_AWARD_TYPE IN VARCHAR2,
  X_TESTAMUR_TYPE IN VARCHAR2,
  X_CLOSED_IND IN VARCHAR2,
  X_NOTES IN VARCHAR2,
  X_MODE IN VARCHAR2 DEFAULT 'R' ,
  X_GRADING_SCHEMA_CD IN VARCHAR2  ,
  X_GS_VERSION_NUMBER IN NUMBER
  ) AS
    CURSOR C IS SELECT ROWID FROM IGS_PS_AWD
      WHERE AWARD_CD = X_AWARD_CD;
Line: 425

    X_LAST_UPDATE_DATE DATE;
Line: 426

    X_LAST_UPDATED_BY NUMBER;
Line: 427

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 429

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 431

    X_LAST_UPDATED_BY := 1;
Line: 432

    X_LAST_UPDATE_LOGIN := 0;
Line: 434

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 435

    IF X_LAST_UPDATED_BY IS NULL THEN
      X_LAST_UPDATED_BY := -1;
Line: 438

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 439

    IF X_LAST_UPDATE_LOGIN IS NULL THEN
      X_LAST_UPDATE_LOGIN := -1;
Line: 449

    p_action => 'INSERT',
    x_rowid => X_ROWID,
    x_award_cd => X_AWARD_CD,
    x_award_title => X_AWARD_TITLE,
    x_s_award_type => X_S_AWARD_TYPE,
    x_testamur_type => X_TESTAMUR_TYPE,
    x_closed_ind => NVL(X_CLOSED_IND,'N'),
    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  ,
    x_grading_schema_cd => X_GRADING_SCHEMA_CD,
    x_gs_version_number => X_GS_VERSION_NUMBER
 );
Line: 466

  INSERT INTO IGS_PS_AWD (
    AWARD_CD,
    AWARD_TITLE,
    S_AWARD_TYPE,
    TESTAMUR_TYPE,
    CLOSED_IND,
    NOTES,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    GRADING_SCHEMA_CD,
    GS_VERSION_NUMBER
  ) VALUES (
    NEW_REFERENCES.AWARD_CD,
    NEW_REFERENCES.AWARD_TITLE,
    NEW_REFERENCES.S_AWARD_TYPE,
    NEW_REFERENCES.TESTAMUR_TYPE,
    NEW_REFERENCES.CLOSED_IND,
    NEW_REFERENCES.NOTES,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN,
    NEW_REFERENCES.GRADING_SCHEMA_CD,
    NEW_REFERENCES.GS_VERSION_NUMBER
  );
Line: 505

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

END INSERT_ROW;
Line: 522

  CURSOR c1 IS SELECT
      AWARD_TITLE,
      S_AWARD_TYPE,
      TESTAMUR_TYPE,
      CLOSED_IND,
      NOTES,
      GRADING_SCHEMA_CD,
      GS_VERSION_NUMBER
    FROM IGS_PS_AWD
    WHERE ROWID = X_ROWID
    FOR UPDATE NOWAIT;
Line: 540

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

PROCEDURE UPDATE_ROW (
  X_ROWID IN VARCHAR2,
  X_AWARD_CD IN VARCHAR2,
  X_AWARD_TITLE IN VARCHAR2,
  X_S_AWARD_TYPE IN VARCHAR2,
  X_TESTAMUR_TYPE IN VARCHAR2,
  X_CLOSED_IND IN VARCHAR2,
  X_NOTES IN VARCHAR2,
  X_MODE IN VARCHAR2 DEFAULT 'R' ,
  X_GRADING_SCHEMA_CD IN VARCHAR2  ,
  X_GS_VERSION_NUMBER IN NUMBER
  ) AS
    X_LAST_UPDATE_DATE DATE;
Line: 599

    X_LAST_UPDATED_BY NUMBER;
Line: 600

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 602

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 604

    X_LAST_UPDATED_BY := 1;
Line: 605

    X_LAST_UPDATE_LOGIN := 0;
Line: 607

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 608

    IF X_LAST_UPDATED_BY IS NULL THEN
      X_LAST_UPDATED_BY := -1;
Line: 611

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 612

    IF X_LAST_UPDATE_LOGIN IS NULL THEN
      X_LAST_UPDATE_LOGIN := -1;
Line: 622

    p_action => 'UPDATE',
    x_rowid => X_ROWID,
    x_award_cd => X_AWARD_CD ,
    x_award_title => X_AWARD_TITLE ,
    x_s_award_type => X_S_AWARD_TYPE ,
    x_testamur_type => X_TESTAMUR_TYPE ,
    x_closed_ind => X_CLOSED_IND ,
    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  ,
    x_grading_schema_cd =>  X_GRADING_SCHEMA_CD ,
    x_gs_version_number =>  X_GS_VERSION_NUMBER
 );
Line: 639

  UPDATE IGS_PS_AWD SET
    AWARD_TITLE       = NEW_REFERENCES.AWARD_TITLE,
    S_AWARD_TYPE      = NEW_REFERENCES.S_AWARD_TYPE,
    TESTAMUR_TYPE     = NEW_REFERENCES.TESTAMUR_TYPE,
    CLOSED_IND        = NEW_REFERENCES.CLOSED_IND,
    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,
    GRADING_SCHEMA_CD = NEW_REFERENCES.GRADING_SCHEMA_CD ,
    GS_VERSION_NUMBER = NEW_REFERENCES.GS_VERSION_NUMBER
  WHERE ROWID = X_ROWID
  ;
Line: 657

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

END UPDATE_ROW;
Line: 675

  CURSOR c1 IS SELECT ROWID FROM IGS_PS_AWD
     WHERE AWARD_CD = X_AWARD_CD
  ;
Line: 683

    INSERT_ROW (
     X_ROWID,
     X_AWARD_CD,
     X_AWARD_TITLE,
     X_S_AWARD_TYPE,
     X_TESTAMUR_TYPE,
     X_CLOSED_IND,
     X_NOTES,
     X_MODE,
     X_GRADING_SCHEMA_CD   ,
     X_GS_VERSION_NUMBER
     );
Line: 698

  UPDATE_ROW (
   X_ROWID,
   X_AWARD_CD,
   X_AWARD_TITLE,
   X_S_AWARD_TYPE,
   X_TESTAMUR_TYPE,
   X_CLOSED_IND,
   X_NOTES,
   X_MODE,
   X_GRADING_SCHEMA_CD   ,
   X_GS_VERSION_NUMBER
   );