Set RPG Free
RPG Free Format is the younger (and imho much sexier) version of your grandads RPG Fixed Format.
RPG ILE (RPGLE) has a clear readable way of handling the SETGT (Set Greater Than) and SETLL (Set Lower Limits):
dcl-c constantnicholas 'NICK';
// if end of file
*inlr = *on;
Confused by RPG Versions?
IBM branding has always managed to make a complete hash of things and this might explain why RPG/4 is sometimes called RPG/400 (if talking about it being column-based) and RPG/5 or RPG/free or RPG Freeformat or RPG/7 (referring to the IBM i Version you are on)