APPS.JTF_IH_ACTIONS_SEED_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_ACTION_ID in NUMBER,
  X_OBJECT_VERSION_NUMBER in NUMBER,
  X_ACTION in VARCHAR2,
  X_SHORT_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,
  X_ACTIVE in VARCHAR2
) is
  cursor C is select ROWID from JTF_IH_ACTIONS_B
    where ACTION_ID = X_ACTION_ID
    ;

Line: 31

    insert into JTF_IH_ACTIONS_B (
    ACTION_ID,
    OBJECT_VERSION_NUMBER,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    ACTIVE
  ) values (
    X_ACTION_ID,
    X_OBJECT_VERSION_NUMBER,
    X_CREATION_DATE,
    X_CREATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN,
    --NVL(X_ACTIVE,'Y')
    --Added for performance issue due to literals -  27-Jul-2004
    NVL(X_ACTIVE,L_ACTIVE_FLAG)
  );

Line: 53

  insert into JTF_IH_ACTIONS_TL (
    ACTION_ID,
    OBJECT_VERSION_NUMBER,
    CREATED_BY,
    CREATION_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATE_LOGIN,
    ACTION,
    SHORT_DESCRIPTION,
    LANGUAGE,
    SOURCE_LANG
  ) select
    X_ACTION_ID,
    X_OBJECT_VERSION_NUMBER,
    X_CREATED_BY,
    X_CREATION_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATE_LOGIN,
    X_ACTION,
    X_SHORT_DESCRIPTION,
    L.LANGUAGE_CODE,
    --Added for performance issue due to literals -  27-Jul-2004
    --userenv('LANG')
    L_LANG
  from FND_LANGUAGES L
  --Added for performance issue due to literals -  27-Jul-2004
  --where L.INSTALLED_FLAG in ('I', 'B')
  where L.INSTALLED_FLAG in ( L_INSTALLED_FLAG1,  L_INSTALLED_FLAG2)
  and not exists
    (select NULL
    from JTF_IH_ACTIONS_TL T
    where T.ACTION_ID = X_ACTION_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);

Line: 97

end INSERT_ROW;

Line: 105

  cursor c is select
      OBJECT_VERSION_NUMBER
    from JTF_IH_ACTIONS_B
    where ACTION_ID = X_ACTION_ID
    for update of ACTION_ID nowait;

Line: 116

  cursor c1 is select
      ACTION,
      SHORT_DESCRIPTION,
      --Added for performance issue due to literals -  28-Jul-2004
      --decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
      decode(LANGUAGE, L_LANG, L_YES, L_NO) BASELANG
    from JTF_IH_ACTIONS_TL
    where ACTION_ID = X_ACTION_ID
    --and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
    --Added for performance issue due to literals -  28-Jul-2004
    and L_LANG in (LANGUAGE, SOURCE_LANG)
    for update of ACTION_ID nowait;

Line: 138

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

Line: 168

procedure UPDATE_ROW (
  X_ACTION_ID in NUMBER,
  X_OBJECT_VERSION_NUMBER in NUMBER,
  X_ACTION in VARCHAR2,
  X_SHORT_DESCRIPTION in VARCHAR2,
  X_LAST_UPDATE_DATE in DATE,
  X_LAST_UPDATED_BY in NUMBER,
  X_LAST_UPDATE_LOGIN in NUMBER,
  X_ACTIVE in VARCHAR2
) is
--Added for performance issue due to literals -  27-Jul-2004
L_ACTIVE_FLAG VARCHAR2(1);

Line: 186

  update JTF_IH_ACTIONS_B set
    OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
    --Added for performance issue due to literals -  27-Jul-2004
    --ACTIVE = NVL(X_ACTIVE,'Y')
    ACTIVE = NVL(X_ACTIVE,L_ACTIVE_FLAG)
  where ACTION_ID = X_ACTION_ID;

Line: 200

  update JTF_IH_ACTIONS_TL set
    ACTION = X_ACTION,
    SHORT_DESCRIPTION = X_SHORT_DESCRIPTION,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
    --Added for performance issue due to literals -  27-Jul-2004
    --SOURCE_LANG = userenv('LANG')
    SOURCE_LANG = L_LANG
  where ACTION_ID = X_ACTION_ID
  --Added for performance issue due to literals -  27-Jul-2004
  --and userenv('LANG') in (LANGUAGE, SOURCE_LANG);

Line: 217

end UPDATE_ROW;

Line: 219

procedure DELETE_ROW (
  X_ACTION_ID in NUMBER
) is
begin
  delete from JTF_IH_ACTIONS_TL
  where ACTION_ID = X_ACTION_ID;

Line: 230

  delete from JTF_IH_ACTIONS_B
  where ACTION_ID = X_ACTION_ID;

Line: 236

end DELETE_ROW;

Line: 252

  delete from JTF_IH_ACTIONS_TL T
  where not exists
    (select NULL
    from JTF_IH_ACTIONS_B B
    where B.ACTION_ID = T.ACTION_ID
    );

