The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT property_ID
INTO l_prop_ID
FROM pn_properties_all
WHERE property_code = x_property_code
AND org_ID = x_org_id;
SELECT property_ID
INTO l_prop_ID
FROM pn_properties_all
WHERE property_code = x_property_code
AND property_id <> x_property_id
AND org_ID = x_org_id;
procedure INSERT_ROW (
X_ORG_ID NUMBER,
X_ROWID in out NOCOPY VARCHAR2,
X_PROPERTY_ID in out NOCOPY NUMBER,
X_LAST_UPDATE_DATE DATE,
X_LAST_UPDATED_BY NUMBER,
X_CREATION_DATE DATE,
X_CREATED_BY NUMBER,
X_LAST_UPDATE_LOGIN NUMBER,
X_PROPERTY_NAME VARCHAR2,
X_PROPERTY_CODE VARCHAR2,
X_LOCATION_PARK_ID NUMBER,
X_ZONE VARCHAR2,
X_DISTRICT VARCHAR2,
X_COUNTRY VARCHAR2,
X_DESCRIPTION VARCHAR2,
X_PORTFOLIO VARCHAR2,
X_TENURE VARCHAR2,
X_CLASS VARCHAR2,
X_PROPERTY_STATUS VARCHAR2,
X_CONDITION VARCHAR2,
X_ACTIVE_PROPERTY VARCHAR2,
X_ATTRIBUTE_CATEGORY VARCHAR2,
X_ATTRIBUTE1 VARCHAR2,
X_ATTRIBUTE2 VARCHAR2,
X_ATTRIBUTE3 VARCHAR2,
X_ATTRIBUTE4 VARCHAR2,
X_ATTRIBUTE5 VARCHAR2,
X_ATTRIBUTE6 VARCHAR2,
X_ATTRIBUTE7 VARCHAR2,
X_ATTRIBUTE8 VARCHAR2,
X_ATTRIBUTE9 VARCHAR2,
X_ATTRIBUTE10 VARCHAR2,
X_ATTRIBUTE11 VARCHAR2,
X_ATTRIBUTE12 VARCHAR2,
X_ATTRIBUTE13 VARCHAR2,
X_ATTRIBUTE14 VARCHAR2,
X_ATTRIBUTE15 VARCHAR2
)
IS
CURSOR properties IS
SELECT ROWID
FROM PN_PROPERTIES_ALL
WHERE PROPERTY_ID = X_PROPERTY_ID;
PNP_DEBUG_PKG.debug ('PNT_PROPERTIES_PKG.INSERT_ROW (+)');
/* Select the nextval for Property Id */
IF ( X_PROPERTY_ID IS NULL) THEN
l_return_status := NULL;
SELECT pn_properties_s.NEXTVAL
INTO X_PROPERTY_ID
FROM dual;
INSERT INTO PN_PROPERTIES_ALL
(
ORG_ID,
PROPERTY_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
PROPERTY_NAME,
PROPERTY_CODE,
LOCATION_PARK_ID,
ZONE,
DISTRICT,
COUNTRY,
DESCRIPTION,
PORTFOLIO,
TENURE,
CLASS,
PROPERTY_STATUS,
CONDITION,
ACTIVE_PROPERTY,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15
)
VALUES
(
X_ORG_ID,
X_PROPERTY_ID,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_CREATION_DATE,
X_CREATED_BY,
X_LAST_UPDATE_LOGIN,
X_PROPERTY_NAME,
X_PROPERTY_CODE,
X_LOCATION_PARK_ID,
X_ZONE,
X_DISTRICT,
X_COUNTRY,
X_DESCRIPTION,
X_PORTFOLIO,
X_TENURE,
X_CLASS,
X_PROPERTY_STATUS,
X_CONDITION,
X_ACTIVE_PROPERTY,
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
);
PNP_DEBUG_PKG.debug ('PNT_PROPERTIES_PKG.INSERT_ROW(-)');
END INSERT_ROW;
SELECT *
FROM PN_PROPERTIES_ALL
WHERE PROPERTY_ID = X_PROPERTY_ID
FOR UPDATE OF property_id NOWAIT;
procedure UPDATE_ROW (
X_PROPERTY_ID NUMBER,
X_LAST_UPDATE_DATE DATE,
X_LAST_UPDATED_BY NUMBER,
X_LAST_UPDATE_LOGIN NUMBER,
X_PROPERTY_NAME VARCHAR2,
X_PROPERTY_CODE VARCHAR2,
X_LOCATION_PARK_ID NUMBER,
X_ZONE VARCHAR2,
X_DISTRICT VARCHAR2,
X_COUNTRY VARCHAR2,
X_DESCRIPTION VARCHAR2,
X_PORTFOLIO VARCHAR2,
X_TENURE VARCHAR2,
X_CLASS VARCHAR2,
X_PROPERTY_STATUS VARCHAR2,
X_CONDITION VARCHAR2,
X_ACTIVE_PROPERTY VARCHAR2,
X_ATTRIBUTE_CATEGORY VARCHAR2,
X_ATTRIBUTE1 VARCHAR2,
X_ATTRIBUTE2 VARCHAR2,
X_ATTRIBUTE3 VARCHAR2,
X_ATTRIBUTE4 VARCHAR2,
X_ATTRIBUTE5 VARCHAR2,
X_ATTRIBUTE6 VARCHAR2,
X_ATTRIBUTE7 VARCHAR2,
X_ATTRIBUTE8 VARCHAR2,
X_ATTRIBUTE9 VARCHAR2,
X_ATTRIBUTE10 VARCHAR2,
X_ATTRIBUTE11 VARCHAR2,
X_ATTRIBUTE12 VARCHAR2,
X_ATTRIBUTE13 VARCHAR2,
X_ATTRIBUTE14 VARCHAR2,
X_ATTRIBUTE15 VARCHAR2
)
IS
BEGIN
PNP_DEBUG_PKG.debug ('PNT_PROPERTIES_PKG.UPDATE_ROW (+)');
UPDATE PN_PROPERTIES_ALL
SET
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
PROPERTY_NAME = X_PROPERTY_NAME,
PROPERTY_CODE = X_PROPERTY_CODE,
LOCATION_PARK_ID = X_LOCATION_PARK_ID,
ZONE = X_ZONE,
DISTRICT = X_DISTRICT,
COUNTRY = X_COUNTRY,
DESCRIPTION = X_DESCRIPTION,
PORTFOLIO = X_PORTFOLIO,
TENURE = X_TENURE,
CLASS = X_CLASS,
PROPERTY_STATUS = X_PROPERTY_STATUS,
CONDITION = X_CONDITION,
ACTIVE_PROPERTY = X_ACTIVE_PROPERTY,
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
WHERE PROPERTY_ID = X_PROPERTY_ID;
PNP_DEBUG_PKG.debug ('PNT_PROPERTIES_PKG.UPDATE_ROW (-)');
END UPDATE_ROW;