> I tried with MVS.GLOBAL.ZONE, MVSD, DDDEF, SMPPTS  and got the DDDEF 
> definition. When it runs with MVS.GLOBAL.CSI, GLOBAL, GLOBALZONE, ZONEINDEX, 
> I get msg GIM32000W. 
> The fact it works with DDDEF, proves, so I believe, that the code is ok.

Well that's good, it proves your code works for the SMPPTS DDDEF entry case, 
but that's all.

>     Address LINKMVS "QIFGIMQZ pcsi Zone Entry Ent_Name"

What programming language is this, REXX?  SMP/E doesn't have a supplied REXX 
interface for the query.  What is program QIFGIMQZ?  That's not the program 
GIMAPI supplied by SMP/E.  Perhaps the issue is with QIFGIMQZ and not with the 
code snippet you pasted.

Kurt Quackenbush
IBM  |  z/OS SMP/E and z/OSMF Software Management  |  [email protected]

Chuck Norris never uses CHECK when he applies PTFs.

-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of 
ITschak Mugzach
Sent: Tuesday, July 5, 2022 2:24 PM
To: [email protected]
Subject: [EXTERNAL] Re: GIMAPI and ZONEINDEX

Kurt,

I tried with MVS.GLOBAL.ZONE, MVSD, DDDEF, SMPPTS  and got the DDDEF 
definition. When it runs with MVS.GLOBAL.CSI, GLOBAL, GLOBALZONE, ZONEINDEX, I 
get msg GIM32000W. The fact it works with DDDEF, proves, so I believe, that the 
code is ok. See the code below, the first code snip works well, the second one 
fails.

    Csi_Len   = Length(Csi_Dsn)            /* CSI dsname length  */
    Csi_Len   = D2C(Csi_Len,4)             /* in base 16 word    */
    PCSI      = Csi_Len||Csi_Dsn           /* chain len & dsn    */
    Zone      = 'MVSD'
    Entry     = 'DDDEF'                    /* Required zone      */
    Ent_Name  = 'SMPPTS'                   /* list al zones      */
    Zone_List = ''                         /* zone names list    */
    Address LINKMVS "QIFGIMQZ pcsi Zone Entry Ent_Name"

    This call fails:
    Csi_Len   = Length(Csi_Dsn)            /* CSI dsname length  */
    Csi_Len   = D2C(Csi_Len,4)             /* in base 16 word    */
    PCSI      = Csi_Len||Csi_Dsn           /* chain len & dsn    */
    Zone      = 'GLOBAL'
    Entry     = 'GLOBALZONE'               /* Required zone      */
    Ent_Name  = 'ZONEINDEX'                /* list al zones      */
    Address LINKMVS "QIFGIMQZ pcsi Zone Entry Ent_Name"

ITschak

ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Continuous Monitoring for 
z/OS, x/Linux & IBM I **| z/VM coming soon  *




On Tue, Jul 5, 2022 at 8:47 PM Kurt J. Quackenbush <[email protected]> wrote:

> > I am querying SMPF using GIMPAPI. works fine. however, when I query 
> > for
> CSI = MVS.GLOBAL.csi ZONE=GLOBAL ENTRY=GLOBALZONE subentry=ZONEINDX 
> (ignore length vars),
> > I get msg GIM32000W NO ENTRIES MATCHING THE SPECIFIED CRITERIA FOUND.
> > I checked the CSI and it does have a zoneindex defined with a list 
> > of
> zones...
>
> That query works for me.  I would make sure you're specifying the 
> correct CSI data set name (the data set for the global, not a CSI data 
> set for a target or dlib zone), check your spelling for all values, 
> and your parameter lengths for all values.
>
> Kurt Quackenbush
> IBM  |  z/OS SMP/E and z/OSMF Software Management  |  [email protected]
>
> Chuck Norris never uses CHECK when he applies PTFs.
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to [email protected] with the message: INFO IBM-MAIN
>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
[email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to