cat > script <<'+-+-+-+-+-END-OF-FILE-+-+-+-+-+'
run report from 'test.rpt' set '$MSTESTDB';
run report from 'test.rpt' set '$MSTESTDB';
+-+-+-+-+-END-OF-FILE-+-+-+-+-+
chmod 644 script
cat > stdout <<'+-+-+-+-+-END-OF-FILE-+-+-+-+-+'
* Mosca2 February 1981150
Jones7 February 198133.95
Kilroy16 February 1981250
Wladislaw27 February 198155
Jones3 April 198125
Mosca4 May 1981200
Wladislaw12 May 198125
Peterson6 June 198150
Wladislaw25 June 198175
Jones12 August 1981300
























































* Mosca2 February 1981150
Jones7 February 198133.95
Kilroy16 February 1981250
Wladislaw27 February 198155
Jones3 April 198125
Mosca4 May 1981200
Wladislaw12 May 198125
Peterson6 June 198150
Wladislaw25 June 198175
Jones12 August 1981300
























































* 
+-+-+-+-+-END-OF-FILE-+-+-+-+-+
chmod 644 stdout
cat > tag <<'+-+-+-+-+-END-OF-FILE-+-+-+-+-+'
Check to see if run report will execute consectively successfully
+-+-+-+-+-END-OF-FILE-+-+-+-+-+
chmod 644 tag
cat > test.rpt <<'+-+-+-+-+-END-OF-FILE-+-+-+-+-+'
parameters
	char	dbname;
end

let DATABASE = dbname;

select from loans ;
for each record
	print name , date, amount,newline;
end;

+-+-+-+-+-END-OF-FILE-+-+-+-+-+
chmod 644 test.rpt
