MVSFORUMS.com

[vani]

In QMF, we can use the LIST command to get a list of QMF objects in the QMF Objects list panel. Is there any way in which this list can be saved or exported to a data set?

Alternatively, can the list of QMF objects belonging to a particular owner be extracted from any QMF internal table?

[kolusu]

vani,

You can export the object list, but it would be cumbersome. Check this link for exporting the object list

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DSQGS071/2.1.4?DT=20000828131620

For your second question you need the owner parm on the list command.Check this link for detailed explanation of LIST command

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DSQRF071/1.48?DT=20000828131906

Hope this helps...

cheers

kolusu

[SureshKumar]

Vani,
As Kolusu said this is a cumbersome process, it depends on how much of effort you want to put in. Maybe somebody has done this on this board. We can write a QMF batch process to take in the Owner Id and run it in a loop thru a Cobol program. Pass the Owner Id, read the relevant Q tables - Q_OBJECT_DIRECTORY, and EXPORT + QTYPE + QOWNER '.' QNAME-TEXT. Keep exporting all the Queries for a particular owner is finished. I am not a rexx expert, but you can also do it in rexx. Following is the information from the Q.OBJECT_DIRECTORY
NAME TBNAME TBCREATOR COLNO COLTYPE LENGTH
------------------ ------------------ --------- ------ -------- ------
MODIFIED OBJECT_DIRECTORY Q 9 TIMESTMP 10
LAST_USED OBJECT_DIRECTORY Q 10 TIMESTMP 10
OWNER OBJECT_DIRECTORY Q 1 CHAR 8
NAME OBJECT_DIRECTORY Q 2 VARCHAR 18
TYPE OBJECT_DIRECTORY Q 3 CHAR 8
SUBTYPE OBJECT_DIRECTORY Q 4 CHAR 8
OBJECTLEVEL OBJECT_DIRECTORY Q 5 INTEGER 4
RESTRICTED OBJECT_DIRECTORY Q 6 CHAR 1
MODEL OBJECT_DIRECTORY Q 7 CHAR 8
CREATED OBJECT_DIRECTORY Q 8 TIMESTMP 10