I had not read your specification with enough care;  my ftp
example preserves the full binary VB record structure.
So, then, after the ftp download, your (SAS?) program on 
ASCII can INPUT just the data portion of each  record
as ASCII text:

  FILENAME ONASCII 'C:\yourdata\downloaded.vb' recfm=s370vbs lrecl=32760;
  DATA ASCIIDATA (KEEP=DATAPART LENGTH);
  INFILE ONASCII LENGTH=LEN;
  LENGTH=LEN;
  INPUT @;
  INPUT DATAPART $VARYING32760. LENGTH @;

Barry


Herbert W. "Barry" Merrill, PhD
President-Programmer
MXG Software
Merrill Consultants
10717 Cromwell Drive
Dallas, TX 75229-5112
ba...@mxg.com
Fax:  214 350 3694 - Still works, received as email
Tel:  214 351 1966 - Unreliable, please use email

www.mxg.com        HomePage: FAQ answers most questions
ad...@mxg.com      License Forms, Invoice, Payment, ftp information
supp...@mxg.com    Technical Issues 
MXG-L FREE ListServer  http://www.mxg.com/mxg-l_listserver/


 

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Charles Mills
Sent: Tuesday, September 01, 2015 10:15 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: FTP - how get RDW and ASCII

Thanks Barry. I don't see any ASCII translation in there. Am I missing
something?

Charles

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Barry Merrill
Sent: Tuesday, September 01, 2015 8:04 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: FTP - how get RDW and ASCII

    i. ftp instructions for sending data to the MXG ftp site

       Using the IBM ftp program, you can ftp any MVS data file to the
       MXG ftp site with this syntax; do NOT change the DCB attributes
       of the //SMFFILE DD: even though it points to a VBS DSNAME, the
       RECFM=U,BLKSIZE=32760 must be used to include BDW and RDWs.

      //FTP      EXEC PGM=FTP,PARM='(EXIT=4'
      //SYSPRINT DD  SYSOUT=*
      //SMFFILE  DD DSN=YOUR.SMF.DATA,DCB=RECFM=U,BLKSIZE=32760,DISP=SHR
      //INPUT DD *
      ftp.mxg.com
      mxgtech mxgtech
      quote PASV
      bin
      put //DD:SMFFILE  yourname.smf
      close
      quit
      /*

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email
to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to