APPS.ITA_SETUP_HIERARCHY_PKG SQL Statements

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

Line: 5

procedure INSERT_ROW (
  X_HIERARCHY_LEVEL_CODE in VARCHAR2,
  X_HIERARCHY_LEVEL_NAME in VARCHAR2,
  X_SECURITY_GROUP_ID in NUMBER,
  X_OBJECT_VERSION_NUMBER in NUMBER,
  X_CREATION_DATE in DATE,
  X_CREATED_BY in NUMBER,
  X_LAST_UPDATE_DATE in DATE,
  X_LAST_UPDATED_BY in NUMBER,
  X_LAST_UPDATE_LOGIN in NUMBER
) is
begin
  insert into ITA_SETUP_HIERARCHY_B (
    HIERARCHY_LEVEL_CODE,
    SECURITY_GROUP_ID,
    OBJECT_VERSION_NUMBER,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    X_HIERARCHY_LEVEL_CODE,
    X_SECURITY_GROUP_ID,
    X_OBJECT_VERSION_NUMBER,
    X_CREATION_DATE,
    X_CREATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 37

  insert into ITA_SETUP_HIERARCHY_TL (
    HIERARCHY_LEVEL_CODE,
    HIERARCHY_LEVEL_NAME,
    SECURITY_GROUP_ID,
    OBJECT_VERSION_NUMBER,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    LANGUAGE,
    SOURCE_LANG
  ) select
    X_HIERARCHY_LEVEL_CODE,
    X_HIERARCHY_LEVEL_NAME,
    X_SECURITY_GROUP_ID,
    X_OBJECT_VERSION_NUMBER,
    X_CREATION_DATE,
    X_CREATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN,
    L.LANGUAGE_CODE,
    userenv('LANG')
  from FND_LANGUAGES L
  where L.INSTALLED_FLAG in ('I', 'B')
  and not exists (
    select null
    from ITA_SETUP_HIERARCHY_TL tl
    where
      tl.HIERARCHY_LEVEL_CODE = X_HIERARCHY_LEVEL_CODE and
      tl.LANGUAGE = L.LANGUAGE_CODE);

Line: 69

end INSERT_ROW;

Line: 78

  cursor c is select
	HIERARCHY_LEVEL_CODE,
      SECURITY_GROUP_ID,
      OBJECT_VERSION_NUMBER
    from ITA_SETUP_HIERARCHY_B
    where HIERARCHY_LEVEL_CODE = X_HIERARCHY_LEVEL_CODE
    for update of HIERARCHY_LEVEL_CODE nowait;

Line: 87

  cursor c1 is select
      HIERARCHY_LEVEL_NAME,
      decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
    from ITA_SETUP_HIERARCHY_TL
    where
      HIERARCHY_LEVEL_CODE = X_HIERARCHY_LEVEL_CODE and
      userenv('LANG') in (LANGUAGE, SOURCE_LANG)
    for update of HIERARCHY_LEVEL_CODE nowait;

Line: 100

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

Line: 132

procedure UPDATE_ROW (
  X_HIERARCHY_LEVEL_CODE in VARCHAR2,
  X_HIERARCHY_LEVEL_NAME in VARCHAR2,
  X_SECURITY_GROUP_ID in NUMBER,
  X_OBJECT_VERSION_NUMBER in NUMBER,
  X_LAST_UPDATE_DATE in DATE,
  X_LAST_UPDATED_BY in NUMBER,
  X_LAST_UPDATE_LOGIN in NUMBER
) is
begin
  update ITA_SETUP_HIERARCHY_B set
    HIERARCHY_LEVEL_CODE = X_HIERARCHY_LEVEL_CODE,
    SECURITY_GROUP_ID = X_SECURITY_GROUP_ID,
    OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
  where HIERARCHY_LEVEL_CODE = X_HIERARCHY_LEVEL_CODE;

Line: 155

  update ITA_SETUP_HIERARCHY_TL set
    HIERARCHY_LEVEL_NAME = X_HIERARCHY_LEVEL_NAME,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
    SOURCE_LANG = userenv('LANG')
  where
    HIERARCHY_LEVEL_CODE = X_HIERARCHY_LEVEL_CODE and
    userenv('LANG') in (LANGUAGE, SOURCE_LANG);

Line: 168

end UPDATE_ROW;

Line: 171

procedure DELETE_ROW (
  X_HIERARCHY_LEVEL_CODE in VARCHAR2
) is
begin
  delete from ITA_SETUP_HIERARCHY_TL
  where HIERARCHY_LEVEL_CODE = X_HIERARCHY_LEVEL_CODE;

Line: 182

  delete from ITA_SETUP_HIERARCHY_B
  where HIERARCHY_LEVEL_CODE = X_HIERARCHY_LEVEL_CODE;

Line: 188

end DELETE_ROW;

Line: 194

  X_LAST_UPDATE_DATE in VARCHAR2,
  X_OWNER in VARCHAR2,
  X_CUSTOM_MODE in VARCHAR2
) is

