eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IGS_PS_UNIT_LVL_PKG SQL Statements

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

Line: 18


    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_org_id IN NUMBER DEFAULT NULL ,
    X_COURSE_CD VARCHAR2 DEFAULT NULL,
    X_COURSE_VERSION_NUMBER NUMBER DEFAULT NULL
  ) AS

    CURSOR cur_old_ref_values IS
      SELECT   *
      FROM     IGS_PS_UNIT_LVL_ALL
      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: 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 BeforeRowInsertUpdateDelete1(
    p_inserting IN BOOLEAN DEFAULT FALSE,
    p_updating IN BOOLEAN DEFAULT FALSE,
    p_deleting IN BOOLEAN DEFAULT FALSE
    ) AS
	v_unit_cd		IGS_PS_UNIT_LVL_ALL.unit_cd%TYPE;

Line: 87


	ELSE -- p_inserting or p_updating
		v_unit_cd := new_references.unit_cd;

Line: 91


	-- Validate the insert/update/delete.
	IF  IGS_PS_VAL_UNIT.crsp_val_iud_uv_dtl (
			v_unit_cd,
			v_version_number,
			v_message_name) = FALSE THEN
		FND_MESSAGE.SET_NAME('IGS',v_message_name);

Line: 101


	IF p_inserting OR (p_updating AND (old_references.unit_level <> new_references.unit_level)) THEN
	-- As part of the bug# 1956374 changed to the below call from IGS_PS_VAL_CUL.crsp_val_unit_lvl
		IF IGS_PS_VAL_UV.crsp_val_unit_lvl (
				new_references.unit_level,
				v_message_name) = FALSE THEN
			FND_MESSAGE.SET_NAME('IGS',v_message_name);

Line: 112


	-- Insert history record on update.
	IF p_updating THEN
		IF old_references.unit_level <> new_references.unit_level OR
			NVL(old_references.wam_weighting,999999) <> NVL(new_references.wam_weighting,999999) THEN
			SELECT
DECODE(old_references.unit_level,new_references.unit_level,NULL,old_references.unit_level),
				DECODE(NVL(old_references.wam_weighting,999999),NVL(new_references.wam_weighting,999999),
							NULL,old_references.wam_weighting)
			INTO	v_unit_level,
				v_wam_weighting
			FROM	dual;

Line: 123


			-- Create history record for update
			IGS_PS_GEN_007.CRSP_INS_CUL_HIST(
				p_unit_cd               => old_references.unit_cd,
				p_version_number        => old_references.version_number,
				p_course_type           => NULL,
				p_last_update_on        => old_references.last_update_date,
				p_update_on             => new_references.last_update_date,
				p_last_update_who       => old_references.last_updated_by,
				p_unit_level            => v_unit_level,
        p_wam_weighting         => v_wam_weighting,
        p_course_cd             => old_references.course_cd,
        p_course_version_number => old_references.course_version_number);

Line: 144


      p_last_update_on        => old_references.last_update_date,
      p_update_on             => SYSDATE,
      p_last_update_who       => old_references.last_updated_by,
      p_unit_level            => old_references.unit_level,
      p_wam_weighting         => old_references.wam_weighting,
      p_course_cd             => old_references.course_cd,
      p_course_version_number => old_references.course_version_number);

Line: 152


  END BeforeRowInsertUpdateDelete1;

Line: 159


      SELECT   rowid
      FROM     igs_ps_unit_lvl_all
      WHERE    course_cd = x_course_cd
      AND      course_version_number = x_course_version_number;

Line: 235


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

Line: 251


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

Line: 265


        FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');

Line: 280


      SELECT   rowid
      FROM     IGS_PS_UNIT_LVL_ALL
      WHERE    unit_cd = x_unit_cd
      AND      version_number = x_version_number
      AND      course_cd      = x_course_cd
      AND      course_version_number = x_course_version_number
      FOR UPDATE NOWAIT;

Line: 310


      SELECT   rowid
      FROM     IGS_PS_UNIT_LVL_ALL
      WHERE    unit_cd = x_unit_cd
      AND      version_number = x_version_number ;

Line: 342


    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_org_id IN NUMBER DEFAULT NULL,
    x_course_cd IN VARCHAR2 DEFAULT NULL,
    x_course_version_number IN NUMBER DEFAULT NULL
  ) AS
  BEGIN
    Set_Column_Values (
      p_action,
      x_rowid,
      x_unit_cd,
      x_version_number,
      x_course_type,
      x_unit_level,
      x_wam_weighting,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login,
      x_org_id,
      x_course_cd,
      x_course_version_number
    );

Line: 368


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

Line: 382


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

Line: 387


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

Line: 390


    ELSIF (p_action = 'VALIDATE_INSERT') THEN
       IF Get_PK_For_Validation(
           new_references.unit_cd,
           new_references.version_number,
           new_references.course_cd,
           new_references.course_version_number) THEN
        Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');

Line: 401


    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
     	Check_Constraints;

Line: 417


