Re: DEVTYPE INFO=DASD

2016-07-25 Thread Reichman Joseph
First I want to make clear this posting contains nothing but general code 
(nothing to do with taxpayer code) there isn’t any IRS tax payer info in this 
post



 L 11R?+106 L(30) XC
 0002CFEC.  FFF0 000F F000 01000800  *...00...*  
     *..  *
 TEST

This is where AREA is at so area is at 11R? + 106

00110C 2086 AREA DSXL16 
006

Mapped by the IHADVA macro right ? Am I missing something ?


000 00010  9801+DVAIDASD DSECT  
   @H5A 01-
   
9802+***
   9803+*SECTION FOR INFO=DASD. 
   @H5C
   
9804+***
00 9805+ DS0CL16 INFOLIST 
POINTS TO LIST WITH INFO=DASD@H5C 01-
00 9806+DVAICYL  DSFL4   NUMBER OF 
CYLINDERS, EXCLUDING ALTERNATES @H5A 01-
04 9807+DVAITRK  DSFL4   TRACKS PER 
CYLINDER   @H5A 01-
08 9808+DVAIFLAG  DS   0XL1  FLAGS  
   @LvC 01-
08 9809+DVAIFLAG1 DS   X FLAGS WITH 
PREFERRED SYMBOLS  @H5A 01-
  000809810+DVAECKD1 EQU   X'80' ECKD 
SUPPORTED, ALSO ON FOR VIO DATA SETS @LvC 01-
  000409811+DVALRE1  EQU   X'40' LOCATE RECORD 
EXTENDED IS SUPPORTED   @H4A 01-


00110C 2086 AREA DSXL16


This is the beginning of my program


  F  19+R15  EQU   15
  E  21 XLNK EQU   14
00 90EC D00CC22  STM   R14,R12,12(R13)   SAVE 
CALLER'S REGISTERS
04 0DC0  23  BASR  R12,0 
ESTABLISH ADDRESSABILITY
R:CB  6  24  USING *,R12,R11 BASE 
REGISTER OF EXECUTING PROGRAM
06 41B0 CFFF00FFF25  LAR11,4095(,R12)
0A 41B0 B001126  LAR11,1(,R11)

This is DEVTYPE macro R6 points the DDNAME from SVC 99

