Subject: | |
From: | |
Reply To: | Schleicher, Randy (Windsor HQ) |
Date: | Tue, 21 Sep 1999 10:34:08 -0400 |
Content-Type: | text/plain |
Parts/Attachments: |
|
|
> Here's a little CI command file we wrote in order to do Reflections file
> transfers using PCLINK2. Maybe your command files can call this. If not
> it will at least help you in initiating a file transfer without creating
> another level of CI. The ^[ should be replace by the escape character in
> order to work. I just changed it for display purposes.
>
> ECHO ^[U^[J
> ECHO HP3000 File Transfer Facilitator Ver RJS_960823
> ECHO ================================================
> ECHO
> SETVAR ACTION " "
> WHILE ACTION <> "X"
> SETVAR A " "
> INPUT ACTION;PROMPT="(S)end or (R)eceive ? ===> "
> IF ACTION = "R" OR ACTION = "r"
> SETVAR TO_FROM "FROM"
> SETVAR ACTION "RECEIVE"
> ELSE
> IF ACTION = "S" OR ACTION = "s"
> SETVAR TO_FROM "TO"
> SETVAR ACTION "SEND"
> ELSE
> SETVAR ACTION "X"
> ENDIF
> ENDIF
> IF ACTION <> "X"
> ECHO
> INPUT ASCII_BIN ;PROMPT="(A)scii or (B)inary ===> "
> IF ASCII_BIN = "A" OR ASCII_BIN = "a"
> SETVAR ASCII_BIN "ASCII"
> ELSE
> SETVAR ASCII_BIN "BINARY"
> ENDIF
> ECHO
> INPUT LOCAL ;PROMPT="Enter local file name ===> "
> ECHO
> INPUT HOST ;PROMPT="Enter host file name ===> "
> ECHO
> ECHO ^[&oC!ACTION !LOCAL !TO_FROM !HOST PURGE !ASCII_BIN
> PCLINK2.PUB.SYS
> INPUT A
> ECHO ^[A^[A
> IF A = "S"
> ECHO Successful File Transfer
> ELSE
> ECHO File Transfer Failed
> ENDIF
> ECHO
> ENDIF
> ENDWHILE
> DELETEVAR ACTION > $NULL
> DELETEVAR ASCII_BIN > $NULL
> DELETEVAR LOCAL > $NULL
> DELETEVAR HOST > $NULL
> DELETEVAR TO_FROM > $NULL
> DELETEVAR A > $NULL
>
> ----------
> From: Michael Anderson[SMTP:[log in to unmask]]
> Sent: Tuesday, September 21, 1999 10:11 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. So I decided to
> start a CI.PUB.SYS son process to execute the file transfer.
> I use ;PARM=-2 when starting the CI.PUB.SYS process to suppress
> the welcome msg, execute the transfer, and then terminate, returning
> control back to the original command file.
>
> This all works great, if you happen to have SM capability, because
> to start CI.PUB.SYS;parm=-2 requires SM capability, so how
> I'm I going to make this work for the ordinary user?
>
> I have considered:
>
> RUN GOD/mylockword
> RUN CI.PUB.SYS;PARM=-2;INFO="MYCOMMAND"
> RUN MORTAL
>
> But maybe someone on the list knows of a better way.
>
> All suggestions will be appreciated.
>
> Thanks,
>
>
> _________________________________
> Michael Anderson
> Student Services Programmer/Analyst
> Spring Independent School District, Houston, Texas, 77090
> 281.586.1105
>
>
|
|
|