joemil

bom dia pessoal, atualizei o ACBr, e nele tem a pasta ACBrNFCom, q o Ítalo disponibilizou, mas ainda nao ta completo. comecei a fazer uns testes nele, e tive q alterar o tipo do campo cClass de integer para String. agora ta gerando o XML e validando porem nao ta assinando este é o xml q to gerando nfcom.xml e este o código q to usando sPath := ExtractFilePath(ParamStr(0))+'NFCom'; NFCom := TACBrNFCom.Create(Self); DANFeCom := TACBrNFComDANFComClass.Create(Self); //NFCom.Configuracoes.Arquivos.DownloadDFe.; NFCom.Configuracoes.Arquivos.PathArquivoMunicipios := sPath+'/Municipios'; NFCom.Configuracoes.Arquivos.PathEvento := sPath+'/Eventos'; NFCom.Configuracoes.Arquivos.PathNFCom := sPath; NFCom.Configuracoes.Arquivos.PathSalvar := sPath+'/Salvar'; NFCom.Configuracoes.Arquivos.PathSchemas := sPath+'/Schemas'; NFCom.Configuracoes.Certificados.NumeroSerie := 'xxxxxx'; //4EC40C1EDC33DD22FB394B41CF3D005358E6BEAE'; NFCom.Configuracoes.Certificados.VerificarValidade := true; NFCom.Configuracoes.Geral.FormaEmissao := teNormal; NFCom.Configuracoes.Geral.CSC := 'tokencsc'; NFCom.Configuracoes.Geral.ExibirErroSchema := True; //NFCom.Configuracoes.Geral.FormatoAlerta := ''; NFCom.Configuracoes.Geral.IdCSC := 'idcsc'; NFCom.Configuracoes.Geral.IdentarXML := True; NFCom.Configuracoes.Geral.RetirarAcentos := True; NFCom.Configuracoes.Geral.Salvar := True; NFCom.Configuracoes.Geral.SSLCryptLib := cryWinCrypt; NFCom.Configuracoes.Geral.SSLHttpLib := httpWinHttp; NFCom.Configuracoes.Geral.SSLLib := libWinCrypt; NFCom.Configuracoes.Geral.SSLXmlSignLib := xsLibXml2; NFCom.SSL.SSLType := LT_TLSv1_2;//LT_ALL; NFCom.Configuracoes.RespTec.CSRT := '';; NFCom.Configuracoes.RespTec.IdCSRT := 0; NFCom.Configuracoes.WebServices.Ambiente := taHomologacao; NFCom.Configuracoes.WebServices.IntervaloTentativas := 5; NFCom.Configuracoes.WebServices.Salvar := true; //NFCom.Configuracoes.WebServices.SSLType := LT_TLSv1_2; NFCom.Configuracoes.WebServices.Tentativas := 3; NFCom.Configuracoes.WebServices.TimeOut := 3000; NFCom.Configuracoes.WebServices.UF := ''; NFCom.Configuracoes.WebServices.Visualizar := True; NFCom.DANFCom := DANFeCom; NFCom.NotasFiscais.Clear; with NFCom.NotasFiscais.Add do begin with NFCom.Ide do begin cDV := 1; cMunFG := 5107909; cNF := 1; cUF := 51; dhCont := Now; dhEmi := Now; finNFCom := fnNormal; indCessaoMeiosRede := tiSim; {???} indNotaEntrada := tiNao; {???} indPrePago := tiNao; modelo := 62; nNF := 1; nSiteAutoriz := sa0; {???} //tpAmb := taHomologacao; //tpEmis := teNormal; NFCom.Ide.tpFat := tfNormal; NFCom.Ide.verProc := '1.00'; end; NFCom.Ide.xJust := 'nada a informar'; NFCom.infNFCom.ID := '1'; NFCom.infNFCom.Versao := 1.00; with NFCom.Emit do begin CNPJ := '0495553xxxxxxx'; CRT := crtSimplesNacional; IE := '61161686917'; //IEUFDest := ''; xFant := 'NOME FANTASIA EMISSOR'; xNome := 'RAZAO SOCIAL EMISSOR'; EnderEmit.CEP := 78555000; EnderEmit.cMun := 5107909; EnderEmit.email := '[email protected]'; EnderEmit.fone := '66123123123'; EnderEmit.nro := '123'; EnderEmit.UF := 'MT'; EnderEmit.xBairro :='bairro emitente'; EnderEmit.xCpl := ''; EnderEmit.xLgr := 'logradouro emitente'; EnderEmit.xMun := 'Sinop'; end; with NFCom.Dest do begin CNPJCPF := '34589014009'; //IE := ''; //IM := '123456'; indIEDest := inNaoContribuinte; xNome := 'TESTE DE NOTA FISCAL'; idOutros := ''; EnderDest.CEP := 78555000; EnderDest.cMun := 5107909; EnderDest.email := '[email protected]'; EnderDest.fone := '66987987987'; EnderDest.nro := '987'; EnderDest.UF := 'MT'; EnderDest.xBairro :='bairro destinatario'; EnderDest.xCpl := ''; EnderDest.xLgr := 'logradouro destinatario'; EnderDest.xMun := 'Sinop'; end; with NFCom.assinante do begin cUFPrinc := 56; dContratoFim := Now; dContratoIni := Now; iCodAssinante := '123'; nContrato := '12345'; NroTermPrinc := ''; tpAssinante := taResidencial; tpServUtil := suAcessoInternet; {with NFCom.assinante.TermAdic.new do begin cUFAdic := 96; NroTermAdic := ''; end;} end; with NFCom.Det.New do begin //chNFComAnt := ''; {Imposto.COFINS; Imposto.FUNTTEL; Imposto.FUST; Imposto.ICMS; Imposto.ICMSUFDest; Imposto.PIS;} //infAdProd := ''; Prod.cClass := '0100401'; // https://dfe-portal.svrs.rs.gov.br/NFCOM/tabelacclass Prod.CNPJLD := ''; Prod.cProd := '1234'; Prod.indDevolucao := tiNao; {???} Prod.qFaturada := 1; Prod.uMed := umMB; Prod.vDesc := 0; Prod.vItem := 10; Prod.vOutro := 0; Prod.vProd := 10; Prod.xProd := 'DESCRICAO DO SERVICO'; end; NFCom.infNFComSupl.qrCodNFCom := '1'; NFCom.infRespTec.CNPJ := '37848330000141'; NFCom.infRespTec.email := '[email protected]'; NFCom.infRespTec.fone := '66123456789'; NFCom.infRespTec.hashCSRT := 'asfafafdasf'; NFCom.infRespTec.idCSRT := 1; NFCom.infRespTec.xContato := 'contato resptec'; NFCom.Total.vBC := 10; NFCom.Total.vCOFINS := 0; NFCom.Total.vDesc := 0; NFCom.Total.vFCP := 0; NFCom.Total.vFUNTTEL := 0; NFCom.Total.vFUST := 0; NFCom.Total.vICMS := 0; NFCom.Total.vICMSDeson := 0; NFCom.Total.vIRRF := 0; NFCom.Total.vNF := 10; NFCom.Total.vOutro := 0; NFCom.Total.vPIS := 0; NFCom.Total.vProd := 10; NFCom.Total.vRetCOFINS := 0; NFCom.Total.vRetCSLL := 0; NFCom.Total.vRetPIS := 0;; end; NFCom.NotasFiscais.GerarNFCom; NFCom.NotasFiscais.Assinar; NFCom.NotasFiscais.GravarXML('.\nfcom.xml'); NFCom.NotasFiscais.Validar; //NFCom.Cancelamento('justificativa', 1 {lote}); //NFCom.Consultar('chave', True); NFCom.Enviar(True); //NFCom.Gravar('filename', 'xml', 'path'); //NFCom.NotasFiscais.Imprimir; //NFCom.NotasFiscais.ImprimirPDF; // NFCom.SSL := LT_TLSv1_2; // NFCom.Status.; // NFCom.WebServices.Consulta.ArqEnv; // NFCom.WebServices.Consulta.ArqResp; {NFCom.WebServices.Enviar.; NFCom.WebServices.Retorno; NFCom.WebServices.StatusServico;} alguem mais ja iniciou os teste do componente?

