dvc    + espacio         =        DEFINE VARIABLE  AS CHARACTER   NO-UNDO.

dvin   + espacio         =       DEFINE VARIABLE  AS INTEGER     NO-UNDO.

dvl     + espacio         =       DEFINE VARIABLE  AS LOGICAL     NO-UNDO.

MESSAGE 1 «cError». 

MESSAGE «cError» VIEW-AS ALERT-BOX INFO BUTTONS OK.