Original Message
From: IBM-MAIN automatic digest system
Sent: Sunday, December 6, 2015 00:00
To: IBM-MAIN@LISTSERV.UA.EDU
Reply To: IBM Mainframe Discussion List
Subject: IBM-MAIN Digest - 4 Dec 2015 to 5 Dec 2015 (#2015-339)


There are 18 messages totaling 880 lines in this issue.

Topics of the day:

  1. OT: What's a "ton" of JCL?
  2. IBM z890 Update. (5)
  3. SADMP Allocation factor
  4. length of "executable" (6)
  5. TCPIP Configuration Help (2)
  6. Online manuals for 3880-21, 3880-23, 3990, 2105 et al? (2)
  7. Lrecl

----------------------------------------------------------------------

Date:    Fri, 4 Dec 2015 23:27:07 -0600
From:    Ed Gould <edgould1...@comcast.net>
Subject: Re: OT: What's a "ton" of JCL?

Haven't you seen the WORD "JCL" on card boxes I have:)

Ed

On Dec 4, 2015, at 6:48 PM, Thomas Kern wrote:

> I have never written any JCL on the boxes, just labels and notes.
>
> /Tom Kern
>
> On 12/04/2015 00:33, Ted MacNEIL wrote:
>> Is that counting the weight of the boxes themselves?
>>
>> -
>> -teD
>> -
>>    Original Message
>> From: Thomas Kern
>> Sent: Friday, December 4, 2015 00:14
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Reply To: IBM Mainframe Discussion List
>> Subject: Re: OT: What's a "ton" of JCL?
>>
>> Approximately 274905 cards.
>>
>> 2000 cards per box is about 14.55 lbs.
>> 137.45 boxes per ton(2000lbs)
>>
>> It is Friday now.
>>
>> /Tom Kern
>>
>> On 12/03/2015 22:40, Joel C. Ewing wrote:
>>> On 12/03/2015 12:16 PM, Paul Gilmartin wrote:
>>>> On Thu, 3 Dec 2015 10:43:38 -0600, Joel C. Ewing wrote:
>>>>> ... Because DOS/VS had native support for source and object
>>>>> libraries, those were kept online, but there was no decent native
>>>>> support to effectively submit production job JCL from
>>>>> libraries ...
>>>>>
>>>> Astonishing. You could RYO editor but not RYO "SUBMIT".
>>> OLE' was envisioned and implemented by one person, James Stevens,
>>> the
>>> head of Tech Services at a time when it was a one or two man
>>> operation
>>> (I raised the body count to 3) -- he probably created OLE' as
>>> late night
>>> entertainment for his own convenience and benefit to make
>>> development of
>>> his Mini-Task on-line environment and other utilities less
>>> tedious. It
>>> went company-wide since it significantly improved the efficiency
>>> of 40+
>>> programmers versus fiddling with individual cards in a deck. JCL
>>> didn't
>>> get changed as much and Operator's time was considered less
>>> valuable;
>>> and since they only picked up the entire job deck and moved it
>>> around
>>> as a unit it wasn't that obvious that a significant amount of
>>> time would
>>> be saved by avoiding the use of decks for production JCL.
>>>
>>> OLE' did have the ability to submit jobs to DOS, but the interactive
>>> OLE' work areas assigned to individual users were each a pre-defined
>>> number of "pages" of 24 80-byte records and the total size of all
>>> areas
>>> was constrained by the capacity of a 3330. With those space
>>> constraints,
>>> the normal practice was to keep in one's OLE' area(s) only data
>>> actively
>>> being edited along with some shorter job streams used for testing
>>> and
>>> development. It would have been possible to submit a short batch job
>>> from OLE' to extract a production job stream from a source
>>> library and
>>> load it into part of the an OLE' area (as was done for source code
>>> editing), wait for that job to run, and then submit the
>>> production job
>>> from OLE'; but by the time an Operator had done that they could have
>>> already loaded a physical deck. There just didn't seem to be enough
>>> cost-benefit to justify converting JCL from cards to DASD until MVS
>>> changed the equation.
>>>>> ... and the
>>>>> company was averse to spending on "unneeded" additional
>>>>> software, so
>>>>> production JCL was created in OLE' but punched and kept on
>>>>> cards for use
>>>>> by Operations.
>>>>>
>>>> The supplies must have been cheap.
>>> My impression was that the volume of new cards was low enough to
>>> be a
>>> trivial cost compared to the cost of printer paper, and I never
>>> saw a
>>> card filing cabinet wear out. Maintenance on the card reader/punch
>>> became more of a nuisance and issue after the units aged at least a
>>> decade, but the cost of that was a minor part of the hardware
>>> maintenance contract.
>>>>> When we started DOS/VSE to MVS/XA migration in 1985, we were
>>>>> already
>>>>> running the maximum of four, shared-SPOOL DOS/VSE systems under
>>>>> VM ...
>>>>>
>>>> Was that limit imposed by VM or by the DOS/VSE shared spool? I'd
>>>> suspect the latter.
>>>>
>>>> -- gil
>>>>
>>> Definitely was not a VM limitation. DOS/VSE had a shared "lock"
>>> file to
>>> coordinate library and other inter-system sharing and that file
>>> could be
>>> shared by a maximum of four systems (and with four systems one
>>> did at
>>> times see performance problems with that drive). I can't remember at
>>> this point whether the SPOOLER ("POWER"), was limited to four
>>> systems
>>> for shared spool because it depended on the "lock" file or
>>> whether it
>>> had its own internal design limits as well.
>>>
>> ---------------------------------------------------------------------
>> -
>> 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
>>
>
> ----------------------------------------------------------------------
> 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