bom dia pessoal, tb to a disposicao pra colaborar. parece q no RS ou em SC o prazo pra homologacao comeca em fevereiro/2024. ja ta bem na porta por enqto so usei um "conversor" de xml pra delphi class, mas tava parado. hj vou dar relembrada no q ja fiz aqui

bom dia pessoal, acho q me equivoquei no provedor da cidade de Redencao-PA o correto é: [1506138] ; Incluído em 03/03/2022 ; Atualizado em 20/06/2023 ; Atualizado em 07/12/2023 - Joemil Nome=Redencao UF=PA Provedor=Desenvolve Versao=2.03 ProRecepcionar=https://redencao-pa.desenvolvecidade.com.br/nfsd/IntegracaoNfsd?wsdl HomRecepcionar=https://hml-01-redencao-pa.desenvolvecidade.com.br/ é tanto provedor q to mexendo aqui, e preciso do suporte pra realizar os testes, ai demora um pouco pra confirmar desculpe pelo meu erro

aparentemente o WS nao ta funcionando corretamente https://coutomagalhaes.megasoftarrecadanet.com.br/coutomagalhaes/ws/nfseSOAP?wsdl ate aqui abre https://coutomagalhaes.megasoftarrecadanet.com.br to entrando em contato com o provedor

fiz a configuracao, mas faltou a versao [1706001] Nome=Couto Magalhaes UF=TO Versao=2.00 Provedor=Megasoft ProRecepcionar=https://coutomagalhaes.megasoftarrecadanet.com.br/coutomagalhaes/ws/nfseSOAP porem to recebendo esta msg de erro esse problema seria aqui no meu computador ou la no provedor?

