× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  • Subject: Objects changing in real time
  • From: Leif Svalgaard <l.svalgaard@xxxxxxxxxxxxx>
  • Date: Wed, 17 Nov 1999 12:48:15 -0600


[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
+---


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.