SqlPlus setting

Hi, I run the following script at glogin

set head off
set term off
variable a varchar2(100)
exec :a := dbms_Utility.port_string;
spool c:\z.sql
select 'set sqlprompt '''| |substr(global_name,1,6)| |'-'| |user| '> ''' from global_name;
spool off
@c:\z
set pages 66
set head on
set term on

So that everytime I login Sqlplus, my sqlplus prompt will be looking like this

Test-Prog1>

But it is a little bit unconvinent, can somebody suggest a better way so that the sqlplus prompt will look like

test-prog1
>

Put a return command before '>'?

Thanks for your help  

-- 
Sent by  dbadba62 from hotmail in  field com
This is a spam protected message. Please answer with reference header.
Posted via http://www.usenet-replayer.com/cgi/content/new