0002D2 4160 C5F5005FB   224  LA R6,RETDDN+6 
0
225  DEVTYPE 
(R6),(AREA,L'AREA),INFOLIST=ILIST2 0
0002D6 0700 226+ CNOP  0,4ENSURE 
PARAMETER LIST ALIGNMENT  @L1A 0
0002D8 4D10 C2EE002F4   227+ BAS   1,IHB0032  SKIP OVER 
PARAMETER LIST @02C 0
0002DC 18   228+ DC0F'0',AL1(24)  LENGTH OF 
PARAMETER LIST @02C 0
0002DD 01   229+ DCAL1(1) VERSION 
OF PARAMETER LIST@L1A 0
0002DE 8000 230+ DCX'8000'DD NAME 
LOCATION WAS CODED0
0002E0  231+ DCA(0)   ADDRESS 
OF DD NAME0
0002E4  232+ DCA(0)   RESERVED 
OR UCB LIST LENGTH   0
0002E8 110C 233+ DCA(AREA)ADDRESS 
OF RESULT AREA   @L1A 0
0002EC 0010 234+ DCA(L'AREA)  SIZE OF 
RESULT AREA  @L1A 0

6R? L(8) XC
0002C4DB.  E2E8E2F0 F0F0F0F6*SYS6*  
TEST

This is the list of the DEVTYPE


  000314 07FE 251  BR R14   
  0
 252 ILIST2   DEVTYPE INFO=DASD 
 0
 000316 0001 253+ILIST2   DCH'1'   NUMBER 
OF ENTRIES IN INFO LIST   @02C 0
 000318 0210 254+ DCX'0210'DASD 
CODE@02C 0
 255 *B  SCANUCB
 0
 256 *NOPDSCBABC
 0



Joe Reichman
Joe Reichman

IT Specialist
Master Files Division
New Carrollton Federal Building, B7-182
OS:IT:AD:CP:I:IB
Flex M,T,Th,F
Home office (240) 863 - 3965
Office (240) 613-4350
Cell (917) 748-9693
TOD M - F  7:30 am  - 4:00 pm

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu

Re: DEVTYPE INFO=DASD

2016-07-24 Thread Joseph Reichman
I'll double check Tommorrow

 


> On Jul 24, 2016, at 3:43 PM, Campbell Jay <james.l.campb...@irs.gov> wrote:
> 
> Major Maximum Mea Culpa !
> I didn't do proper diligence.  : (
> No access to Joe's programs... and believed his output.
> I've spent the weekend getting IBM's example DEVTYPE MACRO to work.
> After  the successful run - My result matches Bill's...
> AREA = FFF0 000F F000 01000800
> 
> Gold star to Bill Godfrey. 
> Joe's got a code problem. 
> 
> Sincere apology to John Eells.
> ( Didn't mean to falsely contribute to the issue )
> 
> Have been restricting myself on postings for a while.
> ( Keep mouth shut - fool... Open mouth - remove all doubt )
> Think I'll restrict my postings even further.
> Even on in-house issues.
> 
> Sorry All... and Thanks !
> 
> Jay Campbell
> IBM OS Support Section
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On 
> Behalf Of Bill Godfrey
> Sent: Friday, July 22, 2016 10:34 AM
> To: IBM-MAIN@listserv.ua.edu
> Subject: Re: DEVTYPE INFO=DASD
> 
> The result I get from the same DEVTYPE macro is:
> 
> FFF0 000F F000 01000800
> 
> which differs from the OP in that there are 2 more bytes at the beginning in 
> my case.
> 
> My results have a fullword for the number of cylinders and a fullword for 
> tracks per cylinder, which agrees with all of these manuals:
> 
> z/OS 1.10
> http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2S350/7.2.1.5
> 
> z/OS 1.13
> http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2S380/7.2.1.5
> 
> z/OS 2.1 (page 272)
> http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/download/DGT3S300.pdf
> 
> I think the OP is just looking at the wrong address, 2 bytes beyond the 
> correct address.
> 
> Bill
>> On Fri, 22 Jul 2016 10:01:32 -0400, John Eells wrote:
>> 
>> I sent in an RCF this morning with what I thought the book should say, 
>> and copied the lead DADSM/CVAF developer (to make sure my correction 
>> does not inject some different problem!).
>> 
>> Bill Godfrey wrote:
>>> I think the possibility should be considered that the OP may have 
>>> mistakenly been looking at the 16 bytes at AREA+2, not AREA. If that 
>>> happened, and the missing bytes are hex , the results would be correct 
>>> for a device with 65520 cylinders.
>>> 
>>> Bill
>>> 
>>> On Thu, 21 Jul 2016 14:30:41 -0500, Mike Schwab wrote:
>>> 
>>>>>  Volume Data
>>>>>  Tracks . :  982,800
>>>> 
>>>> / 15 = 65,520 = X'FFF0'
>>>> 
>>>>> On Thu, Jul 21, 2016 at 2:17 PM, Campbell Jay <james.l.campb...@irs.gov> 
>>>>> wrote:
>>>>> Agree with John.
>>>>> Doc should say first halfword of bytes 0 - 3  &  4 - 7.
>>>>> 
>>>>> MJI2 e . : IM404A
>>>>> Command ===>
>>>>> 
>>>>> Unit . . : 3390
>>>>> 
>>>>>  Volume Data VTOC Data  Free Space   
>>>>> TracksCyls
>>>>>  Tracks . :  982,800 Tracks  . :   360   Size  . . :  
>>>>>269,730  17,974
>>>>>  %Used  . :   72   %Used . . :     1    Largest . :   
>>>>>  67,950   4,530
>>>>>  Trks/Cyls:   15Free DSCBS:17,892  Free
>>>>>   
>>>>>   Extents . :  36
>>>>> 
>>>>> Disclaimer: No idea what he's working on
>>>>> 
>>>>> Jay Campbell
>>>>> IBM OS Support Section
>> 
>>>>>> -Original Message-
>>>>>> From: IBM Mainframe Discussion List 
>>>>>> [mailto:IBM-MAIN@listserv.ua.edu] On Behalf Of John Eells
>>>>>> Sent: Thursday, July 21, 2016 2:35 PM
>>>>>> To: IBM-MAIN@listserv.ua.edu
>>>>>> Subject: Re: DEVTYPE INFO=DASD
>>>>>> 
>>>>>> I think I understand your confusion.  I'm not sure why you're using the 
>>>>>> z/OS V1.10 level of the book.  But in any event, the current (V2.2) 
>>>>>> level of the book says this returns, for INFO=DASD:
>>>>>> 
>>>>>> Returns 16 bytes as follows:
>>>>>> Bytes 0-3 - Number of cylinders on the device, excluding alternates.
>>>>>&

Re: DEVTYPE INFO=DASD

2016-07-24 Thread Campbell Jay
Major Maximum Mea Culpa !
I didn't do proper diligence.  : (
No access to Joe's programs... and believed his output.
I've spent the weekend getting IBM's example DEVTYPE MACRO to work.
After  the successful run - My result matches Bill's...
AREA = FFF0 000F F000 01000800

Gold star to Bill Godfrey. 
Joe's got a code problem. 

Sincere apology to John Eells.
( Didn't mean to falsely contribute to the issue )

Have been restricting myself on postings for a while.
( Keep mouth shut - fool... Open mouth - remove all doubt )
Think I'll restrict my postings even further.
Even on in-house issues.

Sorry All... and Thanks !

Jay Campbell
IBM OS Support Section

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Bill Godfrey
Sent: Friday, July 22, 2016 10:34 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: DEVTYPE INFO=DASD

The result I get from the same DEVTYPE macro is:

FFF0 000F F000 01000800

which differs from the OP in that there are 2 more bytes at the beginning in my 
case.

My results have a fullword for the number of cylinders and a fullword for 
tracks per cylinder, which agrees with all of these manuals:

z/OS 1.10
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2S350/7.2.1.5

z/OS 1.13
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2S380/7.2.1.5

z/OS 2.1 (page 272)
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/download/DGT3S300.pdf

I think the OP is just looking at the wrong address, 2 bytes beyond the correct 
address.

Bill
On Fri, 22 Jul 2016 10:01:32 -0400, John Eells wrote:

>I sent in an RCF this morning with what I thought the book should say, 
>and copied the lead DADSM/CVAF developer (to make sure my correction 
>does not inject some different problem!).
>
>Bill Godfrey wrote:
>> I think the possibility should be considered that the OP may have mistakenly 
>> been looking at the 16 bytes at AREA+2, not AREA. If that happened, and the 
>> missing bytes are hex , the results would be correct for a device with 
>> 65520 cylinders.
>>
>> Bill
>>
>> On Thu, 21 Jul 2016 14:30:41 -0500, Mike Schwab wrote:
>>
>>>>   Volume Data
>>>>   Tracks . :  982,800
>>>
>>> / 15 = 65,520 = X'FFF0'
>>>
>>> On Thu, Jul 21, 2016 at 2:17 PM, Campbell Jay <james.l.campb...@irs.gov> 
>>> wrote:
>>>> Agree with John.
>>>> Doc should say first halfword of bytes 0 - 3  &  4 - 7.
>>>>
>>>> MJI2 e . : IM404A
>>>> Command ===>
>>>>
>>>> Unit . . : 3390
>>>>
>>>>   Volume Data VTOC Data  Free Space   
>>>> TracksCyls
>>>>   Tracks . :  982,800 Tracks  . :   360   Size  . . :  
>>>>269,730  17,974
>>>>   %Used  . :   72   %Used . . : 1Largest . :   
>>>>  67,950   4,530
>>>>   Trks/Cyls:   15Free DSCBS:17,892  Free
>>>>
>>>>   Extents . :  36
>>>>
>>>> Disclaimer: No idea what he's working on
>>>>
>>>> Jay Campbell
>>>> IBM OS Support Section
>>>>
>
>>>>> -Original Message-
>>>>> From: IBM Mainframe Discussion List 
>>>>> [mailto:IBM-MAIN@listserv.ua.edu] On Behalf Of John Eells
>>>>> Sent: Thursday, July 21, 2016 2:35 PM
>>>>> To: IBM-MAIN@listserv.ua.edu
>>>>> Subject: Re: DEVTYPE INFO=DASD
>>>>>
>>>>> I think I understand your confusion.  I'm not sure why you're using the 
>>>>> z/OS V1.10 level of the book.  But in any event, the current (V2.2) level 
>>>>> of the book says this returns, for INFO=DASD:
>>>>>
>>>>> Returns 16 bytes as follows:
>>>>> Bytes 0-3 - Number of cylinders on the device, excluding alternates.
>>>>> 
>>>>>
>>>>> Bytes 4-7 - Number of tracks per cylinder.
>>>>>
>>>>> So one would reasonably expect x'FFF0' to be the number of cylinders, 
>>>>> and x'000FF000' to be the number of tracks per cylinder.  The values of 
>>>>> the first halfwords in each word, however, seem far more reasonable 
>>>>> (possible, even!).  The correct number of tracks/cylinder is definitely 
>>>>> 15.
>>>>>
>>>>> But what is the actual size of the volume?  You can use "V" on 
>>>>> ISPF
>>>&g

Re: DEVTYPE INFO=DASD

2016-07-22 Thread Bill Godfrey
The result I get from the same DEVTYPE macro is:

FFF0 000F F000 01000800

which differs from the OP in that there are 2 more bytes at the beginning in my 
case.

My results have a fullword for the number of cylinders and a fullword for 
tracks per cylinder, which agrees with all of these manuals:

z/OS 1.10
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2S350/7.2.1.5

z/OS 1.13
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2S380/7.2.1.5

z/OS 2.1 (page 272)
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/download/DGT3S300.pdf

I think the OP is just looking at the wrong address, 2 bytes beyond the correct 
address.

Bill
On Fri, 22 Jul 2016 10:01:32 -0400, John Eells wrote:

>I sent in an RCF this morning with what I thought the book should say,
>and copied the lead DADSM/CVAF developer (to make sure my correction
>does not inject some different problem!).
>
>Bill Godfrey wrote:
>> I think the possibility should be considered that the OP may have mistakenly 
>> been looking at the 16 bytes at AREA+2, not AREA. If that happened, and the 
>> missing bytes are hex , the results would be correct for a device with 
>> 65520 cylinders.
>>
>> Bill
>>
>> On Thu, 21 Jul 2016 14:30:41 -0500, Mike Schwab wrote:
>>
>>>>   Volume Data
>>>>   Tracks . :  982,800
>>>
>>> / 15 = 65,520 = X'FFF0'
>>>
>>> On Thu, Jul 21, 2016 at 2:17 PM, Campbell Jay <james.l.campb...@irs.gov> 
>>> wrote:
>>>> Agree with John.
>>>> Doc should say first halfword of bytes 0 - 3  &  4 - 7.
>>>>
>>>> MJI2 e . : IM404A
>>>> Command ===>
>>>>
>>>> Unit . . : 3390
>>>>
>>>>   Volume Data VTOC Data  Free Space   
>>>> TracksCyls
>>>>   Tracks . :  982,800 Tracks  . :   360   Size  . . :  
>>>>269,730  17,974
>>>>   %Used  . :   72   %Used . . : 1Largest . :   
>>>>  67,950   4,530
>>>>   Trks/Cyls:   15Free DSCBS:17,892  Free
>>>>
>>>>   Extents . :  36
>>>>
>>>> Disclaimer: No idea what he's working on
>>>>
>>>> Jay Campbell
>>>> IBM OS Support Section
>>>>
>
>>>>> -Original Message-
>>>>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu]
>>>>> On Behalf Of John Eells
>>>>> Sent: Thursday, July 21, 2016 2:35 PM
>>>>> To: IBM-MAIN@listserv.ua.edu
>>>>> Subject: Re: DEVTYPE INFO=DASD
>>>>>
>>>>> I think I understand your confusion.  I'm not sure why you're using the 
>>>>> z/OS V1.10 level of the book.  But in any event, the current (V2.2) level 
>>>>> of the book says this returns, for INFO=DASD:
>>>>>
>>>>> Returns 16 bytes as follows:
>>>>> Bytes 0-3 - Number of cylinders on the device, excluding alternates.
>>>>> 
>>>>>
>>>>> Bytes 4-7 - Number of tracks per cylinder.
>>>>>
>>>>> So one would reasonably expect x'FFF0' to be the number of cylinders, 
>>>>> and x'000FF000' to be the number of tracks per cylinder.  The values of 
>>>>> the first halfwords in each word, however, seem far more reasonable 
>>>>> (possible, even!).  The correct number of tracks/cylinder is definitely 
>>>>> 15.
>>>>>
>>>>> But what is the actual size of the volume?  You can use "V" on ISPF
>>>>> OPT3.4 to see VTOC information, including the volume size in tracks under 
>>>>> "Volume data" on the left.  Divide by 15 to get cylinders.  What do you 
>>>>> see?
>>>>>
>>>>> It's likely RCF time...
>
>
>--
>John Eells
>IBM Poughkeepsie
>ee...@us.ibm.com
>
>--
>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


Re: DEVTYPE INFO=DASD

2016-07-22 Thread John Eells
I sent in an RCF this morning with what I thought the book should say, 
and copied the lead DADSM/CVAF developer (to make sure my correction 
does not inject some different problem!).


Bill Godfrey wrote:

I think the possibility should be considered that the OP may have mistakenly 
been looking at the 16 bytes at AREA+2, not AREA. If that happened, and the 
missing bytes are hex , the results would be correct for a device with 
65520 cylinders.

Bill

On Thu, 21 Jul 2016 14:30:41 -0500, Mike Schwab wrote:


  Volume Data
  Tracks . :  982,800


/ 15 = 65,520 = X'FFF0'

On Thu, Jul 21, 2016 at 2:17 PM, Campbell Jay <james.l.campb...@irs.gov> wrote:

Agree with John.
Doc should say first halfword of bytes 0 - 3  &  4 - 7.

MJI2 e . : IM404A
Command ===>

Unit . . : 3390

  Volume Data VTOC Data  Free Space   Tracks
Cyls
  Tracks . :  982,800 Tracks  . :   360   Size  . . : 
269,730  17,974
  %Used  . :   72   %Used . . : 1Largest . :
67,950   4,530
  Trks/Cyls:   15Free DSCBS:17,892  Free

 Extents . :  36

Disclaimer: No idea what he's working on

Jay Campbell
IBM OS Support Section




-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu]
On Behalf Of John Eells
Sent: Thursday, July 21, 2016 2:35 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: DEVTYPE INFO=DASD

I think I understand your confusion.  I'm not sure why you're using the z/OS 
V1.10 level of the book.  But in any event, the current (V2.2) level of the 
book says this returns, for INFO=DASD:

Returns 16 bytes as follows:
Bytes 0-3 - Number of cylinders on the device, excluding alternates.


Bytes 4-7 - Number of tracks per cylinder.

So one would reasonably expect x'FFF0' to be the number of cylinders, and 
x'000FF000' to be the number of tracks per cylinder.  The values of the first 
halfwords in each word, however, seem far more reasonable (possible, even!).  
The correct number of tracks/cylinder is definitely 15.

But what is the actual size of the volume?  You can use "V" on ISPF
OPT3.4 to see VTOC information, including the volume size in tracks under "Volume 
data" on the left.  Divide by 15 to get cylinders.  What do you see?

It's likely RCF time...



--
John Eells
IBM Poughkeepsie
ee...@us.ibm.com

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


Re: DEVTYPE INFO=DASD

2016-07-21 Thread Bill Godfrey
I think the possibility should be considered that the OP may have mistakenly 
been looking at the 16 bytes at AREA+2, not AREA. If that happened, and the 
missing bytes are hex , the results would be correct for a device with 
65520 cylinders.

Bill

On Thu, 21 Jul 2016 14:30:41 -0500, Mike Schwab wrote:

>>  Volume Data
>>  Tracks . :  982,800
>
>/ 15 = 65,520 = X'FFF0'
>
>On Thu, Jul 21, 2016 at 2:17 PM, Campbell Jay <james.l.campb...@irs.gov> wrote:
>> Agree with John.
>> Doc should say first halfword of bytes 0 - 3  &  4 - 7.
>>
>> MJI2 e . : IM404A
>> Command ===>
>>
>> Unit . . : 3390
>>
>>  Volume Data VTOC Data  Free Space   Tracks  
>>   Cyls
>>  Tracks . :  982,800 Tracks  . :   360   Size  . . : 
>> 269,730  17,974
>>  %Used  . :   72   %Used . . : 1Largest . :  
>>   67,950   4,530
>>  Trks/Cyls:   15Free DSCBS:17,892  Free
>>  
>>Extents . :  36
>>
>> Disclaimer: No idea what he's working on
>>
>> Jay Campbell
>> IBM OS Support Section
>>
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On 
>> Behalf Of Reichman Joseph
>> Sent: Thursday, July 21, 2016 3:09 PM
>> To: IBM-MAIN@listserv.ua.edu
>> Subject: Re: DEVTYPE INFO=DASD
>>
>> I just got word from Jay Campbell that the device capability is 17,974 cyls 
>> I am getting back X'FFF0'  or 65,520, Since he is in touch with IBM I would 
>> suggest you contact him
>>
>> Thanks
>>
>> Joe Reichman
>> Joe Reichman
>>
>> IT Specialist
>> Master Files Division
>> New Carrollton Federal Building, B7-182
>> OS:CTO:AD:CP:I:IB
>> Flex M,T,Th,F
>> Home office (240) 863 - 3965
>> Office (240) 613-4350
>> Cell (917) 748-9693
>> TOD M - F  7:30 am  - 4:00 pm
>>
>>
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On 
>> Behalf Of John Eells
>> Sent: Thursday, July 21, 2016 2:42 PM
>> To: IBM-MAIN@listserv.ua.edu
>> Subject: Re: DEVTYPE INFO=DASD
>>
>> Well, yes, but we should get the book right.  So do you mind telling me what 
>> the actual volume size is, just to confirm?
>>
>> Reichman Joseph wrote:
>>> It is the first half word of each has to be
>>>
>>> Joe Reichman
>>> Joe Reichman
>>>
>>> IT Specialist
>>> Master Files Division
>>> New Carrollton Federal Building, B7-182 OS:CTO:AD:CP:I:IB Flex
>>> M,T,Th,F Home office (240) 863 - 3965 Office (240) 613-4350
>>> Cell (917) 748-9693
>>> TOD M - F  7:30 am  - 4:00 pm
>>>
>>>
>>> -Original Message-
>>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu]
>>> On Behalf Of John Eells
>>> Sent: Thursday, July 21, 2016 2:35 PM
>>> To: IBM-MAIN@listserv.ua.edu
>>> Subject: Re: DEVTYPE INFO=DASD
>>>
>>> I think I understand your confusion.  I'm not sure why you're using the 
>>> z/OS V1.10 level of the book.  But in any event, the current (V2.2) level 
>>> of the book says this returns, for INFO=DASD:
>>>
>>> Returns 16 bytes as follows:
>>> Bytes 0-3 - Number of cylinders on the device, excluding alternates.
>>> 
>>>
>>> Bytes 4-7 - Number of tracks per cylinder.
>>>
>>> So one would reasonably expect x'FFF0' to be the number of cylinders, 
>>> and x'000FF000' to be the number of tracks per cylinder.  The values of the 
>>> first halfwords in each word, however, seem far more reasonable (possible, 
>>> even!).  The correct number of tracks/cylinder is definitely 15.
>>>
>>> But what is the actual size of the volume?  You can use "V" on ISPF
>>> OPT3.4 to see VTOC information, including the volume size in tracks under 
>>> "Volume data" on the left.  Divide by 15 to get cylinders.  What do you see?
>>>
>>> It's likely RCF time...
>>>
>>>
>>> Reichman Joseph wrote:
>>>> 7.2.15 Marked DEVTYPE-  info form   from DFSMSdfp "Advanced Services"  
>>>> z/os V1R10.0
>>>>
>>>> Joe Reichman
>>>> Joe Reichman
>>>>
>>>> IT Specialist
>>>> Master Files Division
>>>> New Carrollton Fe

Re: DEVTYPE INFO=DASD

2016-07-21 Thread Mike Schwab
>  Volume Data
>  Tracks . :  982,800

/ 15 = 65,520 = X'FFF0'

On Thu, Jul 21, 2016 at 2:17 PM, Campbell Jay <james.l.campb...@irs.gov> wrote:
> Agree with John.
> Doc should say first halfword of bytes 0 - 3  &  4 - 7.
>
> MJI2 e . : IM404A
> Command ===>
>
> Unit . . : 3390
>
>  Volume Data VTOC Data  Free Space   Tracks   
>  Cyls
>  Tracks . :  982,800 Tracks  . :   360   Size  . . : 
> 269,730  17,974
>  %Used  . :   72   %Used . . : 1Largest . :   
>  67,950   4,530
>  Trks/Cyls:   15Free DSCBS:17,892  Free
>   
>   Extents . :  36
>
> Disclaimer: No idea what he's working on
>
> Jay Campbell
> IBM OS Support Section
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On 
> Behalf Of Reichman Joseph
> Sent: Thursday, July 21, 2016 3:09 PM
> To: IBM-MAIN@listserv.ua.edu
> Subject: Re: DEVTYPE INFO=DASD
>
> I just got word from Jay Campbell that the device capability is 17,974 cyls I 
> am getting back X'FFF0'  or 65,520, Since he is in touch with IBM I would 
> suggest you contact him
>
> Thanks
>
> Joe Reichman
> Joe Reichman
>
> IT Specialist
> Master Files Division
> New Carrollton Federal Building, B7-182
> OS:CTO:AD:CP:I:IB
> Flex M,T,Th,F
> Home office (240) 863 - 3965
> Office (240) 613-4350
> Cell (917) 748-9693
> TOD M - F  7:30 am  - 4:00 pm
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On 
> Behalf Of John Eells
> Sent: Thursday, July 21, 2016 2:42 PM
> To: IBM-MAIN@listserv.ua.edu
> Subject: Re: DEVTYPE INFO=DASD
>
> Well, yes, but we should get the book right.  So do you mind telling me what 
> the actual volume size is, just to confirm?
>
> Reichman Joseph wrote:
>> It is the first half word of each has to be
>>
>> Joe Reichman
>> Joe Reichman
>>
>> IT Specialist
>> Master Files Division
>> New Carrollton Federal Building, B7-182 OS:CTO:AD:CP:I:IB Flex
>> M,T,Th,F Home office (240) 863 - 3965 Office (240) 613-4350
>> Cell (917) 748-9693
>> TOD M - F  7:30 am  - 4:00 pm
>>
>>
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu]
>> On Behalf Of John Eells
>> Sent: Thursday, July 21, 2016 2:35 PM
>> To: IBM-MAIN@listserv.ua.edu
>> Subject: Re: DEVTYPE INFO=DASD
>>
>> I think I understand your confusion.  I'm not sure why you're using the z/OS 
>> V1.10 level of the book.  But in any event, the current (V2.2) level of the 
>> book says this returns, for INFO=DASD:
>>
>> Returns 16 bytes as follows:
>> Bytes 0-3 - Number of cylinders on the device, excluding alternates.
>> 
>>
>> Bytes 4-7 - Number of tracks per cylinder.
>>
>> So one would reasonably expect x'FFF0' to be the number of cylinders, 
>> and x'000FF000' to be the number of tracks per cylinder.  The values of the 
>> first halfwords in each word, however, seem far more reasonable (possible, 
>> even!).  The correct number of tracks/cylinder is definitely 15.
>>
>> But what is the actual size of the volume?  You can use "V" on ISPF
>> OPT3.4 to see VTOC information, including the volume size in tracks under 
>> "Volume data" on the left.  Divide by 15 to get cylinders.  What do you see?
>>
>> It's likely RCF time...
>>
>>
>> Reichman Joseph wrote:
>>> 7.2.15 Marked DEVTYPE-  info form   from DFSMSdfp "Advanced Services"  z/os 
>>> V1R10.0
>>>
>>> Joe Reichman
>>> Joe Reichman
>>>
>>> IT Specialist
>>> Master Files Division
>>> New Carrollton Federal Building, B7-182 OS:CTO:AD:CP:I:IB Flex
>>> M,T,Th,F Home office (240) 863 - 3965 Office (240) 613-4350
>>> Cell (917) 748-9693
>>> TOD M - F  7:30 am  - 4:00 pm
>>>
>>>
>>> -Original Message-
>>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu]
>>> On Behalf Of Elardus Engelbrecht
>>> Sent: Thursday, July 21, 2016 12:52 PM
>>> To: IBM-MAIN@listserv.ua.edu
>>> Subject: Re: DEVTYPE INFO=DASD
>>>
>>> Reichman Joseph wrote:
>>>
>>>> The doc says bytes 0 - 3 is cylinders bytes 0 -3 is FFF0 and
>>>> bytes 4 - 7 000FF000 is tracks per cyl ? am I misreading
>>>> misunderstanding t

