APPS.FND_OAM_DS_PSETS_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_POLICYSET_ID in NUMBER,
	X_POLICYSET_NAME IN VARCHAR2,
	X_DESCRIPTION IN VARCHAR2,
	X_CREATED_BY in NUMBER,
	X_CREATION_DATE in DATE,
	X_LAST_UPDATED_BY in NUMBER,
	X_LAST_UPDATE_DATE in DATE,
	X_LAST_UPDATE_LOGIN in NUMBER
) is
  cursor C is select ROWID from FND_OAM_DS_PSETS_B
    where POLICYSET_ID = X_POLICYSET_ID;

Line: 17

  insert into FND_OAM_DS_PSETS_B (
	POLICYSET_ID,
	CREATED_BY,
	CREATION_DATE,
	LAST_UPDATED_BY,
	LAST_UPDATE_DATE,
	LAST_UPDATE_LOGIN
  ) values (
	X_POLICYSET_ID,
	X_CREATED_BY,
	X_CREATION_DATE,
	X_LAST_UPDATED_BY,
	X_LAST_UPDATE_DATE,
	X_LAST_UPDATE_LOGIN
  );

Line: 33

  insert into FND_OAM_DS_PSETS_TL (
	POLICYSET_ID,
	POLICYSET_NAME,
	DESCRIPTION,
	CREATED_BY,
	CREATION_DATE,
	LAST_UPDATED_BY,
	LAST_UPDATE_DATE,
	LAST_UPDATE_LOGIN,
      LANGUAGE,
      SOURCE_LANG
  ) select
	X_POLICYSET_ID,
      X_POLICYSET_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_OAM_DS_PSETS_TL T
    where T.POLICYSET_ID = X_POLICYSET_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);

Line: 71

end INSERT_ROW;

Line: 79

	X_LAST_UPDATED_BY in NUMBER,
	X_LAST_UPDATE_DATE in DATE,
	X_LAST_UPDATE_LOGIN in NUMBER
) is
  cursor c is select
	POLICYSET_ID,
	CREATED_BY,
	CREATION_DATE,
	LAST_UPDATED_BY,
	LAST_UPDATE_DATE,
	LAST_UPDATE_LOGIN
    from FND_OAM_DS_PSETS_B
    where POLICYSET_ID = X_POLICYSET_ID
    for update of POLICYSET_ID nowait;

Line: 95

  cursor c1 is select
      POLICYSET_NAME,
      DESCRIPTION,
      decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
    from FND_OAM_DS_PSETS_TL
    where POLICYSET_ID = X_POLICYSET_ID
    and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
    for update of POLICYSET_ID nowait;

Line: 108

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

Line: 129

procedure UPDATE_ROW (
	X_POLICYSET_ID in NUMBER,
	X_POLICYSET_NAME IN VARCHAR2,
	X_DESCRIPTION IN VARCHAR2,
	X_LAST_UPDATED_BY in NUMBER,
	X_LAST_UPDATE_DATE in DATE,
	X_LAST_UPDATE_LOGIN in NUMBER
) is
begin
  update FND_OAM_DS_PSETS_B set
      LAST_UPDATED_BY = X_LAST_UPDATED_BY,
      LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
      LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
  where POLICYSET_ID = X_POLICYSET_ID;

Line: 148

  update FND_OAM_DS_PSETS_TL set
    POLICYSET_NAME = X_POLICYSET_NAME,
    DESCRIPTION = X_DESCRIPTION,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
    SOURCE_LANG = userenv('LANG')
  where POLICYSET_ID = X_POLICYSET_ID
  and userenv('LANG') in (LANGUAGE, SOURCE_LANG);

Line: 161

end UPDATE_ROW;

Line: 163

procedure DELETE_ROW (
  X_POLICYSET_ID in NUMBER
) is
begin
  delete from FND_OAM_DS_PSETS_TL
  where POLICYSET_ID = X_POLICYSET_ID;

Line: 174

  delete from FND_OAM_DS_PSETS_B
  where POLICYSET_ID = X_POLICYSET_ID;

Line: 180

end DELETE_ROW;

Line: 185

  delete from FND_OAM_DS_PSETS_TL T
  where not exists
    (select NULL
    from FND_OAM_DS_PSETS_B B
    where B.POLICYSET_ID = T.POLICYSET_ID
    );

Line: 192

  update FND_OAM_DS_PSETS_TL T set (
      POLICYSET_NAME,
      DESCRIPTION
    ) = (select
      B.POLICYSET_NAME,
      B.DESCRIPTION
    from FND_OAM_DS_PSETS_TL B
    where B.POLICYSET_ID = T.POLICYSET_ID
    and B.LANGUAGE = T.SOURCE_LANG)
  where (
      T.POLICYSET_ID,
      T.LANGUAGE
  ) in (select
      SUBT.POLICYSET_ID,
      SUBT.LANGUAGE
    from FND_OAM_DS_PSETS_TL SUBB, FND_OAM_DS_PSETS_TL SUBT
    where SUBB.POLICYSET_ID = SUBT.POLICYSET_ID
    and SUBB.LANGUAGE = SUBT.SOURCE_LANG
    and (SUBB.POLICYSET_NAME <> SUBT.POLICYSET_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: 216

  insert into FND_OAM_DS_PSETS_TL (
    POLICYSET_ID,
    POLICYSET_NAME,
    DESCRIPTION,
    CREATED_BY,
    CREATION_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATE_LOGIN,
    LANGUAGE,
    SOURCE_LANG
  ) select /*+ ORDERED */
    B.POLICYSET_ID,
    B.POLICYSET_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_OAM_DS_PSETS_TL B, FND_LANGUAGES L
  where L.INSTALLED_FLAG in ('I', 'B')
  and B.LANGUAGE = userenv('LANG')
  and not exists
    (select NULL
    from FND_OAM_DS_PSETS_TL T
    where T.POLICYSET_ID = B.POLICYSET_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);

Line: 252

 x_Last_update_date in date,
 x_last_updated_by in number,
 x_last_update_login in number
)
is
begin

UPDATE FND_OAM_DS_PSETS_TL SET
POLICYSET_NAME  = nvl(x_POLICYSET_NAME,POLICYSET_NAME),
last_update_date        = nvl(x_last_update_date,sysdate),
last_updated_by         = x_last_updated_by,
last_update_login       = 0,
source_lang             = userenv('LANG')
WHERE POLICYSET_ID      = x_POLICYSET_ID
AND userenv('LANG') in (LANGUAGE,SOURCE_LANG);