Veja nesse exemplo como mostrar um texto na tela. Código: DEF VAR C-TEXTO AS CHAR FORMAT "X(200)" INIT " " NO-UNDO VIEW-AS EDITOR SIZE 60 BY 6. ASSIGN C-TEXTO = " Os números de telefone mencionados neste documento são para uso " + "nos Estados Unidos e Canadá. Se você estiver fora dos " + "EUA ou Canadá, entre em contato com seu fornecedor de hardware ou software " + "local para mais informações". OUTPUT TO "C:\JONES.TXT". DISP C-TEXTO.
