APPS.AHL_ROUTES_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_ROUTE_ID in NUMBER,
  X_QA_INSPECTION_TYPE in VARCHAR2,
  X_ENABLED_FLAG in VARCHAR2,
  X_SUMMARY_FLAG in VARCHAR2,
  X_START_DATE_ACTIVE in DATE,
  X_END_DATE_ACTIVE in DATE,
  X_SEGMENT15 in VARCHAR2,
  X_OPERATOR_PARTY_ID in NUMBER,
  X_TIME_SPAN in NUMBER,
  X_SERVICE_ITEM_ID in NUMBER,
  X_SERVICE_ITEM_ORG_ID in NUMBER,
  X_TASK_TEMPLATE_GROUP_ID in NUMBER,
  X_ACCOUNTING_CLASS_CODE in VARCHAR2,
  X_ACCOUNTING_CLASS_ORG_ID in NUMBER,
  X_SUB_ZONE_CODE in VARCHAR2,
  X_SEGMENT1 in VARCHAR2,
  X_SEGMENT2 in VARCHAR2,
  X_SEGMENT3 in VARCHAR2,
  X_SEGMENT4 in VARCHAR2,
  X_SEGMENT5 in VARCHAR2,
  X_SEGMENT6 in VARCHAR2,
  X_SEGMENT7 in VARCHAR2,
  X_SEGMENT8 in VARCHAR2,
  X_SEGMENT9 in VARCHAR2,
  X_SEGMENT10 in VARCHAR2,
  X_SEGMENT11 in VARCHAR2,
  X_SEGMENT12 in VARCHAR2,
  X_SEGMENT13 in VARCHAR2,
  X_SEGMENT14 in VARCHAR2,
  X_OBJECT_VERSION_NUMBER in NUMBER,
  X_ROUTE_NO in VARCHAR2,
  X_APPLICATION_USG_CODE  IN  VARCHAR2,
  X_REVISION_NUMBER in NUMBER,
  X_REVISION_STATUS_CODE in VARCHAR2,
  X_UNIT_RECEIPT_UPDATE_FLAG in VARCHAR2,
  X_PRODUCT_TYPE_CODE in VARCHAR2,
  --MANESING::Supplier Warranty, 25-Aug-2010, added a variable for storing warranty template id
  X_WARRANTY_TEMPLATE_ID  in NUMBER,
  --MANESING::VWP Enhancements, 18-Jan-2011,
  --added variables for storing Duplicate and Return to supply flags
  X_DUPLICATE_FLAG        in VARCHAR2,
  X_RETURN_TO_SUPPLY_FLAG in VARCHAR2,
  --bachandr Enigma Phase I changes -- start
  X_MODEL_CODE in VARCHAR2,
  X_ENIGMA_PUBLISH_DATE in DATE,
  X_ENIGMA_DOC_ID in VARCHAR2,
  X_ENIGMA_ROUTE_ID in VARCHAR2,
  X_FILE_ID in NUMBER,
  --bachandr Enigma Phase I changes -- end
  --snarkhed Enigma Phase II changes --start
  X_ENIGMA_SOURCE_CODE   in  VARCHAR2,
  X_JOB_CARD_LYT_CODE        in VARCHAR2,
  --snarkhed Enigma Phase II changes --end
  X_ZONE_CODE in VARCHAR2,
  X_ROUTE_TYPE_CODE in VARCHAR2,
  X_PROCESS_CODE in VARCHAR2,
  X_ATTRIBUTE_CATEGORY in VARCHAR2,
  X_ATTRIBUTE1 in VARCHAR2,
  X_ATTRIBUTE2 in VARCHAR2,
  X_ATTRIBUTE3 in VARCHAR2,
  X_ATTRIBUTE4 in VARCHAR2,
  X_ATTRIBUTE5 in VARCHAR2,
  X_ATTRIBUTE6 in VARCHAR2,
  X_ATTRIBUTE7 in VARCHAR2,
  X_ATTRIBUTE8 in VARCHAR2,
  X_ATTRIBUTE9 in VARCHAR2,
  X_ATTRIBUTE10 in VARCHAR2,
  X_ATTRIBUTE11 in VARCHAR2,
  X_ATTRIBUTE12 in VARCHAR2,
  X_ATTRIBUTE13 in VARCHAR2,
  X_ATTRIBUTE14 in VARCHAR2,
  X_ATTRIBUTE15 in VARCHAR2,
  X_TITLE in VARCHAR2,
  X_REMARKS in VARCHAR2,
  X_REVISION_NOTES 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 AHL_ROUTES_B
    where ROUTE_ID = X_ROUTE_ID
    ;