bom dia pessoal, estou iniciando os testes para a cidade de Couto Magalhaes, no Tocantins [1706001] Nome=Couto Magalhaes UF=TO Provedor=Megasoft ProRecepcionar=https://coutomagalhaes.megasoftarrecadanet.com.br/coutomagalhaes/ws/nfseSOAP

olá pessoal, a cidade de redenção mudou de provedor. estamos iniciando os teste hj a tarde [1506138] ; Incluído em 03/03/2022 ; Atualizado em 20/06/2023 ; Atualizado em 22/11/2023 - Joemil Nome=Redencao UF=PA Provedor=MegaSoft Versao=2.00 ProRecepcionar=https://redencao.megasoftarrecadanet.com.br/redencao/ws/nfseSOAP ;ProRecepcionar=https://redencao-pa.desenvolvecidade.com.br/nfsd/IntegracaoNfsd ;HomRecepcionar=https://hml-01-redencao-pa.desenvolvecidade.com.br/nfsd/IntegracaoNfsd

ola pessoal, estamos iniciando os testes com o novo provedor da cidade de Juazeiro-BA, agora vai ser webiss (antes era sudoeste) [2918407] ; Atualizado em 24/08/2023 Nome=Juazeiro UF=BA Provedor=WebISS ProRecepcionar=https://juazeiroba.webiss.com.br/ws/nfse.asmx HomRecepcionar=https://homologacao.webiss.com.br/ws/nfse.asmx ;Provedor=Sudoeste ;Versao=2.02 ;ProRecepcionar=https://ws.juazeiro.ba.gov.br/webrun/webservices/NFEServices.jws?wsdl ; HomRecepcionar=https://homologacao.ws.juazeiro.ba.gov.br/webrun/webservices/NFEServices.jws?wsdl fizemos as alteracoes no .ini, e enviamos para o nosso cliente fazer os devidos credenciamentos e habilitar o ambiente de homologacao, mas ainda nao tivemos resposta do mesmo

valeu

bom dia pessoal, estou recebendo esta mensagem, na hora de validar o xml. aparentemente o ACBr ta adicionando um zero a mais na IE do emitente, e nao achei onde ta fazendo isso, pra remover e fazer novos testes. alguma dica? vou remover a validacao da IE pra ver o q acontece

bom dia, aparentemente somente do RS, mas resolvemos dar um pause no desenvolvimento dessa nota

eu tentei usar o mesmo Browser, passando o link direto, mas da erro de script usei este link: https://servicos.receita.fazenda.gov.br/Servicos/CPF/ConsultaSituacao/ConsultaPublica.asp mas nao alterei no componente, apenas peguei o form q tem o WebBrowser da consulta CNPJ. alguem ja ta mexendo alguma coisa? precisa de alguma ajuda?

testei aqui e funcionou, to usando Alexandria