------------------------------

Date:    Sat, 5 Dec 2015 00:27:54 -0500
From:    Connor Krukosky <conn...@connorsdomain.com>
Subject: Re: IBM z890 Update.

On 12/4/2015 11:26 PM, Tony Harminc wrote:
> Your box has a floppy drive? Really?
The SE does yes.
> Just so I'm clear... Your z890 plugs in to your SCSI disk box, but it won't
> IPL from it? That is, these are separate features? If I have this right,
> then it should be possible to write a small program that could, at worst,
> be keyed in to storage. This program would then perform the I/O
> instructions to emulate the SCSI IPL. Sort of like the way VM emulates IPL
> in a virtual machine. Well maybe this is just what FC 9904 does...
>
So let me explain how everything is attached:
I have an old HP SCSI hard drive array attached to a SAN Data Gateway
model 2108-G07.
Then I have that go into a SAN switch via SW FCP connection SAN switch
is model 2005-b16.
Finally I have a LW fiber SFP in one of the ports of the SAN switch
which then goes into the mainframe through a FICON-LX module.
The FICON port is configured as an FCP interface in the IOCDS.

I am not sure how one would go about writing such code as I am so new to
all this but I will say that it sounds feasible...
I just came across this though:
http://linuxvm.org/present/SHARE104/S9259vs.pdf
Which mentions some tools specifically "zipl" which sounds like it may
be-able to help me?
Found it available to download here along with quite a few other tools:
https://www.ibm.com/developerworks/linux/linux390/s390-tools-overview.html

I must get to bed now and will be out this weekend, but I will
definitely look into this late next week after my finals at college.

-Connor K

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

------------------------------

Date:    Sat, 5 Dec 2015 16:49:08 +0530
From:    Nathan Astle <tcpipat...@gmail.com>
Subject: SADMP Allocation factor

Hi

Could someone point me on what are the factor does a SADMP allocation size
matters ?

Regards
Nathan

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

------------------------------

Date:    Sat, 5 Dec 2015 06:50:28 -0600
From:    Mike Schwab <mike.a.sch...@gmail.com>
Subject: Re: IBM z890 Update.

http://www.ibm.com/developerworks/linux/linux390/sysload.html
Will this install on the HMC disk?  Then start the Linux on the SCSI SAN?