Line: 90

  insert into AHL_ROUTES_B (
    QA_INSPECTION_TYPE,
    ENABLED_FLAG,
    SUMMARY_FLAG,
    START_DATE_ACTIVE,
    END_DATE_ACTIVE,
    SEGMENT15,
    OPERATOR_PARTY_ID,
    TIME_SPAN,
    SERVICE_ITEM_ID,
    SERVICE_ITEM_ORG_ID,
    TASK_TEMPLATE_GROUP_ID,
    ACCOUNTING_CLASS_CODE,
    ACCOUNTING_CLASS_ORG_ID,
    SUB_ZONE_CODE,
    SEGMENT1,
    SEGMENT2,
    SEGMENT3,
    SEGMENT4,
    SEGMENT5,
    SEGMENT6,
    SEGMENT7,
    SEGMENT8,
    SEGMENT9,
    SEGMENT10,
    SEGMENT11,
    SEGMENT12,
    SEGMENT13,
    SEGMENT14,
    ROUTE_ID,
    OBJECT_VERSION_NUMBER,
    ROUTE_NO,
    APPLICATION_USG_CODE,
    REVISION_NUMBER,
    REVISION_STATUS_CODE,
    UNIT_RECEIPT_UPDATE_FLAG,
    PRODUCT_TYPE_CODE,
    --MANESING::Supplier Warranty, 25-Aug-2010, added warranty template id
    WARRANTY_TEMPLATE_ID,
    --MANESING::VWP Enhancements, 18-Jan-2011, added Duplicate and Return to supply flags
    DUPLICATE_FLAG,
    RETURN_TO_SUPPLY_FLAG,
    --bachandr Enigma Phase I changes  -- start
    MODEL_CODE,
    ENIGMA_PUBLISH_DATE,
    ENIGMA_DOC_ID,
    ENIGMA_ROUTE_ID,
    FILE_ID,
    --bachandr Enigma Phase I changes  -- end
    --snarkhed Enigma Phase II changes --start
    ENIGMA_SOURCE_CODE   ,
    JOBCARDLYT_CODE          ,
    --snarkhed Enigma Phase II changes --end
    ZONE_CODE,
    ROUTE_TYPE_CODE,
    PROCESS_CODE,
    ATTRIBUTE_CATEGORY,
    ATTRIBUTE1,
    ATTRIBUTE2,
    ATTRIBUTE3,
    ATTRIBUTE4,
    ATTRIBUTE5,
    ATTRIBUTE6,
    ATTRIBUTE7,
    ATTRIBUTE8,
    ATTRIBUTE9,
    ATTRIBUTE10,
    ATTRIBUTE11,
    ATTRIBUTE12,
    ATTRIBUTE13,
    ATTRIBUTE14,
    ATTRIBUTE15,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    X_QA_INSPECTION_TYPE,
    X_ENABLED_FLAG,
    X_SUMMARY_FLAG,
    X_START_DATE_ACTIVE,
    X_END_DATE_ACTIVE,
    X_SEGMENT15,
    X_OPERATOR_PARTY_ID,
    X_TIME_SPAN,
    X_SERVICE_ITEM_ID,
    X_SERVICE_ITEM_ORG_ID,
    X_TASK_TEMPLATE_GROUP_ID,
    X_ACCOUNTING_CLASS_CODE,
    X_ACCOUNTING_CLASS_ORG_ID,
    X_SUB_ZONE_CODE,
    X_SEGMENT1,
    X_SEGMENT2,
    X_SEGMENT3,
    X_SEGMENT4,
    X_SEGMENT5,
    X_SEGMENT6,
    X_SEGMENT7,
    X_SEGMENT8,
    X_SEGMENT9,
    X_SEGMENT10,
    X_SEGMENT11,
    X_SEGMENT12,
    X_SEGMENT13,
    X_SEGMENT14,
    X_ROUTE_ID,
    X_OBJECT_VERSION_NUMBER,
    X_ROUTE_NO,
    X_APPLICATION_USG_CODE,
    X_REVISION_NUMBER,
    X_REVISION_STATUS_CODE,
    X_UNIT_RECEIPT_UPDATE_FLAG,
    X_PRODUCT_TYPE_CODE,
    --MANESING::Supplier Warranty, 25-Aug-2010, added warranty template id
    X_WARRANTY_TEMPLATE_ID,
    --MANESING::VWP Enhancements, 18-Jan-2011, added Duplicate and Return to supply flags
    X_DUPLICATE_FLAG,
    X_RETURN_TO_SUPPLY_FLAG,
    --bachandr Enigma Phase I changes -- start
    X_MODEL_CODE,
    X_ENIGMA_PUBLISH_DATE,
    X_ENIGMA_DOC_ID,
    X_ENIGMA_ROUTE_ID,
    X_FILE_ID,
    --bachandr Enigma Phase I changes -- end
    --snarkhed Enigma Phase II changes --start
    X_ENIGMA_SOURCE_CODE  ,
    X_JOB_CARD_LYT_CODE      ,
    --snarkhed Enigma Phase II changes end
    X_ZONE_CODE,
    X_ROUTE_TYPE_CODE,
    X_PROCESS_CODE,
    X_ATTRIBUTE_CATEGORY,
    X_ATTRIBUTE1,
    X_ATTRIBUTE2,
    X_ATTRIBUTE3,
    X_ATTRIBUTE4,
    X_ATTRIBUTE5,
    X_ATTRIBUTE6,
    X_ATTRIBUTE7,
    X_ATTRIBUTE8,
    X_ATTRIBUTE9,
    X_ATTRIBUTE10,
    X_ATTRIBUTE11,
    X_ATTRIBUTE12,
    X_ATTRIBUTE13,
    X_ATTRIBUTE14,
    X_ATTRIBUTE15,
    X_CREATION_DATE,
    X_CREATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 246

  insert into AHL_ROUTES_TL (
    REMARKS,
    REVISION_NOTES,
    ROUTE_ID,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_LOGIN,
    TITLE,
    LANGUAGE,
    SOURCE_LANG
  ) select
    X_REMARKS,
    X_REVISION_NOTES,
    X_ROUTE_ID,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_CREATION_DATE,
    X_CREATED_BY,
    X_LAST_UPDATE_LOGIN,
    X_TITLE,
    L.LANGUAGE_CODE,
    userenv('LANG')
  from FND_LANGUAGES L
  where L.INSTALLED_FLAG in ('I', 'B')
  and not exists
    (select NULL
    from AHL_ROUTES_TL T
    where T.ROUTE_ID = X_ROUTE_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);

Line: 286

end INSERT_ROW;

Line: 323

  X_UNIT_RECEIPT_UPDATE_FLAG in VARCHAR2,
  X_PRODUCT_TYPE_CODE in VARCHAR2,
  --MANESING::Supplier Warranty, 25-Aug-2010, added a variable for locking warranty template id
  X_WARRANTY_TEMPLATE_ID in NUMBER,
  --MANESING::VWP Enhancements, 18-Jan-2011,
  --added variables for locking Duplicate and Return to supply flags
  X_DUPLICATE_FLAG        in VARCHAR2,
  X_RETURN_TO_SUPPLY_FLAG in VARCHAR2,
  --bachandr Enigma Phase I changes -- start
  X_MODEL_CODE in VARCHAR2,
  --bachandr Enigma Phase I changes -- end
  --snarkhed Enigma Phase II changes --start
  X_ENIGMA_SOURCE_CODE in   VARCHAR2,
  X_JOB_CARD_LYT_CODE        in  VARCHAR2,
  X_ENIGMA_DOC_ID    in VARCHAR2  ,
  --snarkhed Enigma Phase II changes --end
  X_ZONE_CODE in VARCHAR2,
  X_ROUTE_TYPE_CODE in VARCHAR2,
  X_PROCESS_CODE in VARCHAR2,
  X_ATTRIBUTE_CATEGORY in VARCHAR2,
  X_ATTRIBUTE1 in VARCHAR2,
  X_ATTRIBUTE2 in VARCHAR2,
  X_ATTRIBUTE3 in VARCHAR2,
  X_ATTRIBUTE4 in VARCHAR2,
  X_ATTRIBUTE5 in VARCHAR2,
  X_ATTRIBUTE6 in VARCHAR2,
  X_ATTRIBUTE7 in VARCHAR2,
  X_ATTRIBUTE8 in VARCHAR2,
  X_ATTRIBUTE9 in VARCHAR2,
  X_ATTRIBUTE10 in VARCHAR2,
  X_ATTRIBUTE11 in VARCHAR2,
  X_ATTRIBUTE12 in VARCHAR2,
  X_ATTRIBUTE13 in VARCHAR2,
  X_ATTRIBUTE14 in VARCHAR2,
  X_ATTRIBUTE15 in VARCHAR2,
  X_TITLE in VARCHAR2,
  X_REMARKS in VARCHAR2,
  X_REVISION_NOTES in VARCHAR2
) is
  cursor c is select
      QA_INSPECTION_TYPE,
      ENABLED_FLAG,
      SUMMARY_FLAG,
      START_DATE_ACTIVE,
      END_DATE_ACTIVE,
      SEGMENT15,
      OPERATOR_PARTY_ID,
      TIME_SPAN,
      SERVICE_ITEM_ID,
      SERVICE_ITEM_ORG_ID,
      TASK_TEMPLATE_GROUP_ID,
      ACCOUNTING_CLASS_CODE,
      ACCOUNTING_CLASS_ORG_ID,
      SUB_ZONE_CODE,
      SEGMENT1,
      SEGMENT2,
      SEGMENT3,
      SEGMENT4,
      SEGMENT5,
      SEGMENT6,
      SEGMENT7,
      SEGMENT8,
      SEGMENT9,
      SEGMENT10,
      SEGMENT11,
      SEGMENT12,
      SEGMENT13,
      SEGMENT14,
      OBJECT_VERSION_NUMBER,
      ROUTE_NO,
      APPLICATION_USG_CODE,
      REVISION_NUMBER,
      REVISION_STATUS_CODE,
      UNIT_RECEIPT_UPDATE_FLAG,
      PRODUCT_TYPE_CODE,
      --MANESING::Supplier Warranty, 25-Aug-2010, added warranty template id
      WARRANTY_TEMPLATE_ID,
      --MANESING::VWP Enhancements, 18-Jan-2011, added Duplicate and Return to supply flags
      DUPLICATE_FLAG,
      RETURN_TO_SUPPLY_FLAG,
      --bachandr Enigma Phase I changes -- start
      MODEL_CODE,
      --bachandr Enigma Phase I changes -- end
      --snarkhed Enigma Phase II changes start
      ENIGMA_SOURCE_CODE,
      JOBCARDLYT_CODE,
      ENIGMA_DOC_ID,
      --snarkhed Enigma Phase II changes end
      ZONE_CODE,
      ROUTE_TYPE_CODE,
      PROCESS_CODE,
      ATTRIBUTE_CATEGORY,
      ATTRIBUTE1,
      ATTRIBUTE2,
      ATTRIBUTE3,
      ATTRIBUTE4,
      ATTRIBUTE5,
      ATTRIBUTE6,
      ATTRIBUTE7,
      ATTRIBUTE8,
      ATTRIBUTE9,
      ATTRIBUTE10,
      ATTRIBUTE11,
      ATTRIBUTE12,
      ATTRIBUTE13,
      ATTRIBUTE14,
      ATTRIBUTE15
    from AHL_ROUTES_B
    where ROUTE_ID = X_ROUTE_ID
    for update of ROUTE_ID nowait;

