MIDRANGE dot COM Mailing List Archive



Home » MIDRANGE-L » May 2014

Re: Identify all occurances of specific Jobd(s) on the system



fixed

Paul

You could do a search - maybe google, maybe in Infocenter - for jobd( - this would be the beginning of its use as a parameter.

You might also consider looking at the panel groups that contain help text - they all start with QH, I believe - I see some in QSYS and many in QHLPSYS - there is an API to retrieve help text - here is a brief sample of its usage -

PGM

DCL &USPTR *PTR ADDRESS(*NULL)
DCL &RCVVAR *CHAR 5000
DCL &RCVVARLEN *INT 4 5000
DCL &FMTNAM *CHAR 8 'RHLP0100'
DCL &HLPIDS *CHAR 80
DCL &HLPID *CHAR 32 STG(*DEFINED) DEFVAR(&HLPIDS 1)
DCL &HLPOBJ *CHAR 10 STG(*DEFINED) DEFVAR(&HLPIDS 33)
DCL &HLPLIB *CHAR 10 STG(*DEFINED) DEFVAR(&HLPIDS 43)
DCL &HLPTYP *CHAR 10 STG(*DEFINED) DEFVAR(&HLPIDS 53)
DCL &HLPIDCNT *INT 4 1
DCL &HLPTXT *CHAR 5000 STG(*BASED) BASPTR(&USPTR)
DCL &HLPTXTLEN *INT 4 5000
DCL &EC *CHAR 8 X'0000000000000000'
DCL &USNAME *CHAR 20 'HELPTEXT QTEMP '
DCL &USSIZE *INT 4 5000
DCL &USINIT *CHAR 1 X'00'
CHGVAR &HLPID 'CPYF/MBROPT'
CHGVAR &HLPOBJ 'QHCPCMD1'
CHGVAR &HLPLIB '*LIBL'
CHGVAR &HLPTYP '*PNLGRP'
CALL QUSCRTUS (&USNAME 'HELPTEXT' &USSIZE &USINIT '*ALL' ' ' '*YES' +
&EC '*USER')
CALL QUSPTRUS (&USNAME &USPTR &ECD)
CALL QUHRHLPT (&RCVVAR &RCVVARLEN &FMTNAM &HLPIDS &HLPIDCNT &HLPTXT +
&HLPTXTLEN &EC)
MONMSG CPF6E3B

ENDPGM

I don't remember if the entire command help is retrieved using just the command name in &HLPID.

Another option might be to use the GENCMDDOC against every command on the system and search the resulting IFS files for JOBD.

HTH
Vern

On 5/9/2014 9:03 AM, Steinmetz, Paul wrote:
Bryan,

That's a thought.

I found more locations for jobd usage.
Subsystem descriptions.
3. Autostart job entries
4. Work station name entries
10. Prestart job entries

At this point I'm creating a list of any object that contains reference to a jobd.
Does anyone know if this list may already exist in manual or document.

Paul

-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Bryan Dietz
Sent: Friday, May 09, 2014 7:41 AM
To: Midrange Systems Technical Discussion
Subject: Re: Identify all occurances of specific Jobd(s) on the system

Not tested, just thinking aloud...
and assuming you are not using job accounting.

What if you assigned a special unique job accounting code to each of the jobds, you could then look thru the accounting journal for those specific codes.

--

Bryan


Steinmetz, Paul said the following on Thu, 5/8/2014 1:19 PM:
Rob,

Jobd usage does not show up in QAUDJRN, confirmed by IBM.
Only jobd changes.

Plan B?

Thanks
Paul
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l.







Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2014 by MIDRANGE dot 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 here. If you have questions about this, please contact