Valdir Dill

Bom dia, Tive esse erro na rotina ACBrNFe1.SSL.NumeroSerie := ACBrNFe1.SSL.SelecionarCertificado, mas apenas quando se selecionava um certificado A1 na lista de certificados. Mudei as rotinas do sistema para não deixar o operador cometer esse erro. Abraços

Bom dia Juliomar, No manual diz: REGISTRO DETALHE - SEGMENTO P REMESSA Posição: 045 –057 Tamanho: 013 REGISTRO DETALHE - SEGMENTO T RETORNO Posição 041 –053 Tamanho: 013 Obrigado

Boa noite, Estou fazendo tratamento do retorno Santander e me deparei com uma situação que gerou uma dúvida: No create do TACBrBancoSantander, na linha 88 da ACBrBancoSantander.pas, o tamanho máximo do nosso número está com 12. Vide abaixo constructor TACBrBancoSantander.create(AOwner: TACBrBanco); begin inherited create(AOwner); fpDigito := 7; fpNome := 'Santander'; fpNumero := 033; fpTamanhoMaximoNossoNum := 12; fpTamanhoCarteira := 3; fpTamanhoConta := 11; end; Já na rotina de leitura do arquivo de retorno desse mesmo banco, linha 917 da ACBrBancoSantander.pas, está assim ACBrBanco.TamanhoMaximoNossoNum := 13; Não deveriam ser iguais esses valores do tamanho máximo do nosso número? Obrigado

É isso mesmo BigWings...o Windows desatualizado tinha como fim do horário de verão o dia 12 de fevereiro, o que gerou toda essa situação... Obrigado!

Bom dia, Estou tendo esse erro (Data-Hora de Emissão Posterior ao Horário de Recebimento) desde terça-feira. Pode ser coincidência, mas foi justamente após atualizar os fontes do Acbr. Em princípio não pode ser problema de configuração da máquina do usuário (UTC, por exemplo), pois ocorre com vários clientes onde estava tudo ok antes de atualizar. A data/hora do Windows está correta. Anexo o XMLs de envio e retorno que está dando rejeição. Alguma dica? Obrigado. 2906-env-lot.xml 2906-pro-lot.xml 15170224585672000174650010000029031100731059-nfe.xml 15170224585672000174650010000029031100731059-ped-sit.xml 15170224585672000174650010000029031100731059-sit.xml

Bom dia, De fato Italo, eu me equivoquei. Na verdade eu estava colocando o código errado do serviço e, não sei porque cargas d'agua, o WS retornava um erro do campo discriminação. Quando for usuário do proRJ, alterei o sistema para transmitir o RPS pelo .Enviar. Nos testes iniciais que fiz deu tudo certo. Vamos agora ver à campo. Obrigado pela ajuda!

Bom dia Italo, O problema é que quando transmite por lote (ACBrNFSe1.Enviar(VNumLote)), ele NÃO permite que seja informado o Servico.Discriminacao. E quando se utiliza a opção de enviar um RPS (ACBrNFSe1.Gerar(VNumRPS)) esse campo (Servico.Discriminacao) é obrigatório. Por isso optei por fazer tudo pelo "Gerar", mas aí emperrou. Pelo visto será necessário ter uma rotina de alimentação dos dados diferente para cada provedor. Eu entrei em contato com o provedor conforme você sugeriu e relatei a situação. A resposta deles foi: "Não existe nenhum problema no funcionamento do sistema e não ocorreram alterações em schemas. Quando há alguma alteração técnica relevante, e que vá impactar diretamente ao contribuinte, o mesmo recebe mensagens antes da alteração ser disponibilizada em produção. Verifique o seu sistema, se realmente está se conectando e enviando arquivos e se está recebendo arquivo de retorno que o sistema da Nota Carioca devolve. Todas as informações para a integração do seu sistema com o sistema de NFS-e da Prefeitura (Nota Carioca) estão disponibilizados nos "Manuais de Utilização do Web Service (Modelo Nacional)" disponíveis no setor de Manuais de Ajuda do site da Nota Carioca. Além de manuais, é possível baixar os schemas e exemplos dos XML para a comunicação." Obrigado!

