DATABASE marmotech   
 SCREEN SIZE 24 by 80
{
           Busqueda de Productos Terminados    
   \g------------------------------------------------\g
    Codigo          Nombre
   \g------------------------------------------------\g
   [f1        ] [f2                            ]
   [f1        ] [f2                            ]
   [f1        ] [f2                            ]
   [f1        ] [f2                            ]
   [f1        ] [f2                            ]
   [f1        ] [f2                            ]
}
end

tables
intb00001
attributes
f1  = formonly.codigo,noentry,
      comments = "Elegir Este Registro Con La Tecla <Esc>";
f2  = intb00001.descrip_esp, upshift, 
      comments = "       <Esc> Busca todos los Productos Terminados ";

instructions
   screen record s_desp2[6] (codigo,descrip_esp)
   delimiters " "
end