APPS.FND_OAM_DS_POLICIES_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_POLICY_ID in NUMBER,
	X_POLICY_NAME IN VARCHAR2,
	X_DESCRIPTION IN VARCHAR2,
	X_START_DATE in DATE,
	X_END_DATE in DATE,
	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_POLICIES_B
    where POLICY_ID = X_POLICY_ID;

Line: 19

  insert into FND_OAM_DS_POLICIES_B (
	POLICY_ID,
	START_DATE,
	END_DATE,
	CREATED_BY,
	CREATION_DATE,
	LAST_UPDATED_BY,
	LAST_UPDATE_DATE,
	LAST_UPDATE_LOGIN
  ) values (
	X_POLICY_ID,
	X_START_DATE,
	X_END_DATE,
	X_CREATED_BY,
	X_CREATION_DATE,
	X_LAST_UPDATED_BY,
	X_LAST_UPDATE_DATE,
	X_LAST_UPDATE_LOGIN
  );

Line: 39

  insert into FND_OAM_DS_POLICIES_TL (
	POLICY_ID,
	POLICY_NAME,
	DESCRIPTION,
	CREATED_BY,
	CREATION_DATE,
	LAST_UPDATED_BY,
	LAST_UPDATE_DATE,
	LAST_UPDATE_LOGIN,
      LANGUAGE,
      SOURCE_LANG
  ) select
	X_POLICY_ID,
      X_POLICY_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_POLICIES_TL T
    where T.POLICY_ID = X_POLICY_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);

Line: 77

end INSERT_ROW;

Line: 87

	X_LAST_UPDATED_BY in NUMBER,
	X_LAST_UPDATE_DATE in DATE,
	X_LAST_UPDATE_LOGIN in NUMBER
) is
  cursor c is select
	POLICY_ID,
	START_DATE,
	END_DATE,
	CREATED_BY,
	CREATION_DATE,
	LAST_UPDATED_BY,
	LAST_UPDATE_DATE,
	LAST_UPDATE_LOGIN
    from FND_OAM_DS_POLICIES_B
    where POLICY_ID = X_POLICY_ID
    for update of POLICY_ID nowait;

Line: 105

  cursor c1 is select
      POLICY_NAME,
      DESCRIPTION,
      decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
    from FND_OAM_DS_POLICIES_TL
    where POLICY_ID = X_POLICY_ID
    and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
    for update of POLICY_ID nowait;

Line: 118

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

Line: 149

procedure UPDATE_ROW (
	X_POLICY_ID in NUMBER,
	X_POLICY_NAME IN VARCHAR2,
	X_DESCRIPTION IN VARCHAR2,
	X_START_DATE in DATE,
	X_END_DATE in DATE,
	X_LAST_UPDATED_BY in NUMBER,
	X_LAST_UPDATE_DATE in DATE,
	X_LAST_UPDATE_LOGIN in NUMBER
) is
begin
  update FND_OAM_DS_POLICIES_B set
	START_DATE = X_START_DATE,
	END_DATE =X_END_DATE,
      LAST_UPDATED_BY = X_LAST_UPDATED_BY,
      LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
      LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
  where POLICY_ID = X_POLICY_ID;

Line: 172

  update FND_OAM_DS_POLICIES_TL set
    POLICY_NAME = X_POLICY_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 POLICY_ID = X_POLICY_ID
  and userenv('LANG') in (LANGUAGE, SOURCE_LANG);

Line: 185

end UPDATE_ROW;

Line: 187

procedure DELETE_ROW (
  X_POLICY_ID in NUMBER
) is
begin
  delete from FND_OAM_DS_POLICIES_TL
  where POLICY_ID = X_POLICY_ID;

Line: 198

  delete from FND_OAM_DS_POLICIES_B
  where POLICY_ID = X_POLICY_ID;

Line: 204

end DELETE_ROW;

Line: 209

  delete from FND_OAM_DS_POLICIES_TL T
  where not exists
    (select NULL
    from FND_OAM_DS_POLICIES_B B
    where B.POLICY_ID = T.POLICY_ID
    );

Line: 216

  update FND_OAM_DS_POLICIES_TL T set (
      POLICY_NAME,
      DESCRIPTION
    ) = (select
      B.POLICY_NAME,
      B.DESCRIPTION
    from FND_OAM_DS_POLICIES_TL B
    where B.POLICY_ID = T.POLICY_ID
    and B.LANGUAGE = T.SOURCE_LANG)
  where (
      T.POLICY_ID,
      T.LANGUAGE
  ) in (select
      SUBT.POLICY_ID,
      SUBT.LANGUAGE
    from FND_OAM_DS_POLICIES_TL SUBB, FND_OAM_DS_POLICIES_TL SUBT
    where SUBB.POLICY_ID = SUBT.POLICY_ID
    and SUBB.LANGUAGE = SUBT.SOURCE_LANG
    and (SUBB.POLICY_NAME <> SUBT.POLICY_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: 240

  insert into FND_OAM_DS_POLICIES_TL (
    POLICY_ID,
    POLICY_NAME,
    DESCRIPTION,
    CREATED_BY,
    CREATION_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATE_LOGIN,
    LANGUAGE,
    SOURCE_LANG
  ) select /*+ ORDERED */
    B.POLICY_ID,
    B.POLICY_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_POLICIES_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_POLICIES_TL T
    where T.POLICY_ID = B.POLICY_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);

Line: 276

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

UPDATE FND_OAM_DS_POLICIES_TL SET
policy_name  = nvl(x_POLICY_NAME,policy_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 policy_id      = x_POLICY_ID
AND userenv('LANG') in (LANGUAGE,SOURCE_LANG);