The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE UPDATE_ATTRIBUTES (
P_API_VERSION IN NUMBER DEFAULT 1.0,
P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
P_CUSTOMER_TRX_ID IN NUMBER,
P_ELECT_INV_WEB_ADDRESS IN VARCHAR2,
P_ELECT_INV_STATUS IN VARCHAR2,
P_ELECT_INV_ACCESS_KEY IN VARCHAR2,
P_ELECT_INV_PROTOCOL IN VARCHAR2,
X_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_MSG_DATA OUT NOCOPY VARCHAR2)
IS
PRAGMA AUTONOMOUS_TRANSACTION; --bug 10171220
SELECT COUNT(*) as cnt FROM JL_BR_CUSTOMER_TRX_EXTS
WHERE CUSTOMER_TRX_ID = P_CUSTOMER_TRX_ID;
SELECT 'Yes' as isExist
FROM JL_BR_CUSTOMER_TRX_EXTS
WHERE CUSTOMER_TRX_ID = P_CUSTOMER_TRX_ID
AND ELECTRONIC_INV_STATUS IN ('2','7');
SELECT 'Yes' as isExist FROM RA_CUSTOMER_TRX_ALL
WHERE CUSTOMER_TRX_ID = P_CUSTOMER_TRX_ID;
SELECT 'Yes' as isExist FROM FND_LOOKUPS
WHERE LOOKUP_TYPE = 'JLBR_EI_STATUS'
AND LOOKUP_CODE = P_ELECT_INV_STATUS;
l_api_name VARCHAR2(30) := 'UPDATES_ATTRIBUTES';
INSERT INTO JL_BR_CUSTOMER_TRX_EXTS(
CUSTOMER_TRX_ID,
ELECTRONIC_INV_WEB_ADDRESS,
ELECTRONIC_INV_STATUS,
ELECTRONIC_INV_ACCESS_KEY,
ELECTRONIC_INV_PROTOCOL,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
CREATED_BY,
CREATION_DATE)
VALUES (
P_CUSTOMER_TRX_ID,
P_ELECT_INV_WEB_ADDRESS,
P_ELECT_INV_STATUS,
P_ELECT_INV_ACCESS_KEY,
P_ELECT_INV_PROTOCOL,
SYSDATE,
-1,
-1,
-1,
SYSDATE);
UPDATE JL_BR_CUSTOMER_TRX_EXTS
SET ELECTRONIC_INV_WEB_ADDRESS = P_ELECT_INV_WEB_ADDRESS,
ELECTRONIC_INV_STATUS = P_ELECT_INV_STATUS,
ELECTRONIC_INV_ACCESS_KEY = P_ELECT_INV_ACCESS_KEY,
ELECTRONIC_INV_PROTOCOL = P_ELECT_INV_PROTOCOL,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATED_BY = -1,
LAST_UPDATE_LOGIN = -1
WHERE CUSTOMER_TRX_ID = P_CUSTOMER_TRX_ID;
UPDATE AR_PAYMENT_SCHEDULES_ALL
SET SELECTED_FOR_RECEIPT_BATCH_ID = NULL
WHERE CUSTOMER_TRX_ID = P_CUSTOMER_TRX_ID;
END UPDATE_ATTRIBUTES;
PROCEDURE INSERT_LOG (
P_API_VERSION IN NUMBER DEFAULT 1.0,
P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
P_CUSTOMER_TRX_ID IN NUMBER,
P_OCCURRENCE_DATE IN DATE,
P_ELECT_INV_STATUS IN VARCHAR2,
P_MESSAGE_TEXT IN VARCHAR2,
X_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_MSG_DATA OUT NOCOPY VARCHAR2)
IS
PRAGMA AUTONOMOUS_TRANSACTION; --bug 10171220
SELECT ELECTRONIC_INV_STATUS
FROM JL_BR_CUSTOMER_TRX_EXTS
WHERE CUSTOMER_TRX_ID = P_CUSTOMER_TRX_ID;
SELECT 'Yes' as isExist FROM RA_CUSTOMER_TRX_ALL
WHERE CUSTOMER_TRX_ID = P_CUSTOMER_TRX_ID;
SELECT 'Yes' as isExist FROM FND_LOOKUPS
WHERE LOOKUP_TYPE = 'JLBR_EI_STATUS'
AND LOOKUP_CODE = P_ELECT_INV_STATUS;
l_api_name VARCHAR2(30) := 'INSERT_LOG';
INSERT INTO JL_BR_EILOG (
OCCURRENCE_ID,
OCCURRENCE_DATE,
CUSTOMER_TRX_ID,
ELECTRONIC_INV_STATUS,
MESSAGE_TXT,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
CREATION_DATE,
CREATED_BY)
VALUES
(JL_BR_EILOG_S.NEXTVAL,
P_OCCURRENCE_DATE,
P_CUSTOMER_TRX_ID,
P_ELECT_INV_STATUS,
P_MESSAGE_TEXT,
SYSDATE,
-1,
-1,
SYSDATE,
-1);
END INSERT_LOG;
SELECT
identifier_value state
FROM
hz_geography_identifiers geo_ident,
hz_geo_name_references geo_ref,
hz_locations loc
WHERE
loc.location_id = P_LOCATION_ID
and loc.location_id = geo_ref.location_id
and geo_ref.geography_type = 'STATE'
and geo_ident.identifier_subtype = 'IBGE'
and geo_ident.geography_id = geo_ref.geography_id
and geo_ident.geography_type = 'STATE';
SELECT
identifier_value city
FROM
hz_geography_identifiers geo_ident,
hz_geo_name_references geo_ref,
hz_locations loc
WHERE
loc.location_id = P_LOCATION_ID
and loc.location_id = geo_ref.location_id
and geo_ref.geography_type = 'CITY'
and geo_ident.identifier_subtype = 'IBGE'
and geo_ident.geography_id = geo_ref.geography_id
and geo_ident.geography_type = 'CITY';
SELECT meaning
FROM FND_LOOKUPS
WHERE lookup_type = 'JLBR_CBANK_COUNTRY_CODES'
and lookup_code = (SELECT country
FROM hz_locations
WHERE location_id = P_LOCATION_ID);
SELECT
'Yes' as isexist
FROM HZ_LOCATIONS
WHERE
location_id = P_LOCATION_ID;