Migração de Dbf para MariaDb 10.4

[Fernando queiroz]

Vendo as postagens , a muito tempo eu vou gravando e dando baixa no estoque em tempo de execucao da venda, o pedido fica em aberto ate ser feito o pagamento, se cair a energia ou qualquer outro problema, eu tenho uma rotina de cancelamento do pedido, onde volta o estoque, no meu caso o estoque tem de ficar sempre atualizado pois o outro vendedor depende do estoque atualizado para fazer a sua venda.

tambem so deixo fechar o caixa se nao tiver nenhuma venda com erro(falta de pagamento), como trabalho com caixa centralizado, se nao ouver pagamento o caixa ja sabe , tem de cancelar a venda.

[JoséQuintas]

Ola!Entendi.
Assim é pq vc está usando "fila indiana".
No caso do atendimento com balcão farmácias e mat. de construção, iria ficar cheio de pedidos sem confirmação e orçamentos..

Realmente.
No meu caso não tem atendimento direto a consumidor final, então orçamento/pedido pendente acaba sendo mais eventual.

[Fernando queiroz]

Mantendo a migração do tema, descobri um recurso muito interessante

Após a inclusao de um dado com chave AUTO INCREMENT posso em seguida usar a chave inserida e fazer um UPDATE em uma chave de mesmo valor tipo VARCHAR ( com isso posso ainda utilizar as velhas chaves tipo texto ate migrar tudo)

Código: Selecionar todos

oQuery := oServer:Execute(cQuery1+cQuery2)
		
oQuery := oServer:Execute("SELECT LAST_INSERT_ID()")

com essa função ele retorna o valor do ultimo INSERT que voce fez

MEMVAR->UCLIENTE := oQuery:Fields( "LAST_INSERT_ID()" ):Value
		
cQuery	:="UPDATE CLIENTES SET CLIENTES_UCLIENTE = '" + STRZERO(MEMVAR->UCLIENTE,6,0) + "' WHERE CLIENTES_Id = '" + LTRIM(STR(MEMVAR->UCLIENTE)) + "'"

oQuery := oServer:Execute(cQuery)

https://mariadb.com/kb/en/last_insert_id/

[JoséQuintas]

Talvez interesse esta, que é o que uso:

No DBF é caractere, mas no MySQL é numérico.
Uso mesmos campos pra atualizar DBF e MySQL, então....

No MySQL ACEITA:

SET CHAVE = '000010'

E no DBF:
REPLACE CHAVE WITH "000010"

Desta forma, uso a mesma string pra atualizar DBF e MySQL

E também uso esse recurso de incremental.

Código: Selecionar todos

METHOD QueryExecuteInsert( cTable, lIgnore ) CLASS ADOClass

   LOCAL oField, cSQL, Rs, nValue

   hb_Default( @lIgnore, ! SQL_INSERTIGNORE )
   cSQL := "INSERT " + iif( lIgnore, "IGNORE ", "" ) + "INTO " + cTable + " ( "

   FOR EACH oField IN ::aQueryList
      cSQL += oField[ 1 ]
      IF ! oField:__EnumIsLast
         cSQL += ", "
      ENDIF
   NEXT
   cSQL += " ) VALUES ( "
   FOR EACH oField in ::aQueryList
      cSQL += ValueSQL( oField[ 2 ] )
      IF ! oField:__EnumIsLast
         cSQL += ", "
      ENDIF
   NEXT
   cSQL += " )"
   ::ExecuteCmd( cSQL )
   Rs := ::ExecuteCmd( "SELECT LAST_INSERT_ID()" )
   nValue := Rs:Fields( 0 ):Value
   IF ValType( nValue ) == NIL
      nValue := 1
   ENDIF
   Rs:Close()

   RETURN nValue

Basicamente:

Código: Selecionar todos

:QueryCreate()
:QueryAdd( "NOME", cNome )
:QueryAdd( "ENDERECO", cEndereco )
:QueryAdd( "VENDEDOR", StrZero( nVendedor, 6 ) ) // numérico no MySQL
:QueryAdd( "STATUS", StrZero( nStatus, 6 ) ) // numérico no MySQL
nIdCliente := :QueryExecuteInsert( "CLIENTES" )

:QueryAdd( "IDCLIENTE", StrZero( mIdCliente, 6 ) )
:DBFQueryExecuteInsert() // grava no DBF usando mesmo array, adicionado o código obtido do mysql

[Abel]

muito boa noite pessoal

mudei meu sistema do clipper para harbour, mas continuo usando dbf e indices CDX,
e algumas vezes precisamos reindexar o sistema etc,, alem de uma lentidao no acesso
via rede para DBF grandes.

quando olho os post aqui, letodbf, mariadbf, sql, fico ate confuso com tanta informação,
e qual delas seria a melhor opção custo beneficio de tempo x investimento para eu aprender
e tentar melhorar a performance dos meus sistemas. (dbf x cdx).
se alguem puder compartilhar alguma mudança feita com satisfaçao e um passo a passo para
eu entender melhor, agradeço.

