The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_gta_trx_succesed AR_GTA_TRX_UTIL.trx_rec_type; -- trx for insert into temp table for report
SELECT
TRX_LINE_SPLIT_FLAG
INTO
l_split_flag
FROM
AR_GTA_SYSTEM_PARAMETERS_all
WHERE org_id = p_org_id;
SELECT
sales_list_flag
INTO
l_sales_list_flag
FROM
AR_GTA_RULE_HEADERS_All
WHERE org_id = p_org_id
AND rule_header_id = p_transfer_id;
SELECT ar_gta_trx_lines_all_s.NEXTVAL INTO l_gta_trx_line_new.gta_trx_line_id FROM dual;
SELECT
AR_GTA_TRX_LINES_ALL_S.NEXTVAL
INTO
l_GTA_TRX_line_new.GTA_TRX_LINE_ID
FROM
dual;
SELECT
AR_GTA_TRX_LINES_ALL_S.NEXTVAL
INTO
l_GTA_TRX_line_new.GTA_TRX_LINE_ID
FROM
dual;
SELECT
AR_GTA_TRX_LINES_ALL_S.NEXTVAL
INTO
l_GTA_TRX_line_new.GTA_TRX_LINE_ID
FROM
dual;
SELECT
AR_GTA_TRX_HEADERS_ALL_S.NEXTVAL
INTO
l_GTA_TRX_Header_Rec.gta_trx_header_id
FROM
dual;
SELECT
AR_Gta_Trx_Lines_All_s.NEXTVAL
INTO
x_gta_trx_rec.trx_lines(l_index).gta_trx_line_id
FROM
dual;
SELECT
ctt.TYPE
INTO
l_trx_type
FROM
ra_customer_trx_all h
, ra_cust_trx_types_all ctt
WHERE ctt.cust_trx_type_id = h.cust_trx_type_id
AND ctt.Org_Id = h.Org_Id
AND h.customer_trx_id = p_gta_trx_rec.trx_header.ra_trx_id;
SELECT
COUNT(*)
INTO
l_warning_record_count
FROM
ar_gta_transfer_temp temp
WHERE temp.transaction_id = l_customer_trx_id
AND temp.succeeded = 'W';
INSERT INTO
ar_gta_transfer_temp t
(t.seq
, t.succeeded
, t.transaction_id
, t.transaction_num
, t.transaction_type
, t.customer_name
, t.amount
, t.failedreason
, t.gta_invoice_num
)
SELECT
ar_gta_transfer_temp_s.NEXTVAL
, 'Y'
, l_customer_trx_id
, l_trx_num
, l_trx_type
, l_cust_name
, l_amount
, NULL
, l_gta_inv_num
FROM
dual;
UPDATE
ar_gta_transfer_temp temp
SET
temp.amount = l_amount
WHERE temp.transaction_id = l_customer_trx_id
AND temp.succeeded = 'W';
SELECT
ctt.TYPE
INTO
l_trx_type
FROM
ra_customer_trx_all h
,ra_cust_trx_types_all ctt
WHERE h.CUST_TRX_TYPE_ID = ctt.CUST_TRX_TYPE_ID(+)
AND ctt.TYPE IN ('INV', 'CM', 'DM')
AND ctt.org_id = p_org_id
AND h.customer_trx_id = l_trx_id;
SELECT
limits.max_amount
, limits.max_num_of_line
INTO
l_max_amount
, l_max_line
FROM
ar_gta_tax_limits_all limits
WHERE limits.fp_tax_registration_number = l_fp_reg_num
AND limits.invoice_type = l_invoice_type
AND limits.org_id = p_org_id;
SELECT
sales_list_flag
INTO
l_sales_list_flag
FROM
AR_GTA_RULE_HEADERS_All
WHERE org_id = p_org_id
AND rule_header_id = p_transfer_id;
SELECT
limits.max_amount
, limits.max_num_of_line
INTO
l_max_amount
, l_max_line
FROM
ar_gta_tax_limits_all limits
WHERE limits.fp_tax_registration_number = l_fp_reg_num
AND limits.org_id = p_org_id;
SELECT
jgtla.max_amount
,jgtla.max_num_of_line
INTO
l_max_amount
, l_max_line
FROM
ar_gta_tax_limits_all jgtla
WHERE jgtla.fp_tax_registration_number = l_fp_reg_num
AND jgtla.invoice_type = l_gta_trx.trx_header.invoice_type
AND jgtla.org_id = p_org_id;
DELETE
ar_gta_transfer_temp temp
WHERE temp.transaction_id = l_gta_trx.trx_header.ra_trx_id
AND temp.succeeded = 'W';
INSERT INTO
ar_gta_transfer_temp t
(t.seq
, t.transaction_id
, t.succeeded
, t.transaction_num
, t.transaction_type
, t.customer_name
, t.amount
, t.failedreason
, t.gta_invoice_num
)
SELECT
ar_gta_transfer_temp_s.NEXTVAL
, l_gta_trx.trx_header.ra_trx_id
, 'N'
, l_gta_trx.trx_header.ra_trx_number
, 'CM'
, l_gta_trx.trx_header.bill_to_customer_name
, NULL
, l_error_string
, NULL
FROM
dual;