Servidor MYSQL Integrado

[JoséQuintas]

Acho que criei um monstrinho kkkkk

Depois de integrar procedure pensei.... porque não?

Criei um método simples:

Código: Selecionar todos

METHOD ReturnValue( cCmd ) CLASS ADOClass

   LOCAL xResultado, oRs

   oRs := ::ExecuteCmd( "SELECT " + cCmd )
   xResultado := oRs:Fields( 0 ):Value
   oRs:Close()

   RETURN xResultado

O barato é doido...
Vejo Infinitas possibilidades....

[JoséQuintas]

Agora o resultado de uma STORED FUNCTION no meio de um cálculo.

[JoséQuintas]

E que tal consultar valores do servidor???

Código: Selecionar todos

? :ReturnValue( "@@Max_Allowed_Packet" )

Tô dizendo que o barato é doido.

Também dá pra fazer com SQLMIX, ou outro conector, só criar rotina intermediária.