I was going to suggest the same as Paul, but you might need to purge
"FTPFILES" inside the while loop.
If you want to keep a log of all FTP sessions, (useful if you have
intermittent errors that you are trying to isolate) then consider
redirecting FTPLIST/STDLIST to a deferred spoolfile (along with another
job to delete these spoolfiles after 24 hours or so).
-----Original Message-----
From: HP-3000 Systems Discussion [mailto:[log in to unmask]] On
Behalf Of Paul H Christidis
Sent: 12 May 2006 21:46
To: [log in to unmask]
Subject: Re: [HP3000-L] I/O read error in FTP stream job
James,
The problem is do to the 'in-line' FTP commands. Try the following
'rearranged' stream file:
!JOB FTPRECV,EDIMGR.EDITRAN,FTPRECV;PRI=DS;OUTCLASS=LP,1
!COMMENT **************************************************************
!COMMENT *
!COMMENT * PUT A LIST OF THE FILENAMES ON THE FTP SERVER INTO A FILE
!COMMENT *
!COMMENT **************************************************************
!PURGE FTPFILES
!FILE FTPFILES,NEW; REC=-80,,F,ASCII; NOCCTL; TEMP
!ECHO OPEN xxx.xxx.xxx.xxx >>ftpstdin
!ECHO USER user password >>ftpstdin
!ECHO BINARY >>ftpstdin
!ECHO EXITONERROR >>ftpstdin
!ECHO CD +AFw-Customer+AFw-IN >>ftpstdin
!ECHO LS >>ftpstdin
!ECHO QUIT >>ftpstdin
!SETJCW FTPOK 0
!WHILE FTPOK = 0
! SETJCW CIERROR 0
! SETJCW JCW 0
! RUN FTP.ARPA.SYS;stdin=ftpstdin;STDLIST=*FTPFILES
! SAVE FTPFILES
! IF JCW = 0 AND CIERROR = 0 AND FTPLASTERR = 0 THEN
! SETJCW FTPOK 1
! ELSE
! SHOWVAR FTP@
! PAUSE 30
! ENDIF
!ENDWHILE
Regards
Paul Christidis
---------------
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
______________________________________________________________________
This email has been scanned by the MessageLabs Email Security System.
For more information please visit http://www.messagelabs.com/email
______________________________________________________________________
The contents of this email are confidential to the intended recipient
and may not be disclosed. Although it is believed that this email and
any attachments are virus free, it is the responsibility of the recipient to confirm this.
Smith & Williamson Corporate Finance Limited - A member of the London Stock Exchange.
A member of M&A International Inc. http://www.mergers.net Registered in England No. 4533970. Authorised and regulated by the Financial Services Authority
Smith & Williamson Investment Management Limited, Registered No. 976145. Authorised and regulated by the Financial Services Authority.
Smith & Williamson Pension Consultancy Limited - Independent Intermediary. Registered No. 3133226. Authorised and regulated by the Financial Services Authority.
Smith & Williamson Fund Administration Limited, Registered No. 1934644. Authorised and regulated by the Financial Services Authority.
Smith & Williamson Limited - A member of Nexia International. Registered in England No. 4534022. Regulated by the Institute of Chartered Accountants in England & Wales for a range of investment business activities.
NCL Investments Limited, Registered No. 1913794.
Member of the London Stock Exchange authorised and regulated by the Financial Services Authority.
Registered Office: 25 Moorgate, London EC2R 6AY
Telephone: 020 7131 4000 http://www.smith.williamson.co.uk
Nexia Smith & Williamson Audit Limited - A member of Nexia International. Registered in England No. 4469576.
Nexia Smith & Williamson Audit Limited is a company registered to carry out audit work and is regulated for a range of investment activities by the Institute of Chartered Accountants in England and Wales. Smith & Williamson Limited is a separate company that provides professional resources and certain services to Nexia Smith & Williamson Audit Limited under the terms of a formal agreement on an arm+IBk-s length basis.
Registered Office: 25 Moorgate, London EC2R 6AY
Telephone: 020 7131 4000 http://www.nexiasmith.williamson.co.uk
All telephone calls are recorded for business purposes.
______________________________________________________________________
This email has been scanned by the MessageLabs Email Security System.
For more information please visit http://www.messagelabs.com/email
______________________________________________________________________
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|