View previous topic :: View next topic
|
Author |
Message |
chhabraravneet
New User
Joined: 04 Oct 2007 Posts: 49 Location: Mumbai
|
|
|
|
Hi,
I tried to find this in the forum, about PKZIP and FTP that file to a shared drive, but i am not getting the below issue:
Here is my PKZIP jcl to zip the mainframe file:
Code: |
//********************************************************************
//* THIS JOB WILL ZIP A MAINFRAME FLAT FILE
//********************************************************************
//*
//ZIP01 EXEC PGM=PKZIP,REGION=2048K
//STEPLIB DD DISP=SHR,DSN=PKZIP.LOAD
//INFILE DD DSN=GDG.JCL,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
-ECHO
-MEMORY_MODE(SMALL)
-ARCHIVE(GDG.ZIP)
-DATA_TYPE(BINARY)
-METHOD(MAXIMUM)
-INDD(INFILE)
/*
//* |
The above job successfully zips my file GDG.JCL to GDG.zip.
Now i am not able to FTP this GDG.zip file. Can anyone please help me in this:
Code: |
//P001 EXEC PGM=FTP,PARM='(EXIT',REGION=4096K
//INPUT DD *
Mycompany name
User
password
ASCII
PUT 'GDG.JCL' \shrdata\wc\wcscan\GDG.zip
QUIT
//OUTPUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=* |
I know, there is some issue with the ASCII and BINARY. My PKZIP has created BINARY and i am sending in ASCII.
Can anyone please help on how to FTP this BINARY zip file.
Thanks.
Ravneet. |
|
Back to top |
|
|
Akatsukami
Global Moderator
Joined: 03 Oct 2009 Posts: 1788 Location: Bloomington, IL
|
|
|
|
What are the error messages that you are getting? |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8697 Location: Dubuque, Iowa, USA
|
|
|
|
Code: |
//P001 EXEC PGM=FTP,PARM='(EXIT',REGION=4096K
//INPUT DD *
Mycompany name
User
password
ASCII
PUT 'GDG.JCL' \shrdata\wc\wcscan\GDG.zip
QUIT
//OUTPUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=* |
1. "my company name" should be the IP address or DNS name for the server you are connecting to
2. ASCII should be BINARY -- ZIP files must be transferred as binary
3. I don't know how PKZIP works on the mainframe, but I suspect you want to transfer GDG.ZIP, not GDG.JCL |
|
Back to top |
|
|
chhabraravneet
New User
Joined: 04 Oct 2007 Posts: 49 Location: Mumbai
|
|
|
|
Thanks Bob.
I got it. It was a silly mistake i was making in my JCL, which you corrected in point 3.
I put GDG.JCL instead of GDG.ZIP in my jcl and it worked.
Below is the jcl that worked:
//P001 EXEC PGM=FTP,PARM='(EXIT',REGION=4096K
//INPUT DD *
DNS name
User
password
BINARY
PUT 'GDG.ZIP' \shrdata\wc\wcscan\GDG.zip
QUIT
//OUTPUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
Thanks again !!! |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8697 Location: Dubuque, Iowa, USA
|
|
|
|
Glad to hear you got it working, but I go by Robert -- never have been called "Bob" except by people who don't know better. |
|
Back to top |
|
|
Nic Clouston
Global Moderator
Joined: 10 May 2007 Posts: 2455 Location: Hampshire, UK
|
|
|
|
Quote: |
people who don't know better |
or with a death-wish?
chhabraravneet:
There was nothing wrong with the JCL - the error was in the FTP control cards (they are NOT JCL). |
|
Back to top |
|
|
|