Ir para conteúdo
Fórum Script Brasil

maudozo01

Membros
  • Total de itens

    9
  • Registro em

  • Última visita

Sobre maudozo01

maudozo01's Achievements

0

Reputação

  1. e basicamente isso estou gerando outra tabela(vendas) pego tipo nome do clientes(tabela clientes) nome produto(tabela produto) e gero a tabela de vendas e logicamente vou gerar o cupom de vendas. não sei se deu para endender e que sou novato vou verificando os sites...... vlw
  2. desculpe a demora para responder, mas vamos la estou abrindo 5 tabelas sendo duas para buscar dados tipo clientes e produtos e 3 masterdetail que são venda(master), itens(detail) e parcelas(detail) dai o erro. desde já vlw a atencao obrigado.
  3. galera alguém sabe como resolver isso maximum user count exceeded contact your database administrator /b] sei que e porque estou abrindo muitas tabelas num mesmo aplicativo mas e que na venda tenho q manipular itens,clientes,produtos etc.... alguém sabe como aumentar o numero de usuarios do IBOConsole uso Firerbird 2.0 e Delphi 7 com IBOConsole. já me falaram para usar query mas nem sei como usa isso sou novato em delphi por isso estou na luta, uso os seguintes componentes para minha aplicacoes SqlConection,SimpleDataSet (Palheta DBExpress) e DataSource (Palheta DataAcces) se alguém tiver alguma dica para me dar agradeco......
  4. Vlw................................. :D William deu certo me ajudou muito e obrigado a todos q me ajudaram vlw mesmo :D
  5. galera fiz isso q me falaram mais nada joguei todos os valores em variaveis e fiz os calculos e nadas as variaveis zerao de pois do append ta dificil já ate joguei em um campo de calculo de outra tabela mesmo assim zera as variaveis obs.: so não zera quando a variavel e integer mas ele so soma os valores inteiro os centavos ele descarta já não sei o que fazer meu sistema esta parado por causa deste calculo................
  6. vlw aos dois vou tentar isso e mas tarde dou um aviso se funcionou falew..................
  7. procedure TFMVendas.DBEdit5Exit(Sender: TObject); var conta:integer; valor:real; begin dmvendas.SimpleDataSetvendas.FieldByName('data_vnd').AsDateTime:= (datetimepicker1.DateTime); dmvendas.SimpleDataSetitens.FieldByName('data_itens').AsDateTime:= (datetimepicker1.DateTime); dmvendas.SimpleDataSetItens.FieldByName('adicional').AsString:= dmvendas.SimpleDataSetItens.FieldByName('nomeproduto').AsString; conta:=dmvendas.SimpleDataSetitens.fieldByname('codigo_itens').asinteger + 1; dmvendas.SimpleDataSetitens.FieldByName('codigo_pro').AsFloat:= dmvendas.SimpleDataSetitens.FieldByName('codigoproduto').AsFloat; dmvendas.SimpleDataSetitens.FieldByName('valor_pro').Asfloat:= dmvendas.SimpleDataSetitens.FieldByName('valorproduto').Asfloat * dmvendas.SimpleDataSetitens.FieldByName('qtda_itens').Asfloat; valor:= dmvendas.SimpleDataSetItens.fieldbyname('valor_pro').asfloat; dmvendas.SimpleDataSetitens.Append; dmvendas.SimpleDataSetitens.fieldByname('codigo_itens').asfloat:= conta; dmvendas.SimpleDataSetitens.FieldByName('totalvendas').Asfloat:= dmvendas.SimpleDataSetitens.FieldByName('totalvendas').Asfloat + valor; dbedit4.SetFocus; end; end. o erro e o seguinte o valor da variavel Valor zera depois do append e o totalvendas so me traz o utimo valor oque sera q esta errado
×
×
  • Criar Novo...