Otimizy

Bom dia! Hoje nos deparamos com o mesmo problema ao fazer a busca de MDFE não encerrados, usando o Demo do ACBR atualizado no ambiente de homologação. Recebemos o erro de "Rejeição: Falha no schema XML.", que como mencionado @Ita Júnior, é gerado pela SEFAZ e a causa pode ser, dados inválidos ou falha no Web Service que não conseguiu identificar corretamente o erro, dai a mensagem Falha no Schema XML. No entanto não identificamos o erro na estrutura e a Sefaz RS esta a dar retorno sobre isso dentro de 5 dias úteis apenas por Email! Em anexo o XML que estamos tentando fazer o envio, caso alguém possa me auxiliar! Pedido de Consulta MDFE não encerrados.xml Pedido de Consulta MDFE não encerrados - SOAP.xml

Realizada alterações para participantes do exterior, o componente estava enviando o COD_MUN como branco onde deve ser 9999999 Em anexo os fontes alterados. ACBrEFDBloco_0_Class.pas

Bom dia. Realizado processo como sugerido em nosso Sistema, testado e funcionando [Envio - Consulta - Cancelamento] Em anexo arquivo Cidades.ini, onde fora adicionado apenas: [4313706] Nome=Palmeira das Missões UF=RS Provedor=Betha Cidades.INI

Boa tarde. Para cidade de Palmeira das Missões - RS, as funcionalidade para NFS-e estão disponíveis ou em andamento nos fontes do ACBR ? Verifiquei no Cidades.ini e não encontrei registro do IBGE da cidade [4313706]. O serviço faz uso do provedor Betha. Obrigado.

Boa tarde Juliomar Marchetti. Entendo... Estou enfrentando um pequeno problema, o retorno do WEbService e Base64, pelo informado, é uma imagem. Mas como converter esse Base64 em .PDF diretamente ? Verifiquei alguns exemplos na Internet mas sem sucesso... Alguém tem alguma sugestão!

Bom dia galera. Ultimamente ,aqui internamente na empresa estamos passando por inúmeras alterações nas Danfse de diversas cidades. Verifiquei em um Layout disponível no link: https://nfse.garibaldi.rs.gov.br/site/wp-content/uploads/2016/12/mconec.pdf [5.2. Impressão e imagem da NFS-e] que temos a possibilidade de fazer o Download do arquivo em Base64, possibilitando a conversão para [Imagem ou PDF]. <?xml version="1.0" encoding="utf-8"?> <pedidoNFSePDF versao="1.0"> <CNPJ>08967207000141</CNPJ> <notaInicial>1000</notaInicial> <notaFinal>1000</notaFinal> <emissaoInicial>2015-04-01</emissaoInicial> <emissaoFinal>2015-04-01</emissaoFinal> <serieNotaFiscal>N1</serieNotaFiscal> </pedidoNFSePDF> <?xml version='1.0' encoding='utf-8'?> <resPedidoLoteNFSePDF versao="1.0" > <CNPJ>08967207000141</CNPJ> <dhRecbto>2015-07-09 10:37:08</dhRecbto> <NFS-ePDF>JVBE(. . . Base64 tem que ser convertido em arquivo em PDF . . .)PYm</NFS-ePDF> <sit>100</sit> </resPedidoLoteNFSePDF> Gostaria de saber se já temos essa possibilidade através do ABCR ou alguma previsão?

Bom dia Juliomar. Perfeito, muito obrigado, irei atualizar os fontes. Referente ao fonte para alterar o .fr3, era para trazer em o Arquivo para edição em runtime, para facilitar a edição do arquivo. Mas tranquilo. Obrigado.

Hoje durante a manhã gerando NFSe na Cidade de Porto Alegre - RS usando o provedor BHISS, na impressão da DANFSe, no campo do 'CodigoMunicipio' do cdsParametros, no método CarregaParametros da Unit: ACBrNFSeDANFSeFR.pas. Estava carregando o nome da cidade para esse campo, porém 'CodigoMunicipio ' deve ler apenas o código Ex: 4314902 Alteração realizada na unit anexada. ACBrNFSeDANFSeFR.pas

Sugiro um ajuste para carregar a Discriminação do Serviço, hoje limitado a 80 caracteres. O problema encontrado foi para o provedor INFISC. Conforme visto no layout da prefeitura de Garibaldi-RS na página 19, o campo de xServ comporta uma String256, porém na Unit: ACBrNFSeDANFSeFR.pas no método CriarDataSetsFrx, a criação do cds cdsItensServico, que contém o campo DiscriminacaoServico, está limitado a 80. Ajustei-o para 256 apenas. Ambos arquivos anexados: https://nfse.garibaldi.rs.gov.br/site/images/downloads/mconec.pdf ACBrNFSeDANFSeFR.pas

