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_AD_LOCATION_TYPE_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
  ) as

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

Line: 36


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

Line: 38


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

Line: 51


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

Line: 58


    new_references.last_update_date := x_last_update_date;

Line: 59


    new_references.last_updated_by := x_last_updated_by;

Line: 60


    new_references.last_update_login := x_last_update_login;

Line: 64


  PROCEDURE BeforeRowInsertUpdate1(
    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: 71


	-- Validate that inserts/updates are allowed
	IF p_inserting OR p_updating THEN
		IF  NVL(old_references.s_location_type, '-1') <> NVL(new_references.s_location_type, '-1') THEN
			IF  IGS_OR_VAL_LOT.assp_val_lot_loc (
							new_references.location_type,
							v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);

Line: 85


  END BeforeRowInsertUpdate1;

Line: 146


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

Line: 169


      SELECT   rowid
      FROM     igs_ad_location_type_all
      WHERE    location_type = x_location_type AND
               closed_ind = NVL(x_closed_ind,closed_ind)
      FOR UPDATE NOWAIT;

Line: 196


      SELECT   rowid
      FROM     igs_ad_location_type_all
      WHERE    s_location_type = x_s_location_type ;

Line: 228


    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_org_id,
      x_location_type,
      x_description,
      x_s_location_type,
      x_closed_ind,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 249


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

Line: 260


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

Line: 264


    ELSIF (p_action = 'DELETE') THEN
      Check_Child_Existance;

Line: 266


    ELSIF (p_action = 'VALIDATE_INSERT') THEN
	IF Get_PK_For_Validation (
		new_references.location_type
	) THEN
		Fnd_Message.Set_Name('IGS','IGS_GE_MULTI_ORG_DUP_REC');

Line: 275


    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
	Check_Constraints;

Line: 277


    ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Check_Child_Existance;

Line: 294


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_ORG_ID in NUMBER,
  X_LOCATION_TYPE in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_S_LOCATION_TYPE in VARCHAR2,
  X_CLOSED_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) as
    cursor C is select ROWID from igs_ad_location_type_all
      where LOCATION_TYPE = X_LOCATION_TYPE;

Line: 305


    X_LAST_UPDATE_DATE DATE;

Line: 306


    X_LAST_UPDATED_BY NUMBER;

Line: 307


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 309


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 311


    X_LAST_UPDATED_BY := 1;

Line: 312


    X_LAST_UPDATE_LOGIN := 0;

Line: 314


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 315


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 318


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 319


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 329


    p_action=>'INSERT' ,
    x_rowid=>X_ROWID ,
    x_org_id=>igs_ge_gen_003.get_org_id,
    x_location_type => X_LOCATION_TYPE ,
    x_description =>  X_DESCRIPTION,
    x_s_location_type => X_S_LOCATION_TYPE ,
    x_closed_ind => NVL(X_CLOSED_IND,'N'),
    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: 344


  insert into igs_ad_location_type_all (
    LOCATION_TYPE,
    DESCRIPTION,
    S_LOCATION_TYPE,
    CLOSED_IND,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    ORG_ID
  ) values (
    NEW_REFERENCES.LOCATION_TYPE,
    NEW_REFERENCES.DESCRIPTION,
    NEW_REFERENCES.S_LOCATION_TYPE,
    NEW_REFERENCES.CLOSED_IND,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN,
    NEW_REFERENCES.ORG_ID
  );

Line: 377


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

Line: 382


end INSERT_ROW;

Line: 391


  cursor c1 is select
      DESCRIPTION,
      S_LOCATION_TYPE,
      CLOSED_IND
    from igs_ad_location_type_all
    WHERE  ROWID = X_ROWID  for update nowait ;

Line: 404


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

Line: 426


procedure UPDATE_ROW (
  X_ROWID in VARCHAR2 ,
  X_LOCATION_TYPE in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_S_LOCATION_TYPE in VARCHAR2,
  X_CLOSED_IND in VARCHAR2,
  X_MODE in VARCHAR2 default 'R'
  ) as
    X_LAST_UPDATE_DATE DATE;

Line: 435


    X_LAST_UPDATED_BY NUMBER;

Line: 436


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 438


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 440


    X_LAST_UPDATED_BY := 1;

Line: 441


    X_LAST_UPDATE_LOGIN := 0;

Line: 443


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 444


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 447


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 448


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 459


    p_action=>'UPDATE' ,
    x_rowid=>X_ROWID ,
    x_location_type => x_location_type ,
    x_description => x_description ,
    x_s_location_type => x_s_location_type ,
    x_closed_ind => x_closed_ind ,
    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: 472


  update igs_ad_location_type_all set
    DESCRIPTION = NEW_REFERENCES.DESCRIPTION,
    S_LOCATION_TYPE = NEW_REFERENCES.S_LOCATION_TYPE,
    CLOSED_IND = NEW_REFERENCES.CLOSED_IND,
    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: 486


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

Line: 490


end UPDATE_ROW;

Line: 501


  cursor c1 is select rowid from igs_ad_location_type_all
     where LOCATION_TYPE = X_LOCATION_TYPE
  ;

Line: 510


    INSERT_ROW (
     X_ROWID,
     X_ORG_ID,
     X_LOCATION_TYPE,
     X_DESCRIPTION,
     X_S_LOCATION_TYPE,
     X_CLOSED_IND,
     X_MODE);

Line: 521


  UPDATE_ROW (
   X_ROWID ,
   X_LOCATION_TYPE,
   X_DESCRIPTION,
   X_S_LOCATION_TYPE,
   X_CLOSED_IND,
   X_MODE);

Line: 530


procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) as
begin

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

Line: 541


  delete from igs_ad_location_type_all
  where  ROWID = X_ROWID;

Line: 548


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

Line: 553


end DELETE_ROW;