View previous topic :: View next topic
|
Author |
Message |
steve-myers
Active Member
Joined: 30 Nov 2013 Posts: 917 Location: The Universe
|
|
|
|
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 |
|
|
PeterHolland
Global Moderator
Joined: 27 Oct 2009 Posts: 2481 Location: Netherlands, Amstelveen
|
|
|
|
Just '**' or 'HLQ.**' ? |
|
Back to top |
|
|
steve-myers
Active Member
Joined: 30 Nov 2013 Posts: 917 Location: The Universe
|
|
|
|
** 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 |
|
|
PeterHolland
Global Moderator
Joined: 27 Oct 2009 Posts: 2481 Location: Netherlands, Amstelveen
|
|
|
|
As far as I know the filter has to start with a HLQ, something like 'XXX.**' |
|
Back to top |
|
|
steve-myers
Active Member
Joined: 30 Nov 2013 Posts: 917 Location: The Universe
|
|
|
|
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 |
|
|
steve-myers
Active Member
Joined: 30 Nov 2013 Posts: 917 Location: The Universe
|
|
|
|
That did it! Now all I have to do is examine the entries. |
|
Back to top |
|
|
PeterHolland
Global Moderator
Joined: 27 Oct 2009 Posts: 2481 Location: Netherlands, Amstelveen
|
|
|
|
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 |
|
|
|