f_luby	number;	-- entity owner in file

Line: 200

f_ludate	date;		-- entity update date in file

Line: 202

db_ludate	date;		-- entity update date in db

Line: 205

	-- Translate owner to file_last_updated_by
	f_luby := fnd_load_util.owner_id(X_OWNER);

Line: 208

	-- Translate char last_update_date to date
	f_ludate := nvl(to_date(X_LAST_UPDATE_DATE, 'YYYY/MM/DD'), sysdate);

Line: 211

	select LAST_UPDATED_BY, LAST_UPDATE_DATE into db_luby, db_ludate
	from ITA_SETUP_HIERARCHY_B
	where HIERARCHY_LEVEL_CODE = X_HIERARCHY_LEVEL_CODE;

Line: 216

	then ITA_SETUP_HIERARCHY_PKG.UPDATE_ROW (
		X_HIERARCHY_LEVEL_CODE		=> X_HIERARCHY_LEVEL_CODE,
		X_HIERARCHY_LEVEL_NAME		=> X_HIERARCHY_LEVEL_NAME,
		X_SECURITY_GROUP_ID		=> null,
		X_OBJECT_VERSION_NUMBER		=> 1,
		X_LAST_UPDATE_DATE		=> f_ludate,
		X_LAST_UPDATED_BY			=> f_luby,
		X_LAST_UPDATE_LOGIN		=> 0);

Line: 226

	then ITA_SETUP_HIERARCHY_PKG.INSERT_ROW (
		X_HIERARCHY_LEVEL_CODE		=> X_HIERARCHY_LEVEL_CODE,
		X_HIERARCHY_LEVEL_NAME		=> X_HIERARCHY_LEVEL_NAME,
		X_SECURITY_GROUP_ID		=> null,
		X_OBJECT_VERSION_NUMBER		=> 1,
		X_CREATION_DATE			=> f_ludate,
		X_CREATED_BY			=> f_luby,
		X_LAST_UPDATE_DATE		=> f_ludate,
		X_LAST_UPDATED_BY			=> f_luby,
		X_LAST_UPDATE_LOGIN		=> 0);

Line: 242

  delete from ITA_SETUP_HIERARCHY_TL tl
  where not exists (
    select null
    from ITA_SETUP_HIERARCHY_B b
    where b.HIERARCHY_LEVEL_CODE = tl.HIERARCHY_LEVEL_CODE
    );

