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

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

Line: 20


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

Line: 38


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

Line: 40


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

Line: 55


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

Line: 62


    new_references.last_update_date := x_last_update_date;

Line: 63


    new_references.last_updated_by := x_last_updated_by;

Line: 64


    new_references.last_update_login := x_last_update_login;

Line: 68


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


	IF p_inserting OR p_updating THEN
		v_dla_cal_type := new_references.dla_cal_type;

Line: 84


	-- Validate if insert, update or delete is allowed.
/*
||  Bug ID 1956374 - Removal of Duplicate Program Units from OSS.
||  Changed the reference of "IGS_ST_VAL_ULA.STAP_VAL_CI_STATUS" to program unit "IGS_EN_VAL_DLA.STAP_VAL_CI_STATUS". -- kdande
*/
	IF IGS_EN_VAL_DLA.stap_val_ci_status (
			v_dla_cal_type,
			v_ci_sequence_number,
			v_message_name) = FALSE THEN
		Fnd_Message.Set_Name('IGS', v_message_name);

Line: 98


	IF p_inserting OR
	    (p_updating AND
		(old_references.unit_cd <> new_references.unit_cd AND
		  old_references.version_number <> new_references.version_number)) THEN
		IF IGS_ST_VAL_ULA.stap_val_ula_uv_sts (
				new_references.unit_cd,
				new_references.version_number,
				v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS', v_message_name);

Line: 113


  END BeforeRowInsertUpdateDelete1;

Line: 199


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

Line: 218


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

Line: 235


      SELECT   rowid
      FROM     IGS_ST_UNT_LOAD_APPO
      WHERE    dla_cal_type = x_dla_cal_type
      AND      ci_sequence_number = x_ci_sequence_number
      AND      unit_cd = x_unit_cd
      AND      version_number = x_version_number
      AND      teach_cal_type = x_teach_cal_type
      FOR UPDATE NOWAIT;

Line: 267


      SELECT   rowid
      FROM     IGS_ST_UNT_LOAD_APPO
      WHERE    dla_cal_type = x_cal_type
      AND      ci_sequence_number = x_ci_sequence_number
      AND      teach_cal_type = x_teach_cal_type ;

Line: 297


      SELECT   rowid
      FROM     IGS_ST_UNT_LOAD_APPO
      WHERE    unit_cd = x_unit_cd
      AND      version_number = x_version_number
      AND      teach_cal_type = x_cal_type ;

Line: 332


    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_dla_cal_type,
      x_ci_sequence_number,
      x_unit_cd,
      x_version_number,
      x_teach_cal_type,
      x_percentage,
      x_second_percentage,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 355


    IF (p_action = 'INSERT') THEN
      BeforeRowInsertUpdateDelete1 ( p_inserting => TRUE );

Line: 370


    ELSIF (p_action = 'UPDATE') THEN
      BeforeRowInsertUpdateDelete1 ( p_updating => TRUE );

Line: 374


    ELSIF (p_action = 'DELETE') THEN
      BeforeRowInsertUpdateDelete1 ( p_deleting => TRUE );

Line: 376


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

Line: 389


    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
	Check_Constraints;

Line: 391


    ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Null;

Line: 405


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_DLA_CAL_TYPE in VARCHAR2,
  X_CI_SEQUENCE_NUMBER in NUMBER,
  X_UNIT_CD in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_TEACH_CAL_TYPE in VARCHAR2,
  X_PERCENTAGE in NUMBER,
  X_SECOND_PERCENTAGE in NUMBER,
  X_MODE in VARCHAR2 default 'R'
  ) as
    cursor C is select ROWID from IGS_ST_UNT_LOAD_APPO
      where DLA_CAL_TYPE = X_DLA_CAL_TYPE
      and CI_SEQUENCE_NUMBER = X_CI_SEQUENCE_NUMBER
      and UNIT_CD = X_UNIT_CD
      and VERSION_NUMBER = X_VERSION_NUMBER
      and TEACH_CAL_TYPE = X_TEACH_CAL_TYPE;

Line: 422


    X_LAST_UPDATE_DATE DATE;

Line: 423


    X_LAST_UPDATED_BY NUMBER;

Line: 424


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 426


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 428


    X_LAST_UPDATED_BY := 1;

Line: 429


    X_LAST_UPDATE_LOGIN := 0;

