Página 1 de 1
Comando Altera_AltoIncremento
Enviado: Dezembro 7th, 2012, 4:41 pm
por dmfilho
Boa tarde.
Após limpar a tabela de Sistema Remuneratório estou precisando que reinicie do zero o contador. Utilizei os comandos abaixo especificados, só que está dando erro conforme descrito abaixo e não inicializa o contador do zero.
Linhas de comando:
Tabglobal.DT_SistemaRemunerator.LimparTabela;
TabGlobal.DT_SistemaRemunerator.Altera_AutoIncremento('NUMERO', 0);
Erro gerado
invalid request BLR at offset 34
generator T_SISTEMAREMUNERATOR_NUMERO_GEN is not defined
Como faço para corrigir este problema.
Att.
Daniel Montello Filho
Re: Comando Altera_AltoIncremento
Enviado: Dezembro 7th, 2012, 7:45 pm
por xfilpo
Ola Dm ;
Use os seguintes comandos:
// Inicializa: AutoIncremento ( dentro do programa que vc está fazendo )
TabelaPrincipal.AutoIncremento((TAtributo(TabelaPrincipal.Campos[0]).Nome), False, 0, True) ;
// Se vc quiser controlar o AutoIncremento, mude o campo autoincremento p/zero e Atribui Autoincremento Não, dentro do Tabelas do XMaker.
// Dentro do seu Programa ao Incluir aplique estes comandos
TabGlobal.DSCCPH_OBS.GER_CODOBS.Conteudo := RetornaAutoIncremento(TabGlobal.DSCCPH_OBS, 'GER_CODOBS', '', 1) ;
Sds
XFilpo
Re: Comando Altera_AltoIncremento
Enviado: Dezembro 8th, 2012, 8:29 pm
por flaviogonzaga
Olá,
Boa noite.
Se a sua intenção é somente reiniciar a partir do zero, por que você não utiliza o adapter do seu sistema???
Agora caso queira implementar essa possibilidade via código, coloque novamente um post.
Abraços.
Flávio Gonzaga
Re: Comando Altera_AltoIncremento
Enviado: Dezembro 10th, 2012, 9:31 am
por dmfilho
Bom dia Flávio.
Eu estou fazendo um programa de importação de dados de outro sistema via arquivo texto no qual preciso fazer alguns testes antes de importar.
O problema é o seguinte, antes de importar o arquivo texto eu necessito limpar/zerar a tabela SistemaRemunerator. Para fazer isso utilizo o comando "Tabglobal.DT_SistemaRemunerator.LimparTabela" que funciona perfeitamente.
O problema surge quando necessito reiniciar a chave primária da tabela SistemaRemunerator, para isso utilizo o seguinte Comando: "TabGlobal.DT_SistemaRemunerator.Altera_AutoIncremento('NUMERO', 0)", neste ponto é que dá o erro relatado.
Utilizo a mesma rotina para limpar/zerar e reiniciar a chave primária de outras tabelas e dá certo. O problema surge somente na tabela SistemaRemunerator.
Espero ter explicado melhor.
Daniel Montello Filho
Re: Comando Altera_AltoIncremento
Enviado: Dezembro 10th, 2012, 10:16 am
por carlinhos.info
Olá!
Caso você esteja usando um formulário padrão do Xmaker para zera a tabela use a rotina a baixo logo após opção de exclusão dos registros:
if (TAtributo(TabelaPrincipal.Campos[0]).AutoIncremento > 0) then
TabelaPrincipal.AutoIncremento((TAtributo(TabelaPrincipal.Campos[0]).Nome), False, 0, True);
Se foi utilizado um formulário exclusivo então altere a nomenclatura da tabela conforme nome dado por você.
Carlinhos.