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_DSCP_PKG SQL Statements

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

Line: 17


    x_last_update_date IN DATE ,
    x_last_updated_by IN NUMBER ,
    x_last_update_login IN NUMBER
  ) AS

    CURSOR cur_old_ref_values IS
      SELECT   *
      FROM     IGS_PS_UNIT_DSCP
      WHERE    rowid = x_rowid;

Line: 35


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

Line: 37


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

Line: 49


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

Line: 56


    new_references.last_update_date := x_last_update_date;

Line: 57


    new_references.last_updated_by := x_last_updated_by;

Line: 58


    new_references.last_update_login := x_last_update_login;

Line: 62


 PROCEDURE BeforeRowInsertUpdateDelete1(
    p_inserting IN BOOLEAN ,
    p_updating IN BOOLEAN ,
    p_deleting IN BOOLEAN
    ) AS
	v_unit_cd		IGS_PS_UNIT_DSCP.unit_cd%TYPE;

Line: 76


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

Line: 80


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


	-- Validate IGS_PS_DSCP group code.  IGS_PS_DSCP group code is not updateable.
	IF p_inserting THEN
		IF IGS_PS_VAL_UD.crsp_val_ud_dg_cd (
				new_references.discipline_group_cd,
				v_message_name) = FALSE THEN
					Fnd_Message.Set_Name('IGS',v_message_name);

Line: 102


			SELECT	DECODE (old_references.percentage,new_references.percentage,NULL,old_references.percentage)
			INTO	v_percentage
			FROM	dual;

Line: 109


				old_references.last_update_date,
				new_references.last_update_date,
				old_references.last_updated_by,
				v_percentage);

Line: 115


	-- Create history record on delete
	IF p_deleting THEN
		IGS_PS_GEN_005.CRSP_INS_UD_HIST(
			old_references.unit_cd,
			old_references.version_number,
			old_references.discipline_group_cd,
			old_references.last_update_date,
			SYSDATE,
			old_references.last_updated_by,
			old_references.percentage);

Line: 128


  END BeforeRowInsertUpdateDelete1;

Line: 183


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

Line: 201


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

Line: 217


      SELECT   rowid
      FROM     IGS_PS_UNIT_DSCP
      WHERE    unit_cd = x_unit_cd
      AND      version_number = x_version_number
      AND      discipline_group_cd = x_discipline_group_cd
      FOR UPDATE NOWAIT;

Line: 246


      SELECT   rowid
      FROM     IGS_PS_UNIT_DSCP
      WHERE    discipline_group_cd = x_discipline_group_cd ;

Line: 273


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

Line: 304


    x_last_update_date IN DATE ,
    x_last_updated_by IN NUMBER ,
    x_last_update_login IN NUMBER
  ) AS
  BEGIN

    Set_Column_Values (
      p_action,
      x_rowid,
      x_unit_cd,
      x_version_number,
      x_discipline_group_cd,
      x_percentage,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 324


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

Line: 336


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

Line: 341


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

Line: 344


    ELSIF (p_action = 'VALIDATE_INSERT') THEN
	   IF Get_PK_For_Validation (New_References.unit_cd,
					    New_References.version_number,
					    New_References.discipline_group_cd) THEN
				Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 353


   ELSIF (p_action = 'VALIDATE_UPDATE') THEN
	   Check_Constraints;

Line: 371


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_UNIT_CD in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_DISCIPLINE_GROUP_CD in VARCHAR2,
  X_PERCENTAGE in NUMBER,
  X_MODE in VARCHAR2
  ) AS
    cursor C is select ROWID from IGS_PS_UNIT_DSCP
      where UNIT_CD = X_UNIT_CD
      and VERSION_NUMBER = X_VERSION_NUMBER
      and DISCIPLINE_GROUP_CD = X_DISCIPLINE_GROUP_CD;

Line: 383


    X_LAST_UPDATE_DATE DATE;

Line: 384


    X_LAST_UPDATED_BY NUMBER;

Line: 385


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 387


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 389


    X_LAST_UPDATED_BY := 1;

Line: 390


    X_LAST_UPDATE_LOGIN := 0;

Line: 392


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 393


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 396


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 397


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 407


  p_action => 'INSERT',
  x_rowid => X_ROWID,
  x_unit_cd => X_UNIT_CD,
  x_version_number => X_VERSION_NUMBER,
  x_discipline_group_cd => X_DISCIPLINE_GROUP_CD,
  x_percentage => X_PERCENTAGE,
  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: 420


  insert into IGS_PS_UNIT_DSCP (
    UNIT_CD,
    VERSION_NUMBER,
    DISCIPLINE_GROUP_CD,
    PERCENTAGE,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.UNIT_CD,
    NEW_REFERENCES.VERSION_NUMBER,
    NEW_REFERENCES.DISCIPLINE_GROUP_CD,
    NEW_REFERENCES.PERCENTAGE,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 450


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

Line: 453


end INSERT_ROW;

Line: 462


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

Line: 474


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

Line: 492


procedure UPDATE_ROW (
  X_ROWID IN VARCHAR2,
  X_UNIT_CD in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_DISCIPLINE_GROUP_CD in VARCHAR2,
  X_PERCENTAGE in NUMBER,
  X_MODE in VARCHAR2
  ) AS
    X_LAST_UPDATE_DATE DATE;

Line: 501


    X_LAST_UPDATED_BY NUMBER;

Line: 502


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 504


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 506


    X_LAST_UPDATED_BY := 1;

Line: 507


    X_LAST_UPDATE_LOGIN := 0;

Line: 509


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 510


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 513


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 514


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 524


  p_action => 'UPDATE',
  x_rowid => X_ROWID,
  x_unit_cd => X_UNIT_CD,
  x_version_number => X_VERSION_NUMBER,
  x_discipline_group_cd => X_DISCIPLINE_GROUP_CD,
  x_percentage => X_PERCENTAGE,
  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: 536


  update IGS_PS_UNIT_DSCP set
    PERCENTAGE = NEW_REFERENCES.PERCENTAGE,
    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: 547


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

Line: 551


end UPDATE_ROW;

Line: 561


  cursor c1 is select rowid from IGS_PS_UNIT_DSCP
     where UNIT_CD = X_UNIT_CD
     and VERSION_NUMBER = X_VERSION_NUMBER
     and DISCIPLINE_GROUP_CD = X_DISCIPLINE_GROUP_CD
  ;

Line: 571


    INSERT_ROW (
     X_ROWID,
     X_UNIT_CD,
     X_VERSION_NUMBER,
     X_DISCIPLINE_GROUP_CD,
     X_PERCENTAGE,
     X_MODE);

Line: 581


  UPDATE_ROW (
   X_ROWID,
   X_UNIT_CD,
   X_VERSION_NUMBER,
   X_DISCIPLINE_GROUP_CD,
   X_PERCENTAGE,
   X_MODE);

Line: 590


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

Line: 598


  delete from IGS_PS_UNIT_DSCP
    where ROWID = X_ROWID;

Line: 604


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

Line: 607


end DELETE_ROW;