Line: 435

  cursor c1 is select
      TITLE,
      REMARKS,
      REVISION_NOTES,
      decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
    from AHL_ROUTES_TL
    where ROUTE_ID = X_ROUTE_ID
    and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
    for update of ROUTE_ID nowait;

Line: 449

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

Line: 512

      AND (recinfo.UNIT_RECEIPT_UPDATE_FLAG = X_UNIT_RECEIPT_UPDATE_FLAG)
      AND ((recinfo.PRODUCT_TYPE_CODE = X_PRODUCT_TYPE_CODE)
           OR ((recinfo.PRODUCT_TYPE_CODE is null) AND (X_PRODUCT_TYPE_CODE is null)))
      --MANESING::Supplier Warranty, 25-Aug-2010, added warranty template id
      AND ((recinfo.WARRANTY_TEMPLATE_ID = X_WARRANTY_TEMPLATE_ID)
           OR ((recinfo.WARRANTY_TEMPLATE_ID is null) AND (X_WARRANTY_TEMPLATE_ID is null)))
      --MANESING::VWP Enhancements, 18-Jan-2011, added Duplicate and Return to supply flags
      AND ((recinfo.DUPLICATE_FLAG = X_DUPLICATE_FLAG)
           OR ((recinfo.DUPLICATE_FLAG is null) AND (X_DUPLICATE_FLAG is null)))
      AND ((recinfo.RETURN_TO_SUPPLY_FLAG = X_RETURN_TO_SUPPLY_FLAG)
           OR ((recinfo.RETURN_TO_SUPPLY_FLAG is null) AND (X_RETURN_TO_SUPPLY_FLAG is null)))
      --bachandr Enigma Phase I changes -- start
      AND ((recinfo.MODEL_CODE = X_MODEL_CODE)
           OR ((recinfo.MODEL_CODE is null) AND (X_MODEL_CODE is null)))
      --bachandr Enigma Phase I changes -- end
      --snarkhed Enigma Phase II changes --start
      AND ((recinfo.enigma_source_code = X_ENIGMA_SOURCE_CODE)
           OR ((recinfo.enigma_source_code is null) AND (X_ENIGMA_SOURCE_CODE is null)))
      AND ((recinfo.jobcardlyt_code = X_JOB_CARD_LYT_CODE)
           OR ((recinfo.jobcardlyt_code is null) AND (X_JOB_CARD_LYT_CODE is null)))
      AND ((recinfo.enigma_doc_id = X_ENIGMA_DOC_ID)
           OR ((recinfo.enigma_doc_id is null) AND (X_ENIGMA_DOC_ID is null)))
     --snarkhed Enigma Phase II changes --end
     AND ((recinfo.ZONE_CODE = X_ZONE_CODE)
           OR ((recinfo.ZONE_CODE is null) AND (X_ZONE_CODE is null)))
      AND ((recinfo.ROUTE_TYPE_CODE = X_ROUTE_TYPE_CODE)
           OR ((recinfo.ROUTE_TYPE_CODE is null) AND (X_ROUTE_TYPE_CODE is null)))
      AND ((recinfo.PROCESS_CODE = X_PROCESS_CODE)
           OR ((recinfo.PROCESS_CODE is null) AND (X_PROCESS_CODE is null)))
      AND ((recinfo.ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY)
           OR ((recinfo.ATTRIBUTE_CATEGORY is null) AND (X_ATTRIBUTE_CATEGORY is null)))
      AND ((recinfo.ATTRIBUTE1 = X_ATTRIBUTE1)
           OR ((recinfo.ATTRIBUTE1 is null) AND (X_ATTRIBUTE1 is null)))
      AND ((recinfo.ATTRIBUTE2 = X_ATTRIBUTE2)
           OR ((recinfo.ATTRIBUTE2 is null) AND (X_ATTRIBUTE2 is null)))
      AND ((recinfo.ATTRIBUTE3 = X_ATTRIBUTE3)
           OR ((recinfo.ATTRIBUTE3 is null) AND (X_ATTRIBUTE3 is null)))
      AND ((recinfo.ATTRIBUTE4 = X_ATTRIBUTE4)
           OR ((recinfo.ATTRIBUTE4 is null) AND (X_ATTRIBUTE4 is null)))
      AND ((recinfo.ATTRIBUTE5 = X_ATTRIBUTE5)
           OR ((recinfo.ATTRIBUTE5 is null) AND (X_ATTRIBUTE5 is null)))
      AND ((recinfo.ATTRIBUTE6 = X_ATTRIBUTE6)
           OR ((recinfo.ATTRIBUTE6 is null) AND (X_ATTRIBUTE6 is null)))
      AND ((recinfo.ATTRIBUTE7 = X_ATTRIBUTE7)
           OR ((recinfo.ATTRIBUTE7 is null) AND (X_ATTRIBUTE7 is null)))
      AND ((recinfo.ATTRIBUTE8 = X_ATTRIBUTE8)
           OR ((recinfo.ATTRIBUTE8 is null) AND (X_ATTRIBUTE8 is null)))
      AND ((recinfo.ATTRIBUTE9 = X_ATTRIBUTE9)
           OR ((recinfo.ATTRIBUTE9 is null) AND (X_ATTRIBUTE9 is null)))
      AND ((recinfo.ATTRIBUTE10 = X_ATTRIBUTE10)
           OR ((recinfo.ATTRIBUTE10 is null) AND (X_ATTRIBUTE10 is null)))
      AND ((recinfo.ATTRIBUTE11 = X_ATTRIBUTE11)
           OR ((recinfo.ATTRIBUTE11 is null) AND (X_ATTRIBUTE11 is null)))
      AND ((recinfo.ATTRIBUTE12 = X_ATTRIBUTE12)
           OR ((recinfo.ATTRIBUTE12 is null) AND (X_ATTRIBUTE12 is null)))
      AND ((recinfo.ATTRIBUTE13 = X_ATTRIBUTE13)
           OR ((recinfo.ATTRIBUTE13 is null) AND (X_ATTRIBUTE13 is null)))
      AND ((recinfo.ATTRIBUTE14 = X_ATTRIBUTE14)
           OR ((recinfo.ATTRIBUTE14 is null) AND (X_ATTRIBUTE14 is null)))
      AND ((recinfo.ATTRIBUTE15 = X_ATTRIBUTE15)
           OR ((recinfo.ATTRIBUTE15 is null) AND (X_ATTRIBUTE15 is null)))
  ) then
    null;

