leomcl

Regys, O número do COO do registro C2 está com 6 dígitos, mas no ato 02.02 está com 9. Com isso o arquivo gerado não valida no seu Validador de Arquivos PAF. Corrigi e estou enviando em anexo a unit. att, Leandro ACBrPAF_C_Class.pas

Juliomar, Estive analisando o fonte do ACBrAAC1 e não tinha visto a propriedade Params do AcbrAAC. Acho que ela vai me atender. Vou colocar as bombas,bicos,tanques em uma string separados por vírgula como um item dos Params. Se não der certo, farei a alteração no componente mesmo. De qualquer forma muito obrigado, Leandro

Farei isso. Obrigado.

Senhores, Como não houve resposta, imagino que não tenha sido implementada tal propriedade no componente. Gostaria de saber se eu poderia tentar implementar e enviar as units alteradas para serem comitadas. Pergunto por quê talvez não seja de interesse de vocês que isso seja implementado para uso de todos. Obrigado, Leandro

Senhores, No ato cotepe 02.01, o requisito XLI, item 1, diz: "1. O PAF-ECF para uso por posto revendedor de combustível deve: a) assegurar que os dados referentes ao número do tanque ou reservatório de combustível, da bomba de combustível e do bico de abastecimento somente serão modificados ou excluídos mediante intervenção do responsável legal pela empresa desenvolvedora ou por seus prepostos, vedando-se ao usuário esta função, exceto no caso de desenvolvedor para uso exclusivo. Para assegurar este requisito, os dados devem ser gravados no arquivo auxiliar a que se refere os itens 4 e 5 do requisito XXIV." Ou seja, agora é obrigatório que os bicos/bombas/tanques sejam informados apenas no arquivo auxiliar. Gostaria de saber se o ACBrAAC tem alguma propriedade própria para isso ou se tem alguma propriedade que eu possa usar para esse fim, tipo um campo aberto, ou coisa do tipo. Desde já agradeço, Leandro

Ítalo, fiz as alterações necessárias, as units estão em anexo. Também tive que alterar a ACBrNFSeWebServices por conta do problema no cancelamento. Obrigado, Leandro ACBrNFSe_alteracoesMontesClaros.rar

Ok Ítalo, obrigado.

Bom dia Ítalo, Essa migração é alguma propriedade que eu tenho que setar no componente? Por que eu apenas passo o código da cidade e ele já configura tudo. Obrigado, Leandro

Ítalo/Juliomar, Descobri mais um erro para Montes Claros, dá um erro ao cancelar a NFSe, estava passando o CNPJ e outros dados do prestador em branco. Também corrigi, alterando o arquivo ACBrNFSeWebService, na função CancelarNFSe(), no momento em que, logo após enviar o pedido de cancelamento, é consultado o status da nota. Coloquei uma verificação para verificar se a cidade é Montes Claros. Segue código da parte de consulta em questão: if not (TACBrNFSe( FACBrNFSe ).Configuracoes.WebServices.Provedor in [proISSNet]) then begin if TACBrNFSe( FACBrNFSe ).Configuracoes.WebServices.Provedor in [proSystemPro] then begin Self.ConsNfse.NumeroNFSe := TACBrNFSe( FACBrNFSe ).NotasFiscais.Items[0].NFSe.Numero; Self.ConsNfse.Cnpj := TACBrNFSe( FACBrNFSe ).NotasFiscais.Items[0].NFSe.PrestadorServico.IdentificacaoPrestador.Cnpj; Self.ConsNfse.InscricaoMunicipal := TACBrNFSe( FACBrNFSe ).NotasFiscais.Items[0].NFSe.PrestadorServico.IdentificacaoPrestador.InscricaoMunicipal; Result := Self.ConsNfse.Executar; end else if (TACBrNFSe( FACBrNFSe ).Configuracoes.WebServices.Provedor in [proGovBR]) and (TACBrNFSe( FACBrNFSe ).Configuracoes.WebServices.CodigoMunicipio = 3143302) then //MONTES CLAROS begin Self.ConsNfseRps.Numero := TACBrNFSe( FACBrNFSe ).NotasFiscais.Items[0].NFSe.IdentificacaoRps.Numero; Self.ConsNfseRps.Serie := TACBrNFSe( FACBrNFSe ).NotasFiscais.Items[0].NFSe.IdentificacaoRps.Serie; Self.ConsNfseRps.Tipo := TipoRPSToStr(TACBrNFSe( FACBrNFSe ).NotasFiscais.Items[0].NFSe.IdentificacaoRps.Tipo); Self.ConsNfseRps.Cnpj := TACBrNFSe( FACBrNFSe ).NotasFiscais.Items[0].NFSe.PrestadorServico.IdentificacaoPrestador.Cnpj; Self.ConsNfseRps.InscricaoMunicipal := TACBrNFSe( FACBrNFSe ).NotasFiscais.Items[0].NFSe.PrestadorServico.IdentificacaoPrestador.InscricaoMunicipal; end else begin Self.ConsNfseRps.Numero := TACBrNFSe( FACBrNFSe ).NotasFiscais.Items[0].NFSe.IdentificacaoRps.Numero; Self.ConsNfseRps.Serie := TACBrNFSe( FACBrNFSe ).NotasFiscais.Items[0].NFSe.IdentificacaoRps.Serie; Self.ConsNfseRps.Tipo := TipoRPSToStr(TACBrNFSe( FACBrNFSe ).NotasFiscais.Items[0].NFSe.IdentificacaoRps.Tipo); Self.ConsNfseRps.Cnpj := TACBrNFSe( FACBrNFSe ).NotasFiscais.Items[0].NFSe.Prestador.Cnpj; Self.ConsNfseRps.InscricaoMunicipal := TACBrNFSe( FACBrNFSe ).NotasFiscais.Items[0].NFSe.Prestador.InscricaoMunicipal; Self.ConsNfseRps.RazaoSocial := ''; if not (TACBrNFSe( FACBrNFSe ).Configuracoes.WebServices.Provedor in [proDigifred]) then Self.ConsNfseRps.RazaoSocial := TACBrNFSe( FACBrNFSe ).NotasFiscais.Items[0].NFSe.PrestadorServico.RazaoSocial; Result := Self.ConsNfseRps.Executar; end; if not(Result) then begin if Assigned(TACBrNFSe( FACBrNFSe ).OnGerarLog) then TACBrNFSe( FACBrNFSe ).OnGerarLog(Self.ConsNfseRps.Msg); if Self.ConsNfseRps.Msg <> '' then raise Exception.Create(Self.ConsNfseRps.Msg) else raise Exception.Create('Erro Desconhecido ao Consultar a NFS-e por RPS!') end; end; Em resumo: só adicionei o ELSE IF e seu respectivo código.

