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.HZ_STYLES_PKG SQL Statements

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

Line: 7


procedure INSERT_ROW (
  X_ROWID			IN OUT	NOCOPY VARCHAR2,
  X_STYLE_CODE			IN	VARCHAR2,
  X_DATABASE_OBJECT_NAME	IN	VARCHAR2,
  X_STYLE_NAME			IN	VARCHAR2,
  X_DESCRIPTION			IN	VARCHAR2,
  X_OBJECT_VERSION_NUMBER       IN      NUMBER
) is
  cursor C is select ROWID from HZ_STYLES_B
    where STYLE_CODE = X_STYLE_CODE
    ;

Line: 19


  insert into HZ_STYLES_B (
    STYLE_CODE,
    DATABASE_OBJECT_NAME,
    CREATED_BY,
    CREATION_DATE,
    LAST_UPDATE_LOGIN,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    OBJECT_VERSION_NUMBER
  ) values (
    DECODE( X_STYLE_CODE, FND_API.G_MISS_CHAR, NULL, X_STYLE_CODE ),
    DECODE( X_DATABASE_OBJECT_NAME, FND_API.G_MISS_CHAR, NULL, X_DATABASE_OBJECT_NAME ),
    NVL(L_USER_ID_FOR_SEED,HZ_UTILITY_V2PUB.CREATED_BY),
    HZ_UTILITY_V2PUB.CREATION_DATE,
    NVL(L_USER_ID_FOR_SEED,HZ_UTILITY_V2PUB.LAST_UPDATE_LOGIN),
    HZ_UTILITY_V2PUB.LAST_UPDATE_DATE,
    NVL(L_USER_ID_FOR_SEED,HZ_UTILITY_V2PUB.LAST_UPDATED_BY),
    DECODE( X_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, X_OBJECT_VERSION_NUMBER )
  );

Line: 39


  insert into HZ_STYLES_TL (
    STYLE_CODE,
    STYLE_NAME,
    DESCRIPTION,
    LANGUAGE,
    SOURCE_LANG,
    CREATED_BY,
    CREATION_DATE,
    LAST_UPDATE_LOGIN,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY
  ) select
    DECODE( X_STYLE_CODE, FND_API.G_MISS_CHAR, NULL, X_STYLE_CODE ),
    DECODE( X_STYLE_NAME, FND_API.G_MISS_CHAR, NULL, X_STYLE_NAME ),
    DECODE( X_DESCRIPTION, FND_API.G_MISS_CHAR, NULL, X_DESCRIPTION ),
    L.LANGUAGE_CODE,
    userenv('LANG'),
    NVL(L_USER_ID_FOR_SEED,HZ_UTILITY_V2PUB.CREATED_BY),
    HZ_UTILITY_V2PUB.CREATION_DATE,
    NVL(L_USER_ID_FOR_SEED,HZ_UTILITY_V2PUB.LAST_UPDATE_LOGIN),
    HZ_UTILITY_V2PUB.LAST_UPDATE_DATE,
    NVL(L_USER_ID_FOR_SEED,HZ_UTILITY_V2PUB.LAST_UPDATED_BY)
  from FND_LANGUAGES L
  where L.INSTALLED_FLAG in ('I', 'B')
  and not exists
    (select NULL
    from HZ_STYLES_TL T
    where T.STYLE_CODE = X_STYLE_CODE
    and T.LANGUAGE = L.LANGUAGE_CODE);

Line: 77


end INSERT_ROW;

Line: 85


  cursor c is select
      DATABASE_OBJECT_NAME
    from HZ_STYLES_B
    where STYLE_CODE = X_STYLE_CODE
    for update of STYLE_CODE nowait;

Line: 92


  cursor c1 is select
      STYLE_NAME,
      DESCRIPTION,
      decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
    from HZ_STYLES_TL
    where STYLE_CODE = X_STYLE_CODE
    and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
    for update of STYLE_CODE nowait;

Line: 105


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

Line: 133


procedure UPDATE_ROW (
  X_STYLE_CODE			IN VARCHAR2,
  X_DATABASE_OBJECT_NAME	IN VARCHAR2,
  X_STYLE_NAME			IN VARCHAR2,
  X_DESCRIPTION			IN VARCHAR2,
  X_OBJECT_VERSION_NUMBER       IN NUMBER
) is
begin
  update HZ_STYLES_B set
    DATABASE_OBJECT_NAME = DECODE( X_DATABASE_OBJECT_NAME, NULL, DATABASE_OBJECT_NAME, FND_API.G_MISS_CHAR, NULL, X_DATABASE_OBJECT_NAME ),
    LAST_UPDATE_DATE = HZ_UTILITY_V2PUB.LAST_UPDATE_DATE,
    LAST_UPDATED_BY = NVL(L_USER_ID_FOR_SEED,HZ_UTILITY_V2PUB.LAST_UPDATED_BY),
    LAST_UPDATE_LOGIN = NVL(L_USER_ID_FOR_SEED,HZ_UTILITY_V2PUB.LAST_UPDATE_LOGIN),
    OBJECT_VERSION_NUMBER = DECODE(X_OBJECT_VERSION_NUMBER, NULL, OBJECT_VERSION_NUMBER,
                                  FND_API.G_MISS_NUM, NULL, X_OBJECT_VERSION_NUMBER)

  where STYLE_CODE = X_STYLE_CODE;

Line: 155


  update HZ_STYLES_TL set
    STYLE_NAME =  DECODE( X_STYLE_NAME, NULL, STYLE_NAME, FND_API.G_MISS_CHAR, NULL, X_STYLE_NAME ),
    DESCRIPTION = DECODE( X_DESCRIPTION, NULL, DESCRIPTION, FND_API.G_MISS_CHAR, NULL, X_DESCRIPTION ),
    LAST_UPDATE_DATE = HZ_UTILITY_V2PUB.LAST_UPDATE_DATE,
    LAST_UPDATED_BY = NVL(L_USER_ID_FOR_SEED,HZ_UTILITY_V2PUB.LAST_UPDATED_BY),
    LAST_UPDATE_LOGIN = NVL(L_USER_ID_FOR_SEED,HZ_UTILITY_V2PUB.LAST_UPDATE_LOGIN),
    SOURCE_LANG = userenv('LANG')
  where STYLE_CODE = X_STYLE_CODE
  and userenv('LANG') in (LANGUAGE, SOURCE_LANG);

Line: 168


end UPDATE_ROW;

Line: 170


PROCEDURE SELECT_ROW (
  X_STYLE_CODE			IN OUT NOCOPY VARCHAR2,
  X_DATABASE_OBJECT_NAME	OUT    NOCOPY VARCHAR2,
  X_STYLE_NAME			OUT    NOCOPY VARCHAR2,
  X_DESCRIPTION			OUT    NOCOPY VARCHAR2
) IS
BEGIN

    SELECT
        NVL( B.STYLE_CODE, FND_API.G_MISS_CHAR ),
        NVL( B.DATABASE_OBJECT_NAME, FND_API.G_MISS_CHAR ),
        NVL( T.STYLE_NAME, FND_API.G_MISS_CHAR ),
        NVL( T.DESCRIPTION, FND_API.G_MISS_CHAR )
    INTO X_STYLE_CODE,
         X_DATABASE_OBJECT_NAME,
	 X_STYLE_NAME,
	 X_DESCRIPTION
    FROM HZ_STYLES_B B, HZ_STYLES_TL T
    WHERE B.STYLE_CODE = X_STYLE_CODE
    AND   T.STYLE_CODE = X_STYLE_CODE
    AND   T.LANGUAGE = userenv('LANG');

Line: 200


END SELECT_ROW;

Line: 203


procedure DELETE_ROW (
  X_STYLE_CODE in VARCHAR2
) is
begin
  delete from HZ_STYLES_TL
  where STYLE_CODE = X_STYLE_CODE;

Line: 214


  delete from HZ_STYLES_B
  where STYLE_CODE = X_STYLE_CODE;

Line: 220


end DELETE_ROW;

Line: 225


  delete from HZ_STYLES_TL T
  where not exists
    (select NULL
    from HZ_STYLES_B B
    where B.STYLE_CODE = T.STYLE_CODE
    );

