MVSFORUMS.com

[sam14]

Can anyone help me to uploadfile in MVS using FTP. I am using following syntax. Which is not uploading the data. The data is in EBCIDIC form.
I am using SAS.

filename shell ftp "'&HostFile'"
RCMD="site RDW pri=&space sec=&space &alloc blk=32708 lrecl=4117 recfm=V"
host='pmdaftt.mfr.mbnainternational.com' prompt s370V lrecl=4117
DEBUG ;

data _null_;
set shellCASG;
file shell;
filler = ' ';
*** write the file ***;

put
@0001 NA_FUNCTION_CODE $ebcdic8.
@0009 NA_FUNCTION_VERSION $ebcdic1.
@0010 NA_USER_ID $ebcdic8.
@0066 NA_DATE_TIME_STAMP $ebcdic17.
@0116 NA_BUSINESS_UNIT $ebcdic2.
;
run;

Thanks