Danny

Bom dia Edson. Eu também tive problemas no ambiente de homologação e o contador da empresa não conseguiu junto à prefeitura. Isso me forçou a utilizar o ambiente de produção. Depois dos testes cancelei as NFS-e geradas. Até mais.

Desculpa Edson, Segue em anexo a unit que estava faltando. O manual especifica as rotinas disponibilizadas pelo provador. As que desenvolvi já descrevi acima, as demais eu não iria utilizar no momento. Obrigado. pnfsNFSeG.pas

Bom dia, Claro que sim Edson. Segue em anexo. pnfsNFSeR.pas ACBrNFSeWebServices.pas ACBrNFSeNotasFiscais.pas ACBrProvedorCONAM.pas pnfsNFSeW.pas

Pessoal, bom dia. Consegui implementar no Trunk1 e, apesar do número reduzido de métodos que o provedor oferece, está funcionando 100%. Realmente tive que fazer diversas alterações nos fontes. Obrigado.

Bom dia pessoal. Acabei de implementar com sucesso, para o Trunk1, os seguintes métodos para o provedor CONAM. - Envio de Lote; - Consulta de Lote; - Cancelamento de NFS-e. Pretendo colaborar, logo que possível, para implementar no Trunk2. Caso necessite posso enviar os fontes dos métodos que alterei. Obrigado. Danny

Bom dia. Direcionado para o tópico:

Bom dia pessoal. Alguém já tentou implementar nota de serviço para o município de Boituva/SP? Iniciei a implementação, porém estou tendo problemas de retorno do WebService. O suporte não me ofereceu respostas contundentes, dando a impressão de não ser eficiente. Obrigado Danny

Bom dia pessoal. Estou participando de outra discussão sobre o provedor DSF, mas para o município de Campinas: Fiz algumas alterações nos fontes e está funcionando normalmente para este município. Qualquer novidade vamos nos falando. Obrigado.

Ok Italo, muito obrigado.

Olá Zottis, boa tarde. Qual a mensagem que é retornada quando você envia o lote? Os problemas que identifiquei foram os seguintes: - No LoadFromFile do ACBrNFSeNotasFiscais não estava realizando a importação do RPS e NFS-e para o provedor DSF. Não era possível Imprimir ou Consultar por RPS por exemplo. - Na ConsultarNFSeporRPS não incluia a tag RPSConsulta que é obrigatória para este fim. - Para CancelarNFSe o CodigoMunicipio e o Cnpj do Prestador ficavam vazios e também são obrigatórios para este fim. - Ao LerRPS_IssDSF para uma ConsultarNFSeporRPS por exemplo, ocorria erro no retorno se a Serie não fosse igual a '99'. Para Enviar a Serie está indo como 'NF', que é o que fica gravado no RPS. - Ao LerRPS_IssDSF a leitura de alguns campos foi passado pra cima da leitura dos Itens, pois ficavam em branco. - Ao LerNFSe_IssDSF o PrestadorServico.IdentificacaoPrestador.InscricaoMunicipal foi alimentado com InscricaoMunicipal do XML da NFS-e. - Ao LerNFSe_IssDSF o Servico.Valores.ValorIss foi alimentado com ((FNfse.Servico.Valores.BaseCalculo * NFSe.Servico.Valores.Aliquota) / 100) para poder sair na impressão. Procurei detalhar e caso não tenha ficado claro estou disposto a ajudar. Obrigado. Danny

Boa tarde pessoal. Consegui emitir a primeira NFS-e para o município de Ubatuba/SP em ambiente de Produção para o provedor GINFES. Segue anexada a unit que adaptei. Só um "pequeno" problema está ocorrendo. Na minha aplicação, ao finalizar o Envio e imprimir pelo QR, ocorre da aplicação fechar completamente na hora de criar a impressão em fqrDANFSeQRRetrato := TfqrDANFSeQRRetrato.Create(Self), linha 78 da unit ACBrNFSeDANFSeQRClass. Não tenho como debugar e em outros provedores isso não está ocorrendo. Depois que entro novamente na aplicação a NFS-e é impressa normalmente. Já fiz teste tentando não imprimir depois do envio, mas a primeira impressão depois do Envio ocorre o mesmo problema. Obrigado. Danny pnfsConversao.pas

Boa tarde pessoal. Tive que fazer algumas adaptações para DSF Campinas. Somente mediante a estas alterações é que foi possível Enviar, Consultar por RPS e Cancelar NFS-e. Se necessitar detalhes de quais alterações que fiz posso estar passando aqui. Não sei dizer se essas alterações interferem para DSF de outros municípios. Em anexo seguem os arquivos que alterei. Obrigado. Danny ACBrNFSeWebServices.pas ACBrNFSeNotasFiscais.pas pnfsNFSeR.pas ACBrNFSeWebServices.pas ACBrNFSeNotasFiscais.pas pnfsNFSeR.pas

Régys, No sistema esta propriedade está setada como True. Não seria para sempre sair grande? Por que será que alguns itens saem pequenos? De qualquer forma sua dica foi excelente e vou deixar ela como False para ver o que ocorre. Muito obrigado! Danny

