Want to add 2 fields in report ARXAGMW.rdf

Question

Hi,
I want to add to fields in the report ARXAGMW.rdf.
The fields are:
- ps.trx_date transactiedatum, --transactiondate
- ps.amount_due_original factuurbedrag, --transactionamount
I changed the function below. I pasted not the whole code.
But when i run the report i get the error:
MSG-01001: after build_invoice_select
ORA-01789: query block has incorrect number of result columns
==> select rpad ( 'a' , 50 , '-' ) cust_name_inv , rpad ( 'a' , 30 , '-' ) cust_no_inv , rpad ( 'a' , 4000 , '-' ) sort_field1_inv , rpad ( 'a' , 4000 , '-' ) sort_field2_inv , 0 inv_tid_inv , 0 contact_site_id_inv , rpad ( 'a' , 60 , '-' ) cust_state_i
FUNCTION BUILD_INVOICE_SELECT
RETURN LONG IS
l_inv_sel LONG;
l_inv_sel1 LONG;
l_inv_sel2 LONG;
l_inv_sel3 LONG;
l_inv_sel4 LONG;
l_inv_sel5 LONG;
new_line VARCHAR2(10) := '
BEGIN
-- BUILD FIRST SELECT STATEMENT
srw.message('1000','inside build_invoice_select');
srw.message('1001','*** BUILDING SELECT #1 All outstanding transactions ***');
l_inv_sel1 :=
'select substrb(party.party_name,1,50) cust_name_inv,
cust_acct.account_number cust_no_inv,';
l_inv_sel1 := l_inv_sel1 || new_line;
if (:p_rep_type = 'ARXAGS') then
l_inv_sel1 := l_inv_sel1 || 'decode(upper(:p_in_sortoption),''CUSTOMER'',NULL,
arpt_sql_func_util.get_org_trx_type_details(ps.cust_trx_type_id,ps.org_id))';
elsif (:p_rep_type = 'ARXAGL') then
l_inv_sel1 := l_inv_sel1 || 'col.name';
elsif(:p_rep_type = 'ARXAGR') then
l_inv_sel1 := l_inv_sel1 || 'sales.name';
elsif(:p_rep_type = 'ARXAGF') then
l_inv_sel1 := l_inv_sel1 || :lp_accounting_flexfield;
end if;
l_inv_sel1 := l_inv_sel1 ||
' sort_field1_inv,' || new_line;
l_inv_sel1 := l_inv_sel1 ||
'arpt_sql_func_util.get_org_trx_type_details(ps.cust_trx_type_id,ps.org_id) sort_field2_inv,' || new_line;
if (:p_rep_type = 'ARXAGS') then
l_inv_sel1 := l_inv_sel1 ||
'decode(upper(:p_in_sortoption),''CUSTOMER'',-999,ps.cust_trx_type_id)';
elsif (:p_rep_type = 'ARXAGL') then
l_inv_sel1 := l_inv_sel1 || 'col.collector_id';
elsif(:p_rep_type = 'ARXAGR') then
l_inv_sel1 := l_inv_sel1 || 'nvl(sales.salesrep_id, -3)';
elsif(:p_rep_type = 'ARXAGF') then
l_inv_sel1 := l_inv_sel1 || 'c.code_combination_id';
end if;
l_inv_sel1 := l_inv_sel1 || ' inv_tid_inv, ';
l_inv_sel1 := l_inv_sel1 ||
' site.site_use_id contact_site_id_inv,
loc.state cust_state_inv,
loc.city cust_city_inv,
decode(:format_detailed,NULL,-1,acct_site.cust_acct_site_id) addr_id_inv,
nvl(cust_acct.cust_account_id,-999) cust_id_inv,
ps.payment_schedule_id payment_sched_id_inv,
ps.class class_inv,
ps.due_date due_date_inv,
amt_due_remaining_inv,
ps.trx_number invnum,
ceil(to_date(:as_of_date) - ps.due_date) days_past_due,
ps.amount_adjusted amount_adjusted_inv,
ps.amount_applied amount_applied_inv,
ps.amount_credited amount_credited_inv,
ps.gl_date gl_date_inv,
     ps.trx_date transactiedatum,
     ps.amount_due_original factuurbedrag,
