Try this one, it works on UniVerse 10.2.0 ----: P 0001: * Program to set the prompt character for a UniVerse Session 0002: * <1> is for TCL 0003: * <2> is used with an active Select list 0004: * <3> is the line continuation character. 0005: PMT = @LOGNAME : ' ': @WHO : ' > ' 0006: STELPROMPT = PMT 0007: STELPROMPT<2 > = @WHO : ' >>' 0008: STELPROMPT<3> = '+' 0009: ASSIGN 1 TO SYSTEM(4001) 0010: ASSIGN STELPROMPT TO SYSTEM(4002) Bottom at line 10.
Tom Dodds [EMAIL PROTECTED] 630.235.2975 -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Dennis Bartlett Sent: Monday, February 18, 2008 11:07 AM To: [email protected] Subject: RE: [U2] Change Prompt This code works a bomb! Brilliant thank you! The only problem is that now there aren't any >> when a search (SEARCH) finds anything. Has anybody a solution? (its just blank...) Eg BR201 >SEARCH BP STRING:SETTL STRING: 11 record(s) selected to SELECT list #0. There are records selected, but the users are sitting waiting for the >> -----Original Message----- IF @ACCOUNT = "mc" OR @ACCOUNT = "da" THEN STELPROMPT = @WHO : '>' END ELSE STELPROMPT = "Press G and hit ENTER to continue>" END ASSIGN 1 TO SYSTEM(4001) ASSIGN STELPROMPT TO SYSTEM(4002) ------- u2-users mailing list [email protected] To unsubscribe please visit http://listserver.u2ug.org/ ------- u2-users mailing list [email protected] To unsubscribe please visit http://listserver.u2ug.org/
