Q: How can I prevent the printing of the empty page at the end of every .LIS file?
A: Delete the last line in the .LIS file thru an editor or this can be automated with CALL SYSTEM USING command which would execute the following SQR code. This program reads an ascii file, removes the last line (the line having the Form Feed) from it and writes the output to another ascii file.
---------------------------- Example code begins here ------------------------
#define record-length 400
begin-report
input $finp type=char
input $foutp type=char
open $finp as 1 for-reading record={record-length} status=#stat
if #stat != 0
stop
end-if
open $foutp as 2 for-writing record={record-length} status=#stat
if #stat != 0
stop
end-if
read 1 into $record:{record-length}
while 1
move $record to $previous_record
read 1 into $record:{record-length}
if #end-file
break
end-if
write 2 from $previous_record
end-while
close 1
close 2
end-report