Line: 598

procedure UPDATE_ROW (
  X_ROUTE_ID in NUMBER,
  X_QA_INSPECTION_TYPE in VARCHAR2,
  X_ENABLED_FLAG in VARCHAR2,
  X_SUMMARY_FLAG in VARCHAR2,
  X_START_DATE_ACTIVE in DATE,
  X_END_DATE_ACTIVE in DATE,
  X_SEGMENT15 in VARCHAR2,
  X_OPERATOR_PARTY_ID in NUMBER,
  X_TIME_SPAN in NUMBER,
  X_SERVICE_ITEM_ID in NUMBER,
  X_SERVICE_ITEM_ORG_ID in NUMBER,
  X_TASK_TEMPLATE_GROUP_ID in NUMBER,
  X_ACCOUNTING_CLASS_CODE in VARCHAR2,
  X_ACCOUNTING_CLASS_ORG_ID in NUMBER,
  X_SUB_ZONE_CODE in VARCHAR2,
  X_SEGMENT1 in VARCHAR2,
  X_SEGMENT2 in VARCHAR2,
  X_SEGMENT3 in VARCHAR2,
  X_SEGMENT4 in VARCHAR2,
  X_SEGMENT5 in VARCHAR2,
  X_SEGMENT6 in VARCHAR2,
  X_SEGMENT7 in VARCHAR2,
  X_SEGMENT8 in VARCHAR2,
  X_SEGMENT9 in VARCHAR2,
  X_SEGMENT10 in VARCHAR2,
  X_SEGMENT11 in VARCHAR2,
  X_SEGMENT12 in VARCHAR2,
  X_SEGMENT13 in VARCHAR2,
  X_SEGMENT14 in VARCHAR2,
  X_OBJECT_VERSION_NUMBER in NUMBER,
  X_ROUTE_NO in VARCHAR2,
  X_REVISION_NUMBER in NUMBER,
  X_REVISION_STATUS_CODE in VARCHAR2,
  X_UNIT_RECEIPT_UPDATE_FLAG in VARCHAR2,
  X_PRODUCT_TYPE_CODE in VARCHAR2,
  --MANESING::Supplier Warranty, 25-Aug-2010, added a variable for modifying warranty template id
  X_WARRANTY_TEMPLATE_ID in NUMBER,
  --MANESING::VWP Enhancements, 18-Jan-2011,
  --added variables for modifying Duplicate and Return to supply flags
  X_DUPLICATE_FLAG        in VARCHAR2,
  X_RETURN_TO_SUPPLY_FLAG in VARCHAR2,
  --bachandr Enigma Phase I changes -- start
  X_MODEL_CODE in VARCHAR2,
  X_FILE_ID in NUMBER,
  --bachandr Enigma Phase I changes -- end
  --snarkhed Enigma Phase II changes --start
  X_ENIGMA_SOURCE_CODE  in  VARCHAR2,
  X_JOB_CARD_LYT_CODE         in VARCHAR2,
  X_ENIGMA_DOC_ID in    VARCHAR2,
  --snarkhed Enigma Phase II changes end
  X_ZONE_CODE in VARCHAR2,
  X_ROUTE_TYPE_CODE in VARCHAR2,
  X_PROCESS_CODE in VARCHAR2,
  X_ATTRIBUTE_CATEGORY in VARCHAR2,
  X_ATTRIBUTE1 in VARCHAR2,
  X_ATTRIBUTE2 in VARCHAR2,
  X_ATTRIBUTE3 in VARCHAR2,
  X_ATTRIBUTE4 in VARCHAR2,
  X_ATTRIBUTE5 in VARCHAR2,
  X_ATTRIBUTE6 in VARCHAR2,
  X_ATTRIBUTE7 in VARCHAR2,
  X_ATTRIBUTE8 in VARCHAR2,
  X_ATTRIBUTE9 in VARCHAR2,
  X_ATTRIBUTE10 in VARCHAR2,
  X_ATTRIBUTE11 in VARCHAR2,
  X_ATTRIBUTE12 in VARCHAR2,
  X_ATTRIBUTE13 in VARCHAR2,
  X_ATTRIBUTE14 in VARCHAR2,
  X_ATTRIBUTE15 in VARCHAR2,
  X_TITLE in VARCHAR2,
  X_REMARKS in VARCHAR2,
  X_REVISION_NOTES in VARCHAR2,
  X_LAST_UPDATE_DATE in DATE,
  X_LAST_UPDATED_BY in NUMBER,
  X_LAST_UPDATE_LOGIN in NUMBER
) is
begin
  update AHL_ROUTES_B set
    QA_INSPECTION_TYPE = X_QA_INSPECTION_TYPE,
    ENABLED_FLAG = X_ENABLED_FLAG,
    SUMMARY_FLAG = X_SUMMARY_FLAG,
    START_DATE_ACTIVE = X_START_DATE_ACTIVE,
    END_DATE_ACTIVE = X_END_DATE_ACTIVE,
    SEGMENT15 = X_SEGMENT15,
    OPERATOR_PARTY_ID = X_OPERATOR_PARTY_ID,
    TIME_SPAN = X_TIME_SPAN,
    SERVICE_ITEM_ID = X_SERVICE_ITEM_ID,
    SERVICE_ITEM_ORG_ID = X_SERVICE_ITEM_ORG_ID,
    TASK_TEMPLATE_GROUP_ID = X_TASK_TEMPLATE_GROUP_ID,
    ACCOUNTING_CLASS_CODE = X_ACCOUNTING_CLASS_CODE,
    ACCOUNTING_CLASS_ORG_ID = X_ACCOUNTING_CLASS_ORG_ID,
    SUB_ZONE_CODE = X_SUB_ZONE_CODE,
    SEGMENT1 = X_SEGMENT1,
    SEGMENT2 = X_SEGMENT2,
    SEGMENT3 = X_SEGMENT3,
    SEGMENT4 = X_SEGMENT4,
    SEGMENT5 = X_SEGMENT5,
    SEGMENT6 = X_SEGMENT6,
    SEGMENT7 = X_SEGMENT7,
    SEGMENT8 = X_SEGMENT8,
    SEGMENT9 = X_SEGMENT9,
    SEGMENT10 = X_SEGMENT10,
    SEGMENT11 = X_SEGMENT11,
    SEGMENT12 = X_SEGMENT12,
    SEGMENT13 = X_SEGMENT13,
    SEGMENT14 = X_SEGMENT14,
    OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
    ROUTE_NO = X_ROUTE_NO,
    REVISION_NUMBER = X_REVISION_NUMBER,
    REVISION_STATUS_CODE = X_REVISION_STATUS_CODE,
    UNIT_RECEIPT_UPDATE_FLAG = X_UNIT_RECEIPT_UPDATE_FLAG,
    PRODUCT_TYPE_CODE = X_PRODUCT_TYPE_CODE,
    --MANESING::Supplier Warranty, 25-Aug-2010, added warranty template id
    WARRANTY_TEMPLATE_ID = X_WARRANTY_TEMPLATE_ID,
    --MANESING::VWP Enhancements, 18-Jan-2011, added Duplicate and Return to supply flags
    DUPLICATE_FLAG = X_DUPLICATE_FLAG,
    RETURN_TO_SUPPLY_FLAG = X_RETURN_TO_SUPPLY_FLAG,
    --bachandr Enigma Phase I changes -- start
    MODEL_CODE = X_MODEL_CODE ,
    FILE_ID = X_FILE_ID ,
    --bachandr Enigma Phase I changes -- end
    --snarkhed Enigma Phase II changes --start
    ENIGMA_SOURCE_CODE =X_ENIGMA_SOURCE_CODE,
    JOBCARDLYT_CODE = X_JOB_CARD_LYT_CODE,
    ENIGMA_DOC_ID =X_ENIGMA_DOC_ID,
    --snarkhed Enigma Phase II changes --end
    ZONE_CODE = X_ZONE_CODE,
    ROUTE_TYPE_CODE = X_ROUTE_TYPE_CODE,
    PROCESS_CODE = X_PROCESS_CODE,
    ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY,
    ATTRIBUTE1 = X_ATTRIBUTE1,
    ATTRIBUTE2 = X_ATTRIBUTE2,
    ATTRIBUTE3 = X_ATTRIBUTE3,
    ATTRIBUTE4 = X_ATTRIBUTE4,
    ATTRIBUTE5 = X_ATTRIBUTE5,
    ATTRIBUTE6 = X_ATTRIBUTE6,
    ATTRIBUTE7 = X_ATTRIBUTE7,
    ATTRIBUTE8 = X_ATTRIBUTE8,
    ATTRIBUTE9 = X_ATTRIBUTE9,
    ATTRIBUTE10 = X_ATTRIBUTE10,
    ATTRIBUTE11 = X_ATTRIBUTE11,
    ATTRIBUTE12 = X_ATTRIBUTE12,
    ATTRIBUTE13 = X_ATTRIBUTE13,
    ATTRIBUTE14 = X_ATTRIBUTE14,
    ATTRIBUTE15 = X_ATTRIBUTE15,
    LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
    LAST_UPDATED_BY = X_LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
  where ROUTE_ID = X_ROUTE_ID;