Line: 431


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 432


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 435


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 436


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 445


     p_action => 'INSERT',
     x_rowid => X_ROWID,
     x_dla_cal_type => X_DLA_CAL_TYPE,
     x_ci_sequence_number => X_CI_SEQUENCE_NUMBER,
     x_unit_cd => X_UNIT_CD,
     x_version_number => X_VERSION_NUMBER,
     x_teach_cal_type => X_TEACH_CAL_TYPE,
     x_percentage => NVL(X_PERCENTAGE,100),
     x_second_percentage => X_SECOND_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: 461


  insert into IGS_ST_UNT_LOAD_APPO (
    DLA_CAL_TYPE,
    CI_SEQUENCE_NUMBER,
    UNIT_CD,
    VERSION_NUMBER,
    TEACH_CAL_TYPE,
    PERCENTAGE,
    SECOND_PERCENTAGE,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.DLA_CAL_TYPE,
    NEW_REFERENCES.CI_SEQUENCE_NUMBER,
    NEW_REFERENCES.UNIT_CD,
    NEW_REFERENCES.VERSION_NUMBER,
    NEW_REFERENCES.TEACH_CAL_TYPE,
    NEW_REFERENCES.PERCENTAGE,
    NEW_REFERENCES.SECOND_PERCENTAGE,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 498


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

Line: 501


end INSERT_ROW;

Line: 513


  cursor c1 is select
      PERCENTAGE,
      SECOND_PERCENTAGE
    from IGS_ST_UNT_LOAD_APPO
    where ROWID = X_ROWID for update nowait;

Line: 525


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

Line: 546


procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_DLA_CAL_TYPE in VARCHAR2,
  X_CI_SEQUENCE_NUMBER in NUMBER,
  X_UNIT_CD in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_TEACH_CAL_TYPE in VARCHAR2,
  X_PERCENTAGE in NUMBER,
  X_SECOND_PERCENTAGE in NUMBER,
  X_MODE in VARCHAR2 default 'R'
  ) as
    X_LAST_UPDATE_DATE DATE;

Line: 558


    X_LAST_UPDATED_BY NUMBER;

Line: 559


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 561


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 563


    X_LAST_UPDATED_BY := 1;

Line: 564


    X_LAST_UPDATE_LOGIN := 0;

Line: 566


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 567


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 570


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 571


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 580


     p_action => 'UPDATE',
     x_rowid => X_ROWID,
     x_dla_cal_type => X_DLA_CAL_TYPE,
     x_ci_sequence_number => X_CI_SEQUENCE_NUMBER,
     x_unit_cd => X_UNIT_CD,
     x_version_number => X_VERSION_NUMBER,
     x_teach_cal_type => X_TEACH_CAL_TYPE,
     x_percentage => X_PERCENTAGE,
     x_second_percentage => X_SECOND_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: 595


  update IGS_ST_UNT_LOAD_APPO set
    PERCENTAGE = NEW_REFERENCES.PERCENTAGE,
    SECOND_PERCENTAGE = NEW_REFERENCES.SECOND_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: 607


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

Line: 610


end UPDATE_ROW;

Line: 623


  cursor c1 is select rowid from IGS_ST_UNT_LOAD_APPO
     where DLA_CAL_TYPE = X_DLA_CAL_TYPE
     and CI_SEQUENCE_NUMBER = X_CI_SEQUENCE_NUMBER
     and UNIT_CD = X_UNIT_CD
     and VERSION_NUMBER = X_VERSION_NUMBER
     and TEACH_CAL_TYPE = X_TEACH_CAL_TYPE
  ;

Line: 635


    INSERT_ROW (
     X_ROWID,
     X_DLA_CAL_TYPE,
     X_CI_SEQUENCE_NUMBER,
     X_UNIT_CD,
     X_VERSION_NUMBER,
     X_TEACH_CAL_TYPE,
     X_PERCENTAGE,
     X_SECOND_PERCENTAGE,
     X_MODE);

Line: 648


  UPDATE_ROW (
   X_ROWID,
   X_DLA_CAL_TYPE,
   X_CI_SEQUENCE_NUMBER,
   X_UNIT_CD,
   X_VERSION_NUMBER,
   X_TEACH_CAL_TYPE,
   X_PERCENTAGE,
   X_SECOND_PERCENTAGE,
   X_MODE);

Line: 660


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

Line: 668


  delete from IGS_ST_UNT_LOAD_APPO
  where ROWID = X_ROWID;

Line: 674


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

Line: 677


end DELETE_ROW;