Ir para conteúdo
  • Cadastre-se

raosistemas

Membros
  • Total de ítens

    446
  • Registro em

  • Última visita

Tudo que raosistemas postou

  1. ao executar esse procedimento na geracao da nfe MemoResp.Lines.LoadFromFile(ACBrNFe1.Configuracoes.Geral.PathSalvar+'\'+copy(ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID, (length(ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID)-44)+1, 44)+'-NFe.xml'); Ocorre um erro de inteiro invalido ''... o que pode ser? try i := 0; if GerarDigito(i, copy(chave, 4, 43)) then (o erro ocorre aqui) result := i = StrToInt(chave[length(chave)]); if result then result := ValidarCodigoUF(StrToInt(copy(somenteNumeros(chave), 1, 2)));
  2. raosistemas

    GNRE - Online

    Ótima Notícia...
  3. raosistemas

    GNRE - Online

    Alguém que tenha uma versão funcional pode me enviar? estou precisando urgente... Abraço!
  4. raosistemas

    GNRE - Online

    obrigado... Aguardo!!! Grande abraço!
  5. raosistemas

    GNRE - Online

    onde eu posso baixar a versão funcional?
  6. raosistemas

    GNRE - Online

    Boa tarde gente... está funcionando? onde posso baixar a versao atualizada? grande abraço!
  7. raosistemas

    GNRE - Online

    Gostaria de saber se foi integrado com o Suite de componentes ACBR... Agradeço as respostas!!! Alguém gerou algo apenas para gerar o XML e realizar o envio pelo próprio sistema disponibilizado? Grande abraço!!!
  8. raosistemas

    GNRE - Online

    Gostaria de saber se foi integrado com o Suite de componentes ACBR...
  9. Referente a FCI, estou pensando simplesmente em criar algum campo no cadastro do produto e incluir na TAG da NFE, já existente, isso pode ser feito? At. RAO
  10. Maravilha... funcionou belezinha!!! Grande abraço!
  11. Vi pelo forum diversos posts de como agir em caso de empresa enquadrada no simples nacional devolver material para empresa do regime normal. Como ainda não localizei uma informação 100% segura resolvi abrir esse post. Meu cliente (Simples Nacional) precisa devolver uma material adquirido de uma empresa do regime normal, com destaque de ICMS, IPI e ICMS ST... como devemos proceder? Agradeço!
  12. desculpe, segue anexo... fiscnet_log.txt
  13. Segue novo log! Corrigi diversos problemas...a única coisa é que parece que o cupom não finaliza... quem sabe alguém olhando o log possa me ajudar... resumo do que está sendo enviado: //abertura do cupom... ACBrECF1.Device.Baud := StrToInt(cbxVelocidade.Text); ACBrECF1.Porta := cbxPortaComunicacao.Text; ACBrECF1.TimeOut := 15; ACBrECF1.Operador := 'CAIXA'; ACBrECF1.Ativar; AtivarMenus(True); btnAtivarDesativar.Caption := 'Desativar'; btnAtivarDesativar.Tag := 99; case ACBrECF1.Estado of estVenda, estPagamento: begin ShowMessage('Cupom fiscal aberto, o cupom será cancelado!'); ACBrECF1.CancelaCupom; end; estNaoFiscal: begin ShowMessage('Comprovante não fiscal aberto, o comprovante será cancelado!'); ACBrECF1.CancelaNaoFiscal; end; end; ACBrECF1.CarregaAliquotas; ACBrECF1.CarregaFormasPagamento; ACBrECF1.CarregaComprovantesNaoFiscais; ACBrECF1.CarregaRelatoriosGerenciais; ACBrECF1.CarregaUnidadesMedida; ACBrECF1.IdentificaOperador('CAIXA'); lblModeloImpressora.Caption := ACBrECF1.ModeloStr + sLineBreak + ACBrECF1.SubModeloECF; // venda de itens // resumindo é um loop dos itens... tipoaliquota:='NN'; //a empresa é do simples ModoDescAcresc := 'D'; TipoDescAcresc := '%'; frmPrincipal.ACBrECF1.VendeItem( frmPrincipal.pbiCODPROD.AsString, frmPrincipal.prodescfab.AsString, tipoaliquota, arredondar(frmPrincipal.pbiQUANT.AsFloat,1), arredondar(frmPrincipal.pbiUNITARIO.AsFloat,2),0, 'UN', TipoDescAcresc, ModoDescAcresc ); // subtotalizar frmPrincipal.ACBrECF1.SubtotalizaCupom(0,''); // registrar pagamentos Valorpago := StrToFloat(edtPagtoVlr.Text); frmPrincipal.ACBrECF1.EfetuaPagamento(Copy(cbxMeioPagto.Text, 1, 2),Valorpago,'',false); AtualizarTela; StatusBar1.Panels.Clear; with StatusBar1.Panels.Add do begin valorfalta:=(frmprincipal.ACBrECF1.Subtotal); if Valorfalta > 0 then Text := 'A Pagar: ' + FormatFloat(',#0.00', Valorfalta) else Text := 'Troco: ' + FormatFloat(',#0.00', Valorfalta); Width := 300; end; frmPrincipal.ACBrECF1.SubtotalizaCupom(0,''); // coloquei isso agora... tentei deixar sem isso também... if StrToFloat(edtValorTroco.Text) >= 0 then // fechamento indicebmp:='0'; Observacao := edtFechamentoObs1.Text + sLineBreak + edtFechamentoObs2.Text + sLineBreak + edtFechamentoObs3.Text; // lei 12.741/2013 transparencia dos impostos // ACBrECF1.InfoRodapeCupom.Imposto.Texto := '...'; utilize essa propriedade se quiser personalizar o texto exemplo: Valor impostos %s (%s %) meu texto frmprincipal.ACBrECF1.InfoRodapeCupom.Imposto.ValorAproximado := impostopro; // informar o valor aproximado calculado a partir dos itens frmprincipal.ACBrECF1.InfoRodapeCupom.Imposto.Fonte := 'IBPT'; // informar a fonte de onde veio a informação para calculo // ER 02.01 - Requisito XXVIII item 8 //ACBrECF1.InfoRodapeCupom.NF := '123456'; Observacao := StringReplace(Observacao,'|',#10,[rfReplaceAll,rfIgnoreCase]) ; frmprincipal.ACBrECF1.FechaCupom(Observacao,StrToIntDef(IndiceBMP, 0));
  14. muito bacana Tenório... quanto ao "automaticamente manifestadas"... significa o que? e se o material não chegar, etc... vc pode fornecer algum fonte disso? Atenciosamente RAO.
  15. Boa tarde, como posso fazer para controlar os meus xmls de entrada através da consulta a nfe destinadas? Pensei em algo assim... Ler as nfes destinadas e salvar em uma base de dados se ainda não existir lá... criar um campo status para o controle... Alguém já desenvolveu algo assim e poderia dar um exemplo?
  16. como salvar o pdf?
  17. como salvar o pdf?
  18. na verdade pq é um sistema antigo, desenvolvido em delphi 5... e tenho que atualizar nele mesmo...
  19. criei alguns campos em minha base de dados para armazenar os xmls... gravo o das minhas entradas, notas emitidas e cartas de correção... a contabilidade acessa minha base através de um exe específico pra eles... agora me questionaram sobre os pdfs... querem ter acesso também... o que eu procuro é o seguinte: (uso mysql com zeoslib) Criei campos blobs na minha base... notas... campo PDF tipo blob... etc... como eu salvo o pdf no campo blob e carrego? outra funcao que ela deseja é a seguinte... clica com botao direito no grid... salvar pdf localmente... ai grava o det.pdf na maquina dela... Agradeço... RAO
  20. 3069-rejeição -valor do produto difere do produto valor unitário de comercialização e quantidade comercial... quando importo o TXT enviado pelo despachante no sistema emissor gratuito a nota é validada normalmente... ao importar o txt pelo acbr nfe... dá o erro acima ao validar.
  21. Na verdade eu adaptei o proprio sistema de ex... pode ser que eu nao esteja usando o modelo correto no ACBR? pq utilizo o mesmo sistema com impressora bematech e daruma... e tudo funciona normalmente...
  22. em anexo o que ele imprime do cupom...
  23. Resporta COO não encontrada... Aparece o cabeçalho... Aparece o titulo das colunas de itens... aí para... log_elgin.txt
  24. Algum retorno gente? ainda não consegui fazer funcionar essa Elgin!
  25. Qualquer novidade informar... grande abraço a todos os participantes!
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.