You don’t need to EXECLOAD an exec file as a rexx file to use it as a pipe stage. I’d argue that makes things even more obscure. (Did you also do the EXECDROP)
If you want to run an exec file (or any file) as a pipe stage, use the rexx stage… If you want to make a “self running pipe” MY EXEC A: /* */ parse source . . myfn myft myfm . MyEnv . If ‘?’ = myEnv then signal IMAPIPE address command ‘PIPE … | REXX (myfn myft myfm) … | … Exit rc IMAPIPE: < do plumbing things here > No need to “EXECLOAD” anything, and subsequently no need for EXECDROP so the user environment is reset. On Fri, Aug 12, 2022 at 06:03 <[email protected]> wrote: > Am 12.08.2022 um 06:02 schrieb Hobart Spitz: > > I had to create copies of file type REXX, in addition to the ones I > > had, type EXEC. I neve did that again. > > I never did the copy to MDisk, only in storage. Excerpt: > > > parse source . . sn st sm . /* get fileID of this prgm */ > > if st = 'EXEC' then do /* EXEC part starts here */ > > ... /* do some preparations */ > > 'EXL' sn st sm sn 'REXX (PUSH' /* make this file a REXX */ > > 'PIPE(sep ! end ?)', /* do the work */ > > '! ...', /* ... */ > > '?f:', /* from FANOUT */ > > '! rexx' sn, /* special treatment */ > > '! ...', /* ... */ > > end /* end of EXEC part */ > > else do /* REXX starts here */ > > ... /* do the special work */ > > end /* end of REXX part */ > > "EXL" is short for EXECLOAD. > > Ciao.....Mike >
