IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

IGGCSI00 R15 = 8, CSI reason = X'FFFF0308'


IBM Mainframe Forums -> PL/I & Assembler
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
steve-myers

Active Member


Joined: 30 Nov 2013
Posts: 917
Location: The Universe

PostPosted: Thu Aug 06, 2015 10:29 pm
Reply with quote

I'm trying to use IGGCSI00; it's ending with R15 = 8, and the reason code is X'FFFF0308'. The FFFF is expected, but the 0308 is not in the manual. On a hunch, I figured the 03 in 0308 was extraneous: it was really 0008. That is in the manual - "The CSIOPTNS value is not F or blank." I checked CSIOPTNS; it is C'F' as it should be. Anyone have an idea? The data set filter is ** and a catalog name is specified. I'm asking for return fields ENTYPE, ENTNAME, and VOLSER.

A related question. How are multiple volume serials returned? The manual is not helpful.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen

PostPosted: Fri Aug 07, 2015 11:04 am
Reply with quote

Just '**' or 'HLQ.**' ?
Back to top
View user's profile Send private message
steve-myers

Active Member


Joined: 30 Nov 2013
Posts: 917
Location: The Universe

PostPosted: Fri Aug 07, 2015 11:30 am
Reply with quote

** with a catalog name - the master catalog, as it happens. Here's as much diagnostics as I can muster at the moment. The catalog name has been redacted.
Code:
IGGCSI00 RC = 8, REASON = X'FFFF0308'                                     
CSIPARMS -                                                                 
0002C354 0000     0 0002C360 0002C560  8002C830          *..C-..E-..H.    *
FILTER -                                                                   
0002C560 0000     0 5C5C4040 40404040  40404040 40404040 ***              *
0002C570 0010    16 40404040 40404040  40404040 40404040 *                *
0002C580 0020    32 40404040 40404040  40404040          *                *
0002C590 0030    48                                 4040 *                *
0002C5A0 0040    64 40404040 40404040  40404040 40404040 *                *
0002C5B0 0050    80 40404040 40404040  40404040 40404040 *                *
0002C5C0 0060    96 40404040 40404040  40404040 40404040 *                *
0002C5D0 0070   112 40404040 40404040  40404040 40404040 *                *
0002C5E0 0080   128 40404040 C1C34040  40404040 40404040 *    AC          *
0002C5F0 0090   144 40404040 C340E8C6  0003C5D5 E3E8D7C5 *    C YF..ENTYPE*
0002C600 00A0   160 4040C5D5 E3D5C1D4  C540E5D6 D3E2C5D9 *  ENTNAME VOLSER*
0002C610 00B0   176 4040                                 *                *
CATRETN -                                                                 
0002C830 0000     0 00010000 00000000  00000000 00000000 *................*
0002C840 0010    16 00000000 00000000  00000000 00000000 *................*
0002C850 0020    32 00000000 00000000  00000000 00000000 *................*
0002C860 0030    48 00000000 00000000  00000000 00000000 *................*
0002C870 0040    64 00000000 00000000  00000000 00000000 *................*
0002C880 0050    80 00000000 00000000  00000000 00000000 *................*
0002C890 0060    96 00000000 00000000  00000000 00000000 *................*
0002C8A0 0070   112 00000000 00000000  00000000 00000000 *................*
0002C8B0 0080   128 00000000 00000000  00000000 00000000 *................*
0002C8C0 0090   144 00000000 00000000  00000000 00000000 *................*
0002C8D0 00A0   160 00000000 00000000  00000000 00000000 *................*
0002C8E0 00B0   176 00000000 00000000  00000000 00000000 *................*
0002C8F0 00C0   192 00000000 00000000  00000000 00000000 *................*
0002C900 00D0   208 00000000 00000000  00000000 00000000 *................*
0002C910 00E0   224 00000000 00000000  00000000 00000000 *................*
0002C920 00F0   240 00000000 00000000  00000000 00000000 *................*
The dump is formatted 16 bytes / line. The stuff on the left is address, hex offset in the block, decimal offset in the block.

The block labelled FILTER is the CSIFIELD data area. The block labelled CATRETN is the first 256 bytes of the return area
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen

PostPosted: Fri Aug 07, 2015 11:54 am
Reply with quote

As far as I know the filter has to start with a HLQ, something like 'XXX.**'
Back to top
View user's profile Send private message
steve-myers

Active Member


Joined: 30 Nov 2013
Posts: 917
Location: The Universe

PostPosted: Fri Aug 07, 2015 5:35 pm
Reply with quote

DFSMS Managing Catalogs wrote:
A double asterisk indicates that zero or more qualifiers can occupy that position. A double asterisk cannot precede or follow any characters; it must be preceded or followed by either a period or a blank.
I agree ** is not so smart if no catalog is specified, but I'm specifying a catalog.

The IGGCSILC sample program in SYS1.SAMPLIB uses **.

Looking at IGGCSILC gives me an idea for something to check. Its initial CSIOPTS is C'Y Y',X'00' (CSIOPTS is a 4 byte area). Mine is C'C YF'. I'm going to change that C in the first position to Y. I'll be back in 10 minutes or so.
Back to top
View user's profile Send private message
steve-myers

Active Member


Joined: 30 Nov 2013
Posts: 917
Location: The Universe

PostPosted: Fri Aug 07, 2015 5:41 pm
Reply with quote

That did it! Now all I have to do is examine the entries.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen

PostPosted: Fri Aug 07, 2015 7:13 pm
Reply with quote

Quote:
I agree ** is not so smart if no catalog is specified, but I'm specifying a catalog.


Right.

Quote:
That did it! Now all I have to do is examine the entries.


Good shot.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> PL/I & Assembler

 


Similar Topics
Topic Forum Replies
No new posts Reorg abended with REASON=X'00E40347' DB2 2
No new posts REASON 00D70014 in load utility DB2 6
No new posts Error 0C1 Reason Code 1 with branch i... PL/I & Assembler 3
No new posts ABEND=04E FOR REASON=00E50013 DB2 4
No new posts Error Creating KSDS file, REASON CODE... JCL & VSAM 8
Search our Forums:

Back to Top