On Fri, Dec 4, 2015 at 11:27 PM, Connor Krukosky
<conn...@connorsdomain.com> wrote:
> On 12/4/2015 11:26 PM, Tony Harminc wrote:
>>
>> Your box has a floppy drive? Really?
>
> The SE does yes.
>>
>> Just so I'm clear... Your z890 plugs in to your SCSI disk box, but it
>> won't
>> IPL from it? That is, these are separate features? If I have this right,
>> then it should be possible to write a small program that could, at worst,
>> be keyed in to storage. This program would then perform the I/O
>> instructions to emulate the SCSI IPL. Sort of like the way VM emulates IPL
>> in a virtual machine. Well maybe this is just what FC 9904 does...
>>
> So let me explain how everything is attached:
> I have an old HP SCSI hard drive array attached to a SAN Data Gateway model
> 2108-G07.
> Then I have that go into a SAN switch via SW FCP connection SAN switch is
> model 2005-b16.
> Finally I have a LW fiber SFP in one of the ports of the SAN switch which
> then goes into the mainframe through a FICON-LX module.
> The FICON port is configured as an FCP interface in the IOCDS.
>
> I am not sure how one would go about writing such code as I am so new to all
> this but I will say that it sounds feasible...
> I just came across this though:
> http://linuxvm.org/present/SHARE104/S9259vs.pdf
> Which mentions some tools specifically "zipl" which sounds like it may
> be-able to help me?
> Found it available to download here along with quite a few other tools:
> https://www.ibm.com/developerworks/linux/linux390/s390-tools-overview.html
>
> I must get to bed now and will be out this weekend, but I will definitely
> look into this late next week after my finals at college.
>
> -Connor K
>
>
> ----------------------------------------------------------------------
> 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

------------------------------

Date:    Sat, 5 Dec 2015 09:49:45 -0500
From:    Peter Relson <rel...@us.ibm.com>
Subject: Re: length of "executable"

>36B0 hex = 14000 decimal, and that is the length I am expecting.

Your expectation is not correct. The length returned (both in R1 as the
number of doublewords, or via EXTINFO) represents the amount of space that
the system obtains.

Particularly for program objects, it is often the case that the storage
amount allotted is rounded up to 4K, which actually correlates to the fact
that PDSE space allocation is typically in 4K mutiples. That rounding does
not typically happen for load modules (in PDS).

You did not explain why you might "need" 36B0 hex.

If you want something that lets you see "36B0", since that is what ISPF
shows, it must be that that is the data you get back via BLDL and/or
DESERV GET.

Peter Relson
z/OS Core Technology Design


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

------------------------------

Date:    Sat, 5 Dec 2015 09:57:21 -0500
From:    Peter Relson <rel...@us.ibm.com>
Subject: Re: IBM z890 Update.

Just a general caution (I do not know if it applies here or not):

There is a difference between "free" and "available at no charge".
That difference might come into play with respect to the license terms,
whatever they are.

Peter Relson
z/OS Core Technology Design


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

------------------------------

Date:    Sat, 5 Dec 2015 11:09:15 -0600
From:    "Joel C. Ewing" <jcew...@acm.org>
Subject: Re: IBM z890 Update.

The 2005 SHARE presentation Conner noted makes the issues much clearer
for those of us who have never worked with FCP channels on z-boxes:
SCSI I/O using QDIO over FCP channels requires not a 2-byte device
address but all sorts of parameters to establish the I/O connections,
and Feature FC9904 appears to add code to the SE and HMC to add
additional panels to allow for enabling SCSI IPL and supplying all the
new parameters required to initiate the I/O.   It also talks about FCP
SCSI IPL support being added to zVM V4.4, but even if you had zVM, you
would still have to be able to IPL zVM first, which if you only had SCSI
drives over FCP would seem to also require FC9904.

The sysload tool mentioned sounds like code that runs under z
architecture, not code that runs on the SE.  That suggests it in this
case would also have to be installed on a SCSI drive and you would then
have the same problem trying to IPL it.

I'm puzzled as to how a load/IPL was initiated on the z890 to install
CentOS for system z on a SCSI drive.  That suggests you have some way to
initiate a load from a source other than FCP SCSI.  If so, perhaps there
is hope for using a similar technique to load a bootstrap loader that
then loads from SCSI.  My brief search attempts found conflicting info
on whether there is CentOS support for z-architecture platforms, but
perhaps I just didn't find the correct sites.
    Joel C. Ewing

