schema smarmotech    
screen size 24 by 80
{
            Facturas Pendientes X Pagar
\g----------------------------------------------
    Factura        Pendiente
\g----------------------------------------------
   [f0        ]  [f002         ]
   [f0        ]  [f002         ]
   [f0        ]  [f002         ]
   [f0        ]  [f002         ]
}
end
tables
cptb00001
attributes
f0   = cptb00001.aplica_a,
       comments = "<Esc> Busca las facturas pendientes";
f002 = formonly.pendiente;
instructions
   screen record consart[4] (aplica_a,pendiente)
   delimiters " "
end