Line: 232


  update HZ_STYLES_TL T set (
      STYLE_NAME,
      DESCRIPTION
    ) = (select
      B.STYLE_NAME,
      B.DESCRIPTION
    from HZ_STYLES_TL B
    where B.STYLE_CODE = T.STYLE_CODE
    and B.LANGUAGE = T.SOURCE_LANG)
  where (
      T.STYLE_CODE,
      T.LANGUAGE
  ) in (select
      SUBT.STYLE_CODE,
      SUBT.LANGUAGE
    from HZ_STYLES_TL SUBB, HZ_STYLES_TL SUBT
    where SUBB.STYLE_CODE = SUBT.STYLE_CODE
    and SUBB.LANGUAGE = SUBT.SOURCE_LANG
    and (SUBB.STYLE_NAME <> SUBT.STYLE_NAME
      or SUBB.DESCRIPTION <> SUBT.DESCRIPTION
      or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
      or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
  ));

Line: 256


  insert into HZ_STYLES_TL (
    STYLE_CODE,
    STYLE_NAME,
    DESCRIPTION,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_LOGIN,
    LANGUAGE,
    SOURCE_LANG
  ) select
    B.STYLE_CODE,
    B.STYLE_NAME,
    B.DESCRIPTION,
    B.LAST_UPDATE_DATE,
    B.LAST_UPDATED_BY,
    B.CREATION_DATE,
    B.CREATED_BY,
    B.LAST_UPDATE_LOGIN,
    L.LANGUAGE_CODE,
    B.SOURCE_LANG
  from HZ_STYLES_TL B, FND_LANGUAGES L
  where L.INSTALLED_FLAG in ('I', 'B')
  and B.LANGUAGE = userenv('LANG')
  and not exists
    (select NULL
    from HZ_STYLES_TL T
    where T.STYLE_CODE = B.STYLE_CODE
    and T.LANGUAGE = L.LANGUAGE_CODE);

Line: 294


  X_LAST_UPDATE_DATE in DATE,
  X_CUSTOM_MODE in VARCHAR2
) is
  l_f_luby    number;  -- entity owner in file

Line: 298


  l_f_ludate  date;    -- entity update date in file

Line: 300


  l_db_ludate date;    -- entity update date in db

Line: 314


  l_f_ludate := nvl(x_last_update_date, sysdate);

Line: 317


    select LAST_UPDATED_BY, LAST_UPDATE_DATE, OBJECT_VERSION_NUMBER
         into l_db_luby, l_db_ludate, l_object_version_number
         from HZ_STYLES_B
         where STYLE_CODE = x_style_code;

Line: 334


      hz_styles_pkg.update_row (
        X_STYLE_CODE           => X_STYLE_CODE,
        X_DATABASE_OBJECT_NAME => X_DATABASE_OBJECT_NAME,
        X_STYLE_NAME           => X_STYLE_NAME,
        X_DESCRIPTION          => X_DESCRIPTION,
	X_OBJECT_VERSION_NUMBER => l_object_version_number
      );

Line: 346


      hz_styles_pkg.insert_row(
          x_rowid                => l_rowid,
          x_style_code           => X_STYLE_CODE,
          x_database_object_name => X_DATABASE_OBJECT_NAME,
          x_style_name           => X_STYLE_NAME,
          x_description          => X_DESCRIPTION,
	  x_object_version_number => 1
      );

Line: 363


  X_LAST_UPDATE_DATE in DATE,
  X_CUSTOM_MODE in VARCHAR2
) is
  l_f_luby    number;  -- entity owner in file

Line: 367


  l_f_ludate  date;    -- entity update date in file

Line: 369


  l_db_ludate date;    -- entity update date in db

Line: 379


  l_f_ludate := nvl(x_last_update_date, sysdate);

Line: 382


    select LAST_UPDATED_BY, LAST_UPDATE_DATE
         into l_db_luby, l_db_ludate
         from HZ_STYLES_TL
         where STYLE_CODE = x_style_code
           and LANGUAGE = userenv('LANG');

Line: 398


      update HZ_STYLES_TL
         set STYLE_NAME        = nvl(X_STYLE_NAME,STYLE_NAME),
             DESCRIPTION       = nvl(X_DESCRIPTION,DESCRIPTION),
             LAST_UPDATE_DATE  = l_f_ludate,
             LAST_UPDATED_BY   = l_f_luby,
             LAST_UPDATE_LOGIN = 0,
             SOURCE_LANG       = userenv('LANG')
       where STYLE_CODE = X_STYLE_CODE
         and userenv('LANG') in (LANGUAGE, SOURCE_LANG);