DBA Data[Home] [Help]

APPS.AMS_CUSTOM_SETUPS_PKG SQL Statements

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

Line: 3

procedure INSERT_ROW (
  X_ROWID in OUT NOCOPY VARCHAR2,
  X_CUSTOM_SETUP_ID in NUMBER,
  X_OBJECT_VERSION_NUMBER in NUMBER,
  X_ACTIVITY_TYPE_CODE in VARCHAR2,
  X_MEDIA_ID in NUMBER,
  X_ENABLED_FLAG in VARCHAR2,
  X_OBJECT_TYPE in VARCHAR2,
  X_SOURCE_CODE_SUFFIX in VARCHAR2,
  X_SETUP_NAME in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_APPLICATION_ID 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,
  X_ALLOW_ESSENTIAL_GROUPING in VARCHAR2,
  X_USAGE in VARCHAR2,
  X_MIGRATED_CUSTOM_SETUP_ID in NUMBER
) is
  cursor C is select ROWID from AMS_CUSTOM_SETUPS_B
    where CUSTOM_SETUP_ID = X_CUSTOM_SETUP_ID
    ;
Line: 28

  insert into AMS_CUSTOM_SETUPS_B (
    CUSTOM_SETUP_ID,
    OBJECT_VERSION_NUMBER,
    ACTIVITY_TYPE_CODE,
    MEDIA_ID,
    ENABLED_FLAG,
    OBJECT_TYPE,
    SOURCE_CODE_SUFFIX,
    APPLICATION_ID,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    ALLOW_ESSENTIAL_GROUPING,
    USAGE,
    MIGRATED_CUSTOM_SETUP_ID
  ) values (
    X_CUSTOM_SETUP_ID,
    X_OBJECT_VERSION_NUMBER,
    X_ACTIVITY_TYPE_CODE,
    X_MEDIA_ID,
    X_ENABLED_FLAG,
    X_OBJECT_TYPE,
    X_SOURCE_CODE_SUFFIX,
    X_APPLICATION_ID,
    X_CREATION_DATE,
    X_CREATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN,
    X_ALLOW_ESSENTIAL_GROUPING,
    X_USAGE,
    X_MIGRATED_CUSTOM_SETUP_ID
  );
Line: 64

  insert into AMS_CUSTOM_SETUPS_TL (
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_LOGIN,
    SETUP_NAME,
    DESCRIPTION,
    CUSTOM_SETUP_ID,
    LANGUAGE,
    SOURCE_LANG
  ) select
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_CREATION_DATE,
    X_CREATED_BY,
    X_LAST_UPDATE_LOGIN,
    X_SETUP_NAME,
    X_DESCRIPTION,
    X_CUSTOM_SETUP_ID,
    L.LANGUAGE_CODE,
    userenv('LANG')
  from FND_LANGUAGES L
  where L.INSTALLED_FLAG in ('I', 'B')
  and not exists
    (select NULL
    from AMS_CUSTOM_SETUPS_TL T
    where T.CUSTOM_SETUP_ID = X_CUSTOM_SETUP_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);
Line: 102

end INSERT_ROW;
Line: 117

  cursor c is select
      OBJECT_VERSION_NUMBER,
      ACTIVITY_TYPE_CODE,
      MEDIA_ID,
      ENABLED_FLAG,
      OBJECT_TYPE,
      ALLOW_ESSENTIAL_GROUPING,
      USAGE,
      MIGRATED_CUSTOM_SETUP_ID
    from AMS_CUSTOM_SETUPS_B
    where CUSTOM_SETUP_ID = X_CUSTOM_SETUP_ID
    for update of CUSTOM_SETUP_ID nowait;
Line: 131

  cursor c1 is select
      SETUP_NAME,
      DESCRIPTION,
      decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
    from AMS_CUSTOM_SETUPS_TL
    where CUSTOM_SETUP_ID = X_CUSTOM_SETUP_ID
    and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
    for update of CUSTOM_SETUP_ID nowait;
Line: 144

    fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
Line: 182

procedure UPDATE_ROW (
  X_CUSTOM_SETUP_ID in NUMBER,
  X_OBJECT_VERSION_NUMBER in NUMBER,
  X_ACTIVITY_TYPE_CODE in VARCHAR2,
  X_MEDIA_ID in NUMBER,
  X_ENABLED_FLAG in VARCHAR2,
  X_OBJECT_TYPE in VARCHAR2,
  X_SOURCE_CODE_SUFFIX in VARCHAR2,
  X_SETUP_NAME in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_APPLICATION_ID in NUMBER,
  X_LAST_UPDATE_DATE in DATE,
  X_LAST_UPDATED_BY in NUMBER,
  X_LAST_UPDATE_LOGIN in NUMBER,
  X_ALLOW_ESSENTIAL_GROUPING in VARCHAR2,
  X_USAGE in VARCHAR2,
  X_MIGRATED_CUSTOM_SETUP_ID in NUMBER
) is
begin
  update AMS_CUSTOM_SETUPS_B set
    OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
    ACTIVITY_TYPE_CODE = X_ACTIVITY_TYPE_CODE,
    MEDIA_ID = X_MEDIA_ID,
    ENABLED_FLAG = X_ENABLED_FLAG,
    OBJECT_TYPE = X_OBJECT_TYPE,
    APPLICATION_ID =  X_APPLICATION_ID,
    SOURCE_CODE_SUFFIX = X_SOURCE_CODE_SUFFIX,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
    ALLOW_ESSENTIAL_GROUPING = X_ALLOW_ESSENTIAL_GROUPING,
    USAGE=X_USAGE,
    MIGRATED_CUSTOM_SETUP_ID = X_MIGRATED_CUSTOM_SETUP_ID
  where CUSTOM_SETUP_ID = X_CUSTOM_SETUP_ID;