Re: DEVTYPE INFO=DASD

2016-07-21 Thread Campbell Jay
Agree with John.
Doc should say first halfword of bytes 0 - 3  &  4 - 7.

MJI2 e . : IM404A  
Command ===>   
   
Unit . . : 3390
   
 Volume Data VTOC Data  Free Space   Tracks
Cyls
 Tracks . :  982,800 Tracks  . :   360   Size  . . : 
269,730  17,974
 %Used  . :   72   %Used . . : 1Largest . :
67,950   4,530
 Trks/Cyls:   15Free DSCBS:17,892  Free   

Extents . :  36

Disclaimer: No idea what he's working on

Jay Campbell
IBM OS Support Section

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Reichman Joseph
Sent: Thursday, July 21, 2016 3:09 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: DEVTYPE INFO=DASD

I just got word from Jay Campbell that the device capability is 17,974 cyls I 
am getting back X'FFF0'  or 65,520, Since he is in touch with IBM I would 
suggest you contact him

Thanks  

Joe Reichman
Joe Reichman
 
IT Specialist
Master Files Division
New Carrollton Federal Building, B7-182
OS:CTO:AD:CP:I:IB
Flex M,T,Th,F
Home office (240) 863 - 3965 
Office (240) 613-4350
Cell (917) 748-9693
TOD M - F  7:30 am  - 4:00 pm


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of John Eells
Sent: Thursday, July 21, 2016 2:42 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: DEVTYPE INFO=DASD

