Sérgio Assunção

Bom dia amigos... preciso criar uma stored procedure para a baixa de estoque e não sei fazer... a tabela é a PRODUTOS e o campo referência é o CODIGO. Alguem pode me ajudar ? Obrigado. Sérgio

Valeu lampada... ja melhorou muito... fiz dessa forma: q1.Close; q1.SQL.Clear; q1.SQL.Text := 'insert into VENDA_001 (CODIGO,DATA,DESCRICAO,GRUPO,QUANTIDADE,VALOR,VALORTOTAL,FORNECEDOR)'+ 'select CODIGO,DATA,DESCRICAO,GRUPO,QUANTIDADE,VALOR,VALORTOTAL,FORNECEDOR from CAIXA where CLIENTE = :vCodCliente and MARCADO = :vMarc order by DATA'; q1.ParamByName('vCodCliente').AsInteger := qClientesCODIGO.AsInteger; q1.ParamByName('vMarc').AsInteger := 'SIM'; q1.ExecSQL; Até aqui ta legal... mas se trata de um software em uma loja que vende roupas e calçados. O que acontece é que alguns clientes levam para provar e uns dias depois vão até a loja, e nem sempre ficam com todos os produtos que levou... eu precisava com que os itens dessa puxada voltassem ao estoque logo após o ExecSQL, pois qdo a mercadoria é levada o estoque é baixado... mas eu não queria colocar esse resultado num while editando a tabela ESTOQUE. Alguma dica ? Valeu + uma vez. Sérgio

Boa noite amigos, gostaria de saber se eu consigo clonar uma tabela usando o Firebird ? Eu tenho um software onde o cliente tem os itens que ficam marcado em seu histórico e atualmente estou usando uma consulta sql pra importar esses registros no momento do fechamento dessa sua conta... e dentro de um while eu vou inserindo na tabela os itens, mas demora um pouco e gostaria de saber se consigo fazer algo como o batchmove que o paradox tinha ? As tabelas possuem a mesma estrutura. Obrigado.

Olá Ronaldo... eu agradeço muito a sua atenção... mas nessa tela eu faço alterações nos registros (preço, estoque..etc) por isso abro a tabela por inteiro. Esse "pegar somente os dados que forem necessário", seria os campos ou um certo numero de registros ? Obrigado + uma vez. Sérgio

Sim, no OnCreate do Form eu executo o qProdutos.Open É problema isso ? Obrigado. Sérgio

Bom dia amigos, a pouco tempo migrei um software que usava o Paradox para Firebird e o que era rápido usando o Paradox ficou lento agora com o Firebird e vice-versa. A tela de vendas ficou uma maravilha, tudo bem rapido mesmo. Já o form que uso para o cadastro de produtos demora 5 segundos para abrir, o que era instantâneo com o Paradox. O numero de registros de produtos é 96728 e não tem nenhum campo blob (imagem) ou memo. Será que é isso que ta deixando o acesso lento ? No OnCreate do form eu simplesmente dou um qProdutos.Open e o sql usado é este: select CODIGO, DESCRICAO, DESCRICAOPDV, GRUPO, SUBGRUPO, FORNECEDOR, CUSTO, MARGEM, VENDAUN, ESTOQUE, CONFPRECO, DATAALT from PRODUTOS order by DESCRICAO Alguem pode me dar uma luz se consigo ajeitar isso na programação ou é número de registros que está gerando essa lentidão ? Obrigado. Sérgio

Bom dia amigos, alguem pode me falar qual a versão mais recentei do roteiro do paf-ecf a ser seguido. Se tiver o link eu agradeço. Obrigado. Sérgio

Boa tarde amigos, percebi que o forumweb está com problemas e gostaria de saber se este será o fórum oficial do projeto ACBr ? Obrigado. Sérgio