Att
ABEL

[Fernando queiroz]

muito boa noite pessoal

mudei meu sistema do clipper para harbour, mas continuo usando dbf e indices CDX,
e algumas vezes precisamos reindexar o sistema etc,, alem de uma lentidao no acesso
via rede para DBF grandes.

quando olho os post aqui, letodbf, mariadbf, sql, fico ate confuso com tanta informação,
e qual delas seria a melhor opção custo beneficio de tempo x investimento para eu aprender
e tentar melhorar a performance dos meus sistemas. (dbf x cdx).
se alguem puder compartilhar alguma mudança feita com satisfaçao e um passo a passo para
eu entender melhor, agradeço.

Att
ABEL

ABEL se você quiser sair rápido do .DBF /.CDX vai para o LETODBF porque a migração será bem mais rápida, após isso você pode ir para o MARIADB
pois a curva de aprendizado é muito rápida, já passei pelos dois processo.

usei o LETODBF para melhorar a segurança nos dados do .DBF
agora estou migrando tudo para MARIADB ( é fenomenal )

se precisar de dicas disponha

[rossine]

Boa tarde Fernando,

ABEL se você quiser sair rápido do .DBF /.CDX vai para o LETODBF porque a migração será bem mais rápida, após isso você pode ir para o MARIADB
pois a curva de aprendizado é muito rápida, já passei pelos dois processo.

usei o LETODBF para melhorar a segurança nos dados do .DBF
agora estou migrando tudo para MARIADB ( é fenomenal )

se precisar de dicas disponha

Um tempo atrás eu andei fazendo uns testes com o LetoDBF e realmente é muito bom, mas como usando ele eu poderia estar "encurtando" o caminho para o SQL ?

Obrigado,

[Fernando queiroz]

Um tempo atrás eu andei fazendo uns testes com o LetoDBF e realmente é muito bom, mas como usando ele eu poderia estar "encurtando" o caminho para o SQL ?

Obrigado,

O encurtamento seria em função da segurança dos dados, pois ele ficaria em um servidor sem pasta compartilhada, e teria menos dados corrompidos

dando tempo para migrar para o MARIADB

[Abel]

Valeu pela dica, Fernando queiroz

vou fazer umas pesquisas para ver por onde inicio
meu aprendizado para letodbf

qualquer coisa, posto aqui algumas duvidas.

Obrigado, Abel

[rossine]

Bom dia Fernando,

O encurtamento seria em função da segurança dos dados, pois ele ficaria em um servidor sem pasta compartilhada, e teria menos dados corrompidos

dando tempo para migrar para o MARIADB

Sim isto no LetoDBF é muito interessante.

O ideal se no LetoDBF tivesse como usar sentenças SQL para acessar os DBF's, aí sim facilitaria a migração para SQL futuramente.

[asimoes]

Eu fiz a migração para ADS e fui modificando as chamadas para SQL, quando todo o sistema foi modificado, passei para o MariaDb.

O legal do ads é que você tem os 2 mundos no seu sistema, o RDD e o SQL, a minha migração foi tranquila pouco mais de 1 mês.

Agora estou no nível de stored procedures, triggers, views no maria db

[rossine]

Olá Alexandre,

Usando este recurso do ADS aí sim fica fácil a migração para banco de Dados SQL.

Vou estudar esta possibilidade.

Obrigado,

[lwinter]

Galera, fico muito feliz de ver voces avancando em outros banco de dados. Realmente o DBF com Letodb é muito melhor que DBF local. Mas convenhamos nem se compara ao MySql, Postgres, sql server e ate mesmo o Sqlite.
Acho que quem puder fazer cursor e se aperfeicoar vai ficar muito tempo no mercado. E tem a questao do marketing. Tipo, voce usa DBF? Uhh o cliente torce a cara. Pelo menos clientes novos, ja os donos de empresas avos podem nao ligar mas um dia ele vao morrer....e ai???
Bom, só quero fazer voces repensarem.
Nesta nossa area qualquer avanco é bem vindo!

[AutomoSistema]

Bom dia, faz 02 anos que migrei de dbf para Mysql foi um desafio e uma corrida contra o tempo muito grande, porque tomei a decisão de desenvolver outra geração de aplicativos com que trabalho 100% Mysql com Array, hoje já começo colher frutos dessa mudança radical e digo valeu apena, suporte é outro nível, só para ter ideia tenho um cliente de mercado trabalhando com 10 PDVs intel celeron com 2 gb de ram e um servidor intel celeron dual core com 4 gb de ram tudo isto trabalhando em wifi ou seja sem fio uma maravilha, hoje desenvolvo aplicativos em xharbour com acesso há MYSQL em nuvem que são empresas que trabalha na área de serviços póstumos "PAX".

[Vlademiro]

É muito animador ler uma postagem dessa, o mundo (x)Harbour é pequeno, mas consegue resultados fantásticos. Fico feliz tb por ver que esse mundo não é tão pequeno assim, porque de vez em quando aparecem desenvolvedores novos para mim. Parabéns pela sua vitória.