Line: 259

  update JTF_IH_ACTIONS_TL T set (
      ACTION,
      SHORT_DESCRIPTION
    ) = (select
      B.ACTION,
      B.SHORT_DESCRIPTION
    from JTF_IH_ACTIONS_TL B
    where B.ACTION_ID = T.ACTION_ID
    and B.LANGUAGE = T.SOURCE_LANG)
  where (
      T.ACTION_ID,
      T.LANGUAGE
  ) in (select
      SUBT.ACTION_ID,
      SUBT.LANGUAGE
    from JTF_IH_ACTIONS_TL SUBB, JTF_IH_ACTIONS_TL SUBT
    where SUBB.ACTION_ID = SUBT.ACTION_ID
    and SUBB.LANGUAGE = SUBT.SOURCE_LANG
    and (SUBB.ACTION <> SUBT.ACTION
      or (SUBB.ACTION is null and SUBT.ACTION is not null)
      or (SUBB.ACTION is not null and SUBT.ACTION is null)
      or SUBB.SHORT_DESCRIPTION <> SUBT.SHORT_DESCRIPTION
      or (SUBB.SHORT_DESCRIPTION is null and SUBT.SHORT_DESCRIPTION is not null)
      or (SUBB.SHORT_DESCRIPTION is not null and SUBT.SHORT_DESCRIPTION is null)
  ));

Line: 285

  insert into JTF_IH_ACTIONS_TL (
    ACTION_ID,
    OBJECT_VERSION_NUMBER,
    CREATED_BY,
    CREATION_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATE_LOGIN,
    ACTION,
    SHORT_DESCRIPTION,
    LANGUAGE,
    SOURCE_LANG
  ) select
    B.ACTION_ID,
    B.OBJECT_VERSION_NUMBER,
    B.CREATED_BY,
    B.CREATION_DATE,
    B.LAST_UPDATED_BY,
    B.LAST_UPDATE_DATE,
    B.LAST_UPDATE_LOGIN,
    B.ACTION,
    B.SHORT_DESCRIPTION,
    L.LANGUAGE_CODE,
    B.SOURCE_LANG
  from JTF_IH_ACTIONS_TL B, FND_LANGUAGES L
  where L.INSTALLED_FLAG in (L_INSTALLED_FLAG1, L_INSTALLED_FLAG2)
  and B.LANGUAGE = L_LANG
  and not exists
    (select NULL
    from JTF_IH_ACTIONS_TL T
    where T.ACTION_ID = B.ACTION_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);

Line: 342

	l_last_update_date	DATE;

Line: 343

	l_last_updated_by	NUMBER;

Line: 344

	l_last_update_login	NUMBER;

Line: 358

	l_last_update_date := sysdate;

Line: 359

	l_last_updated_by := user_id;

Line: 360

	l_last_update_login := 0;

Line: 362

	UPDATE_ROW(
  			X_ACTION_ID => l_action_id,
			X_OBJECT_VERSION_NUMBER => l_object_version_number,
  			X_ACTION => l_action,
  			X_SHORT_DESCRIPTION => l_short_description,
  			X_LAST_UPDATE_DATE => l_last_update_date,
  			X_LAST_UPDATED_BY => l_last_updated_by,
  			X_LAST_UPDATE_LOGIN => l_last_update_login,
            X_ACTIVE => NVL(X_ACTIVE,'Y'));

Line: 375

			INSERT_ROW(
			row_id,
  			X_ACTION_ID => l_action_id,
  			X_OBJECT_VERSION_NUMBER => l_object_version_number,
  			X_ACTION => l_action,
  			X_SHORT_DESCRIPTION => l_short_description,
			X_CREATION_DATE => l_creation_date,
			X_CREATED_BY => l_created_by,
  			X_LAST_UPDATE_DATE => l_last_update_date,
  			X_LAST_UPDATED_BY => l_last_updated_by,
  			X_LAST_UPDATE_LOGIN => l_last_update_login,
            X_ACTIVE => NVL(X_ACTIVE,'Y'));

Line: 398

  L_UPDATEDBY1 NUMBER;

Line: 399

  L_UPDATEDBY0 NUMBER;

Line: 404

	L_UPDATEDBY1 := 1;

Line: 405

	L_UPDATEDBY0 := 0;

Line: 407

	UPDATE jtf_ih_actions_tl SET
          action_id = X_ACTION_ID,
	  action = X_ACTION,
	  short_description = X_SHORT_DESCRIPTION,
	  last_update_date = sysdate,
	  --Added for performance issue due to literals -  28-Jul-2004
	  --last_updated_by = decode(X_OWNER, 'SEED', 1, 0),
	  --last_updated_by = decode(X_OWNER, L_SEED, L_UPDATEDBY1, L_UPDATEDBY0),
          last_updated_by = fnd_load_util.owner_id(x_owner),
  	  last_update_login = 0,
	  --Added for performance issue due to literals -  28-Jul-2004
	  --source_lang = userenv('LANG')
	  source_lang = L_LANG
	  --WHERE userenv('LANG') in (LANGUAGE, SOURCE_LANG) AND
	  WHERE L_LANG in (LANGUAGE, SOURCE_LANG) AND
	  action_id = X_ACTION_ID;