listfile and filelist are two different commands. One writes a text list, the other a 3270 panel (though iirc one of them can be persuaded to operate in the other mode? Check the options).
There is a solution for your problem but I'm away from my cms system at the moment. I'll check later (unless someone here knows the answer off the top of their head). i ------ Original Message ------ Received: Thu, 12 Jun 2008 02:19:53 PM BST From: Mary Anne Matyaz <[EMAIL PROTECTED]> To: [email protected] Subject: Vexxing Rexx > Ok, first off, I know it's spelled vexing. But that doesn't look as nice. :) > > > I'm having fun with rexx today. First, I'll tell you the problem I'm trying > to solve, in case theres a better way, then I'll > tell you the problem I'm having in my rexx exec. > > Problem: I have 50 some linuxes all sending their logs to > vmsysu:conlog:*linuxname. > *As it gets fuller, I'd like to know > which linux is spewing the most log. Right now I do a dirlist and go in to > each one looking for who has the most records. > I'd like to be able to total it up. Maybe even (gasp) write a report. > So I start with an itty bitty rexx exec. I'm just going to look at linux1 > and try to total it. With apologies to Kris for my > atrocious rexx coding, here it is: > > totrec = 0 > SET FILESP CONLOG > ACCESS .LINUX1 K > 'pipe (endchar ?)', > 'CMS FLIST * * K (NOCLEAR | STEM SFSREC.'; > Do i = 1 to sfsrec.0 > parse var SFSREC.i FNAME FTYPE FMODE FRECL FLEN FREC FBLK FDT FTM > totrec = totrec + FREC > End > say 'LINUX1 Total Records: ' totrec > RELEASE K > Exit; > > It seemed pretty simple to me. Of course it didn't work. So I tried some > PIPE commands in CMS. > PIPE CMS LISTF * * A | > file list a works. Creates the file named FILE > LIST A > However, > PIPE CMS FLIST * * A | > file list a doesn't work. Doesn't put it in > the file, but does display it on my screen. > > Normally, I'd just go with the output of listf. However, it doesn't have > size info. > > Any suggestions? Does FLIST not work in Pipes? How would I know that? > (Looked thru the rexx manual, pipes manual, cms cmds manual.) > > Thanks as always! > Mary Anne > > ---------------------------------------------------------------------- > For LINUX-390 subscribe / signoff / archive access instructions, > send email to [EMAIL PROTECTED] with the message: INFO LINUX-390 or visit > http://www.marist.edu/htbin/wlvindex?LINUX-390 > ---------------------------------------------------------------------- For LINUX-390 subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: INFO LINUX-390 or visit http://www.marist.edu/htbin/wlvindex?LINUX-390