decode(ps.invoice_currency_code, :functional_currency, NULL,
decode(ps.exchange_rate, NULL, ''*'', NULL)) data_converted_inv,
nvl(ps.exchange_rate, 1) ps_exchange_rate_inv, '
l_inv_sel1 := l_inv_sel1 ||
' arpt_sql_func_util.bucket_function(:bucket_line_type_0,
dh.amount_in_dispute,ps.amount_adjusted_pending,
:bucket_days_from_0,:bucket_days_to_0,
ps.due_date,:bucket_category,to_date(:as_of_date)) b0_inv,
arpt_sql_func_util.bucket_function(:bucket_line_type_1,
dh.amount_in_dispute,ps.amount_adjusted_pending,
:bucket_days_from_1,:bucket_days_to_1,
ps.due_date,:bucket_category,to_date(:as_of_date)) b1_inv,
arpt_sql_func_util.bucket_function(:bucket_line_type_2,
dh.amount_in_dispute,ps.amount_adjusted_pending,
:bucket_days_from_2,:bucket_days_to_2,
ps.due_date,:bucket_category,to_date(:as_of_date)) b2_inv,
arpt_sql_func_util.bucket_function(:bucket_line_type_3,
dh.amount_in_dispute,ps.amount_adjusted_pending,
:bucket_days_from_3,:bucket_days_to_3,
ps.due_date,:bucket_category,to_date(:as_of_date)) b3_inv,
arpt_sql_func_util.bucket_function(:bucket_line_type_4,
dh.amount_in_dispute,ps.amount_adjusted_pending,
:bucket_days_from_4,:bucket_days_to_4,
ps.due_date,:bucket_category,to_date(:as_of_date)) b4_inv,
arpt_sql_func_util.bucket_function(:bucket_line_type_5,
dh.amount_in_dispute,ps.amount_adjusted_pending,
:bucket_days_from_5,:bucket_days_to_5,
ps.due_date,:bucket_category,to_date(:as_of_date)) b5_inv,
arpt_sql_func_util.bucket_function(:bucket_line_type_6,
dh.amount_in_dispute,ps.amount_adjusted_pending,
:bucket_days_from_6,:bucket_days_to_6,
ps.due_date,:bucket_category,to_Date(:as_of_date)) b6_inv,';
l_inv_sel1 := l_inv_sel1 || :lp_acct_flex_bal_seg || ' company_inv,';
l_inv_sel1 := l_inv_sel1 || :lp_query_show_bill || ' cons_billing_number, ';
l_inv_sel1 := l_inv_sel1 || ' arpt_sql_func_util.get_org_trx_type_details(ps.cust_trx_type_id,ps.org_id)'
|| ' invoice_type_inv ';
IF upper(:p_mrcsobtype) = 'R' then
l_inv_sel1 := l_inv_sel1 ||
' from hz_cust_accounts cust_acct,
hz_parties party, ';
/*Bug 3487101 : Incorporated the logic of COMP_AMT_DUE_REM_INVFORMULA() in the main query itself */
l_inv_sel1 := l_inv_sel1 ||
'(select a.customer_id,
a.customer_site_use_id ,
a.customer_trx_id,
a.payment_schedule_id,
a.class ,
sum(a.primary_salesrep_id) primary_salesrep_id,
a.due_date ,
sum(a.amount_due_remaining) amt_due_remaining_inv,
a.trx_number,
a.amount_adjusted,
a.amount_applied ,
a.amount_credited ,
a.amount_adjusted_pending,
a.gl_date ,
          a.trx_date ,
Where do i have to add to two fields?
Regards,
thijs

Answer 1

This code is not formatted and therefore very hard to read. Please use the <pre></pre> tags to format code.
Error: ORA-01789: query block has incorrect number of result columns
Cause: You tried to execute a SELECT statement (probably a UNION or a UNION ALL), and all of the queries did not contain the same number of result columns.