Re: Best way to convert from source PF to IFS source

On Mon, Feb 12, 2024 at 2:33 PM Don Brown <DBrown@xxxxxxxxxx> wrote:

If I want to run something similar I can just

strqsh
<Paste your example, with my library and source file>;
press Enter

Is that correct ?

Hi Don ...

- Yes, best if you use the bash shell. I haven't tried it in the ancient
default shell for QSH.
- Much easier if you're logging in via ssh to the
/QOpenSys/pkgs/bin/bash shell
- Note that I'm appending ".cblle" (in red below) to the name of the
file created in the IFS. If you're doing RPG, you might want to change that
string to .rgple or something.
- Remember it's all one line: you would have to edit it some to do it a
line at a time. Don't worry about wrap if you're doing it in the QP2TERM
green screen.

*for i in `find /QSYS.LIB/JWOEHR.LIB/QCBLSRC.**FILE | egrep '\.MBR$'`; do
system "CPYTOSTMF FROMMBR('$i') TOSTMF('`pwd`/`basename $i .MBR`.cblle')
ENDLINFMT(*LF) STMFCODPAG(*PCASCII)"; done*