Well, yes, but we should get the book right.  So do you mind telling me what 
the actual volume size is, just to confirm?

Reichman Joseph wrote:
> It is the first half word of each has to be
>
> Joe Reichman
> Joe Reichman
>
> IT Specialist
> Master Files Division
> New Carrollton Federal Building, B7-182 OS:CTO:AD:CP:I:IB Flex 
> M,T,Th,F Home office (240) 863 - 3965 Office (240) 613-4350
> Cell (917) 748-9693
> TOD M - F  7:30 am  - 4:00 pm
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] 
> On Behalf Of John Eells
> Sent: Thursday, July 21, 2016 2:35 PM
> To: IBM-MAIN@listserv.ua.edu
> Subject: Re: DEVTYPE INFO=DASD
>
> I think I understand your confusion.  I'm not sure why you're using the z/OS 
> V1.10 level of the book.  But in any event, the current (V2.2) level of the 
> book says this returns, for INFO=DASD:
>
> Returns 16 bytes as follows:
> Bytes 0-3 - Number of cylinders on the device, excluding alternates. 
> 
>
> Bytes 4-7 - Number of tracks per cylinder.
>
> So one would reasonably expect x'FFF0' to be the number of cylinders, and 
> x'000FF000' to be the number of tracks per cylinder.  The values of the first 
> halfwords in each word, however, seem far more reasonable (possible, even!).  
> The correct number of tracks/cylinder is definitely 15.
>
> But what is the actual size of the volume?  You can use "V" on ISPF
> OPT3.4 to see VTOC information, including the volume size in tracks under 
> "Volume data" on the left.  Divide by 15 to get cylinders.  What do you see?
>
> It's likely RCF time...
>
>
> Reichman Joseph wrote:
>> 7.2.15 Marked DEVTYPE-  info form   from DFSMSdfp "Advanced Services"  z/os 
>> V1R10.0
>>
>> Joe Reichman
>> Joe Reichman
>>
>> IT Specialist
>> Master Files Division
>> New Carrollton Federal Building, B7-182 OS:CTO:AD:CP:I:IB Flex 
>> M,T,Th,F Home office (240) 863 - 3965 Office (240) 613-4350
>> Cell (917) 748-9693
>> TOD M - F  7:30 am  - 4:00 pm
>>
>>
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] 
>> On Behalf Of Elardus Engelbrecht
>> Sent: Thursday, July 21, 2016 12:52 PM
>> To: IBM-MAIN@listserv.ua.edu
>> Subject: Re: DEVTYPE INFO=DASD
>>
>> Reichman Joseph wrote:
>>
>>> The doc says bytes 0 - 3 is cylinders bytes 0 -3 is FFF0 and 
>>> bytes 4 - 7 000FF000 is tracks per cyl ? am I misreading 
>>> misunderstanding the documentation
>>
>> What docs? Could you be kind to give us the URL of that source of above info 
>> and docs?
>>
>>> I was looking for the capability on a dasd device DEVTYPE
>>> (R6),(AREA,L'AREA),INFOLIST=ILIST2
>>> ILIST2   DEVTYPE INFO=DASD
>>> AREA DSXL16
>>
>&

Re: DEVTYPE INFO=DASD

2016-07-21 Thread Reichman Joseph
I just got word from Jay Campbell that the device capability is 17,974 cyls I 
am getting back X'FFF0'  or 65,520, Since he is in touch with IBM I would 
suggest you contact him

Thanks  

Joe Reichman
Joe Reichman
 
IT Specialist
Master Files Division
New Carrollton Federal Building, B7-182
OS:CTO:AD:CP:I:IB
Flex M,T,Th,F
Home office (240) 863 - 3965 
Office (240) 613-4350
Cell (917) 748-9693
TOD M - F  7:30 am  - 4:00 pm


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of John Eells
Sent: Thursday, July 21, 2016 2:42 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: DEVTYPE INFO=DASD

Well, yes, but we should get the book right.  So do you mind telling me what 
the actual volume size is, just to confirm?

Reichman Joseph wrote:
> It is the first half word of each has to be
>
> Joe Reichman
> Joe Reichman
>
> IT Specialist
> Master Files Division
> New Carrollton Federal Building, B7-182 OS:CTO:AD:CP:I:IB Flex 
> M,T,Th,F Home office (240) 863 - 3965 Office (240) 613-4350
> Cell (917) 748-9693
> TOD M - F  7:30 am  - 4:00 pm
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] 
> On Behalf Of John Eells
> Sent: Thursday, July 21, 2016 2:35 PM
> To: IBM-MAIN@listserv.ua.edu
> Subject: Re: DEVTYPE INFO=DASD
>
> I think I understand your confusion.  I'm not sure why you're using the z/OS 
> V1.10 level of the book.  But in any event, the current (V2.2) level of the 
> book says this returns, for INFO=DASD:
>
> Returns 16 bytes as follows:
> Bytes 0-3 - Number of cylinders on the device, excluding alternates. 
> 
>
> Bytes 4-7 - Number of tracks per cylinder.
>
> So one would reasonably expect x'FFF0' to be the number of cylinders, and 
> x'000FF000' to be the number of tracks per cylinder.  The values of the first 
> halfwords in each word, however, seem far more reasonable (possible, even!).  
> The correct number of tracks/cylinder is definitely 15.
>
> But what is the actual size of the volume?  You can use "V" on ISPF
> OPT3.4 to see VTOC information, including the volume size in tracks under 
> "Volume data" on the left.  Divide by 15 to get cylinders.  What do you see?
>
> It's likely RCF time...
>
>
> Reichman Joseph wrote:
>> 7.2.15 Marked DEVTYPE-  info form   from DFSMSdfp "Advanced Services"  z/os 
>> V1R10.0
>>
>> Joe Reichman
>> Joe Reichman
>>
>> IT Specialist
>> Master Files Division
>> New Carrollton Federal Building, B7-182 OS:CTO:AD:CP:I:IB Flex 
>> M,T,Th,F Home office (240) 863 - 3965 Office (240) 613-4350
>> Cell (917) 748-9693
>> TOD M - F  7:30 am  - 4:00 pm
>>
>>
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] 
>> On Behalf Of Elardus Engelbrecht
>> Sent: Thursday, July 21, 2016 12:52 PM
>> To: IBM-MAIN@listserv.ua.edu
>> Subject: Re: DEVTYPE INFO=DASD
>>
>> Reichman Joseph wrote:
>>
>>> The doc says bytes 0 - 3 is cylinders bytes 0 -3 is FFF0 and 
>>> bytes 4 - 7 000FF000 is tracks per cyl ? am I misreading 
>>> misunderstanding the documentation
>>
>> What docs? Could you be kind to give us the URL of that source of above info 
>> and docs?
>>
>>> I was looking for the capability on a dasd device DEVTYPE
>>> (R6),(AREA,L'AREA),INFOLIST=ILIST2
>>> ILIST2   DEVTYPE INFO=DASD
>>> AREA DSXL16
>>
>> Hmmm, interesting application of that useful macro. I must try out 
>> this little gem next week on my z/OS v2.1 sandbox when I'm returning 
>> to my bread and butter work... ;-)
>>
>>> This was the data returned in area R15 = 0
>>> FFF0 000FF000 0100 0800
>>
>> On what z/OS level were you trying to try out that Assembler snippet? How 
>> did you obtained the contents of that R15? Via a dump or a MVC or something 
>> else?
>>
>>
>>> Mike Schwab wrote:
>>
>>>> FFF0 000FF000 0100 0800
>>> x'FFF0' would be 65520 cylinders.  x'000F' would be 15 tracks per cylinder. 
>>>  Reasonable for a 3390-54.
>>
> 
>
>
> --
> John Eells
> IBM Poughkeepsie
> ee...@us.ibm.com
>
> --
> 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
>


