Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Copying Load Modules

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
Rick Walker

New User


Joined: 14 Sep 2009
Posts: 5
Location: Des Plaines, IL.

PostPosted: Tue Sep 15, 2009 11:49 pm    Post subject: Copying Load Modules
Reply with quote

I need to copy load modules to a flat sequential file, FTP this file to a client site, then create a new PDS and load the modules.
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7931
Location: Bellevue, IA

PostPosted: Tue Sep 15, 2009 11:54 pm    Post subject:
Reply with quote

IEBCOPY will unload a PDS to a sequential file, along with rebuild it on the other end.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Tue Sep 15, 2009 11:54 pm    Post subject:
Reply with quote

Hello Rick and welcome to the forum,

At the top of the page is a link to "IBM Manuals". In the second set of manuals (Batch Processing) is the IBM JCL Utilities Guide for DFSMS.

In that manual look at IEBCOPY. You can use this to both unload and subsequently re-load on the target system.
Back to top
View user's profile Send private message
Rick Walker

New User


Joined: 14 Sep 2009
Posts: 5
Location: Des Plaines, IL.

PostPosted: Wed Sep 16, 2009 12:27 am    Post subject: Reply to: Copying Load Modules
Reply with quote

Thank you...I'll research IEBCOPY and test it.
Back to top
View user's profile Send private message
PeD

Active User


Joined: 26 Nov 2005
Posts: 456
Location: Belgium

PostPosted: Wed Sep 16, 2009 12:39 am    Post subject:
Reply with quote

Here the process ( sourcedsn=your PDS with load modules )

Unload phase

1. On the source MVS.
At a TSO command prompt (option 6 from the main ISPF screen) :
XMIT X.X DA('sourcedsn') OUTDA('tempdsn')
tempdsn is a FB 80 dataset. It can be preallocated or not.

2. On the intermediate platform (Unix, PC, ...).
open FTP connection to the source MVS
BINARY
GET 'tempdsn' 'pcfile'
close FTP connection

Restore phase

1. On the intermediate platform (Unix, PC, ...).
open FTP connection to the target MVS
BINARY
PROMPT OFF
QUOTE SITE FIXRECFM 80
PUT 'pcfile' 'tempdsn'
close FTP connection.

tempdsn is a FB 80 dataset. It can be preallocated or not.
If the transfer abends because tempdsn is too small, either preallocate it
(FB 80) the correct size or type the following commands before PUT... :
BLOCKS
PRI=nnn (with nnn the primary quantity in BLOCKS)
SEC=nnn (with nnn the secondary quantity in BLOCKS)

2. On the target MVS.
At a TSO command prompt (option 6 from the main ISPF screen) :
RECEIVE INDA('tempdsn')
At the prompt, enter :
DS('targetdsn')

That's all folks !!!
Back to top
View user's profile Send private message
Rick Walker

New User


Joined: 14 Sep 2009
Posts: 5
Location: Des Plaines, IL.

PostPosted: Wed Sep 16, 2009 1:29 am    Post subject: Reply to: Copying Load Modules
Reply with quote

I've run IEBCOPY to copy a couple of load modules to a sequential file. It created the file, but it can't be opened because of an invalid record length. Here is the JCL for the output dataset...

//SYSUT2 DD DSN=output.name,
// DISP=(,CATLG,DELETE),
// DCB=(RECFM=FB,LRECL=0,BLKSIZE=23200),
// SPACE=(CYL,(1,1),RLSE),UNIT=SYSDA

IEBCOPY converts to a format of VS, record length of 23216. What needs to be changed?
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Sep 16, 2009 1:36 am    Post subject:
Reply with quote

Hello,

Quote:
but it can't be opened because of an invalid record length.
What is failing on the open?
Back to top
View user's profile Send private message
Rick Walker

New User


Joined: 14 Sep 2009
Posts: 5
Location: Des Plaines, IL.

PostPosted: Wed Sep 16, 2009 1:45 am    Post subject: Reply to: Copying Load Modules
Reply with quote

When I try to browse the dataset it's not allowed because of an invalid record length. It has a cylinder of space used so there is data in it, but not readable. Load modules are probably variable length records, but load PDS's are defined as RECFM=U, LRECL=0, BLKSIZE=23200. I need this to be a readable, sequential flat file for FTP purposes.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Sep 16, 2009 2:18 am    Post subject:
Reply with quote

Hi Rick,

Yup, kinda what i expected. . .

Suggest you ftp the file as a binary file and continue from there.
Back to top
View user's profile Send private message
Rick Walker

New User


Joined: 14 Sep 2009
Posts: 5
Location: Des Plaines, IL.

PostPosted: Wed Sep 16, 2009 2:22 am    Post subject: Reply to: Copying Load Modules
Reply with quote

I believe that would be best. Thanks for your time.

RW
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Sep 16, 2009 2:46 am    Post subject: Reply to: Copying Load Modules
Reply with quote

You're welcome - good luck icon_smile.gif

Someone will be here if there are questions or problems,

d
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7931
Location: Bellevue, IA

PostPosted: Wed Sep 16, 2009 2:47 am    Post subject:
Reply with quote

Quote:
I need this to be a readable, sequential flat file for FTP purposes.
Why? Binary transfers work fine, and unloaded load module PDS are not in a format you'd want to browse, anyway. IEBCOPY has its own internal format for unloaded PDS files and as long as I transfer in binary it can be reconstructed just fine on the other end -- without being able to look at the data.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Need Rexx Program to Load in to DB2 T... Hareesh Verma CLIST & REXX 22 Tue Sep 20, 2016 2:59 pm
No new posts Copybook structure in Load module Vai123 COBOL Programming 7 Fri Sep 16, 2016 8:29 pm
This topic is locked: you cannot edit posts or make replies. ERROR WHILE SUBMITTING LOAD JOB ANURADHA NEELAKANTAN JCL & VSAM 12 Thu Aug 25, 2016 11:50 am
No new posts Execute multiple DB2 Load commands in... faizm DB2 4 Wed Aug 03, 2016 12:53 pm
No new posts Search a Load Module sreekanth1984 TSO/ISPF 8 Tue Jun 07, 2016 8:45 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us