declare
plist Paramlist;
begin
plist := create_parameter_list('SLCL');
add_parameter(plist,'STC',text_parameter,:fees.stuid);
add_parameter(plist,'FMON',text_parameter,:fmonth);
add_parameter(plist,'TMON',text_parameter,:tmonth);
add_parameter(plist,'YY',text_parameter,:fyear);
--add_parameter(plist,'ZZ',text_parameter,:fyear);
add_parameter(plist,'paramform',text_parameter,'NO');
--add_parameter(plist,'destype',text_parameter,'PRINTER');
Run_Product(REPORTS, 'd:\bil\reports\challan1.REP', aSYNCHRONOUS, RUNTIME,
FILESYSTEM, plist);
destroy_parameter_list(plist);
end;
Done