FiveTech Software tech support forums

... * FROM proforma" oRs := oCn:RowSet( cQwery) MSGINFO(oRs:FieldGet(5)) //WORKS SHOWS CONTENT OF 1ST FIELD DESCRIP MSGINFO(oRs:FieldName("DESCRIP")) //DOSE NOT WORK oCn:Close() RETURN NIL **************************************************************************************** ...

... Opens a DBF file and reads the header as well as the field descriptions. * - FieldPos: Returns the 1-based position of a field by its name. * - FieldName: Returns the name of a field by its 1-based position. * - FieldPosLast: Returns the 1-based position of the last field. * - php4dbf_dbGoTop: ...

... */ HB_P_PUSHNIL, HB_P_DOSHORT, 0, /* 00068 */ HB_P_LINEOFFSET, 6, /* 144 */ HB_P_PUSHSYMNEAR, 6, /* WQOUT */ HB_P_PUSHNIL, HB_P_PUSHSYMNEAR, 7, /* FIELDNAME */ HB_P_PUSHNIL, HB_P_ONE, HB_P_FUNCTIONSHORT, 1, HB_P_PUSHSTRSHORT, 4, /* 4 */ ' ', '=', ' ', 0, HB_P_PLUS, HB_P_PUSHSYMNEAR, 8, /* CVALTOCHAR ...

METHODS: RecCount(), LastRec(), KeyCount(),RecNo(), KeyNo() GoTop(),GoBottom(),GoTo(nRec),KeyGoTo(nKey),Skip(n) FCount(),FieldPos(c),FieldName(),FieldLen(),FieldDec(),FieldType() FieldGet(),FieldPut() SetOrder(cSort,,lDescend) Save() Close() or End() --------------- NOT SUPPORTED: Seek(), ...

Tim, Then I used DBU to filter out only valid records, and tried to export them. I used the filter .NOT. EMPTY( fieldname ). However they must have something embedded in there because the filter doesn't work. I would write a routine to replace all the fake blank fields with all ...

... but it only found about 30 bad records. Then I used DBU to filter out only valid records, and tried to export them. I used the filter .NOT. EMPTY( fieldname ). However they must have something embedded in there because the filter doesn't work. I used Advantage Architect to also try to filter out ...

Karinha:

Sí busco el nombre del campo asignado a la columna desde un record set
y me parece que FIELDNAME() es para DBFs, o estoy equivocado?

Saludos

Armando wrote:Mr.

Gracias por la respuesta pero no me funciona.

? oBrw:FieldName(nCol)

Me tira error Error description: Error BASE/1004 Message not found: TXBROWSE:FIELDNAME

Saludos

Armando:

SAMPLES\TESTXBRW.PRG - FUNCTION MULTILINE()

Regards, saludos.

Mr.

Gracias por la respuesta pero no me funciona.

? oBrw:FieldName(nCol)

Me tira error Error description: Error BASE/1004 Message not found: TXBROWSE:FIELDNAME

Saludos

I have the folowing code and the point is the second variable (document and cData) cData in this case "document" is the fieldname that is used to search for : value is 12345 this works great for 1 field values but i also need this for a combination field like upper(document)+upper(paid). ...

...     i have to say that i´m not using XBROWSE / XBROWSER ... i want to use a TGrid()  lEdit := XEdit( aEdit, cName ) aEdit Element have {FIELDname,FIELDvalue} but not "Structure" ... did i use XEdit() wrong :?:

... i got from Function Struct2String() :shock: https://i.postimg.cc/BQ6zfn54/XBROWSE-ADD-LAST.jpg what i´m doing wrong :?: p.s. Fieldname will later come from Picklist https://i.postimg.cc/c1DDhGpj/Picklist.jpg

Hi Marc,
It is possible that I want to obtain the impossible.
I want to use the existing name of some records in one file (by doing a do while procedure) to use/call them as existing fieldname in an other file....
Kind regards
José

example:
select products
goto top
do while .NOT. eof()
cnaam=TRIM(products->naam) to transform in his real fieldname

select sales
append blank
replace sales->fieldname with ....

select products
skip 1

enddo

Hi Marc,
Better explained:
How to transform within a do while procedure (file A) each appealed field into his real fieldname so that I can use this fieldname into an other file B.
kind regards
José