database smarmotech   
screen size 24 by 80
{
            Facturas Pendientes de Pago
\g----------------------------------------------
   Documento       Tipo        Pendiente
\g----------------------------------------------
   [f0           ] [tp]   [f002         ]
   [f0           ] [tp]   [f002         ]
   [f0           ] [tp]   [f002         ]
   [f0           ] [tp]   [f002         ]
}
end
tables
cctb00001
attributes
f0   = cctb00001.aplica_a,
       comments = "<Esc> Busca las facturas pendientes";
tp   = formonly.tipo_doc,noentry;
f002 = formonly.pendiente type decimal(12,2);
instructions
   screen record consart[4] (aplica_a,pendiente,tipo_doc)
   delimiters " "
end