Boa tarde pessoal. Estou com um problema a muito tempo e não consegui resolver até o momento. Observe na imagem em anexo que alguns itens são impressos de forma comprimida e outros não. Procurei na internet e no fórum e não encontrei nada relacionado a este problema. O mesmo ocorre com impressoras de marcas diferentes em clientes diferentes. Sabem me dizer se pode ser alguma configuração que eu deva fazer ou se pode ser problema na impressora? Alguém já passou por isso? Agradeço antecipadamente. Danny

Bom dia pessoal, Daniel, os parâmetros passados são datas inicial e final e path do arquivo, onde é executada para a seguinte procedure: procedure TACBrECFFiscNET.ArquivoMFD_DLL(DataInicial, DataFinal: TDateTime; NomeArquivo: AnsiString; Documentos: TACBrECFTipoDocumentoSet; Finalidade: TACBrECFFinalizaArqMFD); Didaticamente falando, a marca do ECF, apesar de ser Elgin, a variável fsMarcaECF fica igual a "zpm", portanto não executa as funções binárias (Elgin_LeMemoriasBinario e Elgin_GeraArquivoATO17Binario) e sim as "não binárias" (DLLReadLeMemorias e DLLATO17GeraArquivo). Fiz testes ajustando o ACBrECFFiscNET.pas mudando de "(fsMarcaECF = 'elgin')" para "(fsMarcaECF = 'elgin') or (fsMarcaECF = 'zpm')", mas o resultado dos arquivos binários foram os mesmos relacionado aos não binários. Estou com uma limitação, pois não consigo debugar os fontes, pois o ECF está no estabelecimento do cliente e os testes estão sendo feitos remotamente. Continuarei fazendo testes e qualquer novidade posto aqui. Obrigado pelo retorno. Danny

Olá pessoal, Sei que houveram outros tópicos como este: Depois de vários testes não consegui entender o problema. Em uma ZPM Elgin e utilizando o exemplo ECFTeste, estou selecionando o botão "Arq. MFD" para gerar o arquivo do Ato Cotepe 17/04. Aparentemente o componente gera o arquivo TDM corretamente, mas o TXT fica faltando informações e com tamanho pequeno. Em determinadas tentativas a aplicação cai repentinamente. No site da Elgin é possível baixar um "TestaDllElgin32" para utilizar as Dlls para gerar o arquivo. Ao executar este no mesmo ECF o TDM é gerado com tamanho exatamente igual ao TDM que foi gerado pelo ECFTeste. Porém o TXT ficou com muito mais informações. Também do site da Elgin baixei e instalei o Gera1704 que também gerou o TDM com tamanho igual e o TXT com tamanho semelhante ao TXT gerado pelo TestaDllElgin32. Pelo que entendi o problema está no componente e ocorre no momento depois de gerar o arquivo TDM. Isto está ocorrendo com mais alguém? Obrigado. Danny

Pessoal, bom dia. Ao enviar o 1º RPS em Produção ocorreu um fato que em Homologação não ocorre. O problema é que envio um determinado CodigoTributacaoMunicipio e no retorno este campo vem igual ao ItemListaServico. Entrei em contato com o suporte e não teve jeito, tive que fazer uma alteração na impressão da NFS-e, pois orientaram a enviar o que seria o CodigoTributacaoMunicipio como CodigoCnae. Não sei se isso ocorre com todos os municípios do provedor SimplISS e é por isso que fiz a alteração somente para o município de Cerquilho/SP. Todas as units (ACBrNFSeDANFSe*) onde o campo qrmCodServico é impresso (2 em cada unit) deverão ser alteradas conforme abaixo: De: qrmCodServico.Lines.Add(FNFSe.Servico.ItemListaServico + ' / ' + FNFSe.Servico.CodigoTributacaoMunicipio + ' - ' + FNFSe.Servico.xItemListaServico); Para: if (StrToIntDef(FNFSe.PrestadorServico.Endereco.CodigoMunicipio, 0) = 3511508) and //Cerquilho/SP (FNFSe.Servico.CodigoCnae <> '') then qrmCodServico.Lines.Add(FNFSe.Servico.ItemListaServico + ' / ' + FNFSe.Servico.CodigoCnae + ' - ' + FNFSe.Servico.xItemListaServico) else qrmCodServico.Lines.Add(FNFSe.Servico.ItemListaServico + ' / ' + FNFSe.Servico.CodigoTributacaoMunicipio + ' - ' + FNFSe.Servico.xItemListaServico); end Peço que vejam se essa alteração é viável para o componente. Obrigado.

Bom dia Italo, Muito obrigado.

Italo, eu que agradeço. Abraços.

Pessoal, Consegui emitir a primeira NFS-e para o município de Cerquilho/SP em ambiente de Homologação. Segue anexadas as units que adaptei. Ainda não testei em Produção. Obrigado. ACBrProvedorSimplISS.pas pnfsConversao.pas

