The following lines contain the word 'select', 'insert', 'update' or 'delete':
FUNCTION insert_interface_errors(
p_customer_trx_id IN NUMBER,
p_message_text IN VARCHAR2,
p_invalid_value IN VARCHAR2,
p_validation_name IN VARCHAR2
)
RETURN BOOLEAN IS
CURSOR interface_line IS
SELECT interface_line_id
FROM ra_interface_lines_gt
WHERE customer_trx_id = p_customer_trx_id;
cannot_insert_error EXCEPTION;
raise cannot_insert_error;
WHEN cannot_insert_error THEN
arp_standard.debug('-- Found exception in ja_th_ar_tax_invoice.' ||
p_validation_name);
arp_standard.debug('-- Cannot insert the error record into ' ||
'ra_interface_errors.');
'ja_th_ar_tax_invoice.insert_interface_errors.');
END insert_interface_errors;
IF insert_interface_errors(
p_customer_trx_id,
fnd_message.get,
fnd_date.date_to_chardate(p_trx_date),
'validate_trx_date') THEN
return(0);
FUNCTION update_last_issued_date(
p_customer_trx_id IN NUMBER,
p_cust_trx_type_id IN NUMBER,
p_trx_date IN DATE,
p_created_from IN VARCHAR2
)
RETURN NUMBER IS
CURSOR last_issued_date IS
SELECT global_attribute2
FROM ra_cust_trx_types
WHERE cust_trx_type_id = p_cust_trx_type_id
FOR UPDATE OF global_attribute2 NOWAIT;
UPDATE ra_cust_trx_types
SET global_attribute2 = fnd_date.date_to_canonical(p_trx_date)
WHERE CURRENT OF last_issued_date;
SELECT name
INTO trx_type_name
FROM ra_cust_trx_types
WHERE cust_trx_type_id = p_cust_trx_type_id;
IF insert_interface_errors(
p_customer_trx_id,
fnd_message.get,
fnd_date.date_to_chardate(p_trx_date),
'update_last_issued_date') THEN
return(0);
'ja_th_ar_tax_invoice.update_last_issued_date.');
END update_last_issued_date;