Re: RPG (indented) listing...

[rob@xxxxxxxxx]

You're looking for something that takes this:
      /free
       for x = 1 to 5;
       if %error;
       Select;
       when badmsg='crud';
       //panic
       when badmsg='shucks';
       // more panic
       other;
       // just totally freak out
       EndSl;
       EndIf;
       EndFor;
      /end-free
and converts it to:

      /free
                         for x = 1 to 5;
                         | if %error;
                         | | Select;
                         | | when badmsg='crud';
                         | | | //panic
                         | | when badmsg='shucks';
                         | | | // more panic
                         | | other;
                         | | | // just totally freak out
                         | | EndSl;
                         | EndIf;
                         EndFor;
      /end-free
Sort of like the "Source, Show Indentation" part of the lpex editor in 
WDSC?
Only, I bet, you don't want the vertical bars, and quite so much 
indentation in between the /free and the for?

Rob Berendt