On 12/05/2015 06:50 AM, Mike Schwab wrote:
> http://www.ibm.com/developerworks/linux/linux390/sysload.html
> Will this install on the HMC disk?  Then start the Linux on the SCSI SAN?
>
> On Fri, Dec 4, 2015 at 11:27 PM, Connor Krukosky
> <conn...@connorsdomain.com> wrote:
>> On 12/4/2015 11:26 PM, Tony Harminc wrote:
>>> Your box has a floppy drive? Really?
>> The SE does yes.
>>> Just so I'm clear... Your z890 plugs in to your SCSI disk box, but it
>>> won't
>>> IPL from it? That is, these are separate features? If I have this right,
>>> then it should be possible to write a small program that could, at worst,
>>> be keyed in to storage. This program would then perform the I/O
>>> instructions to emulate the SCSI IPL. Sort of like the way VM emulates IPL
>>> in a virtual machine. Well maybe this is just what FC 9904 does...
>>>
>> So let me explain how everything is attached:
>> I have an old HP SCSI hard drive array attached to a SAN Data Gateway model
>> 2108-G07.
>> Then I have that go into a SAN switch via SW FCP connection SAN switch is
>> model 2005-b16.
>> Finally I have a LW fiber SFP in one of the ports of the SAN switch which
>> then goes into the mainframe through a FICON-LX module.
>> The FICON port is configured as an FCP interface in the IOCDS.
>>
>> I am not sure how one would go about writing such code as I am so new to all
>> this but I will say that it sounds feasible...
>> I just came across this though:
>> http://linuxvm.org/present/SHARE104/S9259vs.pdf
>> Which mentions some tools specifically "zipl" which sounds like it may
>> be-able to help me?
>> Found it available to download here along with quite a few other tools:
>> https://www.ibm.com/developerworks/linux/linux390/s390-tools-overview.html
>>
>> I must get to bed now and will be out this weekend, but I will definitely
>> look into this late next week after my finals at college.
>>
>> -Connor K
>>
>>
>>
>>


--
Joel C. Ewing,    Bentonville, AR       jcew...@acm.org

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

------------------------------

Date:    Sat, 5 Dec 2015 11:21:30 -0600
From:    Paul Gilmartin <paulgboul...@aim.com>
Subject: Re: length of "executable"

On Sat, 5 Dec 2015 09:49:45 -0500, Peter Relson wrote:

>>36B0 hex = 14000 decimal, and that is the length I am expecting.
>
>You did not explain why you might "need" 36B0 hex.
>
It might be the size of a table, not otherwise known at execution time.
I'd suggest a header to the table containing that size.

Others have used a dummy CSECT at the end, and taken the difference of
two V-constants.  If you do that, be sure to use a Binder ORDER command.

>If you want something that lets you see "36B0", since that is what ISPF
>shows, it must be that that is the data you get back via BLDL and/or
>DESERV GET.

-- gil

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

------------------------------

Date:    Sat, 5 Dec 2015 11:36:32 -0700
From:    Mark Post <mp...@suse.com>
Subject: Re: IBM z890 Update.

>>> On 12/5/2015 at 12:09 PM, "Joel C. Ewing" <jcew...@acm.org> wrote:
> I'm puzzled as to how a load/IPL was initiated on the z890 to install
> CentOS for system z on a SCSI drive.  That suggests you have some way to
> initiate a load from a source other than FCP SCSI.  If so, perhaps there
> is hope for using a similar technique to load a bootstrap loader that
> then loads from SCSI.

And this is the point I was going to make.  The install process starts with the 
"Load from Removable Media or Server."  That media can be a DVD in the HMC, or 
an FTP server somewhere on the network.  The HMC looks for files that end with 
"*.ins" and displays the list of them on the HMC.  Each of those files contains 
a list of _other_ files that are to be loaded into storage, at specified 
locations, and then executed.  The suse.ins file looks like this:
boot/s390x/linux 0x00000000
boot/s390x/initrd.off 0x0001040c
boot/s390x/initrd.siz 0x00010414
boot/s390x/initrd 0x01000000
boot/s390x/parmfile 0x00010480

