jcl for file transfer

ankoo · New User Joined: 12 Jun 2010 Posts: 31 Location: India

I am using the following jcl to transfer file

//R9SSHC6 EXEC PGM=FTP,PARM='TN3270.IPC-SPECIFIC.ALLSTATE.COM (EXIT=8'
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
userid password
PUT 'PWSX.R9SSHC6.FTP5'
GET 'PWSX.R9SSHC6.FTP4'
QUIT
/*
/*

But not able to transfer file

If any body is having a working JCL please provide the same.
Thanks and regards

expat · Posted: Tue Aug 31, 2010 12:32 pm

Rather than ask for someone elses efforts, what have you done to correct your own error.

You post no output, nothing to let people see what is happening, and then you expect us to drop everything and give you some JCL.

Engage brain - Maybe the problem will still be exactly the same with whatever JCL you use. Have you considered it may be something wrong at your site.

ankoo · New User Joined: 12 Jun 2010 Posts: 31 Location: India

Thanks for reply expat
In spool I am getting the following msg-:
EZA1736I FTP TN3270.IPC-SPECIFIC.ALLSTATE.COM (EXIT=8
EZY2640I Using 'SYS1.TCPPARMS(FTPDATA)' for local site configuration parameters.
EZA1450I IBM FTP CS V1R10
EZA1772I FTP: EXIT has been set.
EZA1554I Connecting to: tnnbdc.ALLSTATE.COM 10.195.251.21 port: 21.
220-A2FTPIPD IBM FTP CS V1R10 at MVSCSYS.allstate.com, 06:32:58 on 2010-08-31.
220 Connection will close if idle for more than 5 minutes.
EZA1459I NAME (TN3270.IPC-SPECIFIC.ALLSTATE.COM:R9SSHC6):
EZA1701I >>> USER R9SSHC6
331 Send password please.
EZA1701I >>> PASS
230 R9SSHC6 is logged on. Working directory is "R9SSHC6.".
EZA1460I Command:
EZA1736I PUT 'PWSX.R9SSHC6.FTP4'
EZA1701I >>> SITE FIXrecfm 80 LRECL=80 RECFM=FB BLKSIZE=800
200 SITE command was accepted
EZA1701I >>> PORT 10,195,251,25,206,197
200 Port request OK.
EZA1701I >>> STOR 'PWSX.R9SSHC6.FTP4'
125-FTP Server unable to obtain EXCLUSIVE use of PWSX.R9SSHC6.FTP4 which is held
125 Data set PWSX.R9SSHC6.FTP4 is not available
450 Data set PWSX.R9SSHC6.FTP4 is allocated to another job and is unavailable fo
EZA1735I Std Return Code = 27450, Error Code = 00002
EZA1701I >>> QUIT
221 Quit command received. Goodbye.

smijoss · Active User Joined: 30 Aug 2007 Posts: 114 Location: pune

hope you read this in your trace !!!!

125-FTP Server unable to obtain EXCLUSIVE use of PWSX.R9SSHC6.FTP4 which is held
125 Data set PWSX.R9SSHC6.FTP4 is not available
450 Data set PWSX.R9SSHC6.FTP4 is allocated to another job and is unavailable fo
EZA1735I Std Return Code = 27450, Error Code = 00002

expat · Posted: Tue Aug 31, 2010 2:23 pm

ankoo · New User Joined: 12 Jun 2010 Posts: 31 Location: India

Thanks smijoss