How to check that Source Of a Printer File exists in a Library (Any Cmd like RTVMBRD)?

Guest.Visitor · 05-31-2004 05:55 AM

Is there any cmd to check that a particular printer file exists in a specific library. RTVMBRD cmd works only on database files. Any such cmd for PRTF.

If you can assume that the file in question would have to be a printer file, never a file of some other type, you can use CHKOBJ. CHKOBJ OBJ(QSYSPRT) OBJTYPE(*FILE) If it's possible that the file might exist, but be a database file, display file, or whatever, you could use the CHGPRTF command and monitor for CPF7304. CHGPRTF FILE(PRINTFILE) MONMSG MSGID(CPF7304) EXEC(DO) /* it's not a printer file, or it doesn't exist */ ENDDO DB

Guest.Visitor · 05-31-2004 08:34 PM

CHKOBJ and CHPPRTF works on Object not on Source. I have conditions in which i have to make check specifically on source. It might be possible that Object is present but source is not avaliable; then in that case how i can check whether PRTF source is present in a particular library or not.

Guest.Visitor · 06-01-2004 05:01 AM

Then CHKOBJ is still the command, but with additional options for the specific member. CHKOBJ OBJ(sourcelib/sourcefile) OBJTYPE(*FILE) MBR(sourcembr) HTH - Lee.

Guest.Visitor · 06-01-2004 05:02 AM

DSPOBJD OBJ(PRTF) OBJTYPE(*FILE) DETAIL(*SERVICE) Assuming that the object exists, this command will identify the source from which the object was created. Note that this does not mean that the source still exists or, if it does exist, that it is really the source used to create the object. Look at the various dates to determine that.

**M.Savino** · 06-01-2004 06:24 AM

See Source below. Something like it should work for you.

Code

**ukpi1b** · 06-01-2004 08:33 AM

If library name and source file are defined, try: PGM DCL &RECN *DEC (10 0) RTVMBRD FILE(yourLIB/yourSRC) MBR(yourFile)NBRCURRCD(&RECN) MONMSG CPF9815 EXEC(..........) EOJ: ENDPGM

Guest.Visitor · 06-01-2004 08:53 PM

Is there any cmd to check that a particular printer file exists in a specific library. RTVMBRD cmd works only on database files. Any such cmd for PRTF.

Guest.Visitor · 06-01-2004 08:53 PM

Thanks Lee The command u suggested works fine. CHKOBJ OBJ(sourcelib/sourcefile) OBJTYPE(*FILE) MBR(sourcembr) It's the best option suited according to my requirements. Alakh

Thread: How to check that Source Of a Printer File exists in a Library (Any Cmd like RTVMBRD)?

Thread Tools