APPS.QPR_PRICE_PLANS_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_PRICE_PLAN_ID in NUMBER,
  X_REQUEST_ID in NUMBER,
  X_PROGRAM_LOGIN_ID in NUMBER,
  X_INSTANCE_ID in NUMBER,
  X_AW_TYPE_CODE in VARCHAR2,
  X_AW_STATUS_CODE in VARCHAR2,
  X_TEMPLATE_FLAG in VARCHAR2,
  X_SEEDED_FLAG in VARCHAR2,
  X_AW_CODE in VARCHAR2,
  X_AW_CREATED_FLAG in VARCHAR2,
  X_START_DATE in DATE,
  X_END_DATE in DATE,
  X_BASE_UOM_CODE in VARCHAR2,
  X_USE_FOR_DEAL_FLAG in VARCHAR2,
  X_CURRENCY_CODE in VARCHAR2,
  X_AW_XML in CLOB,
  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 QPR_PRICE_PLANS_B
    where PRICE_PLAN_ID = X_PRICE_PLAN_ID
    ;

Line: 33

  insert into QPR_PRICE_PLANS_B (
    REQUEST_ID,
    PROGRAM_LOGIN_ID,
    PRICE_PLAN_ID,
    INSTANCE_ID,
    AW_TYPE_CODE,
    AW_STATUS_CODE,
    TEMPLATE_FLAG,
    SEEDED_FLAG,
    AW_CODE,
    AW_CREATED_FLAG,
    START_DATE,
    END_DATE,
    BASE_UOM_CODE,
    USE_FOR_DEAL_FLAG,
    CURRENCY_CODE,
    AW_XML,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    X_REQUEST_ID,
    X_PROGRAM_LOGIN_ID,
    X_PRICE_PLAN_ID,
    X_INSTANCE_ID,
    X_AW_TYPE_CODE,
    X_AW_STATUS_CODE,
    X_TEMPLATE_FLAG,
    X_SEEDED_FLAG,
    X_AW_CODE,
    X_AW_CREATED_FLAG,
    X_START_DATE,
    X_END_DATE,
    X_BASE_UOM_CODE,
    X_USE_FOR_DEAL_FLAG,
    X_CURRENCY_CODE,
    X_AW_XML,
    X_CREATION_DATE,
    X_CREATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 79

  insert into QPR_PRICE_PLANS_TL (
    NAME,
    DESCRIPTION,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    REQUEST_ID,
    PRICE_PLAN_ID,
    LAST_UPDATE_LOGIN,
    --PROGRAM_ID,
    --PROGRAM_LOGIN_ID,
    --PROGRAM_APPLICATION_ID,
    LANGUAGE,
    SOURCE_LANG
  ) select
    X_NAME,
    X_DESCRIPTION,
    X_CREATION_DATE,
    X_CREATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_REQUEST_ID,
    X_PRICE_PLAN_ID,
    X_LAST_UPDATE_LOGIN,
    --X_PROGRAM_ID,
    --X_PROGRAM_LOGIN_ID,
    --X_PROGRAM_APPLICATION_ID,
    L.LANGUAGE_CODE,
    userenv('LANG')
  from FND_LANGUAGES L
  where L.INSTALLED_FLAG in ('I', 'B')
  and not exists
    (select NULL
    from QPR_PRICE_PLANS_TL T
    where T.PRICE_PLAN_ID = X_PRICE_PLAN_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);

Line: 125

end INSERT_ROW;

Line: 147

  cursor c is select
      REQUEST_ID,
      PROGRAM_LOGIN_ID,
      INSTANCE_ID,
      AW_TYPE_CODE,
      AW_STATUS_CODE,
      TEMPLATE_FLAG,
      SEEDED_FLAG,
      AW_CODE,
      AW_CREATED_FLAG,
      START_DATE,
      END_DATE,
      BASE_UOM_CODE,
      USE_FOR_DEAL_FLAG,
      CURRENCY_CODE,
      AW_XML
    from QPR_PRICE_PLANS_B
    where PRICE_PLAN_ID = X_PRICE_PLAN_ID
    for update of PRICE_PLAN_ID nowait;

Line: 168

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

Line: 181

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

Line: 235

procedure UPDATE_ROW (
  X_PRICE_PLAN_ID in NUMBER,
  X_REQUEST_ID in NUMBER,
  X_PROGRAM_LOGIN_ID in NUMBER,
  X_INSTANCE_ID in NUMBER,
  X_AW_TYPE_CODE in VARCHAR2,
  X_AW_STATUS_CODE in VARCHAR2,
  X_TEMPLATE_FLAG in VARCHAR2,
  X_SEEDED_FLAG in VARCHAR2,
  X_AW_CODE in VARCHAR2,
  X_AW_CREATED_FLAG in VARCHAR2,
  X_START_DATE in DATE,
  X_END_DATE in DATE,
  X_BASE_UOM_CODE in VARCHAR2,
  X_USE_FOR_DEAL_FLAG in VARCHAR2,
  X_CURRENCY_CODE in VARCHAR2,
  X_AW_XML in CLOB,
  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 QPR_PRICE_PLANS_B set
    REQUEST_ID = X_REQUEST_ID,
    PROGRAM_LOGIN_ID = X_PROGRAM_LOGIN_ID,
    INSTANCE_ID = X_INSTANCE_ID,
    AW_TYPE_CODE = X_AW_TYPE_CODE,
    AW_STATUS_CODE = X_AW_STATUS_CODE,
    TEMPLATE_FLAG = X_TEMPLATE_FLAG,
    SEEDED_FLAG = X_SEEDED_FLAG,
    AW_CODE = X_AW_CODE,
    AW_CREATED_FLAG = X_AW_CREATED_FLAG,
    START_DATE = X_START_DATE,
    END_DATE = X_END_DATE,
    BASE_UOM_CODE = X_BASE_UOM_CODE,
    USE_FOR_DEAL_FLAG = X_USE_FOR_DEAL_FLAG,
    CURRENCY_CODE = X_CURRENCY_CODE,
    AW_XML = X_AW_XML,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
  where PRICE_PLAN_ID = X_PRICE_PLAN_ID;

Line: 284

  update QPR_PRICE_PLANS_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 PRICE_PLAN_ID = X_PRICE_PLAN_ID
  and userenv('LANG') in (LANGUAGE, SOURCE_LANG);

Line: 297

end UPDATE_ROW;

Line: 299

procedure DELETE_ROW (
  X_PRICE_PLAN_ID in NUMBER
) is
begin
  delete from QPR_PRICE_PLANS_TL
  where PRICE_PLAN_ID = X_PRICE_PLAN_ID;

Line: 310

  delete from QPR_PRICE_PLANS_B
  where PRICE_PLAN_ID = X_PRICE_PLAN_ID;

Line: 316

end DELETE_ROW;

Line: 321

  delete from QPR_PRICE_PLANS_TL T
  where not exists
    (select NULL
    from QPR_PRICE_PLANS_B B
    where B.PRICE_PLAN_ID = T.PRICE_PLAN_ID
    );

Line: 328

  update QPR_PRICE_PLANS_TL T set (
      NAME,
      DESCRIPTION
    ) = (select
      B.NAME,
      B.DESCRIPTION
    from QPR_PRICE_PLANS_TL B
    where B.PRICE_PLAN_ID = T.PRICE_PLAN_ID
    and B.LANGUAGE = T.SOURCE_LANG)
  where (
      T.PRICE_PLAN_ID,
      T.LANGUAGE
  ) in (select
      SUBT.PRICE_PLAN_ID,
      SUBT.LANGUAGE
    from QPR_PRICE_PLANS_TL SUBB, QPR_PRICE_PLANS_TL SUBT
    where SUBB.PRICE_PLAN_ID = SUBT.PRICE_PLAN_ID
    and SUBB.LANGUAGE = SUBT.SOURCE_LANG
    and (SUBB.NAME <> SUBT.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: 352

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