nicolasbraz

No meus formularios de cadastro usava o Ibtable, mudei para o Ibdataset. Porem quando uso o comando. dmdados.tblfuncionario.edit; eu faço as alterações salvo os dados dando um POST mas não altera. Se eu for incluir 1 registro ele vai. tambem quando deleto ele some eu fecho a aplicação ele volta.

Uso a paleta, interbase, IBdataset.

Eu gostaria que quando eu clica-se nele ele já aparece-se todos os registros, mas ele fica assim. http://img4.imageshack.us/img4/929/duvidaq.jpg ai se eu for pro ultimo ele fica assim http://img194.imageshack.us/img194/2609/soluo.jpg eu gostaria que ele inicialmente fica-se como o da segunda imagem.

Obrigado jhonas com sua ideia consegui resolver meu problema no botao salvar coloquei. dmdados.SaidaProdutoSAIPROD_COD_SAIDA_PAI.Value:= dmdados.TblSaidaPaiSAIPAI_CODIGO.Value; dmdados.SaidaProduto.Post; Funcionou perfeitamente obrigado

Jhonas eu sei que ela ta nula isso que eu to tentando explicar, era pra ele pegar o valor automatico do saipai_codigo. Com o ibtable eu usava a propriedade masterfield.

O problema é o seguinte o codigo 1 é o codigo pai então todos os produtos que eu cadastrar tem que pegar o codigo 1 e acrescentar segue abaixo 2 imagens uma cadastrando outra com o erro. http://img12.imageshack.us/img12/7258/cadastrando.jpg http://img44.imageshack.us/img44/7721/cadastroerro.jpg

select distinct * from SAIDA_PRODUTO, saida_pai where SAIPROD_COD_SAIDA_PAI =:SAIPAI_CODIGO and SAIPROD_COD_SAIDA_PAI = SAIPAI_CODIGO order by SAIPROD_DATA Resolvido. Obrigado pela ajuda Jhonas. desculpa qualquer coisa ;)

Então jhonas a hora que eu coloco o codigo SQL ele me lista tudo no Dbgrid não diferencia que o saipai_codigo 1 ele tem que me mostrar todos os SAIPROD_COD_SAIDA_PAI que são referentes ao 1. As consultas pelo Firebird já estao identicas. http://img200.imageshack.us/img200/3148/semttuloayg.jpg

Jhonas a ideia é a seguinte na tabela Pai é informada os dados do cliente. na tabela filha vai ser lançado todos os materiais que vao para a obra, esses materias tem que ter o controle do dia que eles são enviados para a obra, eu posso mandar 3 vezes madeira mas uma em cada dia no caso e essa data tem que ser ordenada.

Então Jhonas o mais estranho dessa historia é que seu usar esses codigos SQL pelo firebird consultar por la ele filtra. select distinct * from saida_pai,saida_produto where saipai_codigo = saiprod_cod_saida_pai and saipai_codigo = 3 Ele filtro perfeitamente por isso acho que o que esta acontecendo o problema seja no delphi.

Jhonas To usando o IbDataset. Configurei ele o SQL fico assim. select * from SAIDA_PAI, SAIDA_PRODUTO where saipai_codigo = saiprod_cod_saida_pai order by saiprod_data Só que tem 1 problema eu abro o formulario e ele esta mostrando todos os dados na tabela filha, ele não esta comparando o codigo saiprod_cod_saida_pai com o saipai_codigo.

Com essa ideia sua tem 1 problema quando eu editar 1 registro ele vai pular para o ultimo mas vou deixar assim por enquanto, é mais provavel inserir 1 registro do que alterar, agora se voce souber outra soluçao me avisa.

Na empresa querem sim que fique por data, eu queria usar o indice não por preguiça e sim por sem mais rapido pra fazer porque no meu caso tudo já estava feito pela IbTable. Mas então obrigado jhonas vou fazer aqui e vejo o que da qualquer coisa eu posto aqui.

Eu sei usar uma query. A questao é vou ter que mudar o formulario inteiro des da tabela pai e a filha passando tudo para 2 querys? Porque são no total 4 tabelas nesse formulario. A tabela SaidaPai, SaidaProduto, MaoDeObra, Adicionais. então eu teria que passar tudo para query. Entendeu ?

Entendo isso eu já consigo fazer o problema é que a tabela saida produto é filha do saida pai nunca conectei uma query com uma tabela pai, nem sei se isso é posição.