sim, sim. o q eu quero dizer, é q quero gerar as tags, mesmo q estejam zeradas, de acordo com o CST. pq nos fontes do acbr esta assim: if (vBCST > 0) or (vValorST > 0) or .... (as tags sao so exemplos) then begin gera_tag_aqui end; entao se estao zeradas, elas nao so adicionadas ao XML

fiz algumas alteracoes no codigo, mas alguns CSTs nao aceitam certas tags. so nao sei se é uma regra do ACBr ou da SEFAZ. amanha vou pesquisar

olá pessoal, tudo bem com vcs? to com uma demanda aqui, que é gerar as tagas vBC, pICMS e vICMS, mesmo q elas estejam zeradas e o CST nao necessite delas. tem alguma configuracao pra gerar elas? inclusive pra PIS/COFINS tb, vejam um exemplo tem como gerar os valores dos impostos, mesmo zerados?

Boa tarde pessoal, apos varias tentativas, consegui enviar algumas notas. eis as alteracoes q fiz: arquivo pcnLeitor.pas (linha 280): o provedor sudoeste nao ta enviando data/hora, somente a data arquivo ACBrNFSeXServicos.ini (cidade Juazeiro-BA) (deixei o link de homologacao comentado, pois acho q nao tem esse ambiente) [2918407] ; Atualizado em 20/07/2023 Nome=Juazeiro UF=BA Provedor=Sudoeste Versao=2.02 ProRecepcionar=https://ws.juazeiro.ba.gov.br/webrun/webservices/NFEServices.jws?wsdl ; HomRecepcionar=https://homologacao.ws.juazeiro.ba.gov.br/webrun/webservices/NFEServices.jws?wsdl um detalhe que nao consegui resolver, foi a impressao da NFSe. nao aparece os dados da NFSe, conforme imagem abaixo:

bom dia pessoal, outro problema com o provedor Sudoeste. agora nao ta enviandos as notas em anexo os arquivos q foram gerados no envio outro problema é na hora q carrega o xml (arquivo nota.xml) no componente e tenta imprimir. da erro q nao é UTF8, mas nao testei com outros provedores 533-env-lot-sinc-soap.xml 533-lista-nfse-sinc-soap.xml 533-env-lot-sinc.xml nota.xml

Bom dia, atualizei os fontes. os xmls de retorno foram corrigidos, porem parece q nao ta carregando o xml de retorno nas propriedades, quando tem algum erro no RPS: Envio: WebService.Emite.XmlRetorno Consulta: WebService.ConsultaNFSeporRps.ArquivoRetorno mas o componente nao le o xml automatico pra preencher as propriedades do erro 12A-con-nfse-rps.xml 12A-con-nfse-rps-soap.xml 12A-comp-nfse.xml 12A-comp-nfse-soap.xml

boa tarde pessoal, o provedor sudoeste para a cidade de Juazeiro-BA, ja esta recebendo as notas pelo ACBRNFSeX, porem ta retornando assim: vejam q tem uma tag antes de <?XML> e dessa forma nao ta conseguindo ler os dados da NFSe. onde posso resolver isso? nesse caso, é o componente q ta salvando dessa forma, ou o provedor q ta retornando errado? em anexo os 2 xmls de retorno 23A-comp-nfse.xml 23A-comp-nfse-soap.xml

OK, na proxima ja envio correto

esta configuracao no .ini [2918407] Nome=Juazeiro UF=BA Provedor=Sudoeste ProRecepcionar=http://ws.juazeiro.ba.gov.br/webrun/webservices/NFEServices.jws?wsdl HomRecepcionar=http://ws.juazeiro.ba.gov.br/webrun/webservices/NFEServices.jws?wsdl

usando este comando: ShowMessage(WebService.Emite.XmlRetorno), o xml chega desta forma:

estou enviando o RPS, mas parece q o provedor "aceita" o rps, mesmo q ele esteja com alguns erros, entao tenho q gerar um novo numero. o problema q nao to conseguindo pegar o erro do retorno. so mostra este texto nas msg de erro: o xml de retorno ta em anexo nao entra nem no if nem no for este é o meu codigo alguma dica pra pegar o erro? 408-lista-nfse-sinc.xml

bom dia, trocou sim. estamos fazendo os ajustes aqui. na unit Sudoeste.GravarXml: é neste arquivo mesmo q posso fazer essas configuracoes?