--
John Eells
IBM Poughkeepsie
ee...@us.ibm.com

--
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


Re: DEVTYPE INFO=DASD

2016-07-21 Thread John Eells
Well, yes, but we should get the book right.  So do you mind telling me 
what the actual volume size is, just to confirm?


Reichman Joseph wrote:

It is the first half word of each has to be

Joe Reichman
Joe Reichman

IT Specialist
Master Files Division
New Carrollton Federal Building, B7-182
OS:CTO:AD:CP:I:IB
Flex M,T,Th,F
Home office (240) 863 - 3965
Office (240) 613-4350
Cell (917) 748-9693
TOD M - F  7:30 am  - 4:00 pm


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of John Eells
Sent: Thursday, July 21, 2016 2:35 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: DEVTYPE INFO=DASD

I think I understand your confusion.  I'm not sure why you're using the z/OS 
V1.10 level of the book.  But in any event, the current (V2.2) level of the 
book says this returns, for INFO=DASD:

Returns 16 bytes as follows:
Bytes 0-3 - Number of cylinders on the device, excluding alternates. 

Bytes 4-7 - Number of tracks per cylinder.

So one would reasonably expect x'FFF0' to be the number of cylinders, and 
x'000FF000' to be the number of tracks per cylinder.  The values of the first 
halfwords in each word, however, seem far more reasonable (possible, even!).  
The correct number of tracks/cylinder is definitely 15.

