Jump to content

infomatte

Membros
  • Content Count

    76
  • Joined

  • Last visited

Community Reputation

32 Excellent

1 Follower

About infomatte

  • Rank
    Membro
  • Birthday 09/04/1974

Profile Information

  • Localização
    Castelo de Sonhos / PA

Recent Profile Visitors

1,041 profile views
  1. Boa Tarde... Acabei de testar em Modo de PRODUÇÃO... Transmissão / CC-e / Cancelamento - Tudo funcionando 100%... Tanto CNPJ quanto CPF.... o Problema para CC-e e Cancelamento encontra-se no modo de HOMOLOGAÇÃO... Desculpem o Transtorno...
  2. Boa Tarde... Acabei de testar a emissão de NF-e com CPF e IE no estado do Pará.... a Transmissão está 100% Mas quando tento cancelar ou enviar CC-e, retorna ERRO: 2254 - Falha na validação de esquema Xml... Estou utilizando ambiente de Homologação, Certificado E-CPF Seguem XMLs... 1906061358-eve-soap.xml 1906061358-ped-eve-soap.xml 1906061405-eve-soap.xml 1906061405-ped-eve-soap.xml
  3. Bom Dia... Obrigado pela atualização do repositório... Bom trabalho a todos...
  4. Boa Tarde... Vendo o post e, concordando plenamente com as palavras do Italo, fiz uma alteração no fonte, especificamente no arquivo ACBrMDFeDAMDFEFR.pas... Alterei o seguinte: Linha 1553: De: FieldByName('placa').AsString := FormatarPlaca(veicTracao.placa); Para: FieldByName('placa').AsString := FormatarPlaca(veicTracao.placa) + ' / ' + veicTracao.UF; Linha 1568: De: FieldByName('placa').AsString := FieldByName('placa').AsString + #13#10 + FormatarPlaca(FMDFe.rodo.veicReboque.Items.placa); Para: FieldByName('placa').AsString := FieldByName('placa').AsString + #13#10 + FormatarPlaca(FMDFe.rodo.veicReboque.Items.placa) + ' / ' +FMDFe.rodo.veicReboque.Items.UF; Testei e ficou como desejado (vejam figura em anexo. Caso considerem relevante a alteração, segue em anexo o arquivo ACBrMDFeDAMDFEFR.pas modificado para atualização do repositório. (Utilizei o arquivo da Revision 16217) ACBrMDFeDAMDFEFR.pas
  5. Bom Dia... Também sou do Pará... 1º - Lote em Processamento: Não tem nada errado com o componente e, também não é um erro... Significa que a Sefaz ainda não processou o envio... 2º - TimeOut: Não tem nada errado com o componente e, também não é um erro... Significa que a internet está muito ruim ou, veja o link que o Amarildo de Matos postou acima... Eu sempre configuro desta maneira na maioria dos meus clientes (nunca tive problemas): ACBrNFe.Configuracoes.WebServices.TimeOut := 8000 ACBrNFe.Configuracoes.WebServices.AguardarConsultaRet := 3000; ACBrNFe.Configuracoes.WebServices.IntervaloTentativas := 2000; ACBrNFe.Configuracoes.WebServices.Tentativas := 5; ACBrNFe.Configuracoes.WebServices.AjustaAguardaConsultaRet := False;  Só para constar: "A maioria" dos clientes pagam o mínimo possível de internet... Em nossa região praticamente tudo é via rádio... e se não bastasse, quando vc vai ver, tem 03 micros acessando o roteador e de quebra, Wi-fi liberado para os clientes, e ai não tem Cristo que resolva, vai retornar TimeOut mesmo...
  6. Bom Dia... Utilizo para impressão da NFC-e em varios clientes o Danfe em Fortes, com impressão do QRCode Lateral... Notei que em algumas impressoras o Protocolo e a Data de Autorização ficam quase impossíveis a sua visualização... Alterei o Arquivo ACBrDANFCeFortesFr, colocando os campos em Negrito. Testei em vários clientes, e ficou perfeito... Seguem em anexo os arquivos alterados (Revision 16204), e imagem de como fica a impressão... Caso considerem a alteração válida, se alguem puder atualizar o repositório, agradeço... ACBrDANFCeFortesFr.dfm ACBrDANFCeFortesFr.pas
  7. Bom Dia... Ótima Dica dua EMBarbosa... Gostei do arquivo do link abaixo... Para aqueles que utilizam FieldByName. Obrigado a todos...
  8. Obrigado... Tenho clientes que a base ultrapassa a casa dos 3gb, onde a maior tabela em quantidade de registros beira 2,5 milhoes de registros... bancos de dados sendo alimentados desde 2009... Até o momento, não sentimos lentidão em nenhum processo... Mas, se não for pedir muito, qual é sua sugestão para substituição do FieldByName?
  9. Boa Tarde... Vidinha difícil essa de programador.... Estava passando os valores desta forma: VL_OPR := NFCeProduto.FieldByName('Total').Value; VL_DESC := NFCeProduto.FieldByName('Desconto').Value; Pelo que entendi, desta forma, quanto o valor é redondo (R$ 60,00), para o componente passa 60, constatei isso dando showmessage( FloatToSTR(NFCeProduto.FieldByName('Total').Value));... ai, não vai casa decimal para o componente... Mudei para: VL_OPR := StrToFloat(FormatCurr('0.00',NFCeProduto.FieldByName('Total').Value)); VL_DESC := StrToFloat(FormatCurr('0.00',NFCeProduto.FieldByName('Desconto').Value)); "Vualá"... 100% funcional... sem mexer em nada no ACBr... Havia incluido assim no DEMO do ACBR.. with RegistroC175New do //Inicio Adicionar os Itens: begin VL_OPR := 50; VL_DESC := 0; ......... Neste caso, não foi virgula, mas gera normalmente mas assim, VL_OPR := NFCeProduto.FieldByName('Total').Value;, não vai... Só peço desculpas por tirar o tempo do pessoal experiente do fórum... Coisas simples, mas a falta de atenção em muito nos atrapalha as vezes...
  10. Vou tentar simular o erro no DEMO... assim que terminar, posto o fonte com a simulação...
  11. Boa Tarde... Obrigado EMBarbosa... Esqueci de expor essa questão na minha resposta... foi uma solução temporária que encontrei para resolver meu caso... No decorrer da semana vou voltar aos testes utilizando o arquivo original com Tipo Variant... tenho pouca experiencia com Classes, mas se conseguir localizar o que estou fazendo de errado na alimentação do Registro C175, volto a reportar... Mais uma vez, obrigado...
  12. Boa Tarde... Estou com cliente novo, Posto de Combustivel, media de 6.000 NFC-e´s mensais... Tive o mesmo problema ontem... só consegui resolver mudando as variaveis de Variant para Currency... Mudei esta parte do fonte (Linhas 410 a 452): //REGISTRO C175: REGISTRO ANALÍTICO DO DOCUMENTO (CÓDIGO 65) TRegistroC175 = class private fALIQ_COFINS : Currency; fALIQ_COFINS_QUANT : Currency; fALIQ_PIS : Currency; fALIQ_PIS_QUANT : Currency; fCFOP : string; fCOD_CTA : string; fCST_COFINS : TACBrSituacaoTribCOFINS; fCST_PIS : TACBrCstPis; fINFO_COMPL : string; fQUANT_BC_COFINS : Currency; fQUANT_BC_PIS : Currency; fVL_BC_COFINS : Currency; fVL_BC_PIS : Currency; fVL_COFINS : Currency; fVL_DESC : Currency; fVL_OPR : Currency; fVL_PIS : Currency; public property CFOP : string read fCFOP write fCFOP; property VL_OPR : Currency read fVL_OPR write fVL_OPR; property VL_DESC : Currency read fVL_DESC write fVL_DESC; property CST_PIS : TACBrCstPis read fCST_PIS write fCST_PIS; property VL_BC_PIS : Currency read fVL_BC_PIS write fVL_BC_PIS; property ALIQ_PIS : Currency read fALIQ_PIS write fALIQ_PIS; property QUANT_BC_PIS : Currency read fQUANT_BC_PIS write fQUANT_BC_PIS; property ALIQ_PIS_QUANT : Currency read fALIQ_PIS_QUANT write fALIQ_PIS_QUANT; property VL_PIS : Currency read fVL_PIS write fVL_PIS; property CST_COFINS : TACBrSituacaoTribCOFINS read fCST_COFINS write fCST_COFINS; property VL_BC_COFINS : Currency read fVL_BC_COFINS write fVL_BC_COFINS; property ALIQ_COFINS : Currency read fALIQ_COFINS write fALIQ_COFINS; property QUANT_BC_COFINS : Currency read fQUANT_BC_COFINS write fQUANT_BC_COFINS; property ALIQ_COFINS_QUANT : Currency read fALIQ_COFINS_QUANT write fALIQ_COFINS_QUANT; property VL_COFINS : Currency read fVL_COFINS write fVL_COFINS; property COD_CTA : string read fCOD_CTA write fCOD_CTA; property INFO_COMPL : string read fINFO_COMPL write fINFO_COMPL; end; /// Registro C175 - Lista Segue arquivo modificado para testes... É só colocar ele na pasta do acbr, Fontes\ACBrTXT\ACBrSPED\ACBrSPEDPisCofins e dar um Build no seu projeto.... Para mim funcionou 100%, gerei o mes 10/2018 e 11/2018... + ou - 9000 NFC-es, e Importei no Validador do SPED Pis;Cofins Usei o arquivo do ACBr, At Revision 16047. E Validador Pis/Cofins 3.0.1... ACBrEPCBloco_C.pas
  13. Com o ACBr... todos os meus clientes A3 rodam que é uma maravilha, inclusive um terminal server com um A3 no micro do caixa... conectando Windows Server 2012... NF-e, NFC-e e MDF-e... tudo 1000%
×
×
  • Create New...