APPS.IGS_AD_ADM_UT_STA_GD_PKG SQL Statements

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

Line: 16

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

Line: 34

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

Line: 36

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

Line: 48

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

Line: 55

    new_references.last_update_date := x_last_update_date;

Line: 56

    new_references.last_updated_by := x_last_updated_by;

Line: 57

    new_references.last_update_login := x_last_update_login;

Line: 61

  PROCEDURE BeforeRowInsertUpdate1(
    p_inserting IN BOOLEAN DEFAULT FALSE,
    p_updating IN BOOLEAN DEFAULT FALSE,
    p_deleting IN BOOLEAN DEFAULT FALSE
    ) IS
	v_message_name		VARCHAR2(30);

Line: 68

	-- Validate that inserts/updates are allowed
	IF  p_inserting OR p_updating THEN
	    IF	IGS_EN_VAL_UDDC.ENRP_VAL_AUS_CLOSED(new_references.administrative_unit_status
						,v_message_name) = FALSE THEN
		    Fnd_Message.Set_Name('IGS',v_message_name);

Line: 91

  END BeforeRowInsertUpdate1;

Line: 188

      SELECT   rowid
      FROM     IGS_AD_ADM_UT_STA_GD
      WHERE    administrative_unit_status = x_administrative_unit_status
      AND      grading_schema_cd = x_grading_schema_cd
      AND      version_number = x_version_number
      AND      grade = x_grade
      FOR UPDATE NOWAIT;

Line: 220

      SELECT   rowid
      FROM     IGS_AD_ADM_UT_STA_GD
      WHERE    grading_schema_cd = x_grading_schema_cd
      AND      version_number = x_version_number
      AND      grade = x_grade ;

Line: 252

    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_administrative_unit_status,
      x_grading_schema_cd,
      x_version_number,
      x_grade,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 272

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

Line: 288

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

Line: 294

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

Line: 297

    ELSIF (p_action = 'VALIDATE_INSERT') THEN
      IF Get_PK_For_Validation (
         new_references.administrative_unit_status ,
         new_references.grading_schema_cd ,
         new_references.version_number ,
         new_references.grade ) THEN

         Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 309

    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
      Check_Constraints;

Line: 325

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_ADMINISTRATIVE_UNIT_STATUS in VARCHAR2,
  X_GRADING_SCHEMA_CD in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_GRADE in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_AD_ADM_UT_STA_GD
      where ADMINISTRATIVE_UNIT_STATUS = X_ADMINISTRATIVE_UNIT_STATUS
      and GRADING_SCHEMA_CD = X_GRADING_SCHEMA_CD
      and VERSION_NUMBER = X_VERSION_NUMBER
      and GRADE = X_GRADE;

Line: 338

    X_LAST_UPDATE_DATE DATE;

Line: 339

    X_LAST_UPDATED_BY NUMBER;

Line: 340

    X_LAST_UPDATE_LOGIN NUMBER;

Line: 342

  X_LAST_UPDATE_DATE := SYSDATE;

Line: 344

    X_LAST_UPDATED_BY := 1;

Line: 345

    X_LAST_UPDATE_LOGIN := 0;

Line: 347

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 348

    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 351

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 352

    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 362

    p_action => 'INSERT',
    x_rowid => X_ROWID,
    x_administrative_unit_status => X_ADMINISTRATIVE_UNIT_STATUS,
    x_grading_schema_cd => X_GRADING_SCHEMA_CD,
    x_version_number => X_VERSION_NUMBER,
    x_grade => X_GRADE,
    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: 374

  insert into IGS_AD_ADM_UT_STA_GD (
    ADMINISTRATIVE_UNIT_STATUS,
    GRADING_SCHEMA_CD,
    VERSION_NUMBER,
    GRADE,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    X_ADMINISTRATIVE_UNIT_STATUS,
    X_GRADING_SCHEMA_CD,
    X_VERSION_NUMBER,
    X_GRADE,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 404

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

Line: 408

end INSERT_ROW;

Line: 417

  cursor c1 is select ROWID
    from IGS_AD_ADM_UT_STA_GD
    where ROWID = X_ROWID
    for update nowait;

Line: 428

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

Line: 438

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

Line: 447

  delete from IGS_AD_ADM_UT_STA_GD
  where ROWID = X_ROWID ;

Line: 453

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

Line: 456

end DELETE_ROW;