Boa tarde! Realizamos alterações para o correto funcionamento da NFSe para os Provedores Betha(Bento Gonçalves), Infisc(Caxias do Sul, Garibaldi) versão 1.10, Tecnos(Flores da Cunha). Os serviços alterados foram Envio, Consulta Situação Lote, Consulta Lote, Consulta NFSe, Cancelamento. Alteramos a montagem do relatório adicionando datasets(transportadora) para o provedor Infisc que permite essas tags. Alteramos a leitura e escrita dos arquivos XML para atender os formatos de cada provedor e suas respectivas versoes. ACBrNFSeDANFSeFR.pas ACBrNFSeWebServices.pas pnfsConversao.pas pnfsLerListaNFSe.pas pnfsNFSeG.pas pnfsNFSeR.pas pnfsNFSeW_Infisc.pas

Muito obrigado! Com as alterações do arquivo abaixo ficou bem rápido e com menos código! Aguardo retorno! ACBrNFeDANFEFRDM.pas

Isto mesmo, debugando o processo de visualização, verificamos que este método é chamado varias vezes pelo fast, o que causa a pintura desnecessária da picture, por isso o bitmap como variável de objeto, para controle. O método PintarQRCode que recebeu o controle é chamado dentro do método frxReportBeforePrint que por sua vez é vinculado ao BeforerPrint no componente frxReport e este é chamado varias vezes pelo FastReport! Espero ter esclarecido!

Realizamos algumas alterações para aprimorar a visualização da NFCe, estavamos com problemas de lentidão, demorava quase dois minutos para visualizar um cupom com 30 itens. Com as alterações do arquivo abaixo conseguimos visualizar quase instantaneamente! Aguardo retorno! ACBrNFeDANFEFRDM.pas

Sim! As tags Antigas foram mantidas e o novo formato é montado a partir de 01/01/2017, conforme codigo abaixo: procedure TBloco_E.WriteRegistroE310(RegE300: TRegistroE300); var intFor: integer; begin if Assigned( RegE300.RegistroE310 ) then begin for intFor := 0 to RegE300.RegistroE310.Count - 1 do begin with RegE300.RegistroE310.Items[intFor] do begin if (Date <= EncodeDate(2016, 12, 31)) then begin Add( LFill('E310') + LFill( Integer(IND_MOV_DIFAL), 0 ) + LFill( VL_SLD_CRED_ANT_DIF,0 ) + LFill( VL_TOT_DEBITOS_DIFAL, 0 ) + LFill( VL_OUT_DEB_DIFAL, 0 ) + LFill( VL_TOT_DEB_FCP, 0 ) + LFill( VL_TOT_CREDITOS_DIFAL, 0 ) + LFill( VL_TOT_CRED_FCP, 0 ) + LFill( VL_OUT_CRED_DIFAL, 0 ) + LFill( VL_SLD_DEV_ANT_DIFAL, 0 ) + LFill( VL_DEDUCOES_DIFAL, 0 ) + LFill( VL_RECOL, 0 ) + LFill( VL_SLD_CRED_TRANSPORTAR, 0 ) + LFill( DEB_ESP_DIFAL, 0 )); end else begin Add( LFill('E310') + LFill( Integer(IND_MOV_DIFAL), 0 ) + LFill(VL_SLD_CRED_ANT_DIF, 0 ) + LFill(VL_TOT_DEBITOS_DIFAL, 0 ) + LFill(VL_OUT_DEB_DIFAL, 0 ) + LFill(VL_TOT_CREDITOS_DIFAL, 0 ) + LFill(VL_OUT_CRED_DIFAL, 0 ) + LFill(VL_SLD_DEV_ANT_DIFAL, 0 ) + LFill(VL_DEDUCOES_DIFAL, 0 ) + LFill(VL_RECOL_DIFAL, 0 ) + LFill(VL_SLD_CRED_TRANSPORTAR_DIFAL, 0 ) + LFill(DEB_ESP_DIFAL, 0 ) + LFill(VL_SLD_CRED_ANT_FCP, 0 ) + LFill(VL_TOT_DEB_FCP, 0 ) + LFill(VL_OUT_DEB_FCP, 0 ) + LFill(VL_TOT_CRED_FCP, 0 ) + LFill(VL_OUT_CRED_FCP, 0 ) + LFill(VL_SLD_DEV_ANT_FCP, 0 ) + LFill(VL_DEDUCOES_FCP, 0 ) + LFill(VL_RECOL_FCP, 0 ) + LFill(VL_SLD_CRED_TRANSPORTAR_FCP, 0 ) + LFill(DEB_ESP_FCP, 0 )); end; end; /// Registros FILHOS WriteRegistroE311(RegE300.RegistroE310.Items[intFor]) ; WriteRegistroE316(RegE300.RegistroE310.Items[intFor]) ; /// RegistroE990.QTD_LIN_E := RegistroE990.QTD_LIN_E + 1; end; /// Variavél para armazenar a quantidade de registro do tipo. FRegistroE310Count := FRegistroE310Count + RegE300.RegistroE310.Count; end; end; O texto em Negrito é o bloco alterado.

Boa tarde pessoal? Implementada as tags para novo layout do Sped referente a BlocoE310 para 2017! ACBrEFDBloco_E.pas ACBrEFDBloco_E_Class.pas