Here is an RBase command file that offers a simulation of the R> prompt. It
has one limittion in that it can process only sing line command (no multiple
commands separated by a ";"). This is the limitation imposed by using a &
variable. It also traps some dangerous commands. This is an adpation of a
command file suppled by MICRORIM a long time ago.
-- ApSimRPm: v5.0 10-JUN-2005 by JRB. Simulate 'R>' Prompt
SET VAR gvMESSAGES TEXT = (CVAL('MESSAGES'))
SET VAR gvERROR TEXT = (CVAL('ERROR'))
SET MESSAGES ON -- set these on j.i.c.
SET ERROR MESSAGES ON
SET VAR ApSimRPmCmd = ' '
WHILE 1 = 1 THEN
DIALOG 'Enter R:BASE command; press [Esc] to leave r> mode' ApSimRPmCmd +
ApSimRPmRespKey 8 AT 2
IF ApSimRPmRespKey = '[Esc]' THEN
BREAK
ENDIF
IF ApSimRPmRespKey = 'HELP' THEN
PAUSE 1 USING 'Enter an appropriate R:BASE Cmd as if at "R>"' +
AT CENTER CENTER DEFAULT BLACK ON CYAN
ENDIF
IF ApSimRpmCmd IS NULL OR (SLEN(ApSimRpmCmd)) = 0 THEN
CONTINUE
ENDIF
---trap dangerous cmds: ALTER, CLEAR, CONNECT, CREATE, DEL??, DISCONNECT,
---EXIT, QUIT, RETURN. Note.. DISPLAY verb prohibited due to 3 char overlap
SET VAR ApSimRPmCmd=(LJS(ApSimRPmCmd,200))
IF 0 <> (SLOC('ALT,CLE,CON,CRE,DEL,DIS,EXI,QUI,RET',+
(SGET(.ApSimRPmCmd,3,1)))) THEN
BEEP
PAUSE 1 USING 'This R:BASE command not available in r> prompt mode' +
AT CENTER CENTER DEFAULT BLACK ON CYAN
ELSE
&ApSimRPmCmd
PAUSE 1
ENDIF
ENDWHILE
SET MESSAGES .gvMESSAGES
SET ERROR MESSAGES .gvERRMSG
CLEAR VAR ApSimRPm%
RETURN
Jim Bentley
American Celiac Society
[EMAIL PROTECTED]
tel: 1-504-737-3293
--- On Wed, 6/25/08, David Gallup <[EMAIL PROTECTED]> wrote:
> From: David Gallup <[EMAIL PROTECTED]>
> Subject: [RBASE-L] - RE: Simulate R> command in Runtime 7.6
> To: "RBASE-L Mailing List" <[email protected]>
> Date: Wednesday, June 25, 2008, 12:44 PM
> I would apprediate a copy also. Dave
>
>
> > [Original Message]
> > From: John Engwer <[EMAIL PROTECTED]>
> > To: <[email protected] (RBASE-L Mailing List)>
> > Date: 6/25/2008 8:27:59 AM
> > Subject: [RBASE-L] - RE: Simulate R> command in
> Runtime 7.6
> >
> > I do not know what happened. The form files were
> attached to the Email
> that
> > I posted. Maybe attachments are not allowed on the
> list. I will send
> them
> > seperatly to anyone that wants a copy.
> >
> > -----Original Message-----
> > From: [email protected] [mailto:[EMAIL PROTECTED] On
> Behalf Of Javier
> > Valencia
> > Sent: Wednesday, June 25, 2008 11:56 AM
> > To: RBASE-L Mailing List
> > Subject: [RBASE-L] - RE: Simulate R> command in
> Runtime 7.6
> >
> >
> > Me too...
> > [EMAIL PROTECTED]
> >
> > Javier,
> >
> > Javier Valencia
> > 913-915-3137
> > -----Original Message-----
> > From: [email protected] [mailto:[EMAIL PROTECTED] On
> Behalf Of Dan
> Goldberg
> > Sent: Wednesday, June 25, 2008 10:42 AM
> > To: RBASE-L Mailing List
> > Subject: [RBASE-L] - RE: Simulate R> command in
> Runtime 7.6
> >
> >
> > Hey john can you send me a copy??
> >
> > My e-mail address is:
> >
> > [EMAIL PROTECTED]
> >
> > Thanks
> >
> > Dan Goldberg
> >
> > -----Original Message-----
> > From: [email protected] [mailto:[EMAIL PROTECTED] On
> Behalf Of John
> Engwer
> > Sent: Wednesday, June 25, 2008 8:26 AM
> > To: RBASE-L Mailing List
> > Subject: [RBASE-L] - RE: Simulate R> command in
> Runtime 7.6
> >
> > Attached is a form that can be dropped into any
> database (7.6 or V8) that
> > will emulate the R>. You can customize it to
> include a history or you
> can
> > use it as-is.
> >
> >
> >
> > John
> >
> >
> >
> > From: [email protected] [mailto:[EMAIL PROTECTED] On
> Behalf Of John
> Engwer
> > Sent: Wednesday, June 25, 2008 8:26 AM
> > To: RBASE-L Mailing List
> > Subject: [RBASE-L] - RE: Simulate R> command in
> Runtime 7.6
> >
> >
> >
> > Daniele,
> >
> >
> >
> > I have a form in the databases that I distribute that
> I use for
> maintenance.
> > I use the compiler for my applications but it would
> work the same way with
> > Runtime. The form has a collection of commands that I
> use frequently. It
> > also has a command line that works like the R>.
> You can type a command
> such
> > as EDIT ALL FROM INVOICE and it will perform the
> command. The R> is a
> > simple custom EEP property. If you want more detail
> or would like to see
> a
> > demo, please contact me offline. It is simple to do.
> >
> >
> >
> > John
> >
> >
> >
> >
> >
> > From: [email protected] [mailto:[EMAIL PROTECTED] On
> Behalf Of Daniele
> > Barbieri
> > Sent: Wednesday, June 25, 2008 6:20 AM
> > To: RBASE-L Mailing List
> > Subject: [RBASE-L] - Simulate R> command in Runtime
> 7.6
> >
> >
> >
> > Hello
> >
> > There is a way to simulate some R> commands in
> Runtime 7.6 ?
> >
> >
> >
> > TIA
> >
> > Daniele
> >
> >
> >
> >