Complementando... Estou usando o ACBrNFSe1.Gerar(StrToInt(vNumRPS)), ou seja, envio um RPS por vez. Uso essa função para outros provedores, sem problemas. Mas fiz um teste utilizando o ACBrNFSe1.Enviar(vNumLote), aí o erro não ocorre. No demo do ACBR acontece a mesma situação, ou seja, o .Gerar não funciona e o .Enviar funciona. Alguma dica? Obrigado!

Boa tarde, Estou enfrentando um erro (arquivo com print anexo) ao tentar transmitir uma NFSe para Rio de Janeireo-RJ. Debugando verifiquei que o erro ocorre na linha 732 (ParseError := DOMDocument.validate;) da ACBrDFeCapicom.pas, mas não consegui ter ideia da causa. Tem um post mais antigo já com esse erro aqui, mas não me ajudou. Se alguém puder me auxiliar com alguma dica... Obrigado!

Bom dia, Muito bom Daniel. Segui sua sugestão e deixei todas as rotinas chamando sempre o mesmo componente AcbrPosPrinter. O problema foi sanado. Obrigado!

Bom dia, Estou com um problema apresentado por um cliente, onde o mesmo relata que ocorre um travamento da impressora após algumas impressões de dois relatórios diferentes (explico abaixo) e de forma intercalada. Segundo o cliente, os testes foram feitos em Windows/máquinas diferentes e com mais de uma impressora do mesmo modelo. Há uma particularidade nessas impressões, pois são dois envios diferentes para a impressora. Um relatório é um cupom (não fiscal) cujos comandos são enviados pelo nosso sistema e utilizando o ACBRPosPrinter. O outro relatóiro é também com um componente ACBRPosPrinter, mas para impressão do Danfe de NFCe. Primeiro relatório - cupom ACBrPosPrinter1.ImprimirLinha('</zera>'); ACBrPosPrinter1.ImprimirLinha('NOME'); ACBrPosPrinter1.ImprimirLinha('</linha_simples>'); ACBrPosPrinter1.ImprimirLinha('Conteúdo do relatório. Texto puro'); ACBrPosPrinter1.ImprimirLinha('</corte_total>'); ACBrPosPrinter1.ImprimirLinha('</abre_gaveta>'); Segundo relatório - DANFCe ACBrNFCe.NotasFiscais.Clear; ACBrNFCe.NotasFiscais.LoadFromFile(VNomeArq); ACBrNFCe.NotasFiscais.Imprimir; Obs.: cada um dos relatórios tem seu próprio componente AcbrPosPrinter. As configurações dos componentes ACBRPosPrinter, como .Device.Baud = 9600, PaginaDeCodigo = pc850, etc.. são as configurações padrão dos componentes. Nas primeiras impressões tudo certo. Ou também se imprimir apenas UM dos relatórios, sem intercalação com o outro, também imprime beleza. Mas após 4 a 5 impressões intercaladas, a impressora não imprime mais. Nada de erro acontece no sistema operacional. Apenas a impressora não imprime mais. Aí faz-se necessário reiniciar o sistema operacional e tudo recomeça. - Modelo da impressora: Bematech 4200TH - Conexão: USB Alguma sugestão? Obrigado!

Bom dia, Comigo aconteceu a mesma coisa. Deletei tudo que foi .dcu e fiz o build novamente, mas não adiantou. O que resolveu foi executar o instalador (ACBrInstall_Trunk2.exe) do Acbr novamente. Acho que alguns .bpl ele não atualiza com o rebuild, não sei. Mas já tive situações idênticas antes e a reinstalação resolve. Abraços!

Boa noite, Peço a gentileza de, na medida do possível, incluir a cidade abaixo na lista de NFSe: Cidade: Porecatu-PR - 4120002 Provedor: SimplISS Homologação: http://wshomologacao.simplissweb.com.br/nfseservice.svc?wsdl Produção: http://wsporecatu.simplissweb.com.br/nfseservice.svc?wsdl Obrigado!