What I would recommend is that Connor keep his FTP server updated with whatever 
kernels, ramdisks, and parmfiles he has installed on his storage array, and use 
the HMC to boot from them.  (These would need to be extracted from disk to the 
FTP server after every update to the kernel or parameters.)  In the parmfile, 
you can point to where the root file system lives, and the initrd would have 
the code necessary to activate the SCSI over FCP connection to mount it.

It's a bit of a PITA, but should work just fine until such time as he either 
gets the SCSI IPL feature from IBM installed, or he finds some ECKD storage at 
a reasonable price.


Mark Post

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

------------------------------

Date:    Sat, 5 Dec 2015 15:28:36 -0600
From:    Sonny Gupta <sgu...@maintec.com>
Subject: TCPIP Configuration Help

Hello, I have a small z9 System with two OSA Card. I am able connect to only 
the one of the OSA Card without any problems and unable to determine what I 
need to do in order to connect both of the OSA Cards at the same time. Each OSA 
Card is connected to separate --> Switch ---> Firewall --> ISP Modem. I am able 
to connect to both of the cards via ICC without any issues. Below are the 
statements that I am using:

DEVICE  OSAB1 MPCIPA SECROUTER AUTORESTART
LINK    OSAB1L IPAQENET OSAB1
HOME 192.168.168.164  OSAB1L
;
DEVICE  OSAB2 MPCIPA SECROUTER AUTORESTART
LINK    OSAB2L IPAQENET OSAB2
HOME 192.168.169.68   OSAB2L
;
BEGINRoutes
ROUTE DEFAULT  192.168.168.168               OSAB1L    MTU 1492
ROUTE DEFAULT  192.168.169.168               OSAB2L    MTU 1492
ENDRoutes

What I have been able to determine is  that 2nd Route Default statement is 
being ignored. I am able to get to 2nd OSA Card if I move the 2nd Route 
Statement in front of the 1st one and then of course, I am unable to get to the 
first one. I am not an expert is TCPIP and I have spend considerable amount of 
time reviewing the manuals along with searching the net. I will be glad to 
provide any required information and thanks in advance for any recommendations.

Regards,
Sonny

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

------------------------------

Date:    Sat, 5 Dec 2015 18:27:37 -0500
From:    "Shmuel Metz (Seymour J.)" <shmuel+ibm-m...@patriot.net>
Subject: Re: Online manuals for 3880-21, 3880-23, 3990, 2105 et al?

In
<8285047530401296.wa.elardus.engelbrechtsita.co...@listserv.ua.edu>,
on 12/04/2015
   at 07:40 AM, Elardus Engelbrecht <elardus.engelbre...@sita.co.za>
said:

>No links, but I see you got a good reply about a bitsavers link.

Only one manual there, in two editions.


>I still have bookmanager books for 3990. See this list of ancient
>bookies:
>Book Name   Book Title
>ANTGAR00    Advanced Copy Services
>A13R1001    IBM 3990 Storage Control Reference
>A13U4000    3990 TPF Support RPQs
>A13I1005    3990/9390 Introduction
>A13U5003    3990/9390 Operations and Recovery Guide
>A13U1004    3990/9390 Planning, Installation, and Storage Adminis
>A13R2005    3990/9390 Reference
>You want them, just shout, I can send them to you for free.

If you could mail a CD or put them on an FTP seerver, that would be
great. My Internet access is dial, so e-mail is not an option. Thanks.

--
     Shmuel (Seymour J.) Metz, SysProg and JOAT
     ISO position; see <http://patriot.net/~shmuel/resume/brief.html>
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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

------------------------------

Date:    Sat, 5 Dec 2015 18:30:06 -0500
From:    "Shmuel Metz (Seymour J.)" <shmuel+ibm-m...@patriot.net>
Subject: Re: Online manuals for 3880-21, 3880-23, 3990, 2105 et al?

In <4973200255008345.wa.robert.harrisonomes.ok....@listserv.ua.edu>,
on 12/04/2015
   at 02:27 PM, Robert Harrison <robert.harri...@omes.ok.gov> said:

>http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/Shelves/EZ2HW125

Thanks; that has a lot of what I need.

--
     Shmuel (Seymour J.) Metz, SysProg and JOAT
     ISO position; see <http://patriot.net/~shmuel/resume/brief.html>
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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

