|
simpler than that. Each line ends with *NONE > -----Original Message----- > From: Gary Kuznitz [SMTP:docfxit@calwest.net] > Sent: Wednesday, November 17, 1999 3:25 PM > To: MI400@midrange.com > Subject: Re: Objects changing in real time > > Now you've really sparked my interest. There have been many times when > I wanted to know what was eating up space. > > I'm having a hard time understanding where to break each line. If there > was a strange character at the beginning of each line like an @ it would > be easier to tell where the record starts. Is there any possibility you > could zip this file up and email it to me privately? I certainly > understand > if you don't want to. > > Thanks a ton, > > Gary > > > [Leif Svalgaard] > > Here is the output of a program I just ran to get all objects that have > > changed today on my small box. It only takes a few seconds to run. The > > lines are long so you will have to do some cutting and pasting into > (say) a > > word processor to make sense of it. At the bottom are the declarations > that > > describe the record layout. > > > > > > LSV CTXDLIST *FILE PF 10000020480 > > 0991117120020LSV 040300 > > 991117120023LIFE LSV LIFE Y 00000 *S*NONE > > QGPL ZAUDJR0000*JRNRCV 10062955520Security Journal > > Receiver For PSAudit 0990826095201KVG > > > 040300 991117120135LIFE KVG LIFE N 00000 *S*NONE > QGPL > > QPRINT *OUTQ 10000049152Default Printer Output > Queue > > 0990326140325QPGMR 990801 040300 > > 991117112826LIFE QSYS S1012B9RY99111700084 *S*NONE > QRECOVERY > > QDBJRN0052*JRNRCV 10000143360 0991116172040QSYS > > > 040300 991117120025LIFE QSYS LIFE N 00000 > > *S*NONE QRPLOBJ QF1FFF77EF*PGM > 10000024576*CURLIB/PLAY > > 0991117105832VDG 040300 991117110113LIFE VDG > > > LIFE Y99111700001 *U*NONE QRPLOBJ QF2008E444*PGM > > > 10000016384*CURLIB/PLAYCALL 0991117110038VDG > 040300 > > 991117111145LIFE VDG LIFE Y99111700001 *U*NONE QSPL > > > Q04079N001*FILE PF 10004071424Spool Data Base File > > 0990326140831QSPL 040300 991117104642LIFE > QSYS > > S1012B9RY 00000 *S*NONE QSPL Q04079N003*FILE > PF > > 10004288512Spool Data Base File 0990723132227QSPL > > 040300 991117104610LIFE QSYS S1012B9RY 00000 > *S*NONE QSPL > > Q04079N004*FILE PF 10003620864Spool Data Base File > > 0990723132218QSPL 040300 991117112826LIFE > QSYS > > S1012B9RY 00000 *S*NONE QSPL Q04079N005*FILE > PF > > 10003313664Spool Data Base File 0990723132212QSPL > > 040300 991117112826LIFE QSYS S1012B9RY99082600001 > *S*NONE QSYS > > QSYSNOMAX *JOBQ 10000020480SYSTEM > SUBSYSTEM JOB QUEUE > > 0980318231511QSYS 980326990326135702040300 > > 991117091039LIFE *IBM 00000000Y99111700029 *S*NONE > QSYS > > QADBXREF *FILE PF 10001212416Cross reference physical file > > > 0980318235416QSYS 980326990326135702040300 > > 991117120025LIFE *IBM 00000000Y99111500051 *S*NONE > QSYS > > QHST99320C*FILE PF 1000021708809911161722270991117105019 > > 0991116172227QSYS 040300 991117105020LIFE > QSYS > > LIFE Y99111600002 *S*NONE QSYS QPADEV0002*MSGQ > > > 10000012288Work Station Message Queue > > 0990729191649QTCP 040300 991117105302LIFE > QTCP > > LIFE Y 00000 *S*NONE QSYS QPADEV0004*MSGQ > > > 10000012288Work Station Message Queue > > 0990809171812QTCP 040300 991117115814LIFE > QTCP > > LIFE Y 00000 *S*NONE QSYS QPADEV0006*MSGQ > > > 10000012288Work Station Message Queue > > 0990922134807QTCP 040300 991117104654LIFE > QTCP > > LIFE Y 00000 *S*NONE QUSRSYS QEZDEBUG *OUTQ > > > 10000024576Cleanup output queue for dumps > > 0980320004035QSYS 990801990326143421040300 > 991117104954LIFE *IBM > > 00000000Y99111700052 *S*NONE QUSRSYS QEZJOBLOG > *OUTQ > > 10000073728Cleanup output queue for job logs > > 0980323175718QSYS 990801990326143421040300 > 991117105003LIFE *IBM > > 00000000Y99111700086 *S*NONE QUSRSYS LSV *MSGQ > > > 10000012288 0990801214425LSV 040300 > > 991117115814LIFE QSECOFR LIFE Y99111200055 *S*NONE > QUSRSYS > > QSECOFR *MSGQ 10000012288User QSECOFR message > queue > > 0990326140922QSECOFR 990801 040300 > > 991117103655LIFE QSYS S1012B9RY99091700019 *S*NONE > QUSRSYS > > VDG *MSGQ 10000012288 0991011145305LSV > > > 040300 991117104654LIFE LSV LIFE Y99111700013 > > *S*NONE VDG PLAY *PGM 10000024576 > > 0991117110112VDG 040300 991117110113LIFE VDG > > > LIFE Y99111700001 *U*NONE VDG PLAYCALL *PGM > > > > 10000016384 0991117111144VDG 040300 > > 991117111145LIFE VDG LIFE Y99111700001 *U*NONE VDG > > > TESTCR3 *PGM 10000024576 0991117093944VDG > > > > 040300 991117093945LIFE VDG LIFE Y99111700001 > > *U*NONE VDG QMISRC *FILE PF 10003530752MI > Sources > > 0100129120004PMC 991026991020091333040300 > 991117111142LIFE LSV > > PENTA421Y99111600031 *S*NONE VDG TOPC *FILE PF > > > 10000045056Simple 132-char File to send to PC > > 0990408133818LSV 991026991020091333040300 > 991117090910LIFE LSV > > PENTA421Y99111600003 *S*NONE > > > > DCL DD LBUF-OBJ-LIB CHAR(10) DIR; > > DCL DD LBUF-OBJ-NAME CHAR(10) DIR; > > DCL DD LBUF-OBJ-TYPE CHAR(10) DIR; > > DCL DD LBUF-OBJ-ATTR CHAR(10) DIR; > > DCL DD LBUF-FREED CHAR( 1) DIR; > > DCL DD LBUF-OBJ-SIZE ZND(10,0) DIR; > > DCL DD LBUF-TEXT-DESCIPTION CHAR(50) DIR; > > DCL DD LBUF-DAMAGED CHAR( 1) DIR; > > DCL DD LBUF-CREATION-DATE CHAR( 6) DIR; > > DCL DD LBUF-CREATION-TIME CHAR( 6) DIR; > > DCL DD LBUF-OBJ-OWNER CHAR(10) DIR; > > DCL DD LBUF-SAVE-DATE CHAR( 6) DIR; > > DCL DD LBUF-RESTORE-DATE CHAR( 6) DIR; > > DCL DD LBUF-RESTORE-TIME CHAR( 6) DIR; > > DCL DD LBUF-SYSTEM-LEVEL CHAR( 6) DIR; > > DCL DD LBUF-SOURCE-FILE CHAR(10) DIR; > > DCL DD LBUF-SOURCE-LIB CHAR(10) DIR; > > DCL DD LBUF-SOURCE-MBR CHAR(10) DIR; > > DCL DD LBUF-SOURCE-DATE CHAR( 6) DIR; > > DCL DD LBUF-SOURCE-TIME CHAR( 6) DIR; > > DCL DD LBUF-CHANGE-DATE CHAR( 6) DIR; > > DCL DD LBUF-CHANGE-TIME CHAR( 6) DIR; > > DCL DD LBUF-SYSTEM-NAME CHAR( 8) DIR; > > DCL DD LBUF-CRT-BY-USER CHAR(10) DIR; > > DCL DD LBUF-SYSTEM-CRT-ON CHAR( 8) DIR; > > DCL DD LBUF-USAGE-UPDATED CHAR( 1) DIR; > > DCL DD LBUF-LAST-USED-DATE CHAR( 6) DIR; > > DCL DD LBUF-DAYS-USED-COUNT ZND( 5,0) DIR; > > DCL DD LBUF-RESET-DATE CHAR( 6) DIR; > > DCL DD LBUF-OBJ-DOMAIN CHAR( 2) DIR; > > DCL DD LBUF-AUDITING-VALUE CHAR(10) DIR; > > +--- > | This is the MI Programmers Mailing List! > | To submit a new message, send your mail to MI400@midrange.com. > | To subscribe to this list send email to MI400-SUB@midrange.com. > | To unsubscribe from this list send email to MI400-UNSUB@midrange.com. > | Questions should be directed to the list owner/operator: > dr2@cssas400.com > +--- +--- | This is the MI Programmers Mailing List! | To submit a new message, send your mail to MI400@midrange.com. | To subscribe to this list send email to MI400-SUB@midrange.com. | To unsubscribe from this list send email to MI400-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: dr2@cssas400.com +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
midrange.com
