Path: utzoo!attcan!utgpu!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!ucbvax!becker.UUCP!bdb
From: bdb@becker.UUCP (Bruce Becker)
Newsgroups: comp.protocols.ibm
Subject: Re: Problem with JES2 proclibs
Message-ID: <8907301721.AA07380@jade.berkeley.edu>
Date: 30 Jul 89 07:15:53 GMT
Sender: daemon@ucbvax.BERKELEY.EDU
Reply-To: Bruce Becker
              <mailrus!jarvis.csri.toronto.edu!utgpu!utzoo!censor!becker!bdb@TUT.CIS.OH>
Organization: The Internet
Lines: 31

In article <8907271812.AA19235@jade.berkeley.edu> b
        <mailrus!jarvis.csri.toronto.edu!utgpu!attcan!bdofed!cook@TUT.CIS.OHIO-S
        writes:
| [...]
|The JES2 proc is;
|
|//JES2    PROC MEMBER=JES2PARM,ALTMEM=JES2PARM
|//IEFPROC EXEC PGM=HASJES20,DPRTY=(15,15),TIME=1440,PERFORM=9
|//PROC00   DD  DSN=SYS1.EBE.PROCLIB,DISP=SHR,DCB=BLKSIZE=20000
|//         DD  DSN=SYS1.PROCLIB,DISP=SHR
|//         DD  DSN=OKPROD.PROC,DISP=SHR,UNIT=SYSDA,VOL=SER=EBE013
|//         DD  DSN=OKPROD.MSPROC,DISP=SHR,UNIT=SYSDA,VOL=SER=EBE013
|//         DD  DSN=PROD.PROCLIB,DISP=SHR,UNIT=SYSDA,VOL=SER=EBE007
|//         DD  DSN=TEST.PROCLIB,DISP=SHR,UNIT=SYSDA,VOL=SER=EBE005
| [...]
|All of the proclibs are PRIMARY allocation only. Their blocksizes are (in
|order) 3120, 3120, 3120, 3120, 6160, 6160.

        I think you should be saying  "DCB=BUFLEN=20000" on the
        //PROC00 line.

        Changing the BLKSIZE will indeed cause i/o errors since
        the read will expect 20000 bytes but will only get 3120
        whenever a SYS1.EBE.PROCLIB block is accessed.

Cheers,
--
   __    Bruce Becker   Toronto, Ont.
w \cc/   Internet: bdb@becker.UUCP, bruce@gpu.utcs.toronto.edu
 `/\/-e  BitNet:   BECKER@HUMBER.BITNET
_<  >_   "Mistah Kaldis, he T*d" - A Popsicle Now