RE: Long Procedure Names

["Jon Paris" <Jon.Paris@xxxxxxxxxxxxxx>]

 >> Unfortunately, RPG doesn't offer us a "LikePrototype" keyword

It kinda does - at least as far as the proc ptr initialization is concerned.
The support was added in ???? hmmm - can't recall.  Maybe V4R4?
If you combine this with a procptr on the prototype (as in CallThis below)
you can get close to what you seem to be after.  Or have I missed the point?

     d ppr1            s               *   procptr inz(%paddr(pr1))
     d ppr2            s               *   procptr inz(%paddr(pr2))

     d ppr             s               *   procptr

     d pr1             pr

     d pr2             pr

     d CallThis        pr                  ExtProc(ppr)

      /Free
         ppr = ppr1;
         CallThis();  // calls pr1
         ppr = ppr2;
         CallThis();  // calls pr2


Jon Paris