But what is the actual size of the volume?  You can use "V" on ISPF
OPT3.4 to see VTOC information, including the volume size in tracks under "Volume 
data" on the left.  Divide by 15 to get cylinders.  What do you see?

It's likely RCF time...


Reichman Joseph wrote:

7.2.15 Marked DEVTYPE-  info form   from DFSMSdfp "Advanced Services"  z/os 
V1R10.0

Joe Reichman
Joe Reichman

IT Specialist
Master Files Division
New Carrollton Federal Building, B7-182 OS:CTO:AD:CP:I:IB Flex
M,T,Th,F Home office (240) 863 - 3965 Office (240) 613-4350
Cell (917) 748-9693
TOD M - F  7:30 am  - 4:00 pm


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu]
On Behalf Of Elardus Engelbrecht
Sent: Thursday, July 21, 2016 12:52 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: DEVTYPE INFO=DASD

Reichman Joseph wrote:


The doc says bytes 0 - 3 is cylinders bytes 0 -3 is FFF0 and
bytes 4 - 7 000FF000 is tracks per cyl ? am I misreading
misunderstanding the documentation


What docs? Could you be kind to give us the URL of that source of above info 
and docs?


I was looking for the capability on a dasd device DEVTYPE
(R6),(AREA,L'AREA),INFOLIST=ILIST2
ILIST2   DEVTYPE INFO=DASD
AREA DSXL16


Hmmm, interesting application of that useful macro. I must try out
this little gem next week on my z/OS v2.1 sandbox when I'm returning
to my bread and butter work... ;-)


This was the data returned in area R15 = 0
FFF0 000FF000 0100 0800


On what z/OS level were you trying to try out that Assembler snippet? How did 
you obtained the contents of that R15? Via a dump or a MVC or something else?



Mike Schwab wrote:



FFF0 000FF000 0100 0800

x'FFF0' would be 65520 cylinders.  x'000F' would be 15 tracks per cylinder.  
Reasonable for a 3390-54.






--
John Eells
IBM Poughkeepsie
ee...@us.ibm.com

--
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




--
John Eells
IBM Poughkeepsie
ee...@us.ibm.com

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


Re: DEVTYPE INFO=DASD

2016-07-21 Thread Reichman Joseph
It is the first half word of each has to be 

Joe Reichman
Joe Reichman
 
IT Specialist
Master Files Division
New Carrollton Federal Building, B7-182
OS:CTO:AD:CP:I:IB
Flex M,T,Th,F
Home office (240) 863 - 3965 
Office (240) 613-4350
Cell (917) 748-9693
TOD M - F  7:30 am  - 4:00 pm


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of John Eells
Sent: Thursday, July 21, 2016 2:35 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: DEVTYPE INFO=DASD

I think I understand your confusion.  I'm not sure why you're using the z/OS 
V1.10 level of the book.  But in any event, the current (V2.2) level of the 
book says this returns, for INFO=DASD:

Returns 16 bytes as follows:
Bytes 0-3 - Number of cylinders on the device, excluding alternates. 

Bytes 4-7 - Number of tracks per cylinder.

So one would reasonably expect x'FFF0' to be the number of cylinders, and 
x'000FF000' to be the number of tracks per cylinder.  The values of the first 
halfwords in each word, however, seem far more reasonable (possible, even!).  
The correct number of tracks/cylinder is definitely 15.

But what is the actual size of the volume?  You can use "V" on ISPF
OPT3.4 to see VTOC information, including the volume size in tracks under 
"Volume data" on the left.  Divide by 15 to get cylinders.  What do you see?

It's likely RCF time...


Reichman Joseph wrote:
> 7.2.15 Marked DEVTYPE-  info form   from DFSMSdfp "Advanced Services"  z/os 
> V1R10.0
>
> Joe Reichman
> Joe Reichman
>
> IT Specialist
> Master Files Division
> New Carrollton Federal Building, B7-182 OS:CTO:AD:CP:I:IB Flex 
> M,T,Th,F Home office (240) 863 - 3965 Office (240) 613-4350
> Cell (917) 748-9693
> TOD M - F  7:30 am  - 4:00 pm
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] 
> On Behalf Of Elardus Engelbrecht
> Sent: Thursday, July 21, 2016 12:52 PM
> To: IBM-MAIN@listserv.ua.edu
> Subject: Re: DEVTYPE INFO=DASD
>
> Reichman Joseph wrote:
>
>> The doc says bytes 0 - 3 is cylinders bytes 0 -3 is FFF0 and 
>> bytes 4 - 7 000FF000 is tracks per cyl ? am I misreading 
>> misunderstanding the documentation
>
> What docs? Could you be kind to give us the URL of that source of above info 
> and docs?
>
>> I was looking for the capability on a dasd device DEVTYPE
>> (R6),(AREA,L'AREA),INFOLIST=ILIST2
>> ILIST2   DEVTYPE INFO=DASD
>> AREA DSXL16
>
> Hmmm, interesting application of that useful macro. I must try out 
> this little gem next week on my z/OS v2.1 sandbox when I'm returning 
> to my bread and butter work... ;-)
>
>> This was the data returned in area R15 = 0
>> FFF0 000FF000 0100 0800
>
> On what z/OS level were you trying to try out that Assembler snippet? How did 
> you obtained the contents of that R15? Via a dump or a MVC or something else?
>
>
>> Mike Schwab wrote:
>
>>> FFF0 000FF000 0100 0800
>> x'FFF0' would be 65520 cylinders.  x'000F' would be 15 tracks per cylinder.  
>> Reasonable for a 3390-54.
>