Boa tarde Michel, Seguem as URLs: Homologação: ConfigURL.HomNomeCidade := ''; ConfigURL.HomRecepcaoLoteRPS := 'http://187.45.245.217/ws_nfse/nfseservice.svc'; ConfigURL.HomConsultaLoteRPS := 'http://187.45.245.217/ws_nfse/nfseservice.svc'; ConfigURL.HomConsultaNFSeRPS := 'http://187.45.245.217/ws_nfse/nfseservice.svc'; ConfigURL.HomConsultaSitLoteRPS := 'http://187.45.245.217/ws_nfse/nfseservice.svc'; ConfigURL.HomConsultaNFSe := 'http://187.45.245.217/ws_nfse/nfseservice.svc'; ConfigURL.HomCancelaNFSe := 'http://187.45.245.217/ws_nfse/nfseservice.svc'; Produção: 3511508: begin // Cerquilho/SP ConfigURL.ProNomeCidade := 'cerquilho'; ConfigURL.ProRecepcaoLoteRPS := 'http://187.45.245.217/ws_' + ConfigURL.ProNomeCidade + '/nfseservice.svc'; ConfigURL.ProConsultaLoteRPS := 'http://187.45.245.217/ws_' + ConfigURL.ProNomeCidade + '/nfseservice.svc'; ConfigURL.ProConsultaNFSeRPS := 'http://187.45.245.217/ws_' + ConfigURL.ProNomeCidade + '/nfseservice.svc'; ConfigURL.ProConsultaSitLoteRPS := 'http://187.45.245.217/ws_' + ConfigURL.ProNomeCidade + '/nfseservice.svc'; ConfigURL.ProConsultaNFSe := 'http://187.45.245.217/ws_' + ConfigURL.ProNomeCidade + '/nfseservice.svc'; ConfigURL.ProCancelaNFSe := 'http://187.45.245.217/ws_' + ConfigURL.ProNomeCidade + '/nfseservice.svc'; end; Estou fazendo as alterações no componente incluindo este município. Ao enviar um RPS no ambiente de homologação tem retornado o seguinte erro: <Codigo>E974</Codigo> <Mensagem>Nao existe nenhuma serie de Nfs-e liberada para ser usada com o web service.</Mensagem> <Correcao>Entre em contato com a prefeitura para mais informacoes.</Correcao> Vou aguardar a resposta do cliente. Assim que tiver novidades estarei postando aqui. Muito obrigado pela dica.

Pessoal, boa tarde. Alguém sabe qual o provedor do município de Cerquilho/SP (3511508) ? Gostaria de saber se alguém tem esta informação antes de eu entrar em contato com a prefeitura. Baixei o manual do site e o padrão é Abrasf. O componente ainda não emite para este município, mas posso estar colaborando para a implementação. Obrigado.

Adilson, Italo, bom dia. Adilson, não sei dizer sobre isso porque foi o contador que entrou em contato com a prefeitura e me passou a orientação. Italo, fiz algumas mudanças na impressão da NFS-e em RL, pois o Enabled não tem o mesmo efeito que no QuickReport, portanto troquei para Visible conforme abaixo: rlsLinhaH1.Visible:=MostrarObra; rllTituloConstCivil.Visible:=MostrarObra; rllCodigoObra.Visible:=MostrarObra; rllCodObra.Visible:=MostrarObra; rllCodigoArt.Visible:=MostrarObra; rllCodART.Visible:=MostrarObra; Também corrigi a acentuação de "DISCRIMINAÇãO DOS SERVIÇOS". A unit segue em anexo. Não tenho permissão para enviar o frm. Obrigado. ACBrNFSeDANFSeRLRetrato.pas

Adilson, O prestador onde o retorno vem com a taxa é do Simples? Acabei de falar com o contador, que tem um "canal de informação" rápido lá na prefeitura, para ver essa possibilidade de incluir uma alíquota automaticamente quando no envio do RPS estiver zerado. Porém a prefeitura disse que isso não é possível e pediu para enviar zerado no RPS e informou que ficará zerada no site. Orientou para enviar no campo descrição uma informação fixa "aliquota do simples .... base de cálculo.... valor do iss....". Bem, por enquanto é assim que vou proceder, deixar a última linha da descrição com essa informação fixa. Qualquer novidade vamos nos falando. Muito obrigado pela dica.

Adilson, bom dia. Consegui gerar NFS-e de 2 RPS no ambiente de produção e 1 no ambiente de homologação. Só é possível fazer isso enviando esses campos zerados e no retorno eles continuam zerados. Acessando a NFS-e pelo site visualizei que também estão zerados. Falei com o contador da empresa e com a prefeitura de Tatuí e ambos disseram que estes campos não podem estar zerados e pediram pra eu entrar em contato com a 4R, porém o suporte não me dá retorno. Inclusive já liguei lá e disseram que é com a prefeitura e a prefeitura diz que é com a 4R sistemas. Tem algum cliente enquadrado no simples do qual vocês conseguiram enviar esses campos com valores? Obrigado.