APPS.FND_NATURAL_LANGUAGES_PKG SQL Statements

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

Line: 4

procedure INSERT_ROW (
  X_ROWID in out nocopy VARCHAR2,
  X_LANGUAGE_CODE in VARCHAR2,
  X_ISO_LANGUAGE_3 in VARCHAR2,
  X_ISO_TERRITORY in VARCHAR2,
  X_ENABLED_FLAG in VARCHAR2,
  X_NAME in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  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
  cursor C is select ROWID from FND_NATURAL_LANGUAGES
    where LANGUAGE_CODE = X_LANGUAGE_CODE
    ;

Line: 22

  insert into FND_NATURAL_LANGUAGES (
    LANGUAGE_CODE,
    ISO_LANGUAGE_3,
    ISO_TERRITORY,
    ENABLED_FLAG,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    X_LANGUAGE_CODE,
    X_ISO_LANGUAGE_3,
    X_ISO_TERRITORY,
    X_ENABLED_FLAG,
    X_CREATION_DATE,
    X_CREATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 44

  insert into FND_NATURAL_LANGUAGES_TL (
    LANGUAGE_CODE,
    NAME,
    DESCRIPTION,
    CREATED_BY,
    CREATION_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATE_LOGIN,
    LANGUAGE,
    SOURCE_LANG
  ) select
    X_LANGUAGE_CODE,
    X_NAME,
    X_DESCRIPTION,
    X_CREATED_BY,
    X_CREATION_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    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 FND_NATURAL_LANGUAGES_TL T
    where T.LANGUAGE_CODE = X_LANGUAGE_CODE
    and T.LANGUAGE = L.LANGUAGE_CODE);

Line: 82

end INSERT_ROW;

Line: 92

  cursor c is select
      ISO_LANGUAGE_3,
      ISO_TERRITORY,
      ENABLED_FLAG
    from FND_NATURAL_LANGUAGES
    where LANGUAGE_CODE = X_LANGUAGE_CODE
    for update of LANGUAGE_CODE nowait;

Line: 101

  cursor c1 is select
      NAME,
      DESCRIPTION,
      decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
    from FND_NATURAL_LANGUAGES_TL
    where LANGUAGE_CODE = X_LANGUAGE_CODE
    and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
    for update of LANGUAGE_CODE nowait;

Line: 114

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

Line: 145

procedure UPDATE_ROW (
  X_LANGUAGE_CODE in VARCHAR2,
  X_ISO_LANGUAGE_3 in VARCHAR2,
  X_ISO_TERRITORY in VARCHAR2,
  X_ENABLED_FLAG in VARCHAR2,
  X_NAME in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_LAST_UPDATE_DATE in DATE,
  X_LAST_UPDATED_BY in NUMBER,
  X_LAST_UPDATE_LOGIN in NUMBER
) is
begin
  update FND_NATURAL_LANGUAGES set
    ISO_LANGUAGE_3 = X_ISO_LANGUAGE_3,
    ISO_TERRITORY = X_ISO_TERRITORY,
    ENABLED_FLAG = X_ENABLED_FLAG,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
  where LANGUAGE_CODE = X_LANGUAGE_CODE;

Line: 170

  update FND_NATURAL_LANGUAGES_TL set
    NAME = X_NAME,
    DESCRIPTION = X_DESCRIPTION,
    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 LANGUAGE_CODE = X_LANGUAGE_CODE
  and userenv('LANG') in (LANGUAGE, SOURCE_LANG);

Line: 183

end UPDATE_ROW;

Line: 185

procedure DELETE_ROW (
  X_LANGUAGE_CODE in VARCHAR2
) is
begin
  delete from FND_NATURAL_LANGUAGES_TL
  where LANGUAGE_CODE = X_LANGUAGE_CODE;

Line: 196

  delete from FND_NATURAL_LANGUAGES
  where LANGUAGE_CODE = X_LANGUAGE_CODE;

Line: 202

end DELETE_ROW;

Line: 208

/* The following update statements are commented out */
/* as a quick workaround to fix the time-consuming table handler issue */
/* Eventually we'll need to turn them into a separate fix_language procedure */
/*
  delete from FND_NATURAL_LANGUAGES_TL T
  where not exists
    (select NULL
    from FND_NATURAL_LANGUAGES B
    where B.LANGUAGE_CODE = T.LANGUAGE_CODE
    );

Line: 219

  update FND_NATURAL_LANGUAGES_TL T set (
      NAME,
      DESCRIPTION
    ) = (select
      B.NAME,
      B.DESCRIPTION
    from FND_NATURAL_LANGUAGES_TL B
    where B.LANGUAGE_CODE = T.LANGUAGE_CODE
    and B.LANGUAGE = T.SOURCE_LANG)
  where (
      T.LANGUAGE_CODE,
      T.LANGUAGE
  ) in (select
      SUBT.LANGUAGE_CODE,
      SUBT.LANGUAGE
    from FND_NATURAL_LANGUAGES_TL SUBB, FND_NATURAL_LANGUAGES_TL SUBT
    where SUBB.LANGUAGE_CODE = SUBT.LANGUAGE_CODE
    and SUBB.LANGUAGE = SUBT.SOURCE_LANG
    and (SUBB.NAME <> SUBT.NAME
      or SUBB.DESCRIPTION <> SUBT.DESCRIPTION
  ));

Line: 242

  insert into FND_NATURAL_LANGUAGES_TL (
    LANGUAGE_CODE,
    NAME,
    DESCRIPTION,
    CREATED_BY,
    CREATION_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATE_LOGIN,
    LANGUAGE,
    SOURCE_LANG
  ) select /*+ ORDERED */
    B.LANGUAGE_CODE,
    B.NAME,
    B.DESCRIPTION,
    B.CREATED_BY,
    B.CREATION_DATE,
    B.LAST_UPDATED_BY,
    B.LAST_UPDATE_DATE,
    B.LAST_UPDATE_LOGIN,
    L.LANGUAGE_CODE,
    B.SOURCE_LANG
  from FND_NATURAL_LANGUAGES_TL B, FND_LANGUAGES L
  where L.INSTALLED_FLAG in ('I', 'B')
  and B.LANGUAGE = userenv('LANG')
  and not exists
    (select NULL
    from FND_NATURAL_LANGUAGES_TL T
    where T.LANGUAGE_CODE = B.LANGUAGE_CODE
    and T.LANGUAGE = L.LANGUAGE_CODE);

Line: 279

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

Line: 283

  f_ludate  date;    -- entity update date in file

Line: 285

  db_ludate date;    -- entity update date in db

Line: 292

  f_ludate := nvl(to_date(X_LAST_UPDATE_DATE, 'YYYY/MM/DD'), sysdate);

Line: 295

  select last_updated_by, last_update_date
  into db_luby, db_ludate
  from fnd_natural_languages_tl
  where language_code = X_LANGUAGE_CODE
  and language            = userenv('LANG');

Line: 303

  update FND_NATURAL_LANGUAGES_TL set
    NAME = X_NAME,
    DESCRIPTION = X_DESCRIPTION,
    LAST_UPDATE_DATE = f_ludate,
    LAST_UPDATED_BY = f_luby,
    LAST_UPDATE_LOGIN = 0,
    SOURCE_LANG = userenv('LANG')
  where LANGUAGE_CODE = X_LANGUAGE_CODE
  and userenv('LANG') in (LANGUAGE, SOURCE_LANG);

Line: 327

  X_LAST_UPDATE_DATE in VARCHAR2,
  X_CUSTOM_MODE in VARCHAR2
) is
 user_id NUMBER;

Line: 333

  f_ludate  date;    -- entity update date in file

Line: 335

  db_ludate date;    -- entity update date in db

Line: 342

  f_ludate := nvl(to_date(x_last_update_date, 'YYYY/MM/DD'), sysdate);

Line: 345

  select LAST_UPDATED_BY, LAST_UPDATE_DATE
   into db_luby, db_ludate
  from fnd_natural_languages
  where language_code = X_LANGUAGE_CODE;

Line: 352

  FND_NATURAL_LANGUAGES_PKG.UPDATE_ROW(
    X_LANGUAGE_CODE,
    X_ISO_LANGUAGE_3,
    X_ISO_TERRITORY,
    X_ENABLED_FLAG,
    X_NAME,
    X_DESCRIPTION,
    f_ludate,
    f_luby,
    0);

Line: 366

    FND_NATURAL_LANGUAGES_PKG.INSERT_ROW(
        X_ROWID,
        X_LANGUAGE_CODE,
        X_ISO_LANGUAGE_3,
        X_ISO_TERRITORY,
        X_ENABLED_FLAG,
        X_NAME,
        X_DESCRIPTION,
        f_ludate,
        f_luby,
        f_ludate,
        f_luby,
        0);