You can try this: //LISTDIR EXEC PGM=IKJEFT01, // PARM='HFSDIRC / /SERVICE' //* //SYSPROC DD DISP=SHR,DSN=SYS1.SBPXEXEC // DD DISP=SHR,DSN=userid.TEST.REXX //SYSTSPRT DD SYSOUT=* //SYSTSIN DD DUMMY //* //*
Then do some data manipulation. I sort with file manager. > On Sep 29, 2021, at 16:21, Paul Gilmartin > <0000000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > > On Wed, 29 Sep 2021 15:47:42 -0400, James Crudele wrote: > >> /* Rexx HFSDIRC */ >> parse arg dir1 dir2 junk >> dir1 = strip(dir1) >> dir2 = strip(dir2) >> if dir1 = "" or dir2 = "" then do >> say "Two directories must be specified" >> exit 4 >> end >> "oshell du "dir1" > /tmp/lsdir1" >> "oshell du "dir2" > /tmp/lsdir2" >> "oget '/tmp/lsdir1' 'userid.DIR1'" >> "oget '/tmp/lsdir2' 'userid.DIR2'" >> > Where do you do the compare? > > "du" reports only the total number of blocks in each directory. > I suspect the OP wanted greater precision. > > What if the directories have non-portable names? > > This would be more legible with less typing if you omit the TSO commands > and run an OMVS exec. > >>>> On Sep 28, 2021, at 22:22, Bruce Hewson wrote: >>> ... >>> We are looking for a way to compare 2 filesystem structures, starting at >>> root '/'. >>> ... > > -- gil > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