--
John Eells
IBM Poughkeepsie
ee...@us.ibm.com

--
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


Re: DEVTYPE INFO=DASD

2016-07-21 Thread John Eells
I think I understand your confusion.  I'm not sure why you're using the 
z/OS V1.10 level of the book.  But in any event, the current (V2.2) 
level of the book says this returns, for INFO=DASD:


Returns 16 bytes as follows:
Bytes 0-3 - Number of cylinders on the device, excluding alternates. 

Bytes 4-7 - Number of tracks per cylinder.

So one would reasonably expect x'FFF0' to be the number of 
cylinders, and x'000FF000' to be the number of tracks per cylinder.  The 
values of the first halfwords in each word, however, seem far more 
reasonable (possible, even!).  The correct number of tracks/cylinder is 
definitely 15.


But what is the actual size of the volume?  You can use "V" on ISPF 
OPT3.4 to see VTOC information, including the volume size in tracks 
under "Volume data" on the left.  Divide by 15 to get cylinders.  What 
do you see?


It's likely RCF time...


Reichman Joseph wrote:

7.2.15 Marked DEVTYPE-  info form   from DFSMSdfp "Advanced Services"  z/os 
V1R10.0

Joe Reichman
Joe Reichman

IT Specialist
Master Files Division
New Carrollton Federal Building, B7-182
OS:CTO:AD:CP:I:IB
Flex M,T,Th,F
Home office (240) 863 - 3965
Office (240) 613-4350
Cell (917) 748-9693
TOD M - F  7:30 am  - 4:00 pm


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Elardus Engelbrecht
Sent: Thursday, July 21, 2016 12:52 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: DEVTYPE INFO=DASD

Reichman Joseph wrote:


The doc says bytes 0 - 3 is cylinders bytes 0 -3 is FFF0 and bytes 4 - 7 
000FF000 is tracks per cyl ? am I misreading misunderstanding the documentation


What docs? Could you be kind to give us the URL of that source of above info 
and docs?


I was looking for the capability on a dasd device DEVTYPE
(R6),(AREA,L'AREA),INFOLIST=ILIST2
ILIST2   DEVTYPE INFO=DASD
AREA DSXL16


Hmmm, interesting application of that useful macro. I must try out this little 
gem next week on my z/OS v2.1 sandbox when I'm returning to my bread and butter 
work... ;-)


This was the data returned in area R15 = 0
FFF0 000FF000 0100 0800


On what z/OS level were you trying to try out that Assembler snippet? How did 
you obtained the contents of that R15? Via a dump or a MVC or something else?



Mike Schwab wrote:



FFF0 000FF000 0100 0800

x'FFF0' would be 65520 cylinders.  x'000F' would be 15 tracks per cylinder.  
Reasonable for a 3390-54.






--
John Eells
IBM Poughkeepsie
ee...@us.ibm.com

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


Re: DEVTYPE INFO=DASD

2016-07-21 Thread Mike Schwab
http://publibz.boulder.ibm.com/epubs/pdf/dgt3s310.pdf
z/OS 2.2 version, layout on page 281 (302 of 532).
Looks like significant changes with z/OS 1.10 for CYL>64K.

On Thu, Jul 21, 2016 at 12:58 PM, Reichman Joseph
<joseph.reich...@irs.gov> wrote:
> 7.2.15 Marked DEVTYPE-  info form   from DFSMSdfp "Advanced Services"  z/os 
> V1R10.0
>
> Joe Reichman
> Joe Reichman
>
> IT Specialist
> Master Files Division
> New Carrollton Federal Building, B7-182
> OS:CTO:AD:CP:I:IB
> Flex M,T,Th,F
> Home office (240) 863 - 3965
> Office (240) 613-4350
> Cell (917) 748-9693
> TOD M - F  7:30 am  - 4:00 pm
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On 
> Behalf Of Elardus Engelbrecht
> Sent: Thursday, July 21, 2016 12:52 PM
> To: IBM-MAIN@listserv.ua.edu
> Subject: Re: DEVTYPE INFO=DASD
>
> Reichman Joseph wrote:
>
>>The doc says bytes 0 - 3 is cylinders bytes 0 -3 is FFF0 and bytes 4 - 7 
>>000FF000 is tracks per cyl ? am I misreading misunderstanding the 
>>documentation
>
> What docs? Could you be kind to give us the URL of that source of above info 
> and docs?
>
>> I was looking for the capability on a dasd device DEVTYPE
>> (R6),(AREA,L'AREA),INFOLIST=ILIST2
>> ILIST2   DEVTYPE INFO=DASD
>> AREA DSXL16
>
> Hmmm, interesting application of that useful macro. I must try out this 
> little gem next week on my z/OS v2.1 sandbox when I'm returning to my bread 
> and butter work... ;-)
>
>> This was the data returned in area R15 = 0
>> FFF0 000FF000 0100 0800
>
> On what z/OS level were you trying to try out that Assembler snippet? How did 
> you obtained the contents of that R15? Via a dump or a MVC or something else?
>
>
>>Mike Schwab wrote:
>
>>> FFF0 000FF000 0100 0800
>>x'FFF0' would be 65520 cylinders.  x'000F' would be 15 tracks per cylinder.  
>>Reasonable for a 3390-54.
>
> Indeed.
>
> Groete / Greetings
> Elardus Engelbrecht
>
> --
> 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



-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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


Re: DEVTYPE INFO=DASD

2016-07-21 Thread Reichman Joseph
7.2.15 Marked DEVTYPE-  info form   from DFSMSdfp "Advanced Services"  z/os 
V1R10.0 

Joe Reichman
Joe Reichman
 
IT Specialist
Master Files Division
New Carrollton Federal Building, B7-182
OS:CTO:AD:CP:I:IB
Flex M,T,Th,F
Home office (240) 863 - 3965 
Office (240) 613-4350
Cell (917) 748-9693
TOD M - F  7:30 am  - 4:00 pm


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Elardus Engelbrecht
Sent: Thursday, July 21, 2016 12:52 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: DEVTYPE INFO=DASD

Reichman Joseph wrote:

>The doc says bytes 0 - 3 is cylinders bytes 0 -3 is FFF0 and bytes 4 - 7 
>000FF000 is tracks per cyl ? am I misreading misunderstanding the 
>documentation

What docs? Could you be kind to give us the URL of that source of above info 
and docs?

> I was looking for the capability on a dasd device DEVTYPE 
> (R6),(AREA,L'AREA),INFOLIST=ILIST2
> ILIST2   DEVTYPE INFO=DASD 
> AREA DSXL16 

Hmmm, interesting application of that useful macro. I must try out this little 
gem next week on my z/OS v2.1 sandbox when I'm returning to my bread and butter 
work... ;-)

> This was the data returned in area R15 = 0
> FFF0 000FF000 0100 0800

On what z/OS level were you trying to try out that Assembler snippet? How did 
you obtained the contents of that R15? Via a dump or a MVC or something else?


>Mike Schwab wrote:

>> FFF0 000FF000 0100 0800
>x'FFF0' would be 65520 cylinders.  x'000F' would be 15 tracks per cylinder.  
>Reasonable for a 3390-54. 
 
Indeed.

Groete / Greetings
Elardus Engelbrecht

--
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


Re: DEVTYPE INFO=DASD

