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:
Peter Chong <[log in to unmask]>
Reply To:
Peter Chong <[log in to unmask]>
Date:
Wed, 19 Jan 2000 09:31:41 -0800
Content-Type:
text/plain
Parts/Attachments:
text/plain (100 lines)
Hi, John

I made this job for up & down file automatically from HP3000.


1. JOB (HP3000)

!job xferfile,username.account,xferfile
*.
!comment run xferjobs..
!run xfer1
!run xfer2
!run xfer3
*
!comment activate session from job to download 222=ldn
!comment check terminal 222 for log off.
!startsess 222;xferpc,username.account,xferfile;pri=cs;nowait;info=xfertopc
!eoj


2. FILE XFERTOPC.XFERFILE (HP3000)

Pcd.pub file1.xferfile f:\import\file1.txt
Pcd.pub file2.xferfile f:\import\file2.txt
Pcd.pub file3.xferfile f:\import\file3.txt


3. PCD.PUB (HP3000)

PARM hostf=" ",locf=" ",recsize="80",type="ASCII"
setvar esc CHR(27) + "&oC"
setvar ftc "LOCF "+"!locf"
echo !esc!ftc
input cc
setvar ftc "HOSTF " + "!hostf"
echo !esc!ftc
input cc
setvar ftc "!type"
echo !esc!ftc
setvar ftc "DOWNLOAD"
echo !esc!ftc
setvar ftc "RECSIZE " + "!recsize"
echo !esc!ftc
setvar hprog " "
while hprog = " " do
input hprog
endwhile
!hprog
input cc
echo File transfer complete


I  use Reflection and Minisoft, both works ok, Use this job daily for down load few files before I use ODBC/32.

You could change to binary, record size or upload too*



Peter Chong
Sr. ERP/MRP Analyst.
714.956.9200 x 363
http://www.powerparagon.com

>>> john edwards <[log in to unmask]> 01/18/00 11:04AM >>>
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

ATOM RSS1 RSS2