View previous topic :: View next topic
|
Author |
Message |
sridevi t
New User
Joined: 17 Nov 2008 Posts: 3 Location: Bengaluru,India
|
|
|
|
Hi,
I need to ftp a file to a server with the current date appended to the destination file name.
I have used utility EZACFSM1. The job failed with the utility step
having a RC 0f 0037 and the ftp step with a RC of 1954. the code i have used is in the attachment.
the userid and password used for ftp are right, but the message received is 'Incorrect login'.
Can anyone please let me know how do i correct the same.
- Sri
Attachment Removed |
|
Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
|
|
Back to top |
|
|
sridevi t
New User
Joined: 17 Nov 2008 Posts: 3 Location: Bengaluru,India
|
|
|
|
Hi,
Below is the code which i have used.PROC1 and PARM1 are for utility EZACFSM1 and PROC2 and PARM2 are for FTP
Code: |
//**************************************
//S01 JCLLIB ORDER=(USERID.TEST.PROCLIB)
//S02 INCLUDE MEMBER=MEMBER1
//***************************************
//STEP1 EXEC PROC1,
// MEMB1='PARM1'
//SYSOUT DD SYSOUT=*
//*
//STEP2 EXEC PROC2,
// FTPSITE='SERVER1.COM(EXIT',
// MEMB1='PARM2'
//****************************************
//* IF PREVIOUS STEP FAILS
//****************************************
// IF (STEP2.STEP0010.RC NE 0) THEN
//STEP3 EXEC PROC3,
// FTPSITE='SERVER2.COM(EXIT',
// MEMB1='PARM3'
// ENDIF
//*
//*
|
Code: |
//PROC1 PROC MEMB1=
//*
//STEP0010 EXEC PGM=EZACFSM1
//*
//SYSPRINT DD SYSOUT=*
//INPUT DD DSN=USERID.TEST.PARMLIB(&MEMB1),
// DISP=SHR
|
&MEMB1 = PARM1
===============
Code: |
PUT 'HOST.FILE' +
DEST_FILE_NAME_&LYR4&MON&DAY..DAT
QUIT
|
Code: |
//PROC2 PROC FTPSITE=,
// MEMB1=
//*
//STEP0010 EXEC PGM=FTP,
// PARM='&FTPSITE'
//*
//SYSPRINT DD SYSOUT=*
//STEP11 DD DSN=USERID.TEST.PARMLIB(&MEMB1),
// DISP=SHR
|
&MEMB1 = PARM2
===============
Code: |
USERID
PSWD
ASCII
CD /PATH/OF/DEST
QUIT
|
Error msgs got
----------------
530 Login incorrect
EZA1735I Std Return Code = 26530, Error Code = 00011
Information Messages got
--------------------------
.I USER GROUP PRODTABL IS AN UNKNOWN USER GROUP
.I TMSS JLS AGENT +PRODANY.NITE ADDED TO JOB
.I SYSTEM AFFINITY RE-SET TO ANY FOR THIS JOB |
|
Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
|
|
|
|
To start, where are the input (SYSIN) and output (SYSOUT) DD names for the EZACFSM1 program? I see where you have the SYSOUT DD statement pointing to SYSOUT=*. Don't you want that output in a dataset? |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Hi,
In this
Code: |
//STEP0010 EXEC PGM=EZACFSM1
//*
//SYSPRINT DD SYSOUT=*
//INPUT DD DSN=USERID.TEST.PARMLIB(&MEMB1),
// DISP=SHR |
change INPUT to SYSIN, EZACFSM1 should go fine.
However, I don't understand the meaning of "PUT 'HOST.FILE' +" & "QUIT " in this "
Code: |
PUT 'HOST.FILE' +
DEST_FILE_NAME_&LYR4&MON&DAY..DAT
QUIT |
when it's being treated as an input (SYSIN) for EZACFSM1 - what purpose does it serve there ? |
|
Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
|
|
|
|
I think that the goal is to use the EZACFSM1 translation utility to translate the values for the system variables &LYR4, &MON, and &DAY to their actual realtime values to be used in the target filename for the FTP. |
|
Back to top |
|
|
sridevi t
New User
Joined: 17 Nov 2008 Posts: 3 Location: Bengaluru,India
|
|
|
|
Hi
I did not understand EZACFSM1 earlier, hence the RC 37. Now i get it....i changed the INPUT DD DSN to SYSIN DD DSN and all's fine. Saw the current date appended to the file name in the output file too.
Have to still figure ou the 'Login Incorrect' message at the ftp step. I am sure about the userid and password though.Guess its the server name thats gone wrong
Thank you all for your valuable comments
-Sri |
|
Back to top |
|
|
|