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_TCH_RESP_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_TCH_RESP
      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: 50


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

Line: 57


    new_references.last_update_date := x_last_update_date;

Line: 58


    new_references.last_updated_by := x_last_updated_by;

Line: 59


    new_references.last_update_login := x_last_update_login;

Line: 83


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

Line: 97


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

Line: 101


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


	-- Validate the org IGS_PS_UNIT.  Org IGS_PS_UNIT is not updateable.
	IF p_inserting THEN
	-- As part of the bug# 1956374 changed to the below call from IGS_PS_VAL_TR.crsp_val_ou_sys_sts
		IF IGS_PS_VAL_CRV.crsp_val_ou_sys_sts (
				new_references.org_unit_cd,
				new_references.ou_start_dt,
				v_message_name) = FALSE THEN
					Fnd_Message.Set_Name('IGS', v_message_name);

Line: 125


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

Line: 133


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

Line: 139


	-- Create history record on delete
	IF p_deleting THEN

		-- Added for HE355 - Org Unit Cost Center Link to check for child existance before deleting record
		Check_Child_Existance;

Line: 150


			old_references.last_update_date,
			SYSDATE,
			old_references.last_updated_by,
			old_references.percentage);

Line: 158


  END BeforeRowInsertUpdateDelete1;

Line: 208


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

Line: 224


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

Line: 239


      SELECT   rowid
      FROM     IGS_PS_TCH_RESP
      WHERE    unit_cd = x_unit_cd
      AND      version_number = x_version_number
      AND      org_unit_cd = x_org_unit_cd
      AND      ou_start_dt = x_ou_start_dt
      FOR UPDATE NOWAIT;

Line: 277


      SELECT   rowid
      FROM     IGS_PS_TCH_RESP
      WHERE    unit_cd = x_unit_cd
      AND      version_number = x_version_number
      AND      org_unit_cd = x_org_unit_cd
      FOR UPDATE NOWAIT;

Line: 305


      SELECT   rowid
      FROM     IGS_PS_TCH_RESP
      WHERE    org_unit_cd = x_org_unit_cd
      AND      ou_start_dt = x_start_dt ;

Line: 333


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

Line: 365


    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_org_unit_cd,
      x_ou_start_dt,
      x_percentage,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 386


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

Line: 401


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

Line: 406


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

Line: 409


 ELSIF (p_action = 'VALIDATE_INSERT') THEN
      IF  Get_PK_For_Validation (
				    new_references.unit_cd,
				    new_references.version_number,
				    new_references.org_unit_cd,
				    new_references.ou_start_dt
				         ) THEN
         Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 421


 ELSIF (p_action = 'VALIDATE_UPDATE') THEN
       Check_Constraints;

Line: 423


 ELSIF (p_action = 'VALIDATE_DELETE') THEN
       -- Added for HE355 - Org Unit Cost Center Link to check for child existance before deleting record
       Check_Child_Existance;

Line: 441


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_UNIT_CD in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_OU_START_DT in DATE,
  X_ORG_UNIT_CD in VARCHAR2,
  X_PERCENTAGE in NUMBER,
  X_MODE in VARCHAR2
  ) as
    cursor C is select ROWID from IGS_PS_TCH_RESP
      where UNIT_CD = X_UNIT_CD
      and VERSION_NUMBER = X_VERSION_NUMBER
      and OU_START_DT = X_OU_START_DT
      and ORG_UNIT_CD = X_ORG_UNIT_CD;

Line: 455


    X_LAST_UPDATE_DATE DATE;

Line: 456


    X_LAST_UPDATED_BY NUMBER;

Line: 457


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 459


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 461


    X_LAST_UPDATED_BY := 1;

Line: 462


    X_LAST_UPDATE_LOGIN := 0;

Line: 464


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 465


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 468


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 469


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 479


    p_action => 'INSERT',
    x_rowid =>   X_ROWID,
    x_unit_cd =>   X_UNIT_CD,
    x_version_number =>   X_VERSION_NUMBER,
    x_org_unit_cd =>    X_ORG_UNIT_CD,
    x_ou_start_dt =>   X_OU_START_DT,
    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: 493


  insert into IGS_PS_TCH_RESP (
    UNIT_CD,
    VERSION_NUMBER,
    ORG_UNIT_CD,
    OU_START_DT,
    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.ORG_UNIT_CD,
    NEW_REFERENCES.OU_START_DT,
    NEW_REFERENCES.PERCENTAGE,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 525


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

Line: 528


end INSERT_ROW;

Line: 538


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

Line: 550


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

Line: 568


procedure UPDATE_ROW (
  X_ROWID IN VARCHAR2,
  X_UNIT_CD in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_OU_START_DT in DATE,
  X_ORG_UNIT_CD in VARCHAR2,
  X_PERCENTAGE in NUMBER,
  X_MODE in VARCHAR2
  ) as
    X_LAST_UPDATE_DATE DATE;

Line: 578


    X_LAST_UPDATED_BY NUMBER;

Line: 579


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 581


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 583


    X_LAST_UPDATED_BY := 1;

Line: 584


    X_LAST_UPDATE_LOGIN := 0;

Line: 586


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 587


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 590


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 591


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 600


    p_action => 'UPDATE',
    x_rowid =>   X_ROWID,
    x_unit_cd =>   X_UNIT_CD,
    x_version_number =>   X_VERSION_NUMBER,
    x_org_unit_cd =>    X_ORG_UNIT_CD,
    x_ou_start_dt =>   X_OU_START_DT,
    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: 614


  update IGS_PS_TCH_RESP 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: 625


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

Line: 628


end UPDATE_ROW;

Line: 639


  cursor c1 is select rowid from IGS_PS_TCH_RESP
     where UNIT_CD = X_UNIT_CD
     and VERSION_NUMBER = X_VERSION_NUMBER
     and OU_START_DT = X_OU_START_DT
     and ORG_UNIT_CD = X_ORG_UNIT_CD
  ;

Line: 650


    INSERT_ROW (
     X_ROWID,
     X_UNIT_CD,
     X_VERSION_NUMBER,
     X_OU_START_DT,
     X_ORG_UNIT_CD,
     X_PERCENTAGE,
     X_MODE);

Line: 661


  UPDATE_ROW (
   X_ROWID,
   X_UNIT_CD,
   X_VERSION_NUMBER,
   X_OU_START_DT,
   X_ORG_UNIT_CD,
   X_PERCENTAGE,
   X_MODE);

Line: 671


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

Line: 679


  delete from IGS_PS_TCH_RESP
    where ROWID = X_ROWID;

Line: 685


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

Line: 688


end DELETE_ROW;