PUT CHR(n)

Discussão em 'Comandos Básicos' iniciado por fdantas, Fevereiro 3, 2009.

  1. fdantas

    fdantas Administrator Moderador

    /******************** stateMENTS**********************************
    **
    ** PUT CHR(n)
    ** Imprime qualquer caracter constante
    ** na relacao da tabela ASCII
    **
    **********************************************************************/

    Código:
    OUTPUT TO dados.txt.
    
    
    FOR EACH customer WITH NO-BOX:
        PUT CHR(34) 
            customer.cust-num 
            customer.name 
            customer.phone
            CHR(34).
        PUT SKIP.
    END.

Compartilhe esta Página