Bom dia, Fiz um debug e verifiquei que ele monta o XML mudando a tag versao="1.01" se o arquivo distDFeInt_v1.01.xsd existir na pasta \Schemas e, versao="1.00" se existir somente o distDFeInt_v1.00.xsd na pasta. Com versao="1.00" não dá erro. Mas a questão é: qual é procedimento correto? É mesmo o distDFeInt_v1.01.xsd que está indevidamente no repositório do Acbr? Ou algum outro procedimento que deveria ser feito em relação a atualização dessas versão de 1.00 para 1.01? Exemplo do XML com distDFeInt_v1.01.xsd <?xml version="1.0" encoding="UTF-8"?><nfeDadosMsg><distDFeInt xmlns="http://www.portalfiscal.inf.br/nfe" versao="1.01"><tpAmb>1</tpAmb><cUFAutor>41</cUFAutor><CNPJ>13971229000115</CNPJ><distNSU><ultNSU>000000000000000</ultNSU></distNSU></distDFeInt></nfeDadosMsg> Exemplo do XML com distDFeInt_v1.00.xsd <?xml version="1.0" encoding="UTF-8"?><nfeDadosMsg><distDFeInt xmlns="http://www.portalfiscal.inf.br/nfe" versao="1.00"><tpAmb>1</tpAmb><cUFAutor>41</cUFAutor><CNPJ>13971229000115</CNPJ><distNSU><ultNSU>000000000000000</ultNSU></distNSU></distDFeInt></nfeDadosMsg> Alguma sugestão? Obrigado

Na verdade não a NT toda que começa a viger agora. E apenas o complemente dela (versão 1.90) que entra em vigor dia 07/11/2016. Acho que alguém aqui fez confusão, hehe!

Bem Paulo, eu estou fazendo +- assim: "if nota tem DIFAL then InfAdic.infCpl := InfAdic.infCpl + '; Valores totais de ICMS interestadual: DIFAL da UF destino R$....'" Não vejo motivo para parametrizar e deixar o usuário decidir se o texto vai ou não ser incluído, já que é regra nacional e não uma opção do emitente. De toda forma, concordo com ambos. Pensando melhor, acho que não seria mesmo uma boa o acbr fazer essa inclusão. Obrigado!

Bom dia, Nos próximos dias entrará em vigor a NT 2015.003. Entre as novas regras está a de que será necessário informar valores DIFAL nas informações complementares da nota e, por conseguinte, impressas no DANFE. Essa regra é algo fixo, ou seja, sempre que houver valor nos campos de ICMS de operações interestaduais, dever-se-á adicionar um texto (pg 25 da NT) nas informações complementares da NFe. Então, pergunto/sugiro: não seria interessante o próprio componente acbr já adicionar esse texto, quando for o caso! Obrigado!

Muito obrigado Ricardo! Compreendidíssimo!

Bom dia, Alguém tem algum comentário ou explicação sobre o porquê da situação abaixo: - NCM 39191010 - É validado pelo AcbrNCM, ou seja, consta na lista da receita, mas é invalidado na consulta da lista de AcbrIBPTTax, ou seja, não consta na tabela IBPT; - NCM 39191000 - ocorre o inverso, ou seja, é invalidado pelo AcbrNCM e validado AcbrIBPTTax; Obrigado!

Bom dia Italo, Em consulta à prefeitura de lá, recebemos a resposta: " Não temos um provedor , temos um serviço de Comunicação (Webservice) que esta no endereço: http://servicos.saolourencodosul.rs.gov.br:8082/nfse.portal.integracao/Services.svc para tanto deve solicitar acesso a NFSE junto a PM. Na página http://www.saolourencodosul.rs.gov.br/conteudo.php?ID_PAGINA=254 tem todo o material necessário para programação da comunicação." Faz sentido? Obrigado!

Boa noite, Cidade: 4318804 - São Lourenço do Sul - RS WebServices Produção: http://servicos.saolourencodosul.rs.gov.br:8082/nfse.portal.integracao/services.svc Homologação : http://servicos.saolourencodosul.rs.gov.br:8082/nfse.portal.integracao.teste/services.svc Obrigado!

