APPS.AHL_MR_HEADERS_PKG SQL Statements

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

Line: 3

procedure INSERT_ROW (
  X_MR_HEADER_ID in OUT NOCOPY NUMBER,
  X_ATTRIBUTE11 in VARCHAR2,
  X_ATTRIBUTE12 in VARCHAR2,
  X_ATTRIBUTE13 in VARCHAR2,
  X_ATTRIBUTE14 in VARCHAR2,
  X_ATTRIBUTE15 in VARCHAR2,
  X_OBJECT_VERSION_NUMBER in NUMBER,
  X_TITLE in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_ATTRIBUTE4 in VARCHAR2,
  X_ATTRIBUTE5 in VARCHAR2,
  X_ATTRIBUTE6 in VARCHAR2,
  X_ATTRIBUTE7 in VARCHAR2,
  X_EFFECTIVE_FROM in DATE,
  X_EFFECTIVE_TO in DATE,
  X_REVISION in VARCHAR2,
  X_ATTRIBUTE_CATEGORY in VARCHAR2,
  X_ATTRIBUTE1 in VARCHAR2,
  X_ATTRIBUTE2 in VARCHAR2,
  X_ATTRIBUTE3 in VARCHAR2,
  X_ATTRIBUTE10 in VARCHAR2,
  X_COPY_ACCOMPLISHMENT_FLAG in VARCHAR2,
  X_PROGRAM_TYPE_CODE in VARCHAR2,
  X_PROGRAM_SUBTYPE_CODE in VARCHAR2,
  X_CATEGORY_CODE in VARCHAR2,
  X_SERVICE_TYPE_CODE in VARCHAR2,
  X_MR_STATUS_CODE in VARCHAR2,
  X_IMPLEMENT_STATUS_CODE in VARCHAR2,
  X_REPETITIVE_FLAG in VARCHAR2,
  X_SHOW_REPETITIVE_CODE in VARCHAR2,
  X_WHICHEVER_FIRST_CODE in VARCHAR2,
  X_PRECEDING_MR_HEADER_ID in NUMBER,
  X_SERVICE_REQUEST_TEMPLATE_ID in NUMBER,
  X_TYPE_CODE in VARCHAR2,
  X_DOWN_TIME in NUMBER,
  X_UOM_CODE in VARCHAR2,
  X_ATTRIBUTE8 in VARCHAR2,
  X_ATTRIBUTE9 in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_COMMENTS in VARCHAR2,
  X_SPACE_CATEGORY_CODE in VARCHAR2,
  X_QA_INSPECTION_TYPE_CODE in VARCHAR2,
  X_BILLING_ITEM_ID in NUMBER,
  X_AUTO_SIGNOFF_FLAG in VARCHAR2,
  X_COPY_INIT_ACCOMPL_FLAG in VARCHAR2,
  X_COPY_DEFERRALS_FLAG 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
begin
  insert into AHL_MR_HEADERS_B (
    ATTRIBUTE11,
    ATTRIBUTE12,
    ATTRIBUTE13,
    ATTRIBUTE14,
    ATTRIBUTE15,
    MR_HEADER_ID,
    OBJECT_VERSION_NUMBER,
    TITLE,
    VERSION_NUMBER,
    ATTRIBUTE4,
    ATTRIBUTE5,
    ATTRIBUTE6,
    ATTRIBUTE7,
    EFFECTIVE_FROM,
    EFFECTIVE_TO,
    REVISION,
    ATTRIBUTE_CATEGORY,
    ATTRIBUTE1,
    ATTRIBUTE2,
    ATTRIBUTE3,
    ATTRIBUTE10,
    COPY_ACCOMPLISHMENT_FLAG,
    PROGRAM_TYPE_CODE,
    PROGRAM_SUBTYPE_CODE,
    CATEGORY_CODE,
    SERVICE_TYPE_CODE,
    MR_STATUS_CODE,
    IMPLEMENT_STATUS_CODE,
    REPETITIVE_FLAG,
    SHOW_REPETITIVE_CODE,
    WHICHEVER_FIRST_CODE,
    PRECEDING_MR_HEADER_ID,
    SERVICE_REQUEST_TEMPLATE_ID,
    TYPE_CODE,
    DOWN_TIME,
    UOM_CODE,
    SPACE_CATEGORY_CODE,
    QA_INSPECTION_TYPE,
    BILLING_ITEM_ID ,
    AUTO_SIGNOFF_FLAG,
    COPY_INIT_ACCOMPL_FLAG,
    COPY_DEFERRALS_FLAG,
    ATTRIBUTE8,
    ATTRIBUTE9,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN,
    APPLICATION_USG_CODE
  ) values (
    X_ATTRIBUTE11,
    X_ATTRIBUTE12,
    X_ATTRIBUTE13,
    X_ATTRIBUTE14,
    X_ATTRIBUTE15,
    AHL_MR_HEADERS_B_S.NEXTVAL,
    X_OBJECT_VERSION_NUMBER,
    X_TITLE,
    X_VERSION_NUMBER,
    X_ATTRIBUTE4,
    X_ATTRIBUTE5,
    X_ATTRIBUTE6,
    X_ATTRIBUTE7,
    X_EFFECTIVE_FROM,
    X_EFFECTIVE_TO,
    X_REVISION,
    X_ATTRIBUTE_CATEGORY,
    X_ATTRIBUTE1,
    X_ATTRIBUTE2,
    X_ATTRIBUTE3,
    X_ATTRIBUTE10,
    X_COPY_ACCOMPLISHMENT_FLAG,
    X_PROGRAM_TYPE_CODE,
    X_PROGRAM_SUBTYPE_CODE,
    X_CATEGORY_CODE,
    X_SERVICE_TYPE_CODE,
    X_MR_STATUS_CODE,
    X_IMPLEMENT_STATUS_CODE,
    X_REPETITIVE_FLAG,
    X_SHOW_REPETITIVE_CODE,
    X_WHICHEVER_FIRST_CODE,
    X_PRECEDING_MR_HEADER_ID,
    X_SERVICE_REQUEST_TEMPLATE_ID,
    X_TYPE_CODE,
    X_DOWN_TIME,
    X_UOM_CODE,
    X_SPACE_CATEGORY_CODE,
    X_QA_INSPECTION_TYPE_CODE ,
    X_BILLING_ITEM_ID ,
    X_AUTO_SIGNOFF_FLAG,
    X_COPY_INIT_ACCOMPL_FLAG,
    X_COPY_DEFERRALS_FLAG,
    X_ATTRIBUTE8,
    X_ATTRIBUTE9,
    X_CREATION_DATE,
    X_CREATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN,
    FND_PROFILE.VALUE('AHL_APPLN_USAGE')
  )
  RETURNING MR_HEADER_ID INTO X_MR_HEADER_ID;

Line: 162

  insert into AHL_MR_HEADERS_TL (
    COMMENTS,
    DESCRIPTION,
    CREATED_BY,
    LAST_UPDATE_LOGIN,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    CREATION_DATE,
    MR_HEADER_ID,
    LANGUAGE,
    SOURCE_LANG
  ) select
    X_COMMENTS,
    X_DESCRIPTION,
    X_CREATED_BY,
    X_LAST_UPDATE_LOGIN,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_CREATION_DATE,
    X_MR_HEADER_ID,
    L.LANGUAGE_CODE,
    userenv('LANG')
  from FND_LANGUAGES L
  where L.INSTALLED_FLAG in ('I', 'B')
  and not exists
    (select NULL
    from AHL_MR_HEADERS_TL T
    where T.MR_HEADER_ID = X_MR_HEADER_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);

Line: 192

end INSERT_ROW;

Line: 194

procedure UPDATE_ROW (
  X_MR_HEADER_ID in NUMBER,
  X_ATTRIBUTE11 in VARCHAR2,
  X_ATTRIBUTE12 in VARCHAR2,
  X_ATTRIBUTE13 in VARCHAR2,
  X_ATTRIBUTE14 in VARCHAR2,
  X_ATTRIBUTE15 in VARCHAR2,
  X_OBJECT_VERSION_NUMBER in NUMBER,
  X_TITLE in VARCHAR2,
  X_VERSION_NUMBER in NUMBER,
  X_ATTRIBUTE4 in VARCHAR2,
  X_ATTRIBUTE5 in VARCHAR2,
  X_ATTRIBUTE6 in VARCHAR2,
  X_ATTRIBUTE7 in VARCHAR2,
  X_EFFECTIVE_FROM in DATE,
  X_EFFECTIVE_TO in DATE,
  X_REVISION in VARCHAR2,
  X_ATTRIBUTE_CATEGORY in VARCHAR2,
  X_ATTRIBUTE1 in VARCHAR2,
  X_ATTRIBUTE2 in VARCHAR2,
  X_ATTRIBUTE3 in VARCHAR2,
  X_ATTRIBUTE10 in VARCHAR2,
  X_COPY_ACCOMPLISHMENT_FLAG in VARCHAR2,
  X_PROGRAM_TYPE_CODE in VARCHAR2,
  X_PROGRAM_SUBTYPE_CODE in VARCHAR2,
  X_CATEGORY_CODE in VARCHAR2,
  X_SERVICE_TYPE_CODE in VARCHAR2,
  X_MR_STATUS_CODE in VARCHAR2,
  X_IMPLEMENT_STATUS_CODE in VARCHAR2,
  X_REPETITIVE_FLAG in VARCHAR2,
  X_SHOW_REPETITIVE_CODE in VARCHAR2,
  X_WHICHEVER_FIRST_CODE in VARCHAR2,
  X_PRECEDING_MR_HEADER_ID in NUMBER,
  X_SERVICE_REQUEST_TEMPLATE_ID in NUMBER,
  X_TYPE_CODE in VARCHAR2,
  X_DOWN_TIME in NUMBER,
  X_UOM_CODE in VARCHAR2,
  X_ATTRIBUTE8 in VARCHAR2,
  X_ATTRIBUTE9 in VARCHAR2,
  X_DESCRIPTION in VARCHAR2,
  X_COMMENTS in VARCHAR2,
  X_SPACE_CATEGORY_CODE in VARCHAR2,
  X_QA_INSPECTION_TYPE_CODE in VARCHAR2,
  X_BILLING_ITEM_ID in NUMBER,
  X_AUTO_SIGNOFF_FLAG in VARCHAR2,
  X_COPY_INIT_ACCOMPL_FLAG in VARCHAR2,
  X_COPY_DEFERRALS_FLAG in VARCHAR2,
  X_LAST_UPDATE_DATE in DATE,
  X_LAST_UPDATED_BY in NUMBER,
  X_LAST_UPDATE_LOGIN in NUMBER
) is
begin
  update AHL_MR_HEADERS_B set
    ATTRIBUTE11 = X_ATTRIBUTE11,
    ATTRIBUTE12 = X_ATTRIBUTE12,
    ATTRIBUTE13 = X_ATTRIBUTE13,
    ATTRIBUTE14 = X_ATTRIBUTE14,
    ATTRIBUTE15 = X_ATTRIBUTE15,
    OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER + 1,
--    TITLE = X_TITLE,
--    VERSION_NUMBER = X_VERSION_NUMBER,
    ATTRIBUTE4 = X_ATTRIBUTE4,
    ATTRIBUTE5 = X_ATTRIBUTE5,
    ATTRIBUTE6 = X_ATTRIBUTE6,
    ATTRIBUTE7 = X_ATTRIBUTE7,
    EFFECTIVE_FROM = X_EFFECTIVE_FROM,
--    EFFECTIVE_TO = X_EFFECTIVE_TO,
    REVISION = X_REVISION,
    ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY,
    ATTRIBUTE1 = X_ATTRIBUTE1,
    ATTRIBUTE2 = X_ATTRIBUTE2,
    ATTRIBUTE3 = X_ATTRIBUTE3,
    ATTRIBUTE10 = X_ATTRIBUTE10,
    COPY_ACCOMPLISHMENT_FLAG = X_COPY_ACCOMPLISHMENT_FLAG,
    PROGRAM_TYPE_CODE = X_PROGRAM_TYPE_CODE,
    PROGRAM_SUBTYPE_CODE = X_PROGRAM_SUBTYPE_CODE,
    CATEGORY_CODE = X_CATEGORY_CODE,
    SERVICE_TYPE_CODE = X_SERVICE_TYPE_CODE,
    MR_STATUS_CODE = X_MR_STATUS_CODE,
    IMPLEMENT_STATUS_CODE = X_IMPLEMENT_STATUS_CODE,
    REPETITIVE_FLAG = X_REPETITIVE_FLAG,
    SHOW_REPETITIVE_CODE = X_SHOW_REPETITIVE_CODE,
    WHICHEVER_FIRST_CODE = X_WHICHEVER_FIRST_CODE,
    PRECEDING_MR_HEADER_ID = X_PRECEDING_MR_HEADER_ID,
    SERVICE_REQUEST_TEMPLATE_ID =X_SERVICE_REQUEST_TEMPLATE_ID,
    TYPE_CODE=X_TYPE_CODE,
    DOWN_TIME=X_DOWN_TIME,
    UOM_CODE= X_UOM_CODE,
    SPACE_CATEGORY_CODE=X_SPACE_CATEGORY_CODE ,
    QA_INSPECTION_TYPE=X_QA_INSPECTION_TYPE_CODE ,
    BILLING_ITEM_ID=X_BILLING_ITEM_ID ,
    AUTO_SIGNOFF_FLAG=X_AUTO_SIGNOFF_FLAG,
    COPY_INIT_ACCOMPL_FLAG = X_COPY_INIT_ACCOMPL_FLAG,
    COPY_DEFERRALS_FLAG = X_COPY_DEFERRALS_FLAG,
    ATTRIBUTE8 = X_ATTRIBUTE8,
    ATTRIBUTE9 = X_ATTRIBUTE9,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
  where MR_HEADER_ID = X_MR_HEADER_ID
  and   OBJECT_VERSION_NUMBER=X_OBJECT_VERSION_NUMBER;

Line: 299

  update AHL_MR_HEADERS_TL set
    DESCRIPTION = X_DESCRIPTION,
    COMMENTS = X_COMMENTS,
    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 MR_HEADER_ID = X_MR_HEADER_ID
  and userenv('LANG') in (LANGUAGE, SOURCE_LANG);

Line: 309

end UPDATE_ROW;

Line: 311

procedure DELETE_ROW (
  X_MR_HEADER_ID in NUMBER
) is
begin
  delete from AHL_MR_HEADERS_TL
  where MR_HEADER_ID = X_MR_HEADER_ID;

Line: 318

  delete from AHL_MR_HEADERS_B
  where MR_HEADER_ID = X_MR_HEADER_ID;

Line: 320

end DELETE_ROW;

Line: 325

  delete from AHL_MR_HEADERS_TL T
  where not exists
    (select NULL
    from AHL_MR_HEADERS_B B
    where B.MR_HEADER_ID = T.MR_HEADER_ID
    );

Line: 332

  update AHL_MR_HEADERS_TL T set (
      DESCRIPTION,
      COMMENTS
    ) = (select
      B.DESCRIPTION,
      B.COMMENTS
    from AHL_MR_HEADERS_TL B
    where B.MR_HEADER_ID = T.MR_HEADER_ID
    and B.LANGUAGE = T.SOURCE_LANG)
  where (
      T.MR_HEADER_ID,
      T.LANGUAGE
  ) in (select
      SUBT.MR_HEADER_ID,
      SUBT.LANGUAGE
    from AHL_MR_HEADERS_TL SUBB, AHL_MR_HEADERS_TL SUBT
    where SUBB.MR_HEADER_ID = SUBT.MR_HEADER_ID
    and SUBB.LANGUAGE = SUBT.SOURCE_LANG
    and (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)
      or SUBB.COMMENTS <> SUBT.COMMENTS
      or (SUBB.COMMENTS is null and SUBT.COMMENTS is not null)
      or (SUBB.COMMENTS is not null and SUBT.COMMENTS is null)
  ));

Line: 358

  insert into AHL_MR_HEADERS_TL (
    COMMENTS,
    DESCRIPTION,
    CREATED_BY,
    LAST_UPDATE_LOGIN,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    CREATION_DATE,
    MR_HEADER_ID,
    LANGUAGE,
    SOURCE_LANG
  ) select
    B.COMMENTS,
    B.DESCRIPTION,
    B.CREATED_BY,
    B.LAST_UPDATE_LOGIN,
    B.LAST_UPDATE_DATE,
    B.LAST_UPDATED_BY,
    B.CREATION_DATE,
    B.MR_HEADER_ID,
    L.LANGUAGE_CODE,
    B.SOURCE_LANG
  from AHL_MR_HEADERS_TL B, FND_LANGUAGES L
  where L.INSTALLED_FLAG in ('I', 'B')
  and B.LANGUAGE = userenv('LANG')
  and not exists
    (select NULL
    from AHL_MR_HEADERS_TL T
    where T.MR_HEADER_ID = B.MR_HEADER_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);