Re: Command / Utilty for add a member to all Logical files

Top of my headf, no system at hand:

CMD AddMemeber

PARM PF         *CHAR 10

PARM MEMEBER     *CHAR 10


CPP

PGM (PF MEMBER)
DCL PF         *CHAR 10
DCL MEMBER     *CHAR 10

DCF QDSPFMBR

ADDPFM &PF NEWMBR(&MEMBER)

DSPDBR &PF *OUTFILE QTEMP/QDSPFMBR

:LOOP
RCVF
(MONMSG CPF0864 THEN(GOTO END)
ADDLFM &PFMBR &MEMBER

GOTO LOOP

:END

ENDPGM

You have to correct outfilename and parameter names on commands and field names of oiutfile.


Op 4-7-2024 om 16:02 schreef gio.cot via MIDRANGE-L:

Hi all

i'm a looking for an utility that given Phisical file and Member, add to all
Logical file of the Phisical file the given member

thanks in advance

Gio