Suppose I modify the logic as follows. Does anyone see a problem with this?

Issue CSVQUERY OUTMJNM=name to determine the major name associated with some
address in "me." (Any old address.)

Get the jobstep program name from the JSCB. Issue CSVQUERY
INEPNAME=jscbpgnm,SEARCHMINOR=YES,OUTMJNM=eight_char_field to get the major
name associated with the possibly minor name from PGM=.

Compare the two. Equality means I am the jobstep program. (Neglecting the
"two programs/two libraries/one name" case.)

Charles

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Charles Mills
Sent: Wednesday, December 05, 2012 1:17 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Who loaded me?

Oh d***, you're absolutely right. Customer says EXEC PGM=alias but CSVQUERY
returns the major name. D***, d***, d***! That is absolutely a real-world
possibility even in my constrained set of cases.

The alias would be an alias for the main entry point so finding the nearest
minor name is not a solution. D***, d***, d***!

Back to the drawing board.

Charles

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Jeremy Nicoll - ls mainframes
Sent: Wednesday, December 05, 2012 12:28 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Who loaded me?

Charles Mills <charl...@mcn.org> wrote:

>Issue CSVQUERY
>INADDR=ptr_to_any_addr_in_my_pgm,SEARCH=JPALPA,SEARCHMINOR=NO,OUTEPNM=e
>ight_
>char_fld_in_writable_storage
>
> (I know some of those parms are defaults; I'm just being extra clear.) 
> Given RC=0, that gets me "my" name. Do I need anything else on 
> CXVQUERY other than the usual MF= considerations? Am I safe ignoring 
> PLISTVER and any other parameters?

Suppose someone's defined one or more aliases of the program concerned.  

Is there any combination of uses where the JCL could say EXEC PGM=PROGRAMx
but the CSVQUERY would return "PROGRAMy" - either when one or other of
PROGRAMx/y s the 'real' program, or when both PROGRAMx/y are aliases of
something else?

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email
to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to