Line: 221

  update AMS_CUSTOM_SETUPS_TL set
    SETUP_NAME = X_SETUP_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 CUSTOM_SETUP_ID = X_CUSTOM_SETUP_ID
  and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
Line: 234

end UPDATE_ROW;
Line: 236

procedure DELETE_ROW (
  X_CUSTOM_SETUP_ID in NUMBER
) is
begin
  delete from AMS_CUSTOM_SETUPS_TL
  where CUSTOM_SETUP_ID = X_CUSTOM_SETUP_ID;
Line: 247

  delete from AMS_CUSTOM_SETUPS_B
  where CUSTOM_SETUP_ID = X_CUSTOM_SETUP_ID;
Line: 253

end DELETE_ROW;
Line: 258

  delete from AMS_CUSTOM_SETUPS_TL T
  where not exists
    (select NULL
    from AMS_CUSTOM_SETUPS_B B
    where B.CUSTOM_SETUP_ID = T.CUSTOM_SETUP_ID
    );
Line: 265

  update AMS_CUSTOM_SETUPS_TL T set (
      SETUP_NAME,
      DESCRIPTION
    ) = (select
      B.SETUP_NAME,
      B.DESCRIPTION
    from AMS_CUSTOM_SETUPS_TL B
    where B.CUSTOM_SETUP_ID = T.CUSTOM_SETUP_ID
    and B.LANGUAGE = T.SOURCE_LANG)
  where (
      T.CUSTOM_SETUP_ID,
      T.LANGUAGE
  ) in (select
      SUBT.CUSTOM_SETUP_ID,
      SUBT.LANGUAGE
    from AMS_CUSTOM_SETUPS_TL SUBB, AMS_CUSTOM_SETUPS_TL SUBT
    where SUBB.CUSTOM_SETUP_ID = SUBT.CUSTOM_SETUP_ID
    and SUBB.LANGUAGE = SUBT.SOURCE_LANG
    and (SUBB.SETUP_NAME <> SUBT.SETUP_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: 289

  insert into AMS_CUSTOM_SETUPS_TL (
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_LOGIN,
    SETUP_NAME,
    DESCRIPTION,
    CUSTOM_SETUP_ID,
    LANGUAGE,
    SOURCE_LANG
  ) select
    B.LAST_UPDATE_DATE,
    B.LAST_UPDATED_BY,
    B.CREATION_DATE,
    B.CREATED_BY,
    B.LAST_UPDATE_LOGIN,
    B.SETUP_NAME,
    B.DESCRIPTION,
    B.CUSTOM_SETUP_ID,
    L.LANGUAGE_CODE,
    B.SOURCE_LANG
  from AMS_CUSTOM_SETUPS_TL B, FND_LANGUAGES L
  where L.INSTALLED_FLAG in ('I', 'B')
  and B.LANGUAGE = userenv('LANG')
  and not exists
    (select NULL
    from AMS_CUSTOM_SETUPS_TL T
    where T.CUSTOM_SETUP_ID = B.CUSTOM_SETUP_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);
Line: 329

  update ams_custom_setups_tl set
    setup_name = nvl(x_SETUP_NAME,   setup_name),
    description = nvl(x_description, description),
    source_lang = userenv('LANG'),
    last_update_date = sysdate,
    last_updated_by = decode(x_owner, 'SEED', 1, 0),
    last_update_login = 0
 where  custom_setup_id = x_custom_setup_id
 and      userenv('LANG') in (language, source_lang);
Line: 345

      by comparing last updated by value to be
          SEED/DATAMERGE(1), or
          INITIAL SETUP/ORACLE (2), or
          SYSTEM ADMINISTRATOR (0).or
    2) modify the whole data when custom_mode is 'FORCE'
    3) if the data in db is modified by customer, which can be found by
      by comparing last updated by value to be not of 0,1,2, then
        in that case modify only the user unexposed data with last updated by as 3 to
        distinguish that data is updated by patch.
