Dbfs Relacionados

Dbfs Relacionados

Postby FiveWiDi » Mon Mar 05, 2007 1:54 pm

Hola a todos,

Teniendo 2 Dbfs relacionadas y estando ya posicionados en los registros correspondientes,

¿Alguién podría mostrarme un trozo de código en el cual se vea como se muestra/captura el valor de un campo de cada una de ellas?

¿Y cómo se actualizarían estos campos?

¿Se deben atacar sus campos desde alias distintos?
Si es así, la gestión de fldget y fldput las debo gestionar a mano teniendo en cuenta de que DBF són, no?

Hace tiempo que le doy vueltas al tema de las DBF relacionadas y sigo teniendo dudas.

Saludos
Carlos G.
FiveWiDi
 
Posts: 1200
Joined: Mon Oct 10, 2005 2:38 pm

Postby R.F. » Mon Mar 05, 2007 6:52 pm

Code: Select all  Expand view  RUN
REDEFINE SAY oSay PROMPT Alias1->campo
REDEFINE SAY oSay2 PROMPT Alias2->campo

REDEFINE GET oGet VAR Alias1->campo
REDEFINE GET oGet1 VAR alias2->campo

alias1->(fieldget(campo))
alias2->(fieldput(campo))


Y listo, siempre con el nombre del alias por delante.
Saludos
R.F.
R.F.
 
Posts: 840
Joined: Thu Oct 13, 2005 7:05 pm

Postby FiveWiDi » Tue Mar 06, 2007 7:22 am

RF wrote:
Code: Select all  Expand view  RUN
REDEFINE SAY oSay PROMPT Alias1->campo
REDEFINE SAY oSay2 PROMPT Alias2->campo

REDEFINE GET oGet VAR Alias1->campo
REDEFINE GET oGet1 VAR alias2->campo

alias1->(fieldget(campo))
alias2->(fieldput(campo))


Y listo, siempre con el nombre del alias por delante.


Gracias Rene,

Es lo que me temía, con Relation lo que consigo es situarme en el registro adecuado,..... pero ... lo que es la gestión bajo un solo 'alias', bloqueos, grabación, borrado , etc. deberé seguir haciéndolo a mano.

Por cierto sabes si en Harbour, la clase TDatabase basa su gestión de acceso a los campos (de la manera oMiDatabase:Micampo) provocando un error en la clase, o se 'crea' un método para cada campo?

Saludos y gracias
Carlos G.
FiveWiDi
 
Posts: 1200
Joined: Mon Oct 10, 2005 2:38 pm


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 35 guests