Re: how to import PDS file in xmit format to a hercules volume

"Gerhard Postpischil [email protected] [hercules-390]" <[email protected]>
Newsgroups gmane.comp.emulators.hercules390.general
Message-ID <[email protected]>
On 8/6/2019 11:30 AM, [email protected] [hercules-390] wrote:
> can anyone help me, which utility I can use to import a xmit PDS file 
> into a z/OS hercules volume ?
I'm getting too old for this) The program  I use for MVS, with sample 
JCL, is simply:

//RECV370  EXEC PGM=RECV370,REGION=6000K
//STEPLIB   DD DSN=SYS2.LINKLIB,DISP=SHR
//RECVLOG   DD SYSOUT=*
//XMITIN    DD DISP=SHR,DSN=---xmit file-----
//*            DCB=(RECFM=FB,LRECL=80,BLKSIZE=27920)
//SYSPRINT  DD SYSOUT=* 

//SYSUT1    DD UNIT=SYSALLDA,VOL=SER=&TMP,DISP=(,DELETE,DELETE),
//             SPACE=(CYL,(100,50),RLSE),DSN=&&SYSUT1
//SYSUT2    DD DSN=GERHARD.MVS.X&DS,
//             UNIT=SYSALLDA,VOL=SER=&VOL,DISP=(,CATLG,DELETE),
//             SPACE=(CYL,(10,10,&DB),RLSE)
//SYSUT3   DD  UNIT=SYSDA,SPACE=(CYL,10)
//SYSUT4   DD  UNIT=SYSDA,SPACE=(CYL,10)
//SYSIN     DD DUMMY
//SYSUDUMP  DD SYSOUT=*

Note that IND$FILE has to be set for card format, with a good block 
size. The default block is not a multiple of 80 on my system.

 


Gerhard Postpischil
Bradford, VT

---
This email has been checked for viruses by AVG.
https://www.avg.com
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.