*/
procedure  LOAD_ROW(
  X_CUSTOM_SETUP_ID    in  NUMBER,
  X_ACTIVITY_TYPE_CODE in  VARCHAR2,
  X_MEDIA_ID     in       NUMBER,
  X_ENABLED_FLAG in    VARCHAR2,
  X_OBJECT_TYPE  in    VARCHAR2,
  X_SOURCE_CODE_SUFFIX in VARCHAR2,
  X_SETUP_NAME   in     VARCHAR2,
  X_DESCRIPTION  in   VARCHAR2,
  X_ALLOW_ESSENTIAL_GROUPING in VARCHAR2,
  X_USAGE in VARCHAR2 := NULL,
  X_MIGRATED_CUSTOM_SETUP_ID in NUMBER,
  X_APPLICATION_ID in NUMBER,
  X_Owner        in     VARCHAR2,
  x_custom_mode  IN VARCHAR2,
  X_LAST_UPDATE_DATE in DATE
) is

l_user_id   number := 1;
Line: 384

  select last_updated_by, nvl(object_version_number,1)
  from    ams_custom_setups_b
  where  CUSTOM_SETUP_ID =  X_CUSTOM_SETUP_ID;
Line: 389

  select 1
  from   ams_custom_setups_b
   where  CUSTOM_SETUP_ID =  X_CUSTOM_SETUP_ID;
Line: 394

   select ams_custom_setups_b_S.nextval
   from dual;
Line: 426

    AMS_CUSTOM_SETUPS_PKG.INSERT_ROW(
      X_ROWID  => l_row_id,
      X_CUSTOM_SETUP_ID  => l_CUSTOM_SETUP_ID ,
      X_OBJECT_VERSION_NUMBER => l_obj_verno  ,
      X_ACTIVITY_TYPE_CODE  => X_ACTIVITY_TYPE_CODE,
      X_MEDIA_ID  => X_MEDIA_ID,
      X_ENABLED_FLAG  => X_ENABLED_FLAG,
      X_OBJECT_TYPE  => X_OBJECT_TYPE,
      X_SOURCE_CODE_SUFFIX => X_SOURCE_CODE_SUFFIX,
      X_SETUP_NAME  => X_SETUP_NAME,
      X_DESCRIPTION  => X_DESCRIPTION,
      X_APPLICATION_ID => X_APPLICATION_ID,
      X_CREATION_DATE  => X_LAST_UPDATE_DATE,
      X_CREATED_BY  => l_user_id,
      X_LAST_UPDATE_DATE  => X_LAST_UPDATE_DATE,
      X_LAST_UPDATED_BY  => l_user_id,
      X_LAST_UPDATE_LOGIN  => 0,
      X_ALLOW_ESSENTIAL_GROUPING => X_ALLOW_ESSENTIAL_GROUPING,
      X_USAGE => X_USAGE,
      X_MIGRATED_CUSTOM_SETUP_ID => X_MIGRATED_CUSTOM_SETUP_ID
      );
Line: 455

      AMS_CUSTOM_SETUPS_PKG.UPDATE_ROW(
        X_CUSTOM_SETUP_ID  => X_CUSTOM_SETUP_ID,
        X_OBJECT_VERSION_NUMBER => l_obj_verno + 1  ,
        X_ACTIVITY_TYPE_CODE  => X_ACTIVITY_TYPE_CODE,
        X_MEDIA_ID  => X_MEDIA_ID ,
        X_ENABLED_FLAG  => X_ENABLED_FLAG,
        X_OBJECT_TYPE  => X_OBJECT_TYPE,
        X_SOURCE_CODE_SUFFIX => X_SOURCE_CODE_SUFFIX,
        X_SETUP_NAME  => X_SETUP_NAME,
        X_DESCRIPTION  => X_DESCRIPTION,
        X_APPLICATION_ID => X_APPLICATION_ID,
        X_LAST_UPDATE_DATE  => X_LAST_UPDATE_DATE,
        X_LAST_UPDATED_BY  => l_user_id,
        X_LAST_UPDATE_LOGIN  => 0,
	X_ALLOW_ESSENTIAL_GROUPING => X_ALLOW_ESSENTIAL_GROUPING,
	X_USAGE => X_USAGE,
        X_MIGRATED_CUSTOM_SETUP_ID => X_MIGRATED_CUSTOM_SETUP_ID
      );
Line: 476

      update AMS_CUSTOM_SETUPS_B set
        OBJECT_VERSION_NUMBER = l_obj_verno + 1,
        OBJECT_TYPE  = X_OBJECT_TYPE,
        ACTIVITY_TYPE_CODE  = X_ACTIVITY_TYPE_CODE,
        SOURCE_CODE_SUFFIX = X_SOURCE_CODE_SUFFIX,
        MEDIA_ID  = X_MEDIA_ID , --???
        LAST_UPDATE_DATE = sysdate,
        LAST_UPDATED_BY = l_excp_user_id,
        LAST_UPDATE_LOGIN = 0
      where CUSTOM_SETUP_ID = X_CUSTOM_SETUP_ID;