auto incremento com sqlrdd e postgres e mysql

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

narlem
Usuário Nível 1
Usuário Nível 1
Mensagens: 35
Registrado em: 24 Set 2004 14:34

auto incremento com sqlrdd e postgres e mysql

Mensagem por narlem »

Olá,

Eu preciso criar uma tabela com um campo como chave unica e auto incremento, com o codigo abaixo eu já consigo criar a tabela com o campo codigo como chave unica.
colocando 1 no decimo campo do array do campo codigo.

alguem sabe como eu conseguiria fazer este campo "codigo", ser alem de chave unica, auto incremento ou seja a cada append ele atribuiria o ultimo mais um

* 1 2 3 4 5 6 7 8 9 10
aadd(wstruct, {"codigo" ,"C" ,06 ,0 , , , , , ,1 })
aadd(wstruct, {"nome" ,"D" ,40 ,0})
dbCreate( "teste_dbf" , wstruct, "SQLRDD" )

Desde já atencipo meus agradecimentos a quem puder me ajudar

Narlem
BH - MG
Avatar do usuário
jairfab
Usuário Nível 3
Usuário Nível 3
Mensagens: 252
Registrado em: 21 Mai 2007 09:43
Localização: São Paulo, Região Leste - Suzano

auto incremento com sqlrdd e postgres e mysql

Mensagem por jairfab »

Quando você cria a tabela com o comando dbCreate( "teste" , wstruct, "SQLRDD" ), internamente já cria o campo: SR_RECNO NUMBER(15,0).

Mas você poderia tentar desta forma, não sei se vai funcionar, eu sei que criando uma tabela via "dbfcdx" funciona, se não funcionar você pode
criar uma tabela via dbfcdx depois importar para o banco de dados.

Código: Selecionar todos

aadd(wstruct, {"codigo" ,"+" ,15 ,0  })
aadd(wstruct, {"nome" ,"C" ,40 ,0})
dbCreate( "teste" , wstruct, "SQLRDD" )
Delpji 7, harbour 3.2, xharbour 1.2.3, Bcc7, Minigw, Minigui 19.11, hwgui 2.20, FiveWin 19.05 Gtwvw, Gtwvg, C# VS 2017
narlem
Usuário Nível 1
Usuário Nível 1
Mensagens: 35
Registrado em: 24 Set 2004 14:34

auto incremento com sqlrdd e postgres e mysql

Mensagem por narlem »

Olá,
Obrigado pela resposta,
vou simular, aqui
Responder