SELECT RNSREGN, COUNT(RNSINVN), SUM(RNSQTY), SUM(RNSTOT$) FROM WFILES/RNSORDP WHERE RNSREGN > 0 GROUP BY RNSREGN
SELECT BOHREGN, COUNT(BOHINVN), SUM(BOHQTY), SUM(BOHDTTOT) FROM WFILES/BOHEDR WHERE BOHREGN > 0 GROUP BY BOHREGN

 
There will be no reason to rename your columns because that will happen when SQL places the values in the RPG program variables that you will define.
 
Also, you probably should change your database so that you don’t have a field named “RNSTOT$”, but you might not have any choice for that. You don’t want characters such as “$” as part of a name. It can work, but it can be a problem someday. The sooner it is fixed, the better.
 
And actually all of those names should be changed. They are all too short to be very useful. Again, they will work; but better names will be useful in the future.
 
It’s not clear why you would want to do this in RPG. If you are only SELECTing rows and printing them, it would be far better to do it with Query Manager. Usually you would put SQL statements into a program only if you want the program to process the values. But you aren’t doing any processing. You’re just copying the values from the table to a printer.
 
Also, you didn’t say if you must use OPM RPG or ILE RPG. The names from your tables look like they are intended for the old OPM RPG. If that is what you need, you should tell us.
 
Other than that, Phil’s comments are right. Look at examples that are already provided in the Information Center first. Then show us what you have written for a program. We’ll help get you past any errors.
 
However, we don’t write programs for you.
 
Tom