PROCEDURE insert_row (
  X_ROWID in out NOCOPY VARCHAR2,
  X_UNIT_CD in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_COURSE_TYPE in VARCHAR2 DEFAULT NULL,
  X_UNIT_LEVEL in VARCHAR2,
  X_WAM_WEIGHTING in NUMBER,
  X_MODE in VARCHAR2 default 'R',
  X_ORG_ID in NUMBER,
  X_COURSE_CD IN VARCHAR2,
  X_COURSE_VERSION_NUMBER IN NUMBER
  ) AS
    CURSOR C IS
      SELECT ROWID
      FROM igs_ps_unit_lvl_all
      WHERE unit_cd = x_unit_cd
      AND version_number = x_version_number
      AND course_cd   = x_course_cd
      AND course_version_number = x_course_version_number;

Line: 437


    X_LAST_UPDATE_DATE DATE;

Line: 438


    X_LAST_UPDATED_BY NUMBER;

Line: 439


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 441


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 443


    X_LAST_UPDATED_BY := 1;

Line: 444


    X_LAST_UPDATE_LOGIN := 0;

Line: 446


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 447


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 450


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 451


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 459


 Before_DML( p_action => 'INSERT',
    x_rowid => X_ROWID,
    x_unit_cd => X_UNIT_CD,
    x_version_number => X_VERSION_NUMBER,
    x_course_type => X_COURSE_TYPE,
    x_unit_level => X_UNIT_LEVEL,
    x_wam_weighting => X_WAM_WEIGHTING,
    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_org_id => igs_ge_gen_003.get_org_id,
    x_course_cd => X_COURSE_CD,
    x_course_version_number => X_COURSE_VERSION_NUMBER
  );

Line: 476


  insert into IGS_PS_UNIT_LVL_ALL (
    UNIT_CD,
    VERSION_NUMBER,
    UNIT_LEVEL,
    WAM_WEIGHTING,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    ORG_ID,
    COURSE_CD ,
    COURSE_VERSION_NUMBER
  ) values (
    NEW_REFERENCES.UNIT_CD,
    NEW_REFERENCES.VERSION_NUMBER,
    NEW_REFERENCES.UNIT_LEVEL,
    NEW_REFERENCES.WAM_WEIGHTING,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN,
    NEW_REFERENCES.ORG_ID,
    NEW_REFERENCES.COURSE_CD,
    NEW_REFERENCES.COURSE_VERSION_NUMBER
  );

Line: 512


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

Line: 516


end INSERT_ROW;

Line: 528


  cursor c1 is select
      UNIT_LEVEL,
      WAM_WEIGHTING
    from IGS_PS_UNIT_LVL_ALL
    where ROWID = X_ROWID for update nowait;

Line: 540


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

Line: 560


procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_UNIT_CD in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_COURSE_TYPE in VARCHAR2 DEFAULT NULL,
  X_UNIT_LEVEL in VARCHAR2,
  X_WAM_WEIGHTING in NUMBER,
  X_MODE in VARCHAR2 default 'R',
  X_COURSE_CD VARCHAR2,
  X_COURSE_VERSION_NUMBER NUMBER
  ) AS

    X_LAST_UPDATE_DATE DATE;

Line: 573


    X_LAST_UPDATED_BY NUMBER;

Line: 574


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 576


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 578


    X_LAST_UPDATED_BY := 1;

Line: 579


    X_LAST_UPDATE_LOGIN := 0;

Line: 581


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 582


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 585


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 586


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 594


 Before_DML( p_action => 'UPDATE',
    x_rowid => X_ROWID,
    x_unit_cd => X_UNIT_CD,
    x_version_number => X_VERSION_NUMBER,
    x_course_type => X_COURSE_TYPE,
    x_unit_level => X_UNIT_LEVEL,
    x_wam_weighting => X_WAM_WEIGHTING,
    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_course_cd =>   X_COURSE_CD,
    x_course_version_number => X_COURSE_VERSION_NUMBER
  );

Line: 609


  update IGS_PS_UNIT_LVL_ALL set
    UNIT_LEVEL = NEW_REFERENCES.UNIT_LEVEL,
    WAM_WEIGHTING = NEW_REFERENCES.WAM_WEIGHTING,
    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: 621


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

Line: 625


end UPDATE_ROW;

Line: 640


    SELECT rowid
    FROM igs_ps_unit_lvl_all
    WHERE unit_cd = x_unit_cd
      AND version_number = x_version_number
      AND course_cd   = x_course_cd
      AND course_version_number = x_course_version_number;

Line: 651


    INSERT_ROW (
     X_ROWID,
     X_UNIT_CD,
     X_VERSION_NUMBER,
     X_COURSE_TYPE,
     X_UNIT_LEVEL,
     X_WAM_WEIGHTING,
     X_MODE,
     X_ORG_ID,
     X_COURSE_CD,
     X_COURSE_VERSION_NUMBER);

Line: 665


  UPDATE_ROW (
   X_ROWID,
   X_UNIT_CD,
   X_VERSION_NUMBER,
   X_COURSE_TYPE,
   X_UNIT_LEVEL,
   X_WAM_WEIGHTING,
   X_MODE,
   X_COURSE_CD,
   X_COURSE_VERSION_NUMBER);

Line: 677


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

Line: 684


  delete from IGS_PS_UNIT_LVL_ALL
  where ROWID = X_ROWID;

Line: 690


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

Line: 694


END delete_row;