Enhancement to the SELECT statement

Much like SQL can do two forms of CASE;
case myfield;
When 'fubar'
...
When 'ok'
...

or
case
when myfield='fubar'
...
When myfield='ok'
...

I'd like to see RPGLE be able to support two forms of the select statement
Select MySubprocedure();
When 'abort';
//...
When 'ok';
//...
Other;
//...
EndSl;

Along with
Select;
When MySubprocedure()='abort';
// ...
When MySubprocedure()='ok';
//...
Other;
//...
EndSL;

Rob Berendt