SELECT * INTO p_companias.*
    FROM companias a
    LET l = (80 - LENGTH(p_companias.nombre CLIPPED))/2
    DISPLAY p_companias.nombre CLIPPED AT 4,l
            ATTRIBUTE (REVERSE,YELLOW)