Ítalo, consegui descobrir o que é, fiz algumas alterações em ACBrProvedorGovBR e voltou a funcionar: Em GetConfigCidade(): ConfigCidade.Prefixo4 := 'tc:'; mudei para ConfigCidade.Prefixo4 := ''; e em GetConfigSchema() descomentei o código para voltar a usar somente nfse.xsd. Como só tenho clientes em Montes Claros que usam NFSe, pra mim resolve. Obrigado, Leandro

Boa tarde Ítalo, estou com o mesmo erro de esquema que reportaram no início desse tópico, só que para a cidade de MONTES CLAROS/MG. Linha: 1 - Coluna: 40 - Nao foi possivel encontrar informacoes sobre o esquema para o elemento 'http://tempuri.org/servico_enviar_lote_rps_envio.xsd:EnviarLoteRpsEnvio'.Linha: 1 - Coluna: 171 - Nao foi possivel encontrar informacoes sobre o esquema para o elemento 'http://tempuri.org/servico_enviar_lote_rps_envio.xsd:LoteRps'. / Linha: 1 - Coluna: 180 - Nao foi possivel encontrar informacoes sobre o esquema para o elemento 'http://tempuri.org/tipos_complexos.xsd:NumeroLote'. / Linha: 1 - Coluna: 214 - Nao foi possivel encontrar informacoes sobre o esquema para o elemento .... Atualizei meus componentes hoje, e começou esse erro. Antes estava funcionando 100%. Detalhe: testei também no demo do AcbrNFSe e dá o mesmo erro. Alguma luz? Desde já agradeço, Leandro

Deus te ouça Régys ... obrigado.

Senhores, Vocês sabem se há exigência de gravar no banco de dados os dados da nota manual em tabela separada da tabela de cupom? Estou querendo gravar na mesma tabela de cupom, só que quando for cupom de NF vai ter os campos a mais preenchidos (número, data, etc). Estou perguntando por quê vi um homologador da Polimig falando "a tela é exatamente a mesma pra cupom e nota manual, só grava em tabela separada...". Então não sei se isso é uma exigência ou apenas falou por falar. Desde já agradeço, Leandro

