Yes of course note also the Lawrence Lusting mail for a solution with a VARCHAR variable. I will test it. Daniele
----- Original Message ----- From: John Engwer To: RBASE-L Mailing List Sent: Thursday, June 26, 2008 1:29 PM Subject: [RBASE-L] - RE: Simulate R> command in Runtime 7.6 Daniele, I have a standalone button in my application that performs the tasks that you describe. Since you have already developed this nice routine I think I will add it to the form if it is OK with you. I will give you credit in the documation. Thanks for sharing your enhancement. John From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of Daniele Barbieri Sent: Thursday, June 26, 2008 6:47 AM To: RBASE-L Mailing List Subject: [RBASE-L] - RE: Simulate R> command in Runtime 7.6 Hello John your form work ok for the command like EDIT ALL.....etc. but don't work for the other useful command like LIST, SHOW VAR... because, I thilk, the screen are not in that moment a valid output device. Then I take YOUR IDEA and the Adrian Hussey IDEA to do a little program (see below): 1) The output of command are directed to a TXT file 2) If the commands are like EDIT ALL.... etc.....the TXT file is empty 3) If the commands are like LIST, SHOW VAR... etc....the TXT file contain the command result. 4) The program test the lenght of the TXT files and if lenght is > 1 then ....LAUNCH filename.TXT that call the window notepad. And 'voilà' you can see the result of your LIST command. 5) If the lenght of TXT file is = 1 (empty) the program goto start Daniele -- THIS IS MY COMMAND.RMD R> ----- LABEL START --table to test the lenght of txt file DROP TABLE RUNOUT CREATE TABLE RUNOUT THEFIRST TEXT 10,THESECOND TEXT 6,THETIRD INTEGER -- your form containning commandstring variable -- and pushbotton to exit CLEAR VAR COMMANDSTRING ; SET VAR COMMANDSTRING TEXT EDIT USING COMMANDR IF COMMANDSTRING FAILS OR COMMANDSTRING='END' THEN GOTO THEEND ENDIF --send output to runout.txt file OUTPUT RUNOUT.TXT &COMMANDSTRING --load runout table to test the lenght of txt file OUTPUT RUNOUT.DAT DIR RUNOUT.TXT OUTPUT SCREEN LOAD RUNOUT FROM RUNOUT.DAT ; FILL CLEAR VAR LENGHT ; SET VAR LENGHT INTEGER SET VAR LENGHT=THETIRD IN RUNOUT --test the lenght of txt file IF LENGHT > 1 THEN LAUNCH RUNOUT.TXT GOTO START ELSE GOTO START ENDIF LABEL THEEND RETURN ----- Original Message ----- From: John Engwer To: RBASE-L Mailing List Sent: Thursday, June 26, 2008 5:47 AM Subject: [RBASE-L] - RE: Simulate R> command in Runtime 7.6 Larry, yes when you are ready I would like to see what you have done. I have used my R> Emulator for quite a while to support my compiled vertical applications. Many times I have thought about enhancing it but other projects take priority. There are not enough hours in a day. John From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of Lawrence Lustig Sent: Wednesday, June 25, 2008 1:17 PM To: RBASE-L Mailing List Subject: [RBASE-L] - RE: Simulate R> command in Runtime 7.6 << 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. >> John -- I have a similar form which also displays the command results (like LIST) in an output console and has built in user-specific history across sessions. I'm still tinkering with a couple of things but I'd be happy to share. -- Larry
