-
Total de ítens
246 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por Rodrigo Guelf
-
-
Amigo, eu recompilei os pacotes, entrei por dentro do delphi e fui até a unit ACBrEFDBlocos, fui na linha 167 "vlVersao107 // Código 008 - Válido a partir de 01/01/2014" enfim fim tudo o que vc falou porem quando mando gerar o arquivo do sped a versão continuar |0000|007|0|01012014|31012014|. o que devo fazer, ou o que estou fazendo de errado
-
o Validador 2.0.33 e o novo 2.0.34 do Sped Fiscal não valida mais os arquivos com a versão 007, atualizei o Acbr mais continuar gerando o arquivo com a versão 007, gostaria de saber se ja saiu esta atualização ou se vai sair
-
Sim a impressora esta lacrada.
sobre emitir uma z para abrir o dia, quando eu mandei imprimir uma Z mandei imprimir cupom logo em seguida e deu o mesmo erro.
-
Bom Pessoal, desde já quero agradecer a quem me ajudar.
Um Cliente meu comprou uma impressora EPSON TM-T81F USB, baixei o drive dela, configurei o ACBr para Imprimir na porta USB, até ai tudo bem!
eu só estou conseguindo emitir leitura LX, pois quando mando imprimir cupom da o seguinte erro:
0801 - Comando invalido com jornada fiscal fechada.
pesquisei aqui no fórum e vi que jornada fiscal é quando a redução Z já foi emitida.
então peguei e esperei no outro dia fui fazer teste e deu o mesmo erro, na duvida eu mandei emitir a redução z novamente. Imprimiu certinho, esperei no outro dia e mesmo assim continua dando o mesmo erro:
Será que essa impressora tem que abri o dia nela?
mais uma vez agradeço a quem me ajudar!
-
Amigos, bom dia!
Como eu faço para capturar a chave md5 de cada nota para guardar dentro do meu banco de dados?
-
Italojjr, Bom dia!
A Versão do Windows é 7 64 bits, porem eu mesmo já vi acontecer no windows 7 32, XP 32. toda vez que fica assim não tenho outra maneira se não formatar o micro.
no status do serviço não da erro, porem o retorno volta em branco.
Caso queira fazer algum teste na minha maquina, é só marcamos um horario, que libero o TeamViewer para vc.
Desde já agradeço a sua atenção.
-
O Mesmo projeto meu, com o mesmo certificado, só que no meu notebook não da erro algum, funciona normalmente.
E ai meus amigos Régys Silveira e Italojjr, alguém tem alguma ideia, para poder me ajudar?
-
Régys Silveira
Gostaria de dizer que também fiz o seu teste, porem não funcionou.
-
Boa Noite Italojjr.
Fiz o que vc pediu, atualizei o ACBr e tentei novamente o procedimento, continua acontecendo o mesmo erro, vc tem razão ai dizer que o erro é referente a algum componente que não existe, apos a mensagem de erro em branco vem um acess violation,
if not(Self.Enviar.Executar) thenbeginif Assigned(TACBrNFe( FACBrNFe ).OnGerarLog) thenTACBrNFe( FACBrNFe ).OnGerarLog(Self.Enviar.Msg);raise EACBrNFeException.Create(Self.Enviar.Msg);end;esta mensagem esta voltando vazia, porem o exception não deixa passar. -
Ok vou fazer isso, depois posto aqui um retorno
-
Amigo estou usando a capicom o vencimento do certificado é 20/07/2014.
eu fui debugando o codigo e o erro da dentro da Unit ACBrNFeWebServices dentro da rotina
function TWebServices.Envia(ALote: String; const ASincrono: Boolean): Boolean;
dentro desta verificação
if Assigned(TACBrNFe( FACBrNFe ).OnGerarLog) thenTACBrNFe( FACBrNFe ).OnGerarLog(Self.Enviar.Msg);raise EACBrNFeException.Create(Self.Enviar.Msg);eu já registrei a capicom, e as outras dll que acompanham ela e mesmo assim da o erro, não é a primeira vez que este erro da em cliente meu, sempre que isso acontece não tenho outra soluçãose não formatar o PC, mais desta fez graças a Deus deu o erro no meu micro e posso debugar para dentar resolver. -
Amigos, bom dia!
estou com o seguinte problema:
Tento enviar a nota fiscal, e da uma mensagem de erro somente com o botão OK, o Certificado é A1, já desinstalei e instalei novamente, olhei para ver se o mesmo esta na aba Pessoal, tudo certinho, algo saberia me dizer o que esta acontecendo?
-
Renan Garcia de Oliveira
segue o rotina e exemplo para vc resolver o seu problema
//Função para Remover Caracter de uma string;function TFormGerarETransmiteXML.RemoveAcento(Str: string): string;const ComAcento = 'àâêôûãõáéíóúçüÀÂÊÔÛÃÕÁÉÍÓÚÇÜ.';SemAcento = 'aaeouaoaeioucuAAEOUAOAEIOUCU ';var x: Integer;begin;for x := 1 to Length(Str) doif Pos(Str[x],ComAcento) <> 0 then Str[x] := SemAcento[Pos(Str[x], ComAcento)];Result := Str;end;vLinha:= ' <nomePrescritor>'+RemoveAcento(QVenda.FieldByName('NOME').AsString)+'</nomePrescritor>'; -
designerba eu disse para vc que o meu componente processmessages já estava como false, mais me confundi com a propriedade ExibeMensagem, eu não encontrei nas propriedados do componente ACBrECF a propriedade processmessages, seria realmente no componente ACBrECF?
-
o meu já esta assim. tem mais alguma ideia.
-
Amigos, bom dia!
Tenho um cliente que tem duas impressoras bematech MP 2100 estou capturando os dados obtidos após tirar a redução Z para gravar para geração dos arquivos do Sped. Uma impressora funciona normalmente, eu mudo o TimeOut de 5 para 600 antes de mandar imprimir, mando imprimir captura as informações que preciso e volto o TimeOut para 5.
Na outra impressora já mudei o TimeOut para 60 000 e mesmo assim não da tempo para imprimir, a fita da impressora da redução Z tem cerca de 2 metros e meio de comprimento demora 3 minutos para imprimir toda a redução Z.
Como eu faço para que o programa consiga ficar esperando a redução Z terminal, no meio da redução Z o Acbr da erro que a impressora não esta respondendo.
Agradeço desde já a quem me ajudar!
-
jeter.rabelo.
Amigo muito obrigado pela sua ajuda, deu tudo certo!
gostaria de saber só mais uma coisa, o meu cliente vai imprimir as notas fiscais enviar e entregar para os clientes, vai gerar estes arquivos e depois passar no validador e gerar o 4 arquivo, depois tem que imprimir o recibo de entrega, até ai tudo bem e depois o que eu faço com estes arquivos e com o recibo?
vai mandar para o contador só o recibo e os arquivos pode jogar fora?
-
Amigo como usa este validador, ele não abre nenhum arquivo, tentei abrir o arquivo gerado pelo componente ele não abriu, tentei abrir o arquivo .ini que veio junto nada, ele só abre arquivo do tipo C*.
como funciona este validador!
-
jeter.rabelo
Amigo gerei novamente o arquivo só arrumei o telefone, mesmo assim esta dando o seguinte erro:
Erro: 418 - Número da última Nota Fiscal do arquivo mestre inválido [ ]Arquivo: MestreArq. Descrição do Erro Qtde--------------------------------------------------------------------------------------------------DEST 418-Número da última Nota Fiscal do arquivo mestre inválido 1--------------------------------------------------------------------------------------------------Total de Erros: 1estou usando o seguinte validador:caso não seja o mesmo vc usa, por favor me passa o correto.estou enviando novamente os arquivos gerados, o log do erro e o arquivo de configuração do validador.desde já agradeço mais uma vez pela ajuda! -
Jeter.rabelo segue o código:
Obrigado por me ajudar!
procedure TClasseNFTelecomunicacoes.AlimentarComponente;beginwith DtCadastro, Convenio115 do begintryApplication.ProcessMessages;Clear;SalvarEm := ADir;UF := 'SP';Serie := '001';Ano := StrToInt(FormatDateTime('YYYY',CDSNotaFiscalDT_PEDIDO.AsDateTime));Mes := StrToInt(FormatDateTime('MM',CDSNotaFiscalDT_PEDIDO.AsDateTime));CDSNotaFiscal.First;while not CDSNotaFiscal.Eof do beginRefreshTable(CDSClientes, 'SELECT * FROM CLIENTES WHERE CODIGO =:CODIGO',CDSNotaFiscalCOD_CLI.AsInteger);RefreshTable(CDSCidades, 'SELECT * FROM CIDADES WHERE CODIGO =:CODIGO',CDSClientesCOD_CID.AsInteger);OMestre := TACBrConvenio115Mestre.Create;OMestre.Destinatario.CnpjCpf := CDSClientesCPF_CNPJ.AsString;OMestre.Destinatario.InscricaoEstadual :=CDSClientesRG_IE.AsString;OMestre.Destinatario.RazaoSocial := CDSClientesNOME.AsString;OMestre.Destinatario.Logradouro := CDSClientesENDERECO.AsString;OMestre.Destinatario.Numero := CDSClientesEND_NUM.AsString;OMestre.Destinatario.Complemento := CDSClientesCOMPLEMENTO.AsString;OMestre.Destinatario.CEP := CDSClientesCEP.AsString;OMestre.Destinatario.Bairro := CDSClientesBAIRRO.AsString;OMestre.Destinatario.Municipio := CDSCidadesNOME.AsString;OMestre.Destinatario.UF := CDSClientesUF.AsString;OMestre.Destinatario.Telefone := CDSClientesTELEFONE.AsString;OMestre.Destinatario.CodigoConsumidor := CDSClientesCODIGO.AsString;OMestre.TipoAssinante := tac111ResidencialPessoaFisica;OMestre.TipoUtilizacao := pc112ProvimentoAcessoInternet;OMestre.DataEmissao := CDSNotaFiscalDT_PEDIDO.AsDateTime;OMestre.Modelo := 21;OMestre.Serie := '001';OMestre.NumeroNF := CDSNotaFiscalNUMERO_NF.AsInteger;OMestre.ValorTotal := CDSNotaFiscalTOTAL.AsCurrency;OMestre.ICMS_BaseCalculo := CDSNotaFiscalB_ICMS.AsCurrency;;OMestre.ICMS_Valor := CDSNotaFiscalVL_ICMS.AsCurrency;OMestre.IsentosNaoTributadas := 0;OMestre.OutrosValores := CDSNotaFiscalOUT_DESP_ACESS.AsCurrency;OMestre.AnoMesRefencia := FormatDateTime('YYMM',CDSNotaFiscalDT_PEDIDO.AsDateTime);RefreshTable(CDSItensNF, 'SELECT * FROM ITENS_NOTAFISCAL WHERE COD_PED =:COD_PED',CDSNotaFiscalCODIGO.AsInteger);while not CDSItensNF.Eof do beginODetalhe := TACBrConvenio115Item.Create;ODetalhe.CFOP := '5307';ODetalhe.Item := CDSItensNF.RecNo;ODetalhe.CodigoServico := CDSItensNFCOD_PRO.AsString;ODetalhe.DescricaoServico := CDSItensNFPRODUTO.AsString;ODetalhe.Unidade := CDSItensNFUN.AsString;;ODetalhe.ClassificacaoItem := '1001' ; // Verificar tabela 11.5 do convênioODetalhe.QtdeContratada := CDSItensNFQUANT.AsCurrency;ODetalhe.QtdePrestada := CDSItensNFQUANT.AsCurrency;ODetalhe.ValorTotal := CDSItensNFVL_TOTAL.AsCurrency;ODetalhe.Desconto := 0;ODetalhe.AcrescimosDespAcessorias := 0;ODetalhe.ICMSBaseCalculo := CDSItensNFBASE_CALC_ICMS.AsCurrency;ODetalhe.ICMSValor := CDSItensNFBASE_CALC_ICMS.AsCurrency;ODetalhe.ICMSAliquota := CDSItensNFICMS.AsCurrency;ODetalhe.IsentoNaoTributados := 0;ODetalhe.OutrosValores := 0;ODetalhe.AnoMesApuracao := FormatDateTime('YYMM',CDSNotaFiscalDT_PEDIDO.AsDateTime);OMestre.Detalhes.Add(ODetalhe);CDSItensNF.Next;end;CDSNotaFiscal.Next;Mestre.Add(OMestre);end;RefreshTable(CDSFiliais, 'SELECT * FROM FILIAIS WHERE CODIGO =:CODIGO',CDSNotaFiscalCOD_FILIAL.AsInteger);with Emitente do beginRazaoSocial := CDSFiliaisNOME.AsString;CNPJ := CDSFiliaisCNPJ.AsString;InscEstadual := CDSFiliaisIE.AsString;Endereco := CDSFiliaisENDERECO.AsString+', '+CDSFiliaisEND_NUMERO.AsString;Cidade := CDSFiliaisCIDADE.AsString;UF := CDSFiliaisUF_DESTINO.AsString;Telefone := CDSFiliaisTELEFONE.AsString;HomePage := '';EMail := '';end;finallyBlockInput(False);FormAguarde.Free;end;end;end;procedure TClasseNFTelecomunicacoes.Imprimir;beginwith FrmPRN, Convenio115 do beginAlimentarComponente;Imprimir(False);end;end; -
Renan Garcia de Oliveira vc esta tendo o erro de carecter invalido quando envia o arquivos?
se for eu tenho a solução.
-
Ok esta anexado.
-
Não sei o que esta acontecendo mais gerei mais notas fiscais do mesmo cliente e ao passar pelo validador esta dando o seguinte erro:
Erro: 418 - Número da última Nota Fiscal do arquivo mestre inválido [ ]Arquivo: MestreArq. Descrição do Erro Qtde--------------------------------------------------------------------------------------------------DEST 418-Número da última Nota Fiscal do arquivo mestre inválido 1--------------------------------------------------------------------------------------------------Total de Erros: 1Este é o conteudo do arquivo mestre:00035469795837426343566 LUIS GUSTAVO APARECIDO SP34001 2013071521001000010803C0921DFC90CB99D61A12902649CDE156000000002500000000000000000000000000000000000000000000000000N1307000000001 123615C79EB4D884A6133D03AA15F3D400035469795837426343566 LUIS GUSTAVO APARECIDO SP34001 2013071521001000010804038476E25DEB04BCE4D8818EDE746241000000002500000000000000000000000000000000000000000000000000N1307000000002 2BC0784BB3E7855931B5BCBFC5E4DA8100035469795837426343566 LUIS GUSTAVO APARECIDO SP34001 2013071521001000010805D1CF6EAC75FC6F444624B8C49A642131000000002500000000000000000000000000000000000000000000000000N1307000000003 CDC2FC6A75F1A2EE7057806C5FB3D9D800035469795837426343566 LUIS GUSTAVO APARECIDO SP34001 20130715210010000108065313E8C9B462A4953BB784CF380F258F000000002500000000000000000000000000000000000000000000000000N1307000000004 91E2FF681445E6DCF0283951E51B1AD400035469795837426343566 LUIS GUSTAVO APARECIDO SP34001 2013071521001000010807DF63CCB301480A875DD16C4F902F1367000000002500000000000000000000000000000000000000000000000000N1307000000005 D3807C511077B60D4D5F0159BB8888B100035469795837426343566 LUIS GUSTAVO APARECIDO SP34001 2013071521001000010808E23116397DADEE5398A3EF50998CEE13000000002500000000000000000000000000000000000000000000000000N1307000000006 36F0C6BEFE307343665EB9052ACF462400035469795837426343566 LUIS GUSTAVO APARECIDO SP34001 2013071521001000010809AFD9FE64604C65838F7CC20AB3E887B5000000002500000000000000000000000000000000000000000000000000N1307000000007 3DE4D3FF3F69C45D743FEC28104C6F90note que o numero da nota fiscal não esta errado. -
gerei o arquivo com 1 registro e esta dando o seguinte erro quando passo pelo validador
Arq. Descrição do Erro Qtde--------------------------------------------------------------------------------------------------MEST 136-Código Autenticação Digital do registro do arquivo mestre inválido 1MEST 139-Final do registro com seqüência inválida (diferente de CR + LF) 1DEST 314-Código Autenticação Digital do registro do arquivo cadastro inválido 1DEST 315-Final do registro com seqüência inválida (diferente de CR + LF) 1--------------------------------------------------------------------------------------------------Total de Erros: 4
Versão 008 Novo Validador 2.0.34
em ACBrSPEDFiscal
Postado