DATABASE decomarmol
 SCREEN SIZE 24 by 80
{
              Busqueda de Clientes                
\g-------------------------------------------------------------------------------------------\g
      Codigo      Nombre                          Proyecto
\g-------------------------------------------------------------------------------------------\g
     [i ][j   ] [f2                            ][J1                                            ]
     [i ][j   ] [f2                            ][J1                                            ] 
     [i ][j   ] [f2                            ][J1                                            ]
     [i ][j   ] [f2                            ][J1                                            ]
     [i ][j   ] [f2                            ][J1                                            ]
     [i ][j   ] [f2                            ][J1                                            ]
     [i ][j   ] [f2                            ][J1                                            ]
     [i ][j   ] [f2                            ][J1                                            ]
}
end

tables
vetb00004
attributes
i   = vetb00004.tipo_cliente,noentry;
j   = vetb00004.sec_cliente,noentry;
f2  = formonly.nombre, upshift, 
      comments = "          <Esc> Busca todos los Clientes";
j1  = formonly.nombre_proyecto;

instructions
   screen record s_clientes (tipo_cliente, sec_cliente, nombre,nombre_proyecto) 
   delimiters " "
end