------------------------------

Date:    Sat, 5 Dec 2015 18:33:31 -0500
From:    "Shmuel Metz (Seymour J.)" <shmuel+ibm-m...@patriot.net>
Subject: Re: length of "executable"

In <bay167-w9962b3b3429f9b93f63e5e4...@phx.gbl>, on 12/04/2015
   at 05:54 PM, Frank Swarbrick <frank.swarbr...@outlook.com> said:

>I am able to use the LOAD macro to get the address, but I also need
>to get the length.

From z/OS MVS Programming: Assembler Services Reference, Volume 2
(IAR-XCT), SA22-7607-15:


   1         The high-order byte contains the load module's APF
              authorization code.

             If the module's length value in doublewords is less
             than 16M (2**24) and the module does not have the
             RMODE(SPLIT) attribute, then the low-order three bytes
             contain the module length in doublewords.

             If the module's length value in doublewords is greater
             than or equal to 16M (2**24), the low-order three
             bytes contain zeros. To obtain the module length,
             issue the CSVQUERY macro with the OUTLENGTH parameter.

             If the module is a program object with the
             RMODE(SPLIT) attribute, the low-order three bytes
             contain zeros. To obtain the length and load point
             information for each segment, issue the CSVQUERY macro
             with the OUTXTLST parameter.

             When the module is a program object bound with the
             FETCHOPT=NOPACK option, the length value returned has
             been rounded to the fullpage-multiple area obtained
             with GETMAIN to hold the program object. If the
             program object is bound with the FETCHOPT=PACK option,
             the length value returned is the size indicated in the
             directory entry. See z/OS MVS Program Management:
             User's Guide and Reference and z/OS MVS Program
             Management: Advanced Facilities for further information.

 1. Why are you using EXTINFO?
 2. How is the module bound?
 3. What's in R1 after the load?
 4. What are the results of CSVQUERY OUTLENGTH?
 5. Are you doing the LOAD in the CICS main task?

--
     Shmuel (Seymour J.) Metz, SysProg and JOAT
     ISO position; see <http://patriot.net/~shmuel/resume/brief.html>
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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

------------------------------

Date:    Sat, 5 Dec 2015 18:37:09 -0500
From:    "Shmuel Metz (Seymour J.)" <shmuel+ibm-m...@patriot.net>
Subject: Re: length of "executable"

In
<cajtoo5_ciuvhacjbmzx6bgnh0kpgtugbwputtrv9n4nx0o5...@mail.gmail.com>,
on 12/04/2015
   at 07:18 PM, Mike Schwab <mike.a.sch...@gmail.com> said:

>A PDS load module block is a multiple of 1K.

No.

>PDSEs are built on linear datasets

I doubt that that's relevant.

--
     Shmuel (Seymour J.) Metz, SysProg and JOAT
     ISO position; see <http://patriot.net/~shmuel/resume/brief.html>
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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

------------------------------

Date:    Sat, 5 Dec 2015 18:39:44 -0500
From:    "Shmuel Metz (Seymour J.)" <shmuel+ibm-m...@patriot.net>
Subject: Re: length of "executable"

In
<caajsdjgvoaok031wgorusdptgrbab051o9z0zjl7m+cts4y...@mail.gmail.com>,
on 12/04/2015
   at 08:10 PM, John McKown <john.archie.mck...@gmail.com> said:

> I don't know what EXTINFO refers to off-hand, but supposedly R1
>upon return contains the length, in double word increments, of the
>module in bytes 1..3 .

Except when it's zero, in which case you need CSVQUERY.

--
     Shmuel (Seymour J.) Metz, SysProg and JOAT
     ISO position; see <http://patriot.net/~shmuel/resume/brief.html>
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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

------------------------------

Date:    Sat, 5 Dec 2015 18:43:20 -0500
From:    "Shmuel Metz (Seymour J.)" <shmuel+ibm-m...@patriot.net>
Subject: Re: length of "executable"

In <201512051447.tb5eldfi004...@d01av05.pok.ibm.com>, on 12/05/2015
   at 09:49 AM, Peter Relson <rel...@us.ibm.com> said:

>You did not explain why you might "need" 36B0 hex.

He's loading a table and needs both the address and length in order to
process it.

--
     Shmuel (Seymour J.) Metz, SysProg and JOAT
     ISO position; see <http://patriot.net/~shmuel/resume/brief.html>
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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

------------------------------

Date:    Sun, 6 Dec 2015 07:20:48 +0530
From:    Jake Anderson <justmainfra...@gmail.com>
Subject: Re: TCPIP Configuration Help

I believe If both the OSA are initialised and started then they are good.
The routing will take from first order of your Routing statement. Second
OSA would act as a redundant.

You can post your query in TCP-L where you can get more response



On Sunday 6 December 2015, Sonny Gupta <sgu...@maintec.com> wrote:

> Hello, I have a small z9 System with two OSA Card. I am able connect to
> only the one of the OSA Card without any problems and unable to determine
> what I need to do in order to connect both of the OSA Cards at the same
> time. Each OSA Card is connected to separate --> Switch ---> Firewall -->
> ISP Modem. I am able to connect to both of the cards via ICC without any
> issues. Below are the statements that I am using:
>
> DEVICE  OSAB1 MPCIPA SECROUTER AUTORESTART
> LINK    OSAB1L IPAQENET OSAB1
> HOME 192.168.168.164  OSAB1L
> ;
> DEVICE  OSAB2 MPCIPA SECROUTER AUTORESTART
> LINK    OSAB2L IPAQENET OSAB2
> HOME 192.168.169.68   OSAB2L
> ;
> BEGINRoutes
> ROUTE DEFAULT  192.168.168.168               OSAB1L    MTU 1492
> ROUTE DEFAULT  192.168.169.168               OSAB2L    MTU 1492
> ENDRoutes
>
> What I have been able to determine is  that 2nd Route Default statement is
> being ignored. I am able to get to 2nd OSA Card if I move the 2nd Route
> Statement in front of the 1st one and then of course, I am unable to get to
> the first one. I am not an expert is TCPIP and I have spend considerable
> amount of time reviewing the manuals along with searching the net. I will
> be glad to provide any required information and thanks in advance for any
> recommendations.
>
> Regards,
> Sonny
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu <javascript:;> 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

------------------------------

Date:    Sat, 5 Dec 2015 23:02:31 -0400
From:    Clark Morris <cfmpub...@ns.sympatico.ca>
Subject: Re: Lrecl

On 28 Nov 2015 11:50:44 -0800, in bit.listserv.ibm-main you wrote:

>All:
>
>Our STC use several files and I want to verify that the files have the
>correct logical record length. The STCs are written LE Cobol.
>I would like to know before I open the file if the file that is created or
>allocated is correct in record length. For example, if the Logical Record
>Length is 121 as defined in the program tries to open a file with a LRECL
>300 bytes. Can i do the following ?

It is simple.  Assign a status code (2 bytes) to any file you want to
check and then check the status code after ALL I-O operations for the
file.  The status codes and their meanings are in the COBOL manual.
Status codes 00 and 97 are the only codes I normally accept on open.
One of the status codes returned on open is for wrong length record.
The presence of a status code on the SELECT statement for a file means
that the default error handling is bypassed.

CLark Morris
>
>1. Call a Assembler subroutine using RDJFCB and determine the lrecl on the
>volume for the dataset and allocation ?
>2. If the lrecl i want to pass back a RTNCD in R15 and then then have Cobol
>fail ....
>
>
>Regards,
>Scott
>
>----------------------------------------------------------------------
>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

------------------------------

End of IBM-MAIN Digest - 4 Dec 2015 to 5 Dec 2015 (#2015-339)
*************************************************************


Gary Weinhold
Senior Application Architect

DATAKINETICS | Data Performance & Optimization

Phone   +1.613.523.5500 x216
Email:  weinh...@dkl.com

Visit us online at www.DKL.com

E-mail Notification: The information contained in this email and any 
attachments is confidential and may be subject to copyright or other 
intellectual property protection. If you are not the intended recipient, you 
are not authorized to use or disclose this information, and we request that you 
notify us by reply mail or telephone and delete the original message from your 
mail system.



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