database smarmotech    
screen size 24 by 80
{

   Fecha Final    [b       ]
   Prima          [pr   ]
   Cliente        [c1]-[c2  ]  
}
end
tables
cptb00001
attributes
b  = formonly.fecha_final type date, format = "dd/mm/yy",autonext,
     comments = "Fecha final del recibo de pago"; 
pr  = formonly.prima,comments= "Introduzca Prima Para Valorizar Estados";
c1 = formonly.cod_sup type smallint,autonext;
c2 = cptb00001.cod_sp_sec;
end