FiveTech Software tech support forums

Using fieldname macro, instead of FieldPut() and FieldGet() as in the sample you posted. #include 'fivewin.ch'function main()    local aKeys   := {'pichincha','internacio'}    local hBancos := { => ...

... {|| oCheques:GoTop() },; {|| oCheques:Skip(1) },; {|| oCheques:Skip(-1) },; {|| oCheques:EoF() },; {|nField| oCheques:FieldGet( nField ) }) MySqlFields( oCheques ) devuelve un array con los nombres de todas las columnas del recordset, ¿Cuál sería el equivalente en FWMariadb? ...

Gustavo,

No debería ser asi ?

nPosicion := AScan( ::aTree, { | xCelda | xCelda[ 2 ][ "nIdPadre" ] == oQry:FieldGet( "c5" ) } )

ó

nPosicion := AScan( ::aTree, { | xCelda | xCelda[ 2 ][ "nId" ] == oQry:FieldGet( "c4" ) } )

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 ...

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 ...

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.   local cField   := "NAME"   oDbf  := TDataBase():Open( nil, "STATES.DBF", ...

... a, @b ) --> oRs Ahora el parámetro out devuelve el valor en b. oRs:Requery( a, @b ) // El parámetro Out se devuelve en b * FWMariaRowSet: - FieldGet( nFldNo ): Se ha solucionado el error en tiempo de ejecución cuando nFldNo está fuera de rango. - Expresión del filtro:"<fld> like ...

... oCn:ProcedureName( a, @b ) --> oRs Now out param returns value in b. oRs:Requery( a, @b ) // Out param is returned in b * FWMariaRowSet: - FieldGet( nFldNo ): Runtime error when nFldNo is out or range is fixed. - Filter expression :"<fld> like <exp>" works but not ...

In the XBrowse.prg, Line no:7371    DEFAULT oCol:bEditValue := { |x| If( x == nil, ::oMySql:FieldGet( cName ), ::oMySql:FieldPut( nCol, x ) ) }  Change this as: if ::oMySql:IsKindOf( "TMSQUERY" )   DEFAULT oCol:bEditValue ...

Silly question , for xbrowse class, FieldGet is character or number? Same for FieldName data type?? Following DBF syntax, FileldGet method in the classes also is meant to be used with column number only. So, if we want to get the value of ...

... "NOMBRE" ;      LINES CELL           oBrw:CreateFromCode()  I fixed the problem on FieldPos(). Now I get this Called from E1FIELDGET(0) Called from TMSQUERY:FIELDGET(639) in source\prg\msquery.prg Called from MXCTAALM(26) in source\Mxctaalm.prg Called from (b)CLINICA32WIN(69) ...

Does oTb:FieldGet( cFieldName ) work? Are you using FWH2012 ? If so, try making the following modifications to xbrowse.prg and include in your link script. Replace line 1297       elseif ! Empty( ::oMysql ) .AND. ::oMysql:IsKindOf( ...

Does oTb:FieldGet( cFieldName ) work? Are you using FWH2012 ? If so, try making the following modifications to xbrowse.prg and include in your link script. Replace line 1297       elseif ! Empty( ::oMysql ) .AND. ::oMysql:IsKindOf( ...

... 'select count(*) from ' + cTabla + ' where ' + cCMy + ' = "' + &cCDbf + '" limit 1' ) if oMyQue # nil nCmd := 0 if oMyQue:FieldGet( 1 ) = 0 // contó cero reg: clave no existe do case // Tablas... case cTabla = 'CLIENTES' nCmd := MySincClienteCrea() --> crear el registro ...

... := AL_CENTER         :nDataStrAlign := AL_LEFT         :bStrData := ::nombreProducto( ::oQry:FieldGet( "C3" ) )      END WITH al recuperar ::oQry:fieldget("C3") no me trae el dato. que estoy fallando? ...