Não entendi nada que voce disse, não quero relatorio so quero ordenar por indice o campo de data.

o codigo do formulario no evento ONCREATE procedure TFrmSaida.FormCreate(Sender: TObject); begin dmdados.TblUsuario.Open; dmdados.tblsaidapai.Open; dmdados.TblsaidaProduto.Open; dmdados.Tblestoque.Open; dmdados.tblCliente.Open; dmdados.TblMaoDeObra.Open; dmdados.TblFornecedor.Open; dmdados.TblFuncionario.Open; dmdados.TblHorasExtras.Open; dmdados.TblAdicional.Open; dmDados.tblsaidapai.IndexName := 'saida_pai_nomeobra'; dmdados.TblEstoque.IndexName:= 'est_estoque_nome'; dmdados.TblFornecedor.IndexName:= 'for_fornecedor_nome'; dmdados.TblFuncionario.IndexName:= 'func_funcionario_nome'; Dmdados.tblsaidaproduto.ClearFields; Dmdados.tblsaidaproduto.Insert; //ou insert Dmdados.tblsaidaproduto.indexname:='saida_produto_data'; Dmdados.tblsaidaproduto.IndexDefs.Update; Estão relacionadas como SaidaPai (a tabela pai) e saidaproduto (a tabela filha).

Dmdados.tblsaidaproduto.ClearFields; Dmdados.tblsaidaproduto.Edit; //ou insert Dmdados.tblsaidaproduto.indexname:='saida_produto_data'; Dmdados.tblsaidaproduto.IndexDefs.Update; Pensei nisso quando postei o erro, coloquei mas ele continua dando o mesmo erro. Poderia me dar 1 exemplo de como voce filtraria esse codigo ?

Agora ele da o erro "Dataset not in edit or insert mode". Voce acha melhor filtrar pro sql mesmo ? Uso firebird com a paleta interbase, essa tabela esta ligada por IbTables.

O codigo Dmdados.tblsaidaproduto.Clear; não consigo usar ele quando coloco o saidaproduto. ele so aparece como ClearFields. com os outros codigos ele esta dando erro

Tenho 1 formulario para cadastro de obras e os materiais que são lançados nessa obra precisam ficar em ordem de data no dbgrid, então criei uma index no banco de dados e usei o comando : Dmdados.tblsaidaproduto.indexname:='saida_produto_data'; mas ele da o erro "Unknown error" http://img194.imageshack.us/img194/1603/indexdatar.jpg fazendo mais testes descobri que todos os indices que eu coloco dao erro, não sei se é pelo fato de ser uma tabela filha, mas todas as outras minhas tabelas usam indices sem problemas. Uso firebird com a paleta InterBase.

Resolvi fazendo isso 1º a banda Group Header, você utiliza para o cabeçalho do relatorio; 2º a banda Detail, você utiliza para colocar o nome do fornecedor, e seu dados; 3º você coloca uma banda SUBDETAIL, nela você coloca os itens da tabela filho, e ligue a propreidade da DATASET dessa BANDA na tabela FILHO...entendeu ??? 4º a banda Group Footer, você utiliza como rodapé; Obrigado pela ajuda.

Quando ele traz os dados ele so seleciona o que o DBgrid esta selecionado e não esta nem trazendo meu QrLabel.

Tenho um formulario que faz o cadastro da obra http://img21.imageshack.us/img21/5206/obrac.jpg Gostaria de criar 1 botao que imprimi-se so o registro que eu estou visualizando. Eu uso o quick report a questao é se eu usar uma table pra listar os dados ela me trara todos os dados da tabela eu so quero imprimir de 1 determinado registro o que eu estou visualizando. Ai me sugeriram criar 1 relatorio e não ligar ele com nenhum dataset assim fazendo com que os campos sejam recebidos por QrdbText. Até ai tudo bem o problema é como vou trazer os dados do dbgrid?

Toda a vez que eu salvo um registro ele pula para o primeiro registro. Estou utilizando a paleta InterBase. Como estou usando auto incremento por trigger e generators, no evento AfterPost. Código: dmdados.IBTrans.CommitRetaining; dmdados.tblFerramentas.Refresh; so que quando ele da o refresh ele pula para o primeiro registro e eu gostaria que ele continua-se no registro atual. Ex.: a tabela tem 10 registro a hora que eu cadastra 1 novo registro o registro 11 e clico no salvar ele volta para o registro 1.