Obrigado, consegui resolver... Olha a função que criei. Funciona tanto no Win como Android. Compartilho para ajudar outros, se precisarem. class procedure TFuncoes.BuscaCEPKIngHost(VCEP : String; Const VResult : TCEP); Const VChave = 'XXXXXX'; VUrl = 'http://webservice.kinghost.net/web_cep.php?auth='; Var VStream : TStringStream; VRetorno : String; VIdHttp : TIdHTTP; VURLFinal : String; begin VResult.FQtdeEnder := 0; VCEP := SomenteNumeros(VCEP); if length(VCEP) <> 8 then exit; //se não é um CEP válido nem analisa. VStream := TStringStream.Create('', TEncoding.ANSI{tem q ter esse ANSI para não dar erro no Android}); VIdHttp := TIdHTTP.Create(nil); try VURLFinal := VUrl + VChave + '&formato=xml&cep=' + VCEP; VIdHttp.Request.UserAgent := 'Mozilla/4.0 (compatible; MSIE 9.0)'; VIdHttp.Get(VURLFinal, VStream); VRetorno := VStream.DataString; VResult.FQtdeEnder := StrToIntDef(LerTagXML(VRetorno, 'resultado'), 0); if VResult.FQtdeEnder > 0 then begin //obs LerTagXML é uma função do acbrUtil VResult.FTipoLogr := LerTagXML(VRetorno, 'tipo_logradouro'); VResult.FLogr := LerTagXML(VRetorno, 'logradouro'); VResult.FCompl := LerTagXML(VRetorno, 'complemento'); VResult.FBairro := LerTagXML(VRetorno, 'bairro'); VResult.FCidade := LerTagXML(VRetorno, 'cidade'); VResult.FUF := LerTagXML(VRetorno, 'uf'); end; finally VStream.DisposeOf; VIdHttp.DisposeOf; end; end; Obrigado!!

Bom dia e obrigado Daniel, no seu caso, vc não está considerando o "encoding" no header da mensagem HTTP 'text/xml; charset=iso-8859-1'; Pode me passar uma dica de como fazer isso? Tente Memo1.Text := ACBrStr(str); Não funcionou. O str volta como foi, sem alterações. Obrigado!

Bom dia, Sei que a dúvida que estou postando não tem relação direta com o ACBR, mas se alguém pudere analisar e me dar uma dica, agradecerioa muito. É o seguinte: estou tentando fazer uma busca de CEP com Firemonkey para Android. Fiz uma rotina utilizando a classe THTTPSend e me baseiei nas rotinas do próprio acbrCEP. Funcionou 100% em Windows. Porém, quando fui complicar em Android, notei que essa classe (hpttpSend.pas) não pode ser usada para Android. Então tentei com o componente TidHttp. Funciona tanto em Windows, como Android. Veja a rotina abaixo. Traz todos os dados do WS KingHost. O problema neste caso, é que ele traz errado os dados que têm caractere com acento. Veja o bairro no print que estou anexando. Rotina com TidHTTP. prcedure BuscaCEPKIngHost; Const urlKingHost = 'http://webservice.kinghost.net/web_cep.php?auth=' + VmyKey + '3c1a01713160cab43caea3d24f3baf4e&formato=xml&cep=82650520'; var str : String; begin idHTTP1.Request.Accept := 'text/html, */*'; idHTTP1.Request.ContentType := 'text/xml; charset=iso-8859-1'; idHTTP1.Request.ContentEncoding := 'iso-8859-1'; IdHTTP1.Request.UserAgent := 'Mozilla/4.0 (compatible; MSIE 9.0)'; IdHTTP1.Request.ContentType := 'application/x-www-form-urlencoded'; str := IdHTTP1.Get(urlKingHost); Memo1.Text := str; end; Pergunto: 1 - Realmente não tem como usar httpSend no Androi? 2 - No meu exemplo acima com idHttp estou fazendo algo errado na chamada? Qual a sugestão? Obrigado