The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT count(*) from ak_regions
where region_application_id = p_region_application_id
and region_code = p_region_code;
select to_char(sysdate, 'mm-dd-yy') || to_char(sysdate, 'hh24:mi:ss')
into l_logfilename
from dual;
l_upg_return_value := CS_CF_UPG_UTL_PKG.Eval_SR_Product_Selection(l_appl_index,
p_applTable,
l_resp_index,
p_respTable,
l_site_index,
p_siteProfilesTable);
SELECT a.profile_option_name,
b.level_value,
b.level_value_application_id,
b.profile_option_value,
1 "PRIORITY"
FROM fnd_profile_option_values b, fnd_profile_options a
WHERE b.level_id = 10003
AND b.level_value = respId
AND b.level_value_application_id = respApplId
AND a.profile_option_id = b.profile_option_id
AND b.application_id = 672
AND a.profile_option_name in ('IBU_A_SR_ACCOUNT_OPTION',
'IBU_A_SR_PROB_CODE_MANDATORY',
'IBU_SR_CREATION_PRODUCT_OPTION',
'IBU_SR_ADDR_DISPLAY',
'IBU_SR_ADDR_MANDATORY',
'IBU_A_SR_BILLTO_ADDRESS_OPTION',
'IBU_A_SR_BILLTO_CONTACT_OPTION',
'IBU_A_SR_SHIPTO_ADDRESS_OPTION',
'IBU_A_SR_SHIPTO_CONTACT_OPTION',
'IBU_A_SR_INSTALLEDAT_ADDRESS_OPTION',
'IBU_A_SR_ATTACHMENT_OPTION',
'IBU_SR_TASK_DISPLAY',
'IBU_A_SR_ENABLE_INTERACTION_LOGGING',
'IBU_SR_ENABLE_TEMPLATE',
'IBU_A_SR_PRODUCT_SELECTION_OPTION')
UNION
SELECT a.profile_option_name,
b.level_value,
b.level_value_application_id,
b.profile_option_value,
2 "PRIORITY"
FROM fnd_profile_option_values b, fnd_profile_options a
WHERE b.level_id = 10002
AND b.level_value = respApplId
AND a.profile_option_id = b.profile_option_id
AND b.application_id = 672
AND a.profile_option_name in ('IBU_A_SR_ACCOUNT_OPTION',
'IBU_A_SR_PROB_CODE_MANDATORY',
'IBU_SR_CREATION_PRODUCT_OPTION',
'IBU_SR_ADDR_DISPLAY',
'IBU_SR_ADDR_MANDATORY',
'IBU_A_SR_BILLTO_ADDRESS_OPTION',
'IBU_A_SR_BILLTO_CONTACT_OPTION',
'IBU_A_SR_SHIPTO_ADDRESS_OPTION',
'IBU_A_SR_SHIPTO_CONTACT_OPTION',
'IBU_A_SR_INSTALLEDAT_ADDRESS_OPTION',
'IBU_A_SR_ATTACHMENT_OPTION',
'IBU_SR_TASK_DISPLAY',
'IBU_A_SR_ENABLE_INTERACTION_LOGGING',
'IBU_SR_ENABLE_TEMPLATE',
'IBU_A_SR_PRODUCT_SELECTION_OPTION')
UNION
SELECT a.profile_option_name,
b.level_value,
b.level_value_application_id,
b.profile_option_value,
3 "PRIORITY"
FROM fnd_profile_option_values b, fnd_profile_options a
WHERE b.level_id = 10001
AND a.profile_option_id = b.profile_option_id
AND b.application_id = 672
AND a.profile_option_name in ('IBU_A_SR_ACCOUNT_OPTION',
'IBU_A_SR_PROB_CODE_MANDATORY',
'IBU_SR_CREATION_PRODUCT_OPTION',
'IBU_SR_ADDR_DISPLAY',
'IBU_SR_ADDR_MANDATORY',
'IBU_A_SR_BILLTO_ADDRESS_OPTION',
'IBU_A_SR_BILLTO_CONTACT_OPTION',
'IBU_A_SR_SHIPTO_ADDRESS_OPTION',
'IBU_A_SR_SHIPTO_CONTACT_OPTION',
'IBU_A_SR_INSTALLEDAT_ADDRESS_OPTION',
'IBU_A_SR_ATTACHMENT_OPTION',
'IBU_SR_TASK_DISPLAY',
'IBU_A_SR_ENABLE_INTERACTION_LOGGING',
'IBU_SR_ENABLE_TEMPLATE',
'IBU_A_SR_PRODUCT_SELECTION_OPTION')
ORDER BY PROFILE_OPTION_NAME, PRIORITY;
l_ProfileTable.DELETE;
l_newUpdateAddressRegionCode VARCHAR2(30) := 'IBU_CF_SR_25_G';
l_newUpdateTemplateRegionCode VARCHAR2(30) := 'IBU_CF_SR_320_G';
l_newUpdateViewRegionCode VARCHAR2(30) := 'IBU_CF_SR_440_G';
l_newUpdateAddressExists BOOLEAN := FALSE;
l_newUpdateTemplateExists BOOLEAN := FALSE;
l_newUpdateViewExists BOOLEAN := FALSE;
l_examineProdSelectOption BOOLEAN := TRUE;
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newPrimaryContactRegionCode,
'IBU_CF_SR_ACCOUNT_NUMBER',
'Y', 'N', null);
ELSIF (l_profileOptionName = 'IBU_A_SR_PRODUCT_SELECTION_OPTION' AND l_examineProdSelectOption) THEN
-- clone the regions
l_newRegProductRegionCode := 'IBU_CF_SR_80_R' || p_respId;
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newRegProductRegionCode,
'IBU_CF_SR_R_PROD_NAME_LOV',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAllProductRegionCode,
'IBU_CF_SR_PROD_BY_NAME_LOV',
'Y', 'N', null);
l_examineProdSelectOption := FALSE;
CS_CF_UPG_UTL_PKG.log_mesg(FND_LOG.LEVEL_STATEMENT, 'CS_CF_UPG_PKG.Clone_Regions_For_Resp', 'Done with SR Product Selection Option');
l_newUpdateAddressRegionCode := 'IBU_CF_SR_25_R' || p_respId;
l_newUpdateAddressRegionCode,
672, FALSE);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_BILL_TO_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_BILL_TO_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_BILL_TO_ADDRESS',
l_displayBillToAddress, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_BILL_TO_ADDRESS',
l_displayBillToAddress, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_BILL_TO_CONTACT',
l_displayBillToContact, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_BILL_TO_CONTACT',
l_displayBillToContact, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_SHIP_TO_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_SHIP_TO_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_SHIP_TO_ADDRESS',
l_displayShipToAddress, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_SHIP_TO_ADDRESS',
l_displayShipToAddress, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_SHIP_TO_CONTACT',
l_displayShipToContact, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_SHIP_TO_CONTACT',
l_displayShipToContact, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_INSTALLED_AT_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_INSTALLED_AT_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_INSTALL_AT_ADDR',
l_displayInstalledAtAddr, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_INSTALL_AT_ADDR',
l_displayInstalledAtAddr, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_INCIDENT_ADDRESS_HDR',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_ADDRESS',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_CITY',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_STATE',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_PROVINCE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_POSTAL_CODE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTRY',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_INCIDENT_ADDRESS_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_ADDRESS',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_CITY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_STATE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_PROVINCE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_POSTAL_CODE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_COUNTRY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_COUNTY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_INCIDENT_ADDRESS_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_ADDRESS',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_CITY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_STATE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_PROVINCE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_POSTAL_CODE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTRY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_INCIDENT_ADDRESS_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_ADDRESS',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_CITY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_STATE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_PROVINCE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_POSTAL_CODE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_COUNTRY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_COUNTY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_INCIDENT_ADDRESS_HDR',
'N', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_ADDRESS',
'N', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_CITY',
'N', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_STATE',
'N', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_PROVINCE',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_POSTAL_CODE',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTRY',
'N', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTY',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newTemplateProductRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newTemplateProductRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProductFilterRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProductFilterRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'N', 'N', null);
IF (l_displayAttachment = 'DONOTSHOW' OR l_displayAttachment = 'SHOWDURINGUPDATE' OR l_mandatoryProblemCode = 'Y') THEN
CS_CF_UPG_UTL_PKG.Clone_Region('IBU_CF_SR_40_G',
672,
l_newIdentifyProblemRegionCode,
672, FALSE);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
ELSIF (l_displayAttachment = 'SHOWDURINGUPDATE') THEN
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_PROB_TYPE_CODE',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlOverviewRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlOverviewRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProblemDetailsRegionCode,
'IBU_CF_SR_PROB_DETAILS',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlProgOptionsRegionCode,
'IBU_CF_SR_DTL_PROGRESS_INTRCT',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlResolnRegionCode,
'IBU_CF_SR_DTL_ACTS_RG',
'Y', 'N', null);
select node_display_flag INTO
l_displayRegProducts
from ak_region_items
where region_code = l_newIdentifyProductRegionCode
and attribute_code = 'IBU_CF_SR_REG_PRODUCT_RG'
and region_application_id = 672
and attribute_application_id = 672;
select node_display_flag INTO
l_displayAllProducts
from ak_region_items
where region_code = l_newIdentifyProductRegionCode
and attribute_code = 'IBU_CF_SR_ALL_PRODUCT_RG'
and region_application_id = 672
and attribute_application_id = 672;
l_newUpdateAddressRegionCode := 'IBU_CF_SR_25_R' || p_respId;
OPEN does_region_already_exists(l_newUpdateAddressRegionCode, 672);
l_newUpdateAddressExists := TRUE;
select node_display_flag INTO
l_displayAttachment
from ak_region_items
where region_code = l_newIdentifyProblemRegionCode
and attribute_code = 'IBU_CF_SR_ATTACHMENTS_RG'
and region_application_id = 672
and attribute_application_id = 672;
select node_display_flag INTO
l_enableTemplate
from ak_region_items
where region_code = l_newProblemDetailsRegionCode
and attribute_code = 'IBU_CF_SR_PROB_DETAILS'
and region_application_id = 672
and attribute_application_id = 672;
select node_display_flag INTO
l_displayTasks
from ak_region_items
where region_code = l_newDtlResolnRegionCode
and attribute_code = 'IBU_CF_SR_DTL_ACTS_RG'
and region_application_id = 672
and attribute_application_id = 672;
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'Y', 'N', l_newRegProductRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
l_displayRegProducts, 'N', l_newRegProductRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'Y', 'N', l_newAllProductRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
l_displayAllProducts, 'N', l_newAllProductRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newTemplateProductRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'N', 'N', 'IBU_CF_SR_REG_PRODUCT');
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newTemplateProductRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'N', 'N', 'IBU_CF_SR_ALL_PRODUCT');
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProductFilterRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'N', 'N', 'IBU_CF_SR_REG_PRODUCT');
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProductFilterRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'N', 'N', 'IBU_CF_SR_ALL_PRODUCT');
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_PRIMARY_CONTACT_RG',
'Y', 'N', l_newPrimaryContactRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_IDENTIFY_PRODUCT_RG',
'Y', 'N', l_newIdentifyProductRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'N', 'N', l_newAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProblemDetailsRegionCode,
'IBU_CF_SR_PRIMARY_CONTACT_RG',
'Y', 'N', l_newPrimaryContactRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProblemDetailsRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'N', 'N', l_newAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newReviewRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newReviewRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'Y', 'N', l_newAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newReviewRegionCode,
'IBU_CF_SR_PROB_DETAILS',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newContactInfoRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'Y', 'N', l_newAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newContactInfoRegionCode,
'IBU_CF_SR_PRIMARY_CONTACT_RG',
'Y', 'N', l_newPrimaryContactRegionCode);
IF (l_newUpdateAddressExists) THEN
-- need to clone the IBU_CF_SR_DTL_CONTACT region
l_newDtlContactAddrRegionCode := 'IBU_CF_SR_210_R' || p_respId;
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlContactAddrRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'Y', 'N', l_newUpdateAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlProgressRegionCode,
'IBU_CF_SR_DTL_PROGRESS_OPT_RG',
'Y', 'N', l_newDtlProgOptionsRegionCode);
IF (l_newUpdateAddressExists) THEN
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlOverviewRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'N', 'N', l_newUpdateAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlOverviewRegionCode,
'IBU_CF_SR_DTL_PROGRESS_RG',
'Y', 'N', l_newDtlProgressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlOverviewRegionCode,
'IBU_CF_SR_DTL_ACTS_RG',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlTabsRegionCode,
'IBU_CF_SR_DTL_OVERVIEW_TAB_RG',
'Y', 'N', l_newDtlOverviewRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlTabsRegionCode,
'IBU_CF_SR_DTL_RESOLN_TAB_RG',
'N', 'N', l_newDtlResolnRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlDetailsRegionCode,
'IBU_CF_SR_DTL_TABS_RG',
'Y', 'N', l_newDtlTabsRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newCreateTemplateRegionCode,
'IBU_CF_SR_IDENTIFY_PRODUCT_RG',
'Y', 'N', l_newTemplateProductRegionCode);
l_newUpdateTemplateRegionCode := 'IBU_CF_SR_320_R' || p_respId;
l_newUpdateTemplateRegionCode,
672, FALSE);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateTemplateRegionCode,
'IBU_CF_SR_IDENTIFY_PRODUCT_RG',
'Y', 'N', l_newTemplateProductRegionCode);
l_newUpdateTemplateExists := TRUE;
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newFilterRegionCode,
'IBU_CF_SR_VW_PRODUCT_FILTER_RG',
'Y', 'N', l_newProductFilterRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newSearchViewRegionCode,
'IBU_CF_SR_VW_FILTER_RG',
'Y', 'N', l_newFilterRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newCreateViewRegionCode,
'IBU_CF_SR_VW_FILTER_RG',
'Y', 'N', l_newFilterRegionCode);
l_newUpdateViewRegionCode := 'IBU_CF_SR_440_R' || p_respId;
l_newUpdateViewRegionCode,
672, FALSE);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateViewRegionCode,
'IBU_CF_SR_VW_FILTER_RG',
'Y', 'N', l_newFilterRegionCode);
l_newUpdateViewExists := TRUE;
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_CR_IDENTIFY_PROBLEM',
'RESP',
l_respId,
l_respApplId,
NULL,
NULL,
l_newIdentifyProblemRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_CR_REVIEW',
'RESP',
l_respId,
l_respApplId,
NULL,
NULL,
l_newReviewRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_CR_PROBLEM_DETAILS',
'RESP',
l_respId,
l_respApplId,
NULL,
NULL,
l_newProblemDetailsRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_CR_CONTACT_INFORMATION',
'RESP',
l_respId,
l_respApplId,
NULL,
NULL,
l_newContactInfoRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_DETAILS',
'RESP',
l_respId,
l_respApplId,
NULL,
NULL,
l_newDtlDetailsRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_TEMP_CREATE',
'RESP',
l_respId,
l_respApplId,
NULL,
NULL,
l_newCreateTemplateRegionCode,
'672');
IF (l_newUpdateTemplateExists) THEN
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_TEMP_UPDATE',
'RESP',
l_respId,
l_respApplId,
NULL,
NULL,
l_newUpdateTemplateRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_VIEW_SUMMARY',
'RESP',
l_respId,
l_respApplId,
NULL,
NULL,
l_newSearchViewRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_VIEW_CREATE',
'RESP',
l_respId,
l_respApplId,
NULL,
NULL,
l_newCreateViewRegionCode,
'672');
IF (l_newUpdateViewExists) THEN
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_VIEW_UPDATE',
'RESP',
l_respId,
l_respApplId,
NULL,
NULL,
l_newUpdateViewRegionCode,
'672');
SELECT a.profile_option_name,
b.level_value,
b.level_value_application_id,
b.profile_option_value,
1 "PRIORITY"
FROM fnd_profile_option_values b, fnd_profile_options a
WHERE b.level_id = 10002
AND b.level_value = applId
AND a.profile_option_id = b.profile_option_id
AND a.application_id = 672
AND a.profile_option_name in ('IBU_A_SR_ACCOUNT_OPTION',
'IBU_A_SR_PROB_CODE_MANDATORY',
'IBU_SR_CREATION_PRODUCT_OPTION',
'IBU_SR_ADDR_DISPLAY',
'IBU_SR_ADDR_MANDATORY',
'IBU_A_SR_BILLTO_ADDRESS_OPTION',
'IBU_A_SR_BILLTO_CONTACT_OPTION',
'IBU_A_SR_SHIPTO_ADDRESS_OPTION',
'IBU_A_SR_SHIPTO_CONTACT_OPTION',
'IBU_A_SR_INSTALLEDAT_ADDRESS_OPTION',
'IBU_A_SR_ATTACHMENT_OPTION',
'IBU_SR_TASK_DISPLAY',
'IBU_A_SR_ENABLE_INTERACTION_LOGGING',
'IBU_SR_ENABLE_TEMPLATE',
'IBU_A_SR_PRODUCT_SELECTION_OPTION')
UNION
SELECT a.profile_option_name,
b.level_value,
b.level_value_application_id,
b.profile_option_value,
2 "PRIORITY"
FROM fnd_profile_option_values b, fnd_profile_options a
WHERE b.level_id = 10001
AND a.profile_option_id = b.profile_option_id
AND a.application_id = 672
AND a.profile_option_name in ('IBU_A_SR_ACCOUNT_OPTION',
'IBU_A_SR_PROB_CODE_MANDATORY',
'IBU_SR_CREATION_PRODUCT_OPTION',
'IBU_SR_ADDR_DISPLAY',
'IBU_SR_ADDR_MANDATORY',
'IBU_A_SR_BILLTO_ADDRESS_OPTION',
'IBU_A_SR_BILLTO_CONTACT_OPTION',
'IBU_A_SR_SHIPTO_ADDRESS_OPTION',
'IBU_A_SR_SHIPTO_CONTACT_OPTION',
'IBU_A_SR_INSTALLEDAT_ADDRESS_OPTION',
'IBU_A_SR_ATTACHMENT_OPTION',
'IBU_SR_TASK_DISPLAY',
'IBU_A_SR_ENABLE_INTERACTION_LOGGING',
'IBU_SR_ENABLE_TEMPLATE',
'IBU_A_SR_PRODUCT_SELECTION_OPTION')
ORDER BY PROFILE_OPTION_NAME, PRIORITY;
l_ProfileTable.DELETE;
l_newUpdateAddressRegionCode VARCHAR2(30) := 'IBU_CF_SR_25_G';
l_newUpdateTemplateRegionCode VARCHAR2(30) := 'IBU_CF_SR_320_G';
l_newUpdateViewRegionCode VARCHAR2(30) := 'IBU_CF_SR_440_G';
l_newUpdateAddressExists BOOLEAN := FALSE;
l_newUpdateTemplateExists BOOLEAN := FALSE;
l_newUpdateViewExists BOOLEAN := FALSE;
l_examineProdSelectOption BOOLEAN := TRUE;
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newPrimaryContactRegionCode,
'IBU_CF_SR_ACCOUNT_NUMBER',
'Y', 'N', null);
ELSIF (l_profileOptionName = 'IBU_A_SR_PRODUCT_SELECTION_OPTION' AND l_examineProdSelectOption) THEN
-- clone the regions
l_newRegProductRegionCode := 'IBU_CF_SR_80_GC';
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newRegProductRegionCode,
'IBU_CF_SR_R_PROD_NAME_LOV',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAllProductRegionCode,
'IBU_CF_SR_PROD_BY_NAME_LOV',
'Y', 'N', null);
l_examineProdSelectOption := FALSE;
CS_CF_UPG_UTL_PKG.log_mesg(FND_LOG.LEVEL_STATEMENT, 'CS_CF_UPG_PKG.Clone_Regions_For_Global', 'Done with SR Product Selection Option');
l_newUpdateAddressRegionCode := 'IBU_CF_SR_25_GC';
l_newUpdateAddressRegionCode,
672, TRUE);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_BILL_TO_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_BILL_TO_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_BILL_TO_ADDRESS',
l_displayBillToAddress, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_BILL_TO_ADDRESS',
l_displayBillToAddress, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_BILL_TO_CONTACT',
l_displayBillToContact, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_BILL_TO_CONTACT',
l_displayBillToContact, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_SHIP_TO_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_SHIP_TO_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_SHIP_TO_ADDRESS',
l_displayShipToAddress, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_SHIP_TO_ADDRESS',
l_displayShipToAddress, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_SHIP_TO_CONTACT',
l_displayShipToContact, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_SHIP_TO_CONTACT',
l_displayShipToContact, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_INSTALLED_AT_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_INSTALLED_AT_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_INSTALL_AT_ADDR',
l_displayInstalledAtAddr, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_INSTALL_AT_ADDR',
l_displayInstalledAtAddr, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_INCIDENT_ADDRESS_HDR',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_ADDRESS',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_CITY',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_STATE',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_PROVINCE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_POSTAL_CODE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTRY',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_INCIDENT_ADDRESS_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_ADDRESS',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_CITY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_STATE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_PROVINCE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_POSTAL_CODE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_COUNTRY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_COUNTY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_INCIDENT_ADDRESS_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_ADDRESS',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_CITY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_STATE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_PROVINCE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_POSTAL_CODE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTRY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_INCIDENT_ADDRESS_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_ADDRESS',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_CITY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_STATE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_PROVINCE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_POSTAL_CODE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_COUNTRY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_COUNTY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_INCIDENT_ADDRESS_HDR',
'N', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_ADDRESS',
'N', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_CITY',
'N', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_STATE',
'N', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_PROVINCE',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_POSTAL_CODE',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTRY',
'N', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTY',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newTemplateProductRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newTemplateProductRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProductFilterRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProductFilterRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'N', 'N', null);
IF (l_displayAttachment = 'DONOTSHOW' OR l_displayAttachment = 'SHOWDURINGUPDATE' OR l_mandatoryProblemCode = 'Y') THEN
CS_CF_UPG_UTL_PKG.Clone_Region('IBU_CF_SR_40_G',
672,
l_newIdentifyProblemRegionCode,
672, TRUE);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
ELSIF (l_displayAttachment = 'SHOWDURINGUPDATE') THEN
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_PROB_TYPE_CODE',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlOverviewRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlOverviewRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProblemDetailsRegionCode,
'IBU_CF_SR_PROB_DETAILS',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlProgOptionsRegionCode,
'IBU_CF_SR_DTL_PROGRESS_INTRCT',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlResolnRegionCode,
'IBU_CF_SR_DTL_ACTS_RG',
'Y', 'N', null);
select node_display_flag INTO
l_displayRegProducts
from ak_region_items
where region_code = l_newIdentifyProductRegionCode
and attribute_code = 'IBU_CF_SR_REG_PRODUCT_RG'
and region_application_id = 672
and attribute_application_id = 672;
select node_display_flag INTO
l_displayAllProducts
from ak_region_items
where region_code = l_newIdentifyProductRegionCode
and attribute_code = 'IBU_CF_SR_ALL_PRODUCT_RG'
and region_application_id = 672
and attribute_application_id = 672;
l_newUpdateAddressRegionCode := 'IBU_CF_SR_25_GC';
OPEN does_region_already_exists(l_newUpdateAddressRegionCode, 672);
l_newUpdateAddressExists := TRUE;
select node_display_flag INTO
l_displayAttachment
from ak_region_items
where region_code = l_newIdentifyProblemRegionCode
and attribute_code = 'IBU_CF_SR_ATTACHMENTS_RG'
and region_application_id = 672
and attribute_application_id = 672;
select node_display_flag INTO
l_enableTemplate
from ak_region_items
where region_code = l_newProblemDetailsRegionCode
and attribute_code = 'IBU_CF_SR_PROB_DETAILS'
and region_application_id = 672
and attribute_application_id = 672;
select node_display_flag INTO
l_displayTasks
from ak_region_items
where region_code = l_newDtlResolnRegionCode
and attribute_code = 'IBU_CF_SR_DTL_ACTS_RG'
and region_application_id = 672
and attribute_application_id = 672;
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'Y', 'N', l_newRegProductRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
l_displayRegProducts, 'N', l_newRegProductRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'Y', 'N', l_newAllProductRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
l_displayAllProducts, 'N', l_newAllProductRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newTemplateProductRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'N', 'N', 'IBU_CF_SR_REG_PRODUCT');
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newTemplateProductRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'N', 'N', 'IBU_CF_SR_ALL_PRODUCT');
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProductFilterRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'N', 'N', 'IBU_CF_SR_REG_PRODUCT');
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProductFilterRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'N', 'N', 'IBU_CF_SR_ALL_PRODUCT');
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_PRIMARY_CONTACT_RG',
'Y', 'N', l_newPrimaryContactRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_IDENTIFY_PRODUCT_RG',
'Y', 'N', l_newIdentifyProductRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'N', 'N', l_newAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProblemDetailsRegionCode,
'IBU_CF_SR_PRIMARY_CONTACT_RG',
'Y', 'N', l_newPrimaryContactRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProblemDetailsRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'N', 'N', l_newAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newReviewRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newReviewRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'Y', 'N', l_newAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newReviewRegionCode,
'IBU_CF_SR_PROB_DETAILS',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newContactInfoRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'Y', 'N', l_newAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newContactInfoRegionCode,
'IBU_CF_SR_PRIMARY_CONTACT_RG',
'Y', 'N', l_newPrimaryContactRegionCode);
IF (l_newUpdateAddressExists) THEN
-- need to clone the IBU_CF_SR_DTL_CONTACT region
l_newDtlContactAddrRegionCode := 'IBU_CF_SR_210_GC' ;
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlContactAddrRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'Y', 'N', l_newUpdateAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlProgressRegionCode,
'IBU_CF_SR_DTL_PROGRESS_OPT_RG',
'Y', 'N', l_newDtlProgOptionsRegionCode);
IF (l_newUpdateAddressExists) THEN
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlOverviewRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'N', 'N', l_newUpdateAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlOverviewRegionCode,
'IBU_CF_SR_DTL_PROGRESS_RG',
'Y', 'N', l_newDtlProgressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlOverviewRegionCode,
'IBU_CF_SR_DTL_ACTS_RG',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlTabsRegionCode,
'IBU_CF_SR_DTL_OVERVIEW_TAB_RG',
'Y', 'N', l_newDtlOverviewRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlTabsRegionCode,
'IBU_CF_SR_DTL_RESOLN_TAB_RG',
'N', 'N', l_newDtlResolnRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlDetailsRegionCode,
'IBU_CF_SR_DTL_TABS_RG',
'Y', 'N', l_newDtlTabsRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newCreateTemplateRegionCode,
'IBU_CF_SR_IDENTIFY_PRODUCT_RG',
'Y', 'N', l_newTemplateProductRegionCode);
l_newUpdateTemplateRegionCode := 'IBU_CF_SR_320_GC' ;
l_newUpdateTemplateRegionCode,
672, TRUE);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateTemplateRegionCode,
'IBU_CF_SR_IDENTIFY_PRODUCT_RG',
'Y', 'N', l_newTemplateProductRegionCode);
l_newUpdateTemplateExists := TRUE;
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newFilterRegionCode,
'IBU_CF_SR_VW_PRODUCT_FILTER_RG',
'Y', 'N', l_newProductFilterRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newSearchViewRegionCode,
'IBU_CF_SR_VW_FILTER_RG',
'Y', 'N', l_newFilterRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newCreateViewRegionCode,
'IBU_CF_SR_VW_FILTER_RG',
'Y', 'N', l_newFilterRegionCode);
l_newUpdateViewRegionCode := 'IBU_CF_SR_440_GC' ;
l_newUpdateViewRegionCode,
672, TRUE);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateViewRegionCode,
'IBU_CF_SR_VW_FILTER_RG',
'Y', 'N', l_newFilterRegionCode);
l_newUpdateViewExists := TRUE;
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_CR_IDENTIFY_PROBLEM',
'GLOBAL',
NULL,
NULL,
NULL,
NULL,
l_newIdentifyProblemRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_CR_REVIEW',
'GLOBAL',
NULL,
NULL,
NULL,
NULL,
l_newReviewRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_CR_PROBLEM_DETAILS',
'GLOBAL',
NULL,
NULL,
NULL,
NULL,
l_newProblemDetailsRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_CR_CONTACT_INFORMATION',
'GLOBAL',
NULL,
NULL,
NULL,
NULL,
l_newContactInfoRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_DETAILS',
'GLOBAL',
NULL,
NULL,
NULL,
NULL,
l_newDtlDetailsRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_TEMP_CREATE',
'GLOBAL',
NULL,
NULL,
NULL,
NULL,
l_newCreateTemplateRegionCode,
'672');
IF (l_newUpdateTemplateExists) THEN
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_TEMP_UPDATE',
'GLOBAL',
NULL,
NULL,
NULL,
NULL,
l_newUpdateTemplateRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_VIEW_SUMMARY',
'GLOBAL',
NULL,
NULL,
NULL,
NULL,
l_newSearchViewRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_VIEW_CREATE',
'GLOBAL',
NULL,
NULL,
NULL,
NULL,
l_newCreateViewRegionCode,
'672');
IF (l_newUpdateViewExists) THEN
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_VIEW_UPDATE',
'GLOBAL',
NULL,
NULL,
NULL,
NULL,
l_newUpdateViewRegionCode,
'672');
l_newUpdateAddressRegionCode VARCHAR2(30) := 'IBU_CF_SR_25_G';
l_newUpdateTemplateRegionCode VARCHAR2(30) := 'IBU_CF_SR_320_G';
l_newUpdateViewRegionCode VARCHAR2(30) := 'IBU_CF_SR_440_G';
l_newUpdateAddressExists BOOLEAN := FALSE;
l_newUpdateTemplateExists BOOLEAN := FALSE;
l_newUpdateViewExists BOOLEAN := FALSE;
l_examineProdSelectOption BOOLEAN := TRUE;
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newPrimaryContactRegionCode,
'IBU_CF_SR_ACCOUNT_NUMBER',
'Y', 'N', null);
ELSIF (l_profileOptionName = 'IBU_A_SR_PRODUCT_SELECTION_OPTION' AND l_examineProdSelectOption) THEN
-- clone the regions
l_newRegProductRegionCode := 'IBU_CF_SR_80_A' || p_ApplId;
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newRegProductRegionCode,
'IBU_CF_SR_R_PROD_NAME_LOV',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAllProductRegionCode,
'IBU_CF_SR_PROD_BY_NAME_LOV',
'Y', 'N', null);
l_examineProdSelectOption := FALSE;
CS_CF_UPG_UTL_PKG.log_mesg(FND_LOG.LEVEL_STATEMENT, 'CS_CF_UPG_PKG.Clone_Regions_For_Appl', 'Done with SR Product Selection Option');
l_newUpdateAddressRegionCode := 'IBU_CF_SR_25_A' || p_ApplId;
l_newUpdateAddressRegionCode,
672,FALSE);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_BILL_TO_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_BILL_TO_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_BILL_TO_ADDRESS',
l_displayBillToAddress, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_BILL_TO_ADDRESS',
l_displayBillToAddress, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_BILL_TO_CONTACT',
l_displayBillToContact, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_BILL_TO_CONTACT',
l_displayBillToContact, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_SHIP_TO_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_SHIP_TO_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_SHIP_TO_ADDRESS',
l_displayShipToAddress, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_SHIP_TO_ADDRESS',
l_displayShipToAddress, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_SHIP_TO_CONTACT',
l_displayShipToContact, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_SHIP_TO_CONTACT',
l_displayShipToContact, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_INSTALLED_AT_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_INSTALLED_AT_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_INSTALL_AT_ADDR',
l_displayInstalledAtAddr, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_INSTALL_AT_ADDR',
l_displayInstalledAtAddr, 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_INCIDENT_ADDRESS_HDR',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_ADDRESS',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_CITY',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_STATE',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_PROVINCE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_POSTAL_CODE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTRY',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_INCIDENT_ADDRESS_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_ADDRESS',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_CITY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_STATE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_PROVINCE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_POSTAL_CODE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_COUNTRY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_COUNTY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_INCIDENT_ADDRESS_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_ADDRESS',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_CITY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_STATE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_PROVINCE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_POSTAL_CODE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTRY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_INCIDENT_ADDRESS_HDR',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_ADDRESS',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_CITY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_STATE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_PROVINCE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_POSTAL_CODE',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_COUNTRY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateAddressRegionCode,
'IBU_CF_SR_COUNTY',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_INCIDENT_ADDRESS_HDR',
'N', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_ADDRESS',
'N', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_CITY',
'N', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_STATE',
'N', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_PROVINCE',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_POSTAL_CODE',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTRY',
'N', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newAddressRegionCode,
'IBU_CF_SR_COUNTY',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newTemplateProductRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newTemplateProductRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProductFilterRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProductFilterRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'N', 'N', null);
IF (l_displayAttachment = 'DONOTSHOW' OR l_displayAttachment = 'SHOWDURINGUPDATE' OR l_mandatoryProblemCode = 'Y') THEN
CS_CF_UPG_UTL_PKG.Clone_Region('IBU_CF_SR_40_G',
672,
l_newIdentifyProblemRegionCode,
672, FALSE);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
ELSIF (l_displayAttachment = 'SHOWDURINGUPDATE') THEN
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_PROB_TYPE_CODE',
'Y', 'Y', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlOverviewRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlOverviewRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProblemDetailsRegionCode,
'IBU_CF_SR_PROB_DETAILS',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlProgOptionsRegionCode,
'IBU_CF_SR_DTL_PROGRESS_INTRCT',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlResolnRegionCode,
'IBU_CF_SR_DTL_ACTS_RG',
'Y', 'N', null);
select node_display_flag INTO
l_displayRegProducts
from ak_region_items
where region_code = l_newIdentifyProductRegionCode
and attribute_code = 'IBU_CF_SR_REG_PRODUCT_RG'
and region_application_id = 672
and attribute_application_id = 672;
select node_display_flag INTO
l_displayAllProducts
from ak_region_items
where region_code = l_newIdentifyProductRegionCode
and attribute_code = 'IBU_CF_SR_ALL_PRODUCT_RG'
and region_application_id = 672
and attribute_application_id = 672;
l_newUpdateAddressRegionCode := 'IBU_CF_SR_25_A' || p_ApplId;
OPEN does_region_already_exists(l_newUpdateAddressRegionCode, 672);
l_newUpdateAddressExists := TRUE;
select node_display_flag INTO
l_displayAttachment
from ak_region_items
where region_code = l_newIdentifyProblemRegionCode
and attribute_code = 'IBU_CF_SR_ATTACHMENTS_RG'
and region_application_id = 672
and attribute_application_id = 672;
select node_display_flag INTO
l_enableTemplate
from ak_region_items
where region_code = l_newProblemDetailsRegionCode
and attribute_code = 'IBU_CF_SR_PROB_DETAILS'
and region_application_id = 672
and attribute_application_id = 672;
select node_display_flag INTO
l_displayTasks
from ak_region_items
where region_code = l_newDtlResolnRegionCode
and attribute_code = 'IBU_CF_SR_DTL_ACTS_RG'
and region_application_id = 672
and attribute_application_id = 672;
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'Y', 'N', l_newRegProductRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
l_displayRegProducts, 'N', l_newRegProductRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'Y', 'N', l_newAllProductRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProductRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
l_displayAllProducts, 'N', l_newAllProductRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newTemplateProductRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'N', 'N', 'IBU_CF_SR_REG_PRODUCT');
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newTemplateProductRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'N', 'N', 'IBU_CF_SR_ALL_PRODUCT');
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProductFilterRegionCode,
'IBU_CF_SR_REG_PRODUCT_RG',
'N', 'N', 'IBU_CF_SR_REG_PRODUCT');
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProductFilterRegionCode,
'IBU_CF_SR_ALL_PRODUCT_RG',
'N', 'N', 'IBU_CF_SR_ALL_PRODUCT');
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_PRIMARY_CONTACT_RG',
'Y', 'N', l_newPrimaryContactRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_IDENTIFY_PRODUCT_RG',
'Y', 'N', l_newIdentifyProductRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'N', 'N', l_newAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProblemDetailsRegionCode,
'IBU_CF_SR_PRIMARY_CONTACT_RG',
'Y', 'N', l_newPrimaryContactRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newIdentifyProblemRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newProblemDetailsRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'N', 'N', l_newAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newReviewRegionCode,
'IBU_CF_SR_ATTACHMENTS_RG',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newReviewRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'Y', 'N', l_newAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newReviewRegionCode,
'IBU_CF_SR_PROB_DETAILS',
'N', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newContactInfoRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'Y', 'N', l_newAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newContactInfoRegionCode,
'IBU_CF_SR_PRIMARY_CONTACT_RG',
'Y', 'N', l_newPrimaryContactRegionCode);
IF (l_newUpdateAddressExists) THEN
-- need to clone the IBU_CF_SR_DTL_CONTACT region
l_newDtlContactAddrRegionCode := 'IBU_CF_SR_210_A' || p_ApplId;
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlContactAddrRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'Y', 'N', l_newUpdateAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlProgressRegionCode,
'IBU_CF_SR_DTL_PROGRESS_OPT_RG',
'Y', 'N', l_newDtlProgOptionsRegionCode);
IF (l_newUpdateAddressExists) THEN
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlOverviewRegionCode,
'IBU_CF_SR_ADDRESS_RG',
'N', 'N', l_newUpdateAddressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlOverviewRegionCode,
'IBU_CF_SR_DTL_PROGRESS_RG',
'Y', 'N', l_newDtlProgressRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlOverviewRegionCode,
'IBU_CF_SR_DTL_ACTS_RG',
'Y', 'N', null);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlTabsRegionCode,
'IBU_CF_SR_DTL_OVERVIEW_TAB_RG',
'Y', 'N', l_newDtlOverviewRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlTabsRegionCode,
'IBU_CF_SR_DTL_RESOLN_TAB_RG',
'N', 'N', l_newDtlResolnRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newDtlDetailsRegionCode,
'IBU_CF_SR_DTL_TABS_RG',
'Y', 'N', l_newDtlTabsRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newCreateTemplateRegionCode,
'IBU_CF_SR_IDENTIFY_PRODUCT_RG',
'Y', 'N', l_newTemplateProductRegionCode);
l_newUpdateTemplateRegionCode := 'IBU_CF_SR_320_A' || p_ApplId;
l_newUpdateTemplateRegionCode,
672, FALSE);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateTemplateRegionCode,
'IBU_CF_SR_IDENTIFY_PRODUCT_RG',
'Y', 'N', l_newTemplateProductRegionCode);
l_newUpdateTemplateExists := TRUE;
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newFilterRegionCode,
'IBU_CF_SR_VW_PRODUCT_FILTER_RG',
'Y', 'N', l_newProductFilterRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newSearchViewRegionCode,
'IBU_CF_SR_VW_FILTER_RG',
'Y', 'N', l_newFilterRegionCode);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newCreateViewRegionCode,
'IBU_CF_SR_VW_FILTER_RG',
'Y', 'N', l_newFilterRegionCode);
l_newUpdateViewRegionCode := 'IBU_CF_SR_440_A' || p_ApplId;
l_newUpdateViewRegionCode,
672, FALSE);
CS_CF_UPG_UTL_PKG.UpdateRegionItems(l_newUpdateViewRegionCode,
'IBU_CF_SR_VW_FILTER_RG',
'Y', 'N', l_newFilterRegionCode);
l_newUpdateViewExists := TRUE;
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_CR_IDENTIFY_PROBLEM',
'APPLICATION',
l_ApplId,
NULL,
NULL,
NULL,
l_newIdentifyProblemRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_CR_REVIEW',
'APPLICATION',
l_ApplId,
NULL,
NULL,
NULL,
l_newReviewRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_CR_PROBLEM_DETAILS',
'APPLICATION',
l_ApplId,
NULL,
NULL,
NULL,
l_newProblemDetailsRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_CR_CONTACT_INFORMATION',
'APPLICATION',
l_ApplId,
NULL,
NULL,
NULL,
l_newContactInfoRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_DETAILS',
'APPLICATION',
l_ApplId,
NULL,
NULL,
NULL,
l_newDtlDetailsRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_TEMP_CREATE',
'APPLICATION',
l_ApplId,
NULL,
NULL,
NULL,
l_newCreateTemplateRegionCode,
'672');
IF (l_newUpdateTemplateExists) THEN
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_TEMP_UPDATE',
'APPLICATION',
l_ApplId,
NULL,
NULL,
NULL,
l_newUpdateTemplateRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_VIEW_SUMMARY',
'APPLICATION',
l_ApplId,
NULL,
NULL,
NULL,
l_newSearchViewRegionCode,
'672');
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_VIEW_CREATE',
'APPLICATION',
l_ApplId,
NULL,
NULL,
NULL,
l_newCreateViewRegionCode,
'672');
IF (l_newUpdateViewExists) THEN
CS_CF_UPG_UTL_PKG.Insert_New_Target(
'IBU_SR_VIEW_UPDATE',
'APPLICATION',
l_ApplId,
NULL,
NULL,
NULL,
l_newUpdateViewRegionCode,
'672');
SELECT a.profile_option_name,
b.level_value,
b.level_value_application_id,
b.profile_option_value,
1 "PRIORITY"
FROM fnd_profile_option_values b, fnd_profile_options a
WHERE b.level_id = 10003
AND b.level_value = respId
AND b.level_value_application_id = respApplId
AND a.profile_option_id = b.profile_option_id
AND b.application_id = 672
AND a.profile_option_name in ('IBU_A_SR_KB_OPTION')
UNION
SELECT a.profile_option_name,
b.level_value,
b.level_value_application_id,
b.profile_option_value,
2 "PRIORITY"
FROM fnd_profile_option_values b, fnd_profile_options a
WHERE b.level_id = 10002
AND b.level_value = respApplId
AND a.profile_option_id = b.profile_option_id
AND b.application_id = 672
AND a.profile_option_name in ('IBU_A_SR_KB_OPTION')
UNION
SELECT a.profile_option_name,
b.level_value,
b.level_value_application_id,
b.profile_option_value,
3 "PRIORITY"
FROM fnd_profile_option_values b, fnd_profile_options a
WHERE b.level_id = 10001
AND a.profile_option_id = b.profile_option_id
AND b.application_id = 672
AND a.profile_option_name in ('IBU_A_SR_KB_OPTION')
ORDER BY PROFILE_OPTION_NAME, PRIORITY;
l_ProfileTable.DELETE;
CS_CF_UPG_UTL_PKG.Insert_New_Target('IBU_SR_CRE',
'RESP',
l_respId,
l_respApplId,
NULL,
NULL,
to_char((0-to_number(l_respId || l_respApplId))),
'NULL');
SELECT a.profile_option_name,
b.level_value,
b.level_value_application_id,
b.profile_option_value,
1 "PRIORITY"
FROM fnd_profile_option_values b, fnd_profile_options a
WHERE b.level_id = 10002
AND b.level_value = applId
AND a.profile_option_id = b.profile_option_id
AND b.application_id = 672
AND a.profile_option_name in ('IBU_A_SR_KB_OPTION')
UNION
SELECT a.profile_option_name,
b.level_value,
b.level_value_application_id,
b.profile_option_value,
2 "PRIORITY"
FROM fnd_profile_option_values b, fnd_profile_options a
WHERE b.level_id = 10001
AND a.profile_option_id = b.profile_option_id
AND b.application_id = 672
AND a.profile_option_name in ('IBU_A_SR_KB_OPTION')
ORDER BY PROFILE_OPTION_NAME, PRIORITY;
l_ProfileTable.DELETE;
CS_CF_UPG_UTL_PKG.Insert_New_Target('IBU_SR_CRE',
'APPLICATION',
l_applId,
NULL,
NULL,
NULL,
to_char(0-l_applId),
NULL);
l_last_updated_by NUMBER;
SELECT last_updated_by
FROM cs_cf_source_cxt_targets
WHERE source_context_type_id = p_source_context_type_id;
SELECT count(*)
FROM cs_cf_source_cxt_targets
WHERE source_context_type_id = p_source_context_type_id;
SELECT SOURCE_CONTEXT_TYPE_ID
INTO l_source_context_type_id
FROM cs_cf_source_cxt_types
WHERE SOURCE_CODE = 'IBU_SR_CRE'
AND CONTEXT_TYPE = 'GLOBAL';
FETCH l_cur INTO l_last_updated_by;
IF (l_last_updated_by in (-1,1,2) AND l_count2 > 0) THEN
UPDATE cs_cf_source_cxt_targets
SET cust_target_value1 = '10'
WHERE source_context_type_id = l_source_context_type_id;