HP3000-L Archives

January 2000, Week 3

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Gary Nolan <[log in to unmask]>
Reply To:
Gary Nolan <[log in to unmask]>
Date:
Wed, 19 Jan 2000 11:04:42 -0400
Content-Type:
text/plain
Parts/Attachments:
text/plain (94 lines)
John,
Here is a sample of the script I use to transfer files to the pc via
reflection. It is nothing fancy but it does work from my menu system. You
can call it with no parms ant it will prompt or you can pass all the info
when call it. Hope this helps you.

i.e. :topc myfile.mygroup.myacct,c:/mydir/myfile.txt

USER DEFINED COMMAND FILE:  TOPC.COMMAND.SYS

PARM HP=" ";PC=" "
ECHO
ECHO ==============================================================
ECHO ----- Starting transfer to from HP3000 to PC
ECHO ==============================================================
SETVAR ESC "![chr(27)]"
SETVAR HP_FILE "!HP"
SETVAR PC_FILE "!PC"
IF "!HP_FILE" = " " THEN
    INPUT HO_FILE,"Copy what file from the HP? "
ENDIF
IF "!PC_FILE" = " " THEN
    INPUT PC_FILE,"File name for the PC? "
ENDIF
ECHO ************************* Starting Transfer *********************
ECHO ---  COPYING from HP !HP_FILE
ECHO ---  COPYING   to PC !PC_FILE
FILE INRESP=$STDIN
SETVAR STAT " "
ECHO !ESC&oCRECEIVE !PC_FILE FROM !HP_FILE; DELETE ASCII
RUN PCLINK2.PUB.SYS;PARM=1
INPUT STAT <*INRESP
IF "!STAT" = "S" THEN
    ECHO ------- File sucessfully transfered
ELSE
    ECHO !ESC&dG------- File Transfer Failed ---------
ENDIF
/

Gary Nolan
Sydney Steel
Sydney, Nova Scotia
----- Original Message -----
From: john edwards <[log in to unmask]>
To: <[log in to unmask]>
Sent: Tuesday, January 18, 2000 3:04 PM
Subject: PC File Transfer


> Hi All
>
> I would appreciate some ideas here please.
> The environment is a 3K with PC's running Reflections
> for Windows.
> The users prepare files on their PC's and transfer
> them to the 3k using relections file transfer. They
> then stream a job to process the files. The job
> expects the files to be in a special group with a
> standard naming convention. There is a menu program
> that allows them to drop into MPE for the transfer and
> to stream the job.
> I hate this.
> I want them out of MPE. Also they get the file name
> and group wrong and anything can happen.
>
> The menu program is flexible. I can set up an entry
> that will run PCLINK2 when the users start file
> transfer in relections. Also a menu entry to stream
> the job. That keeps them out of MPE, but does not
> solve the file name and destination group.
>
> What I would like is:
> 1) transfer the PC data into a temporary file of a
> specific name.
> 2) run the programs on line to process the temporary
> file.
>
> Running the programs on line is no problems, but how
> can I control the destination file name and location?
>
> Any suggestions greatfully received.
>
> Thanks
> John Edwards
>
>
> __________________________________________________
> Do You Yahoo!?
> Talk to your friends online with Yahoo! Messenger.
> http://im.yahoo.com
>
>
>

ATOM RSS1 RSS2