How write a right name of a field

[Silvio.Falconi]

For a sample

the field is oDbf:CA1

If I have cField:="Ca1" // but I not Know the name of the field I made a function to create name of field
with
cRuota:= NomeRuota(nRuota)
cField:= Left(cRuota,2)+ltrim(str(nPosizione))


How I can make to found the field on oDbf (tadatabase)

I try with oDbf:&cField but not run ok

I tried also with fieldWBlock(cField,oDbf:nArea )
It return me an array



I try also with
atemp:= fieldWBlock(cField,oDbf:nArea )
nNumero := atemp[1][1] but not is correct

How I can take it ?

[Silvio.Falconi]

Perhaps I found a solution

nNumero := eval(oDbf:fieldWBlock(cField ))

[nageswaragunupudi]

Simple:

Code: Select all  Expand view

oDbf:FieldGet( cField )
oDbf:FieldPut( cField, <newvalue> )
 

[Silvio.Falconi]

Simple:

Code: Select all  Expand view

oDbf:FieldGet( cField )
oDbf:FieldPut( cField, <newvalue> )
 

I must only read it

[nageswaragunupudi]

I must only read it

What do you mean? Did I not tell you oDbf:FieldGet( cField )? Is it not reading?

Next, oDbf:&cField also works.

Code: Select all  Expand view

  local cField   := "NAME"

   oDbf  := TDataBase():Open( nil, "STATES.DBF", "DBFCDX", .T. )
   ? oDbf:FieldGet( cField ), oDbf:&cField
 

It works

[James Bott]

How to write a right name of a field

Since you are already using a database object, instead of this:

oDbf:FieldGet( cField )
oDbf:FieldPut( cField, <newvalue> )

You can just do:

oDBF:ID
oDBF:Name

Where ID and NAME are fieldnames. Then you can do:

msgInfo( oDBF:ID )

To put data into a field of a database object you just do:

oDBF:ID := cID
oDBF:Name := cName

However you should always use a meaningful name for the database object, so it should be something like:

oCustomer:ID
oCustomer:Name

You should not use oDBF as an object name because all that tells you is that it is a database object, but not which database object. And, obviously you can't have multiple database objects open in the same routine all with the same name, like "oDBF." But you can have something like oCustomer and oInvoice open in the same routine since there is no name conflict.

Using these conventions makes your code very easy to read and understand, even years after you wrote it.

[Silvio.Falconi]

How to write a right name of a field

Since you are already using a database object, instead of this:

oDbf:FieldGet( cField )
oDbf:FieldPut( cField, <newvalue> )

You can just do:

oDBF:ID
oDBF:Name

Where ID and NAME are fieldnames. Then you can do:

msgInfo( oDBF:ID )

To put data into a field of a database object you just do:

oDBF:ID := cID
oDBF:Name := cName

However you should always use a meaningful name for the database object, so it should be something like:

oCustomer:ID
oCustomer:Name

You should not use oDBF as an object name because all that tells you is that it is a database object, but not which database object. And, obviously you can't have multiple database objects open in the same routine all with the same name, like "oDBF." But you can have something like oCustomer and oInvoice open in the same routine since there is no name conflict.

Using these conventions makes your code very easy to read and understand, even years after you wrote it.

James,
I have 57 fields
I not know wich field the function need, I not have the name of field

If I made a function Estrazione (n,r,p)
it must found the n record r route p position.
odbf:goto(n) // record

croute :=giveroute(r)
nposition:=p
cfield:= left(croute,2)+ltrim(str(nposition)) // sample NZ3
so
odbf:&cfield