Pessoal, Telefonei agora há pouco pra Link3, e me informaram que não vão mais atender a prefeitura de Guanambi a partir do mês que vem. Agora a prefeitura vai usar o Webiss (veja link: http://www.webiss.com.br/Guanambiba/) Esse Webiss já é suportado pelo Acbr? Obrigado, Leandro

Senhores, só para posicioná-los, mandei um e-mail ontem de manhã para o técnico da Link3 pedindo essas informações, reenviei o email hoje, mas ainda não responderam. att, Leandro

Obrigado Ítalo, poderia me mandar a descrição completa do erro que dá ou o exe do exemplo para eu testar aqui? É que não posso atualizar diretamente meus componentes só para testar, pois tenho personalizações que eu fiz, demora um bocado pra refazer todas. Desde já agradeço, Leandro

Boa tarde Italo, Consegui a URL desse link3 para a cidade de Guanambi, é a seguinte: http://webservice.guanambi.ba.link3.com.br:3189/nfseWebService/ Só tem URL de produção, não tem de homologação. Pois bem, criei uma nova unit no acbr chamada AcbrProvedorLink3, fiz as alterações necessárias para chamar esse provedor quando for Guanambi/BA. Na função GetSoapAction coloquei todas as ações apontando para "http://webservice.guanambi.ba.link3.com.br:3189/nfseWebService/", e na GeraEnvelopeRecepcionarLoteRPS() copiei o mesmo codigo que esta no provedor ACBrProvedorGovBR. Na hora que tento mandar um RPS dá erro de cannot find dispatch method. Você que tem mais experiência, sabe me dizer por onde começar pra resolvê-lo? Já tentei várias coisas e não consegui. O padrão que eles seguem é ABRASF mesmo. Segue anexo a unit que criei, a documentação que eles me mandaram, que inclui um XML de exemplo. Se puder dar uma olhada... Muito obrigado, Leandro DadosNFSeGuanambi.rar

Montes Claros/MG... mas pelo que entendi do erro, não tem nada a ver, o problema é a destruição do objeto que citei, que está acontecendo incorretamente dentro do componente.

Boa noite, Estou com o mesmo problema, mas é em outra prefeitura. O negócio é que estou chamando a função ConsultarNFSeporRPS() em um laço, para consultar um RPS atrás do outro. Percebi que o erro é na linha: FIdentificacaoRps.Free; dentro de pnfsNFSe. Já coloquei um if Assigned() e uma condição para verificar se é igual a nil antes de dar o free, mas ele dá o free mesmo assim, gerando o access violation. Isso ocorre na segunda interação do laço, ou seja, parece que algo ficou na memória na primeira chamada. No laço faço isso: ACBrNFSe1.NotasFiscais.Clear; ACBrNFSe1.NotasFiscais.LoadFromFile(zArqXML); //aqui é meu arquivo XML ACBrNFSe1.ConsultarNFSeporRps(ACBrNFSe1.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Numero, ACBrNFSe1.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Serie, TipoRPSToStr(ACBrNFSe1.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Tipo), ACBrNFSe1.NotasFiscais.Items[0].NFSe.Prestador.Cnpj, ACBrNFSe1.NotasFiscais.Items[0].NFSe.Prestador.InscricaoMunicipal); Desde já agradeço, Leandro

Ok, vou procurar essas informações, obrigado.

Olá, Alguém já conseguiu utilizar NFSe de Guanambi/BA (utiliza Link3) no Acbr? Pelo que vi no fonte, não está implementado, estou certo? Obrigado, Leandro

Bom dia senhores, Gero o sped no meu PAF sem usar o Acbr, uso ele apenas para gerar o EAD nesse arquivo. Só que percebo que o validador SPED dá erro na linha EAD, não a reconhece como linha válida. Se eu tirar a EAD valida legal. Vocês sabem se pra validar tem que tirar essa linha EAD mesmo? Pergunto isso por que gerei o arquivo em outro PAF, que está rodando em um cliente meu, e o mesmo também não foi validado por conta dessa linha EAD. Então imagino que para validar temos que ir antes no txt e tirar a última linha. Desde já agradeço a ajuda, Leandro

Boa tarde Luís, Só vi sua msg hoje. O Acbr quando você instala tem opção de instalar com Capicom ou OpenSSL (instalando pacotes de um ou de outro). Tem que ver com o pessoal do Acbr se tem outra solução para isso, já faz mais de dois meses que estão sendo emitidos certificados A1 com criptografia SHA-2, imagino que outras pessoas já tenham uma solução melhor. Att, Leandro

Obrigado Regys, Vou fazer uns testes dessa forma... Leandro

Bom dia senhores, Estou implementando o evento VerificarRecomporValorGT do ACBrAAC para verificar no banco de dados se o CRZ, CRO e vr. venda bruta da última redução Z batem, para recompor o GT. Estou tendo um problema pra buscar o vr. da venda bruta da última redução Z. Está retornando o vr. da venda bruta atual, não o da última redução Z, ou seja, AcbrECF1.DadosReducaoZClass.ValorVendaBruta = AcbrECF1.VendaBruta. Assim, não consigo fazer essa verificação e deixar o ACBRAAC recompor o danado do GT. A sequencia é a seguinte: - Chamo o procedimento ACBrECF1.DadosReducaoZ; - Carrego do banco de dados os dados gravados da ultima redução Z, pelo num serie da impressora conectada, pelo AcbrECF1.DadosReducaoZClass.CRZ e pelo AcbrECF1.DadosReducaoZClass.CRO; - Verifico se AcbrECF1.DadosReducaoZClass.ValorVendaBruta = bancodedados.VrVendaBruta Lembrando que uso Bematech MP-4000 TH FI. Desde já agradeço a ajuda. Leandro