Line: 249

  update ITA_SETUP_HIERARCHY_TL tl set (
      HIERARCHY_LEVEL_NAME
    ) = (select
      b.HIERARCHY_LEVEL_NAME
    from ITA_SETUP_HIERARCHY_TL b
    where
      b.HIERARCHY_LEVEL_CODE = tl.HIERARCHY_LEVEL_CODE and
      b.LANGUAGE = tl.SOURCE_LANG)
  where (
      tl.HIERARCHY_LEVEL_CODE,
      tl.LANGUAGE
  ) in (select
      subtl.HIERARCHY_LEVEL_CODE,
      subtl.LANGUAGE
    from ITA_SETUP_HIERARCHY_TL subb, ITA_SETUP_HIERARCHY_TL subtl
    where
      subb.HIERARCHY_LEVEL_CODE = subtl.HIERARCHY_LEVEL_CODE and
      subb.LANGUAGE = subtl.SOURCE_LANG and
    	(subb.HIERARCHY_LEVEL_NAME <> subtl.HIERARCHY_LEVEL_NAME or
        (subb.HIERARCHY_LEVEL_NAME is null and subtl.HIERARCHY_LEVEL_NAME is not null) or
        (subb.HIERARCHY_LEVEL_NAME is not null and subtl.HIERARCHY_LEVEL_NAME is null)));

Line: 271

  insert into ITA_SETUP_HIERARCHY_TL (
    HIERARCHY_LEVEL_CODE,
    HIERARCHY_LEVEL_NAME,
    CREATED_BY,
    CREATION_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATE_LOGIN,
    SECURITY_GROUP_ID,
    OBJECT_VERSION_NUMBER,
    LANGUAGE,
    SOURCE_LANG
  ) select
    b.HIERARCHY_LEVEL_CODE,
    b.HIERARCHY_LEVEL_NAME,
    b.CREATED_BY,
    b.CREATION_DATE,
    b.LAST_UPDATED_BY,
    b.LAST_UPDATE_DATE,
    b.LAST_UPDATE_LOGIN,
    b.SECURITY_GROUP_ID,
    b.OBJECT_VERSION_NUMBER,
    L.LANGUAGE_CODE,
    b.SOURCE_LANG
  from ITA_SETUP_HIERARCHY_TL b, FND_LANGUAGES L
  where
    L.INSTALLED_FLAG in ('I', 'B') and
    b.LANGUAGE = userenv('LANG') and
    not exists (
     select null
     from ITA_SETUP_HIERARCHY_TL tl
     where
       tl.HIERARCHY_LEVEL_CODE = b.HIERARCHY_LEVEL_CODE and
       tl.LANGUAGE = L.LANGUAGE_CODE);

Line: 311

  X_LAST_UPDATE_DATE in VARCHAR2,
  X_OWNER in VARCHAR2,
  X_CUSTOM_MODE in VARCHAR2
) is

f_luby	number;	-- entity owner in file

Line: 317

f_ludate	date;		-- entity update date in file

Line: 319

db_ludate	date;		-- entity update date in db

Line: 322

	-- Translate owner to file_last_updated_by
	f_luby := fnd_load_util.owner_id(X_OWNER);

Line: 325

	-- Translate char last_update_date to date
	f_ludate := nvl(to_date(X_LAST_UPDATE_DATE, 'YYYY/MM/DD'), sysdate);

Line: 328

	select LAST_UPDATED_BY, LAST_UPDATE_DATE into db_luby, db_ludate
	from ITA_SETUP_HIERARCHY_TL
	where HIERARCHY_LEVEL_CODE = X_HIERARCHY_LEVEL_CODE and LANGUAGE = userenv('LANG');

Line: 333

	then update ITA_SETUP_HIERARCHY_TL set
		HIERARCHY_LEVEL_NAME	= nvl(X_HIERARCHY_LEVEL_NAME, HIERARCHY_LEVEL_NAME),
		SOURCE_LANG			= userenv('LANG'),
		LAST_UPDATE_DATE		= f_ludate,
		LAST_UPDATED_BY		= f_luby,
		LAST_UPDATE_LOGIN		= 0
	where	HIERARCHY_LEVEL_CODE = X_HIERARCHY_LEVEL_CODE and userenv('LANG') in (LANGUAGE, SOURCE_LANG);