Newsgroups - Index

FTP from VSE to MVS

From:	Dwakser at aol.com
Subject:	FTP from VSE to MVS
Date:	19 Jan 2005 10:14:24 -0800

-------------------------------1106157387
Content-Type: text/plain; charset="US-ASCII"
Content-Transfer-Encoding: 7bit

All:

Can anyone make a suggestion as to why an FTP from VSE to MVS (either
GET or PUT) fails with a stall AFTER successfully logging in, receiving
notification of the working directory, and passing parameters to MVS (and retrieving
responses back). The MVS gurus claim that neither FTP nor ACF2 is logging
any errors.

Here are FTPBATCH parameters used:

// EXEC FTPBATCH,SIZE=FTPBATCH,PARM='PORT=21,ID=00'
LOPEN
LUSER 2MVS
LPASS 2MVS
DEBUG ON
OPEN 10.1.9.10
USER VSE01
PASS ABCDEFG
EBCDIC
SITE RECFM=F FILETYPE=SEQ
SITE LRECL=80 BLKSIZE=80
SITE VOLUME=WORK01 UNIT=3380
GET 'VSE01.THIS.IS.A.TEST.DATASET' %NEW,SAM,F,80,80
CLOSE
LCLOSE
QUIT
/*

David Wakser
InfoCrossing

-------------------------------1106157387
Content-Type: text/html; charset="US-ASCII"
Content-Transfer-Encoding: quoted-printable

Arial"=20
bottomMargin=3D7 leftMargin=3D7 topMargin=3D7 rightMargin=3D7>e_document=20
face=3DArial color=3D#000000 size=3D2>

All:

Can anyone make a suggestion as to why an FTP f=
rom=20
VSE to MVS (either GET or PUT) fails with a stall AFTER successfully logging=
in,=20
receiving notification of the working directory, and passing parameters to M=
VS=20
(and retrieving responses back). The MVS gurus claim that neither FTP nor AC=
F2=20
is logging any errors.

Here are FTPBATCH parameters used:

// EXEC   =20
FTPBATCH,SIZE=3DFTPBATCH,PARM=3D'PORT=3D21,ID=3D00'    &=
nbsp;          =20

LOPEN           &=
nbsp;            =
;            &nb=
sp;            &=
nbsp;            =
;  =20

LUSER=20
2MVS            =
            &nbs=
p;            &n=
bsp;            =
        =20

LPASS=20
2MVS            =
            &nbs=
p;            &n=
bsp;            =
        =20

DEBUG=20
ON            &n=
bsp;            =
            &nbs=
p;            &n=
bsp;          =20

OPEN=20
10.1.9.10           &=
nbsp;            =
;            &nb=
sp;            &=
nbsp;     =20

USER=20
VSE01            =
;            &nb=
sp;            &=
nbsp;            =
;         =20

PASS=20
ABCDEFG           &nb=
sp;            &=
nbsp;            =
;            &nb=
sp;       =20

EBCDIC           =
            &nbs=
p;            &n=
bsp;            =
            &nbs=
p; =20

SITE RECFM=3DF         =20
FILETYPE=3DSEQ          &n=
bsp;            =
            =20

SITE LRECL=3D80 =20
BLKSIZE=3D80          &nbs=
p;            &n=
bsp;            =
        =20

SITE VOLUME=3DWORK01=20
UNIT=3D3380           =
;            &nb=
sp;            &=
nbsp;    =20

GET 'VSE01.THIS.IS.A.TEST.DATASET'=20
%NEW,SAM,F,80,80          =
        =20

CLOSE           &=
nbsp;            =
;            &nb=
sp;            &=
nbsp;            =
;  =20

LCLOSE           =
            &nbs=
p;            &n=
bsp;            =
            &nbs=
p; =20

QUIT           &n=
bsp;            =
            &nbs=
p;            &n=
bsp;            =
   =20

/*

David Wakser

InfoCrossing          =
;            &nb=
sp;            &=
nbsp;            =
;           =20

-------------------------------1106157387--