FiveTech Software tech support forums

Code: Select all

cSQLQuery:= "SELECT max(folio) WHERE id_empresa='"+cEmpresa+"'"
cNumFolio:= oServer:Query(cSQLQuery) // Esto me regresa un Objeto tDataBase
cNumFolio:= oServer:SQLQuery(cSQLQuery) // Esto me regresa un valor logico
cNumFolio:= oServer:Execute(cSQLQuery) // Esto me regresa un valor logico 

Code: Select all

cSQLQuery:= "SELECT max(folio) as maximo WHERE id_empresa='"+cEmpresa+"'"
cNumFolio:= oServer:Query(cSQLQuery):maximo // Esto me regresa el valor máximo del campo folio
 

Code: Select all

cSQL := "SELECT max(folio) as maximo WHERE id_empresa=&1"
oQry := oServer:Query(cSQL,{ cEmpresa } )
IF !hb_isnil( oQry )
 ?oQry:maximo
ENDIF
oQry:end()