Clipper On Line • Ver Tópico - Como transformar em SQL?

Como transformar em SQL?

Discussão sobre SQL

Moderador: Moderadores

 

Como transformar em SQL?

Mensagempor asimoes » 15 Fev 2020 16:28

Pessoal,

Alguém sabe como transformar o comando abaixo em SQL UPDATE

REPLACE APH04->Nr_Seq WITH StrZero( APH04->( RecNo() ) + 1, 6) ALL
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

Como transformar em SQL?

Mensagempor JoséQuintas » 15 Fev 2020 22:46

Tem campo incremental na tabela?

UPDATE tabela set campo = LPAD( outrocampo + 1, 6, '0' )
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18009
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

Como transformar em SQL?

Mensagempor alxsts » 15 Fev 2020 23:37

Olá!

Para MariaDb 10.2 ou superior, veja
[]´s
Alexandre Santos (AlxSts)
alxsts
Colaborador

Colaborador
 
Mensagens: 2943
Data de registro: 12 Ago 2008 15:50
Cidade/Estado: São Paulo-SP-Brasil
Curtiu: 21 vezes
Mens.Curtidas: 248 vezes

Como transformar em SQL?

Mensagempor asimoes » 16 Fev 2020 09:08

alxsts escreveu:Olá!

Para MariaDb 10.2 ou superior, veja


Ainda estou em fase de transformação dos dbfs usando querys e depois migrar para o MariaDB, e pra isso estou usando o driver oledb da sybase ads, nesse caso tenho uma rotina que o campo Nr_Seq é feito o replace com recno() sequencial, é uma tabela com registros temporários, após o uso é feito um zap ou delete table agora, porque no ads não funciona o truncate, mas isso deve se resolver quando migrar a base pro mariadb
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

Como transformar em SQL?

Mensagempor asimoes » 16 Fev 2020 09:12

JoséQuintas escreveu:UPDATE tabela set campo = LPAD( outrocampo + 1, 6, '0' )


Não funcionou no meu programa de testes

2020-02-16 09_11_03-Teste ADS.png
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

Como transformar em SQL?

Mensagempor asimoes » 16 Fev 2020 13:16

Consegui produzir um select com a sequencia, mas o update não sei como fazer

cSql := "SELECT RIGHT('000000' + CONVERT( CONVERT( NR_SEQ, SQL_INTEGER ) + ROWNUM() - 1, SQL_VARCHAR),6) AS SEQUENCIA FROM APH04 A"
2020-02-16 13_14_14-Teste ADS.png
2020-02-16 13_14_14-Teste ADS.png (10.39 KiB) Visualizado 2519 vezes
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

Como transformar em SQL?

Mensagempor asimoes » 16 Fev 2020 13:44

Pensando bem, eu só preciso do select que já resolveu, o campo pode ficar nulo
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes




Retornar para SQL

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 7 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro