Cleiver

Fiz a atualização e esta apresentando erro na pnfsConversao.pas(553) Error: E2056 String literals may have at most 255 elements. // Descrição do Serviço ******************************************************** function CodigoToDesc(const s: String): ansiString; var i: Integer; r: ansiString; begin i := StrToIntDef(s, 0); r := ''; case i of 0101: r := 'Analise e desenvolvimento de sistemas.'; 0102: r := 'Programacao.'; 0103: r := 'Processamento, armazenamento ou hospedagem de dados, textos, imagens, videos, paginas eletronicas, aplicativos e sistemas de informacao, entre outros formatos, e congeneres.'; 0104: r := 'Elaboracao de programas de computadores, inclusive de jogos eletronicos, independentemente da arquitetura construtiva da maquina em que o programa sera executado, incluindo tablets, smartphones e congeneres.'; 0105: r := 'Licenciamento ou cessao de direito de uso de programas de computacao.'; 0106: r := 'Assessoria e consultoria em informatica.'; 0107: r := 'Suporte tecnico em informatica, inclusive instalacao, configuracao e manutencao de programas de computacao e bancos de dados.'; 0108: r := 'Planejamento, confeccao, manutencao e atualizacao de paginas eletronicas.'; 0109: r := 'Disponibilizacao, sem cessao definitiva, de conteudos de audio, video, imagem e texto por meio da internet, respeitada a imunidade de livros, jornais e periodicos (exceto a distribuicao de conteudos pelas prestadoras de Servico de Acesso Condicionado, de que trata a Lei no 12.485, de 12 de setembro de 2011, sujeita ao ICMS).';

em outras impressora funciona normal, mas a epson estou tendo problema de não imprimir todo quando passa de 60 itens vc tem esse problema também?

mbbortolini, vc utiliza qual marca de impressora?

para imprimir corretamente na epson tenho que mudar as configurações conforme imagem.

estou com o mesmo problema

gostaria de saber se o acbr + firemonkey compila para android (Delphi Berlin 10.1).

ok, obrigado

Daniel, a mensagem de erro é "Invalid floating point operation"

Estou com um erro na função TruncFix ao gerar o arquivo de Redução z quando o valor do GT é muito alto. minha ecf esta com o GT 116529560,31 FGerador.wCampo(tcStr, '', 'GT', 1, 18, 1, IntToStrZero(TruncFix(GT*100), 18)); qual função posso substituir para esse caso. abs. Cleiver

Boa noite, Comigo começou ontem a tarde apresentar essa rejeição mas só em homologação, hoje entrei em contato com o Sefaz me pediram para encaminhar os arquivos XML por e-mail, estou aguardando o retorno. Todos poderia enviar e-mail também para [email protected] e para [email protected] para ver se eles corrige essa falha. Abs. Cleiver Batista

voltou a funcionar agora a tarde envie umas 30 notas em teste

Sandro, Sim, ontem no final da tarde consegui enviar umas 15 em sequencia e hoje voltou o problema novamente, hoje consegui enviar 4. Envie um email para o sefaz e me retornaram outro erro que não é o mesmo que reportei e o que estou recebendo. Abs.

Estou com o mesmo problema

Bom dia, NFCe conjugada não esta somando os valores dos serviços com os de produtos na visualização do DANF Fast Report. segue em anexo ajuste. ACBrNFeDANFEFRDM.pas

Daniel, segue em anexo. ACBrBALMagellan.pas

Existe um erro ler a resposta da balança { Ajustando o separador de Decimal corretamente } function TACBrBALMagellan.InterpretarRepostaPeso(aResposta: AnsiString): Double; var wResposta: AnsiString; begin Result := 0; if (Length(aResposta) > 20) then wResposta := InterpretarProtocoloA(aResposta) else if (Pos(ETX, aResposta) > 0) then wResposta := InterpretarProtocoloB(aResposta) else wResposta := InterpretarProtocoloC(aResposta); if (wResposta = EmptyStr) then Exit; { Ajustando o separador de Decimal corretamente } aResposta := StringReplace(aResposta, '.', DecimalSeparator, [rfReplaceAll]); aResposta := StringReplace(aResposta, ',', DecimalSeparator, [rfReplaceAll]); try if (Pos(DecimalSeparator, aResposta) > 0) then { Já existe ponto decimal ? } Result := StrToFloat(aResposta) else Result := (StrToInt(aResposta) / fpDecimais); except case aResposta[1] of 'I' : Result := -1; { Instavel } 'N' : Result := -2; { Peso Negativo } 'S' : Result := -10; { Sobrecarga de Peso } else Result := 0; end; end; end; Sendo que o correto é { Ajustando o separador de Decimal corretamente } aResposta := StringReplace(wResposta, '.', DecimalSeparator, [rfReplaceAll]); aResposta := StringReplace(wResposta, ',', DecimalSeparator, [rfReplaceAll]); // não há necessidade

Estava com esse problema e resolvi da seguinte forma. FPRetWS := StringReplace(FPRetWS, ' xmlns="http://www.portalfiscal.inf.br/nfe"','', [rfReplaceAll]);

Ailton, Já tive esse problema, resolvi com o Registro da Capicon via prompt de comando e como administrador.

boa noite, Eu estava com um erro parecido com esse e verifiquei que os retorno esta com os nados nas Tags ' xmlns="http://www.portalfiscal.inf.br/nfe"' estou testando ainda mas acrescentei a seguinte linha no tratamento de retorno e resolveu meu problema. FPRetWS := StringReplace(FPRetWS, ' xmlns="http://www.portalfiscal.inf.br/nfe"','', [rfReplaceAll]);

Gostaria de saber se alguém já configurou o arquivo Ini para a Cidade de Belém e Campo Grande.

Jorge, para qual provedor e cidade que vc esta tentando enviar?

Acabei de realizar a consulta junto ao Sefaz GO, devido ainda estar em modo Homologação tem que entrar em contado para que eles possa estar liberando o CNPJ a ser consultado.

obrigado

Bom dia, Alguem tem um xml da ISSNET para cidade de Cuiabá para me enviar para que eu possa comparar com o meu, porque estou sempre recebendo o seguinte retorno. <Codigo>99999</Codigo> <Mensagem>Nota Não processada, ou erro desconhecido.</Mensagem> preciso saber se tem algum erro. At. Cleiver

Provedor BHISS testando a cidade de Porto Alegre. Att. Cleiver