The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT RRS.SITE_ID
,RRS.NAME
,RRS.SITE_IDENTIFICATION_NUMBER
,ITF.ERROR_MESSAGE
FROM RRS_SITES_VL RRS
,PN_LOCATIONS_ITF ITF
WHERE ITF.BATCH_NAME = P_BATCH_NAME
AND RRS.SITE_ID = ITF.SITE_ID
AND ITF.ERROR_MESSAGE IS NOT NULL ;
CURSOR UPDATE_ADDRESS_CUR IS
SELECT HZ.COUNTRY
,HZ.ADDRESS1
,HZ.ADDRESS2
,HZ.ADDRESS3
,HZ.ADDRESS4
,HZ.CITY
,HZ.POSTAL_CODE
,HZ.STATE
,HZ.PROVINCE
,HZ.COUNTY
,HZ.ADDRESS_STYLE
,PN.BATCH_NAME
,PN.SITE_ID
FROM
HZ_LOCATIONS HZ
,RRS_SITES_B RRS
,PN_LOCATIONS_ITF PN
WHERE HZ.LOCATION_ID = RRS.LOCATION_ID
AND PN.SITE_ID = RRS.SITE_ID
AND PN.BATCH_NAME = p_batch_name
FOR UPDATE;
CURSOR UPDATE_LOCATION_ID IS
SELECT SITE_ID
,LOCATION_ID
FROM PN_LOCATIONS_ITF
WHERE BATCH_NAME = P_BATCH_NAME
AND ERROR_MESSAGE IS NULL ;
FOR rec IN UPDATE_ADDRESS_CUR LOOP
UPDATE PN_LOCATIONS_ITF
SET COUNTRY = rec.COUNTRY
,ADDRESS_LINE1 = rec.ADDRESS1
,ADDRESS_LINE2 = rec.ADDRESS2
,ADDRESS_LINE3 = rec.ADDRESS3
,ADDRESS_LINE4 = rec.ADDRESS4
,CITY = rec.CITY
,ZIP_CODE = rec.POSTAL_CODE
,STATE = rec.STATE
,PROVINCE = rec.PROVINCE
,COUNTY = rec.COUNTY
,ADDRESS_STYLE = rec.ADDRESS_STYLE
WHERE CURRENT OF UPDATE_ADDRESS_CUR;
/*FOR rec IN UPDATE_ADDRESS_CUR LOOP
UPDATE PN_LOCATIONS_ITF
SET COUNTRY = rec.COUNTRY
,ADDRESS_LINE1 = rec.ADDRESS1
,ADDRESS_LINE2 = rec.ADDRESS2
,ADDRESS_LINE3 = rec.ADDRESS3
,ADDRESS_LINE4 = rec.ADDRESS4
,CITY = rec.CITY
,ZIP_CODE = rec.POSTAL_CODE
,STATE = rec.STATE
,PROVINCE = rec.PROVINCE
,COUNTY = rec.COUNTY
,ADDRESS_STYLE = rec.ADDRESS_STYLE
WHERE SITE_ID = rec.SITE_ID
AND BATCH_NAME = rec.BATCH_NAME ;
FOR rec IN UPDATE_LOCATION_ID LOOP
UPDATE RRS_SITES_B RRS
SET RRS.PROPERTY_LOCATION_ID = rec.LOCATION_ID
WHERE RRS.SITE_ID = rec.SITE_ID ;
DELETE FROM PN_LOCATIONS_ITF WHERE BATCH_NAME = p_batch_name ;
PROCEDURE DELETE_TEMPLATE
(
p_site_id IN NUMBER
)
IS
BEGIN
DELETE FROM RRS_SITES_EXT_TL WHERE SITE_ID = p_site_id;
DELETE FROM RRS_SITES_EXT_B WHERE SITE_ID = p_site_id;
DELETE FROM RRS_SITE_USES WHERE SITE_ID = p_site_id;
DELETE FROM RRS_SITES_TL WHERE SITE_ID = p_site_id;
DELETE FROM RRS_SITES_B WHERE SITE_ID = p_site_id;
END DELETE_TEMPLATE;
SELECT HL.COUNTRY,FTV.TERRITORY_SHORT_NAME
INTO x_country_code,x_country_name
FROM HZ_LOCATIONS HL, FND_TERRITORIES_VL FTV
WHERE FTV.TERRITORY_CODE = HL.COUNTRY
AND HL.LOCATION_ID = p_location_id;