Don,
If all you are interested in is copying the data from production to development and you already have the physical and logical files on the development system try using a combination of DDM and CPYF. This approach has some advantages. First, you don't have to lock the production objects while saving objects. Second, disk space usage is reduced on both systems since you don't have to have large save files on both systems. Third, you can customize data extraction.
It is relatively easy to put together a CL program to automate the copies.
o Run DSPFD FILE(yourlib/*ALL) TYPE(*MBRLIST) OUTPUT(*OUTFILE) FILEATR(*PF) OUTFILE(QTEMP/yourfile)
o Read through the output file in QTEMP. For each entry submit a job to copy data from production to development.
SBMJOB CMD(CALL PGM(MYPGM) PARM(&MLLIB &MLFILE &MLNAME)) JOB(&MLNAME) JOBQ(QUSRNOMAX)
MYPGM does the following.
o Creates a DDM file pointing to &MLLIB/&MLFILE(&MLNAME) on the production system.
o Runs CPYF FROMFILE(DDMFile) TOFILE(&MLLIB/&MLFILE) FROMMBR(*FIRST) TOMBR(&MLNAME)
You can substitute MYPGM for a conversion program if the developers have a file change.
Have fun.
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Don Wereschuk
Sent: Thursday, September 05, 2013 7:59 AM
To: MIDRANGE-L@xxxxxxxxxxxx
Subject: Data Transfer
Hi All: I'm having a problem transferring current data from a production box to our development box. I've tried using FTP but I'm having issues with this. First I did a SAVF on the library but it seems there is a limit on the amount of data that can be transferred at a time. I believe I can change the limit but that's not my main concern. I split the save into multiple save files and only saved PFs and LFs but I still end up with approx. 100 GB of data to transfer. My problem is that in using FTP it is taking about 3 hrs. to FTP 16 GB of data. This would result in a time of almost 20 hrs. to transfer the 100 GB. Is there a faster way to do this or is using a tape backup and physically delivering it to the other machine the fastest way? I only have a window of approx. 4-5 hrs. Any and all suggestions are appreciated.
TIA
******************************************
Don Wereschuk
ISD - Programmer/Analyst
Simcoe Parts Service Inc.
Phone: 705-435-7814 Ex: 302
Fax: 705-435-5029
mailto:dwereschuk@xxxxxxxxxxxxxxx
******************************************
If I'd have done what I said I should have done, then I'd be sitting here saying I should have done what I did do.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at
http://archive.midrange.com/midrange-l.
midrange.com
