Comment puis-je supprimer les espaces à droite & extra nouvelle ligne de bobinage de sortie?

Espaces dans la file d'attente de sortie rpad(' ',40) sont de mieux en tronquée. Si je supprime le JEU de TRIMSPOOL sur l'option de la ligne de taille devient 400 et il y a un extra nouvelle ligne après chaque requête select. Quelles sont les options que j'ai besoin d'avoir les espaces à la fin et de supprimer le supplément de nouvelle ligne.

SET SERVEROUTPUT ON
SET VERIFY OFF
SET FEEDBACK OFF
SET HEADING OFF
SET LINESIZE 400
SET TRIMSPOOL ON
SET PAGESIZE 0
SPOOL ${T_SPOOL}    

SELECT '0' || rpad(' ',17) || '01' || 'WBC' || rpad(' ',7) || rpad('Accounts ',26) ||     '407081' || rpad('REF',12)  || to_char(sysdate, 'DDMMYY') || rpad(' ',40)
from dual;