Line: 753

  update AHL_ROUTES_TL set
    TITLE = X_TITLE,
    REMARKS = X_REMARKS,
    REVISION_NOTES = X_REVISION_NOTES,
    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 ROUTE_ID = X_ROUTE_ID
  and userenv('LANG') in (LANGUAGE, SOURCE_LANG);

Line: 767

end UPDATE_ROW;

Line: 769

procedure DELETE_ROW (
  X_ROUTE_ID in NUMBER
) is
begin
  delete from AHL_ROUTES_TL
  where ROUTE_ID = X_ROUTE_ID;

Line: 780

  delete from AHL_ROUTES_B
  where ROUTE_ID = X_ROUTE_ID;

Line: 786

end DELETE_ROW;

Line: 791

  delete from AHL_ROUTES_TL T
  where not exists
    (select NULL
    from AHL_ROUTES_B B
    where B.ROUTE_ID = T.ROUTE_ID
    );

Line: 798

  update AHL_ROUTES_TL T set (
      TITLE,
      REMARKS,
      REVISION_NOTES
    ) = (select
      B.TITLE,
      B.REMARKS,
      B.REVISION_NOTES
    from AHL_ROUTES_TL B
    where B.ROUTE_ID = T.ROUTE_ID
    and B.LANGUAGE = T.SOURCE_LANG)
  where (
      T.ROUTE_ID,
      T.LANGUAGE
  ) in (select
      SUBT.ROUTE_ID,
      SUBT.LANGUAGE
    from AHL_ROUTES_TL SUBB, AHL_ROUTES_TL SUBT
    where SUBB.ROUTE_ID = SUBT.ROUTE_ID
    and SUBB.LANGUAGE = SUBT.SOURCE_LANG
    and (SUBB.TITLE <> SUBT.TITLE
      or SUBB.REMARKS <> SUBT.REMARKS
      or (SUBB.REMARKS is null and SUBT.REMARKS is not null)
      or (SUBB.REMARKS is not null and SUBT.REMARKS is null)
      or SUBB.REVISION_NOTES <> SUBT.REVISION_NOTES
      or (SUBB.REVISION_NOTES is null and SUBT.REVISION_NOTES is not null)
      or (SUBB.REVISION_NOTES is not null and SUBT.REVISION_NOTES is null)
  ));

Line: 827

  insert into AHL_ROUTES_TL (
    REMARKS,
    REVISION_NOTES,
    ROUTE_ID,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_LOGIN,
    TITLE,
    LANGUAGE,
    SOURCE_LANG
  ) select
    B.REMARKS,
    B.REVISION_NOTES,
    B.ROUTE_ID,
    B.LAST_UPDATE_DATE,
    B.LAST_UPDATED_BY,
    B.CREATION_DATE,
    B.CREATED_BY,
    B.LAST_UPDATE_LOGIN,
    B.TITLE,
    L.LANGUAGE_CODE,
    B.SOURCE_LANG
  from AHL_ROUTES_TL B, FND_LANGUAGES L
  where L.INSTALLED_FLAG in ('I', 'B')
  and B.LANGUAGE = userenv('LANG')
  and not exists
    (select NULL
    from AHL_ROUTES_TL T
    where T.ROUTE_ID = B.ROUTE_ID
    and T.LANGUAGE = L.LANGUAGE_CODE);