declare
	cr_param paramlist;
	abc number;
begin

select balance into abc from balance_view where id=:customers.customer_id;

:global.my_var:=abc;
--clear_message();
--message('old balance Before parameter'||:global.my_var);



if :sale.card_id is null then
	message('No Transcation');
	--message('No Transcation');
else
	


 cr_param := create_parameter_list('CREATEP');

add_parameter(cr_param,'check_pass',text_parameter, :sale.customer_id);
add_parameter(cr_param,'date_pass',text_parameter, :sale.sale_date);
add_parameter(cr_param,'sale_id_pass',text_parameter, :sale.sale_id);
add_parameter(cr_param,'old_bal_pass',text_parameter, :global.my_var);
add_parameter(cr_param,'PARAMFORM',text_parameter, 'NO');
add_parameter(cr_param,'MAXIMIZE',text_parameter, 'YES');
-- add_parameter(cr_param,'DESTYPE',text_parameter, 'PRINTER');
 RUN_PRODUCT(REPORTS,'e:\super\reports\sale_single1', ASYNCHRONOUS,RUNTIME,FILESYSTEM,CR_PARAM,NULL);
 
 --message('Old Bal after paramter list'||:global.my_var);
 destroy_parameter_list(cr_param);
 
 
select sale_seq.nextval into :cbk.temp_sale_seq from dual;
end if;

end;

add_parameter(cr_param,'old_bal_pass',text_parameter, :global.my_var);