:cSQL := "SET @SOMA = 0"
:ExecuteCmd()
...
:cSQL := "SET @SOMA = NULL"
:ExecuteCmd()
ENDWITH
Porque?
Se existir alguma função interessante no MySQL, que não tem no Harbour/aplicativo, basta usar o MySQL.
Por exemplo, poderÃamos validar o CPF/CNPJ no MySQL, ao invés de ter rotina no aplicativo.
Vantagem?
Se tá disponÃvel no MySQL, tá disponÃvel pra qualquer linguagem de programação, simples assim.
Não tá todo mundo aà dizendo que é melhor uma linguagem, ou outra linguagem....
Que é melhor programar pra Windows, Linux, Android, web, etc.....
Então... se tá no MySQL, tá disponÃvel pra tudo.
Convém destacar outros pontos importantes:
- o Harbour não prende ninguém, o que prende.... é o DBF.
- usando Harbour, e transportando funções para o MySQL.... é como estar programando pra Windows, Linux, Android, Web, etc....
E se considerar um Access, que guarda telas e relatórios....
Só falta o banco de dados fazer isso, coisa que o Access fazia...
Ainda naquilo, de imaginar que o SQL é um "dBASE evoluÃdo"....
Tá faltando o REPORT FORM no SQL pra gerar relatórios.... se é que isso já não existe.