Easiest and "official" means of doing this is:

COMMAND.EDITOR ON "MYPROMPT> " ;* Set

COMMAND.EDITOR ON "> " ;* Reset

Syntax is:

COMMAND.EDITOR [ON|OFF] [ALL|VERBS] [INSERT|OVERLAY] ["Optional TCL
Prompt String"]

However, COMMAND.EDITOR is not officially supported and was developed by
a third-party and shipped with UV for a specific client to port from
PI/open to UV...according to an IBM U2  Powerpoint presentation I've
seen about it.

Regards,
David



-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Keith Johnson
(DSLWN)
Sent: Monday, February 18, 2008 9:08 AM
To: u2-users@listserver.u2ug.org
Subject: RE:[U2] Change Prompt

In Universe, the following program (called PATH) will do this.

To use it,  just put PATH in the LOGIN command.
PATH CLEAR puts things back to how they were.
PATH FULL gives the full path name at the input prompt.

========================== PATH program v SENTENCE = UPCASE(@SENTENCE)
THIS = '' ; THAT = 1 BEGIN CASE
   CASE INDEX(SENTENCE,'CLEAR',1) ; THAT = 0
   CASE INDEX(SENTENCE,'FULL',1)  ; THIS = @PATH:'>'
   CASE 1 ; THIS = FIELD(@PATH,'/',DCOUNT(@PATH,'/')):'>'
END CASE
IF THIS NE '' THEN
   THIS<2> = THIS<1>:'>'
   THIS<3> = '+'
END
ASSIGN THIS TO SYSTEM(4002)
ASSIGN THAT TO SYSTEM(4001)
========================== PATH program ^

This version is for a UNIX system, you may have to change the '/' to '\'
on Windows

SYSTEM(91) = 0 on UNIX
SYSTEM(91) = 1 on Windows


Regards, Keith

P.S. A great benefit of this is that you can then edit the command stack
using the arrow keys.
       You have to use backspace to delete, though.
-------
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to