2016-07-21 Thread Mike Schwab
The BDW / RDW length field for V files is a 4 byte length field with
the first 2 bytes binary length.

On Thu, Jul 21, 2016 at 11:51 AM, Elardus Engelbrecht
<elardus.engelbre...@sita.co.za> wrote:
> Reichman Joseph wrote:
>
>>The doc says bytes 0 - 3 is cylinders bytes 0 -3 is FFF0 and bytes 4 - 7 
>>000FF000 is tracks per cyl ? am I misreading misunderstanding the 
>>documentation
>
> What docs? Could you be kind to give us the URL of that source of above info 
> and docs?
>
>> I was looking for the capability on a dasd device
>> DEVTYPE (R6),(AREA,L'AREA),INFOLIST=ILIST2
>> ILIST2   DEVTYPE INFO=DASD
>> AREA DSXL16
>
> Hmmm, interesting application of that useful macro. I must try out this 
> little gem next week on my z/OS v2.1 sandbox when I'm returning to my bread 
> and butter work... ;-)
>
>> This was the data returned in area R15 = 0
>> FFF0 000FF000 0100 0800
>
> On what z/OS level were you trying to try out that Assembler snippet? How did 
> you obtained the contents of that R15? Via a dump or a MVC or something else?
>
>
>>Mike Schwab wrote:
>
>>> FFF0 000FF000 0100 0800
>>x'FFF0' would be 65520 cylinders.  x'000F' would be 15 tracks per cylinder.  
>>Reasonable for a 3390-54.
>
> Indeed.
>
> Groete / Greetings
> Elardus Engelbrecht
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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


Re: DEVTYPE INFO=DASD

2016-07-21 Thread Elardus Engelbrecht
Reichman Joseph wrote:

>The doc says bytes 0 - 3 is cylinders bytes 0 -3 is FFF0 and bytes 4 - 7 
>000FF000 is tracks per cyl ? am I misreading misunderstanding the 
>documentation

What docs? Could you be kind to give us the URL of that source of above info 
and docs?

> I was looking for the capability on a dasd device 
> DEVTYPE (R6),(AREA,L'AREA),INFOLIST=ILIST2 
> ILIST2   DEVTYPE INFO=DASD 
> AREA DSXL16 

Hmmm, interesting application of that useful macro. I must try out this little 
gem next week on my z/OS v2.1 sandbox when I'm returning to my bread and butter 
work... ;-)

> This was the data returned in area R15 = 0 
> FFF0 000FF000 0100 0800 

On what z/OS level were you trying to try out that Assembler snippet? How did 
you obtained the contents of that R15? Via a dump or a MVC or something else?


>Mike Schwab wrote:

>> FFF0 000FF000 0100 0800 
>x'FFF0' would be 65520 cylinders.  x'000F' would be 15 tracks per cylinder.  
>Reasonable for a 3390-54. 
 
Indeed.

Groete / Greetings
Elardus Engelbrecht

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


Re: DEVTYPE INFO=DASD

2016-07-21 Thread Reichman Joseph
The doc says bytes 0 - 3 is cylinders bytes 0 -3 is FFF0 and bytes 4 - 7 
000FF000 is tracks per cyl ? am I misreading misunderstanding the documentation 
  

Joe Reichman
Joe Reichman
 
IT Specialist
Master Files Division
New Carrollton Federal Building, B7-182
OS:CTO:AD:CP:I:IB
Flex M,T,Th,F
Home office (240) 863 - 3965 
Office (240) 613-4350
Cell (917) 748-9693
TOD M - F  7:30 am  - 4:00 pm

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Mike Schwab
Sent: Thursday, July 21, 2016 11:36 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: DEVTYPE INFO=DASD

> FFF0 000FF000 0100 0800

x'FFF0' would be 65520 cylinders.  x'000F' would be 15 tracks per cylinder.  
Reasonable for a 3390-54.

On Thu, Jul 21, 2016 at 9:00 AM, Reichman Joseph <joseph.reich...@irs.gov> 
wrote:
> Hi
>
> I was looking for the capability on a dasd device
>
>
> DEVTYPE (R6),(AREA,L'AREA),INFOLIST=ILIST2
>
> ILIST2   DEVTYPE INFO=DASD
>
> AREA DSXL16
>
> This was the data returned in area R15 = 0
>
> FFF0 000FF000 0100 0800
>
>
>
> DASD  Returns 16 bytes as follows:
>
> Bytes 0-3 Number of cylinders on the device, excluding alternates. For a VIO 
> data set, this number is the number of simulated cylinders needed to contain 
> the data set.
>
> Bytes4-7 Number of tracks per cylinder.
>
>
> Seems to indicate over 4 million cylinders and over 100,000 tracks on the 
> volume ?
>
>
> Joe Reichman
> Joe Reichman
>
> IT Specialist
> Master Files Division
> New Carrollton Federal Building, B7-182 OS:CTO:AD:CP:I:IB Flex 
> M,T,Th,F Home office (240) 863 - 3965 Office (240) 613-4350
> Cell (917) 748-9693
> TOD M - F  7:30 am  - 4:00 pm
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



--
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

--
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


Re: DEVTYPE INFO=DASD

2016-07-21 Thread Mike Schwab
> FFF0 000FF000 0100 0800

x'FFF0' would be 65520 cylinders.  x'000F' would be 15 tracks per
cylinder.  Reasonable for a 3390-54.

On Thu, Jul 21, 2016 at 9:00 AM, Reichman Joseph
<joseph.reich...@irs.gov> wrote:
> Hi
>
> I was looking for the capability on a dasd device
>
>
> DEVTYPE (R6),(AREA,L'AREA),INFOLIST=ILIST2
>
> ILIST2   DEVTYPE INFO=DASD
>
> AREA DSXL16
>
> This was the data returned in area R15 = 0
>
> FFF0 000FF000 0100 0800
>
>
>
> DASD  Returns 16 bytes as follows:
>
> Bytes 0-3 Number of cylinders on the device, excluding alternates. For a VIO 
> data set, this number is the number of simulated cylinders needed to contain 
> the data set.
>
> Bytes4-7 Number of tracks per cylinder.
>
>
> Seems to indicate over 4 million cylinders and over 100,000 tracks on the 
> volume ?
>
>
> Joe Reichman
> Joe Reichman
>
> IT Specialist
> Master Files Division
> New Carrollton Federal Building, B7-182
> OS:CTO:AD:CP:I:IB
> Flex M,T,Th,F
> Home office (240) 863 - 3965
> Office (240) 613-4350
> Cell (917) 748-9693
> TOD M - F  7:30 am  - 4:00 pm
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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


DEVTYPE INFO=DASD

2016-07-21 Thread Reichman Joseph
Hi

I was looking for the capability on a dasd device


DEVTYPE (R6),(AREA,L'AREA),INFOLIST=ILIST2

ILIST2   DEVTYPE INFO=DASD

AREA DSXL16

This was the data returned in area R15 = 0

FFF0 000FF000 0100 0800



DASD  Returns 16 bytes as follows:

Bytes 0-3 Number of cylinders on the device, excluding alternates. For a VIO 
data set, this number is the number of simulated cylinders needed to contain 
the data set.

Bytes4-7 Number of tracks per cylinder.


Seems to indicate over 4 million cylinders and over 100,000 tracks on the 
volume ?


Joe Reichman
Joe Reichman

IT Specialist
Master Files Division
New Carrollton Federal Building, B7-182
OS:CTO:AD:CP:I:IB
Flex M,T,Th,F
Home office (240) 863 - 3965
Office (240) 613-4350
Cell (917) 748-9693
TOD M - F  7:30 am  - 4:00 pm


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