The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 1
INTO dummy
FROM dual D
WHERE NOT EXISTS ( SELECT 1
FROM ar_cc_error_mappings E
WHERE E.cc_error_code = p_cc_error_code
AND E.cc_trx_category = p_cc_trx_category
AND E.receipt_method_id = p_receipt_method_id
AND ( E.rowid <> p_rowid OR p_rowid IS NULL ));
PROCEDURE Insert_Row(x_rowid OUT NOCOPY ROWID,
p_cc_error_code IN VARCHAR2,
p_cc_error_text IN VARCHAR2,
p_receipt_method_id IN NUMBER,
p_cc_trx_category IN VARCHAR2,
p_cc_action_code IN VARCHAR2,
p_no_days IN NUMBER,
p_subsequent_action_code IN VARCHAR2,
p_error_notes IN VARCHAR2,
p_last_update_date IN DATE,
p_last_updated_by IN NUMBER,
p_last_update_login IN NUMBER,
p_creation_date IN DATE,
p_created_by IN NUMBER,
x_object_version_number OUT NOCOPY NUMBER) IS
BEGIN
IF PG_DEBUG in ('Y', 'C') THEN
arp_util.debug( 'AR_CC_ERROR_MAPPINGS_PKG.Insert_Row()+' );
INSERT INTO ar_cc_error_mappings(
CC_ERROR_CODE,
CC_ERROR_TEXT,
RECEIPT_METHOD_ID,
CC_TRX_CATEGORY,
CC_ACTION_CODE,
NO_DAYS,
SUBSEQUENT_ACTION_CODE,
ERROR_NOTES,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
CREATION_DATE,
CREATED_BY,
OBJECT_VERSION_NUMBER)
VALUES(
p_cc_error_code,
p_cc_error_text,
p_receipt_method_id,
p_cc_trx_category,
p_cc_action_code,
p_no_days,
p_subsequent_action_code,
p_error_notes,
p_last_update_date,
p_last_updated_by,
p_last_update_login,
p_creation_date,
p_created_by,
x_object_version_number) RETURNING ROWID INTO x_rowid;
arp_util.debug( 'AR_CC_ERROR_MAPPINGS_PKG.Insert_Row()-' );
arp_util.debug( 'EXCEPTION AR_CC_ERROR_MAPPINGS_PKG.Insert_Row()' );
END Insert_Row;
PROCEDURE Update_Row(p_rowid IN ROWID,
p_cc_error_code IN VARCHAR2,
p_cc_error_text IN VARCHAR2,
p_receipt_method_id IN NUMBER,
p_cc_trx_category IN VARCHAR2,
p_cc_action_code IN VARCHAR2,
p_no_days IN NUMBER,
p_subsequent_action_code IN VARCHAR2,
p_error_notes IN VARCHAR2,
p_last_update_date IN DATE,
p_last_updated_by IN NUMBER,
p_last_update_login IN NUMBER,
x_object_version_number OUT NOCOPY NUMBER) IS
BEGIN
IF PG_DEBUG in ('Y', 'C') THEN
arp_util.debug( 'AR_CC_ERROR_MAPPINGS_PKG.Update_Row()+' );
UPDATE ar_cc_error_mappings
SET cc_error_code = p_cc_error_code,
cc_error_text=p_cc_error_text,
receipt_method_id=p_receipt_method_id,
cc_trx_category=p_cc_trx_category,
cc_action_code=p_cc_action_code,
no_days=p_no_days,
subsequent_action_code=p_subsequent_action_code,
error_notes=p_error_notes,
last_update_date=p_last_update_date,
last_updated_by=p_last_updated_by,
last_update_login=p_last_update_login,
object_version_number=object_version_number+1
WHERE rowid = p_rowid
RETURNING object_version_number INTO x_object_version_number;
arp_util.debug( 'AR_CC_ERROR_MAPPINGS_PKG.Update_Row()-' );
arp_util.debug( 'EXCEPTION: AR_CC_ERROR_MAPPINGS_PKG.Update_Row()' );
END Update_Row;
PROCEDURE Delete_Row(p_rowid IN ROWID) IS
BEGIN
IF PG_DEBUG in ('Y', 'C') THEN
arp_util.debug( 'EXCEPTION: AR_CC_ERROR_MAPPINGS_PKG.Delete_Row()+' );
Delete ar_cc_error_mappings
WHERE rowid = p_rowid;
arp_util.debug( 'EXCEPTION: AR_CC_ERROR_MAPPINGS_PKG.Delete_Row()-' );
arp_util.debug( 'EXCEPTION: AR_CC_ERROR_MAPPINGS_PKG.Delete_Row()' );
END Delete_row;
SELECT object_version_number
INTO l_object_version_number
FROM ar_cc_error_mappings
WHERE rowid = p_rowid
AND object_version_number = p_object_version_number
FOR UPDATE OF object_version_number NOWAIT;