Here are a couple of little vesoft command files I use to send and receive
files from the hp and the pc:

This one sends it from the pc to the hp:

PARM HPFILE, PCFILE, XFER_OPTIONS
SETVAR REFLECT CHR(27)+"&oB"
ECHO !REFLECT RECEIVE !PCFILE FROM !HPFILE !XFER_OPTIONS
INPUT XFER_COMMAND; PROMPT=":"
IF UPS(XFER_COMMAND[0:20])="RUN NEWLINK2.PUB.SYS"
  !XFER_COMMAND
  INPUT REFLECT_CC; PROMPT=":"
  ECHO TRANSFERING !HPFILE TO !PCFILE
  IF REFLECT_CC="S" THEN
    ECHO SUCCESSFULL TRANSFER!
  ELSE
    ECHO TRANSFER FAILED!
  ENDIF
ENDIF

And this one sends it from the pc to the hp:

PARM PCFILE, HPFILE, XFER_OPTIONS
SETVAR REFLECT CHR(27)+"&oB"
ECHO !REFLECT SEND !PCFILE TO !HPFILE !XFER_OPTIONS
INPUT XFER_COMMAND; PROMPT=":"
IF UPS(XFER_COMMAND[0:20])="RUN NEWLINK2.PUB.SYS"
  !XFER_COMMAND
  INPUT REFLECT_CC; PROMPT=":"
  ECHO TRANSFERING !PCFILE TO !HPFILE
  IF REFLECT_CC="S" THEN
    ECHO SUCCESSFULL TRANSFER!
  ELSE
    ECHO TRANSFER FAILED!
  ENDIF
ENDIF

sample menu:

*HEADER {TERMPOS(0,0)+TERMCLEAR()}
*HEADER                     STATE VOLUNTEER MUTUAL INSURANCE CO.
*HEADER                                COI TRANSFER
*HEADER
*HEADER
*CAPTION TRANSFER MORNING FILES
  ECHO {TERMPOS(0,0)+TERMCLEAR()}
  HPTOPC.VECMD.LIBRARY "COIFLTR.WORK.DB" "F:\FOXPROW\DATA\RECEIVE\CANCOI" &
    "ASCII DELETE"
  HPTOPC.VECMD.LIBRARY "PCCOIMAN.WORK.DB" "F:\FOXPROW\DATA\RECEIVE\PCCOIMAN"
&
    "ASCII DELETE"
  HPTOPC.VECMD.LIBRARY "PCCOIAUT.WORK.DB" "F:\FOXPROW\DATA\RECEIVE\PCCOIAUT"
&
    "ASCII DELETE"
  HPTOPC.VECMD.LIBRARY "TBLISTQ.WORK.DB" "F:\FOXPROW\DATA\RECEIVE\TBLIST" &
    "ASCII DELETE"
  HPTOPC.VECMD.LIBRARY "INACCTDL.WORK.DB" "F:\FOXPROW\DATA\RECEIVE\INACCTDL"
&
    "ASCII DELETE"
  HPTOPC.VECMD.LIBRARY "TBCH4.WORK.DB" "F:\FOXPROW\DATA\RECEIVE\TBCH4" &
    "ASCII DELETE"
  ECHO
  ECHO
  CALC READSTRING("Press Any Key To Continue...")
*ENTERSELECTION
  SETVAR VEMENUSELECTION READSTRING &
    ("{TERMPOS(22,0)}" + &
     "Enter selection (or E to EXIT, R to REDISPLAY, or L to LOCKUP): ")
  IF VEMENUSELECTION="" THEN
    SETVAR VEMENUSELECTION "R"
  ENDIF
  IF VEMENUSELECTION="L" THEN
    ECHO {TERMPOS(0,0)+TERMCLEAR()}
  ENDIF

Hope this is usefull.


-----Original Message-----
From: Michael Anderson [mailto:[log in to unmask]]
Sent: Tuesday, September 21, 1999 9:12 AM
To: [log in to unmask]
Subject: CI.PUB.SYS;PARM=?


I have put together a set of menus using M.P.E.'s CI scripting, and they
execute
other command files. I do not want the users to have access to the CI prompt

so these menus are executed from a NOBREAK LOGON UDC.

My question or problem is that some of the command files will
programmatically execute a Reflection/Minisoft file transfer, and
that requires direct access to the M.P.E. CI prompt.