Re: Help with Date Last Used Reporting...

Thanks Jim !

Especially like the info on how to dig into the query dfn !

Chuck

Jim Franz wrote:

> > I need to provide a listing of all queries on the system as well as all
> > files created by a query and the date last used...
> >
>
> The following will get you an outfile you can then query. I never trust what
> is on
> the *PRINT option is same as the outfile.
>
> DSPOBJD OBJ(*ALLUSR/*ALL) OBJTYPE(*ALL) DETAIL(*BASIC)
> OUTPUT(*OUTFILE) OUTFILE(QGPL/ZDSPOBJD)
>
> To get the files created by the queries, you will probably need to RTVQMQRY
> the *qrydfn to get file info.
>                      Retrieve Query Mgmt Query (RTVQMQRY)
>
> Type choices, press Enter.
>
> Query management query . . . . . > WOCOM1            Query Name
>   Library  . . . . . . . . . . . >   BNCPGM                      Name,
> *LIBL, *CURLIB
> Source file  . . . . . . . . . . > QQMQRYSRC                 Name
>   Library  . . . . . . . . . . . >   QGPL                            Name,
> *LIBL, *CURLIB
> Source member  . . . . . . . . . > *QMQRY                Name, *QMQRY
> Allow information from QRYDFN  . > *YES          *NO, *YES, *ONLY
>
> then look or read the source (this one does not output a file)
> QGPL/QQMQRYSRC/WOCOM1
>
>  H QM4 05 Q 01 E V W E R 01 03 00/12/29 12:59
>  V 1001 050 Cancelled Work Orders with Commens
>  V 5001 004 *HEX
>  SELECT
>    ALL       T01.WO#, T01.WOSTAT, T01.WOREC8, T01.WOID#, T02.GCSEQ#, T
>              T02.GCUSR, T02.GCDAT8
>    FROM      BNCFIL/WO T01,
>              BNCFIL/WOCM T02
>    WHERE     WO# = GCWO
>      AND(    WOSTAT IN ('X', 'Z')
>      AND     WOREC8 >= 20001101)
>  ****************** End of data
>
> hope this helps
> jim
> ----- Original Message -----
> From: "Chuck Lewis" <clewis@iquest.net>
> To: "Midrange-L List" <MIDRANGE-L@midrange.com>
> Sent: Friday, December 29, 2000 11:44 AM
> Subject: Help with Date Last Used Reporting...
>
> > Hi Folks,
> >
> > I need to provide a listing of all queries on the system as well as all
> > files created by a query and the date last used...
> >
> > I know how to use the wrkobjpdm command with wildcards but it doesn't
> > provide date last used. The dspobjd using *ALL for Object Name done to
> > screen OR print file includes the Date Last Used. BUT if I send it to an
> > outfile it does NOT include Date Last Used.
> >
> > Doing dspobjd with *ALL for Object Name to *PRINT with *Basic does not
> > provide it. With *Full or *Service it does but it is one MOTHER of a
> > report and would be a nightmare to dump to a DB file and edit...
> >
> > Am I missing a better way/is there some better way of doing this before
> > I "reinvent the wheel" ?
> >
> > Thanks and Happy New Year - and we should ALL be more relaxed this year,
> > eh ? ! :-)
> >
> > Chuck
> >
> > +---
> > | This is the Midrange System Mailing List!
> > | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> > | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
> > | To unsubscribe from this list send email to
> MIDRANGE-L-UNSUB@midrange.com.
> > | Questions should be directed to the list owner/operator:
> david@midrange.com
> > +---
>
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
> | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: david@midrange.com
> +---

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---