DBA Data[Home] [Help]

APPS.IGS_PS_ANL_LOAD_U_LN_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_PS_ANL_LOAD_U_LN
      WHERE    rowid = x_rowid;
Line: 37

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

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

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

    new_references.last_update_date := x_last_update_date;
Line: 61

    new_references.last_updated_by := x_last_updated_by;
Line: 62

    new_references.last_update_login := x_last_update_login;
Line: 72

  PROCEDURE BeforeRowInsertUpdateDelete1(
    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: 86

	ELSE -- p_inserting or p_updating
		v_course_cd := new_references.course_cd;
Line: 90

	-- Validate the insert/update/delete.
	IF  IGS_PS_VAL_CRS.crsp_val_iud_crv_dtl (
			v_course_cd,
			v_crv_version_number,
			v_message_name) = FALSE THEN
		Fnd_Message.Set_Name('IGS',v_message_name);
Line: 99

	-- Validate the IGS_PS_UNIT version.  IGS_PS_UNIT version is not updateable.
	IF p_inserting THEN
		IF IGS_PS_VAL_CALul.crsp_val_uv_sys_sts (
				new_references.unit_cd,
				new_references.uv_version_number,
				v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);
Line: 112

  END BeforeRowInsertUpdateDelete1;
Line: 168

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

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

      SELECT   rowid
      FROM     IGS_PS_ANL_LOAD_U_LN
      WHERE    course_cd = x_course_cd
      AND      crv_version_number = x_crv_version_number
      AND      yr_num = x_yr_num
      AND      effective_start_dt = x_effective_start_dt
      AND      unit_cd = x_unit_cd
      AND      uv_version_number = x_uv_version_number
      FOR UPDATE NOWAIT;
Line: 237

      SELECT   rowid
      FROM     IGS_PS_ANL_LOAD_U_LN
      WHERE    course_cd = x_course_cd
      AND      crv_version_number = x_version_number
      AND      yr_num = x_yr_num
      AND      effective_start_dt = x_effective_start_dt ;
Line: 267

      SELECT   rowid
      FROM     IGS_PS_ANL_LOAD_U_LN
      WHERE    unit_cd = x_unit_cd
      AND      uv_version_number = x_version_number ;
Line: 300

    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_course_cd,
      x_crv_version_number,
      x_yr_num,
      x_effective_start_dt,
      x_unit_cd,
      x_uv_version_number,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );
Line: 322

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

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

    ELSIF (p_action = 'DELETE') THEN
      -- Call all the procedures related to Before Delete.
      BeforeRowInsertUpdateDelete1 ( p_deleting => TRUE );
Line: 346

    ELSIF (p_action = 'VALIDATE_INSERT') THEN
	IF  Get_PK_For_Validation (
      new_references.course_cd ,
      new_references.crv_version_number ,
      new_references.yr_num ,
      new_references.effective_start_dt ,
      new_references.unit_cd ,
      new_references.uv_version_number) THEN
	    Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
Line: 359

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

procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_COURSE_CD in VARCHAR2,
  X_CRV_VERSION_NUMBER in NUMBER,
  X_EFFECTIVE_START_DT in DATE,
  X_YR_NUM in NUMBER,
  X_UV_VERSION_NUMBER in NUMBER,
  X_UNIT_CD in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) AS
    cursor C is select ROWID from IGS_PS_ANL_LOAD_U_LN
      where COURSE_CD = X_COURSE_CD
      and CRV_VERSION_NUMBER = X_CRV_VERSION_NUMBER
      and EFFECTIVE_START_DT = X_EFFECTIVE_START_DT
      and YR_NUM = X_YR_NUM
      and UV_VERSION_NUMBER = X_UV_VERSION_NUMBER
      and UNIT_CD = X_UNIT_CD;
Line: 392

    X_LAST_UPDATE_DATE DATE;
Line: 393

    X_LAST_UPDATED_BY NUMBER;
Line: 394

    X_LAST_UPDATE_LOGIN NUMBER;
Line: 396

  X_LAST_UPDATE_DATE := SYSDATE;
Line: 398

    X_LAST_UPDATED_BY := 1;
Line: 399

    X_LAST_UPDATE_LOGIN := 0;
Line: 401

    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 402

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

    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 406

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

    p_action => 'INSERT',
    x_rowid => X_ROWID,
    x_course_cd => X_COURSE_CD,
    x_crv_version_number => X_CRV_VERSION_NUMBER,
    x_yr_num => X_YR_NUM,
    x_effective_start_dt => X_EFFECTIVE_START_DT,
    x_unit_cd => X_UNIT_CD,
    x_uv_version_number => X_UV_VERSION_NUMBER,
    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: 431

  insert into IGS_PS_ANL_LOAD_U_LN (
    COURSE_CD,
    CRV_VERSION_NUMBER,
    YR_NUM,
    EFFECTIVE_START_DT,
    UNIT_CD,
    UV_VERSION_NUMBER,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.COURSE_CD,
    NEW_REFERENCES.CRV_VERSION_NUMBER,
    NEW_REFERENCES.YR_NUM,
    NEW_REFERENCES.EFFECTIVE_START_DT,
    NEW_REFERENCES.UNIT_CD,
    NEW_REFERENCES.UV_VERSION_NUMBER,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );
Line: 466

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

end INSERT_ROW;
Line: 481

  cursor c1 is select ROWID
    from IGS_PS_ANL_LOAD_U_LN
    where ROWID = X_ROWID
    for update nowait;
Line: 492

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

procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) AS
begin

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

  delete from IGS_PS_ANL_LOAD_U_LN
  where ROWID = X_ROWID;
Line: 519

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

end DELETE_ROW;