database smarmotech
screen size 24 by 80
{
Codigo     [f0]-[f001]
Nombre     [f002                          ]
Cedula     [f003     ] Serie [f4 ]
Calle      [f005                          ] Casa Numero  [f006      ]
Barrio     [f007                ]           Urbanizacion [f008                ] 
Pais       [p1                                  ] 
Zona       [f9] [f10                            ]
Provincia  [f1] [f11                            ] 
Telefono   [f012    ]  
                                                                             [a]
Usuario Creador [f014     ]               Usuario Modificador [f016     ] 
Fecha Creacion  [f015            ]        Fecha Modificacion  [f017            ]
}
end
tables
vetb00008,
vetb00009,
vetb00015, 
vetb00020 
ATTRIBUTES
COMBOBOX p1 = formonly.codigo;
f0   = vetb00015.cod_transp,autonext,
       comments="Digite el codigo del Transportista";
f001 = vetb00015.sec_transp,autonext,
       comments="Digite el codigo del Transportista";
f002 = vetb00015.nombre,autonext,upshift, 
       comments="Digite el nombre completo del Transportista";
f003 = vetb00015.cedula,autonext,
       comments="Digite la cedula del Transportista";
f4   = vetb00015.serie,autonext,
       comments="Digite la serie de la cedula del Transportista";
f005 = vetb00015.calle,autonext,upshift, 
       comments="Digite el nombre de la calle donde vive o reside el Transportista";
f006 = vetb00015.casa_num,autonext,
       comments="Digite el numero de la casa del Transportista";
f007 = vetb00015.barrio,autonext,upshift, 
       comments="Digite el nombre del barrio donde vive o reside el Transportista";
f008 = vetb00015.urbanizacion,autonext,upshift, 
       comments="Digite el nombre de la urbanizacion donde vive o reside el Transportista";
f9   = vetb00015.cod_zona,autonext,
       comments="Digite el codigo de la zona donde vive el Transportista o Ctrl-W para busqueda";
f10  = vetb00008.descrip,noentry; 
f1   = vetb00015.cod_provincia,autonext,
       comments="Codigo de la provincia donde vive el Transportista o Ctrl-W para busqueda";
f11  = vetb00020.nombre_provincia,noentry; 
f012 = vetb00015.telefono,autonext, picture = "###-####", 
       comments="Digite el numero de telefono del Transportista";
a    = vetb00015.status_t,noentry;
f014 = vetb00015.us_crea,noentry;
f015 = vetb00015.fech_crea,noentry;
f016 = vetb00015.us_mod,noentry;
f017 = vetb00015.fech_mod,noentry;
end

INSTRUCTIONS
delimiters " "