edulamy

Bom dia a todos. Existe a possibilidade de consultar o recibo do cadastro enviado para S-2300 pelo CPF do trabalhador? Pergunto isso porque esta acontecendo casos que a consulta do protocolo não esta acontecendo direito devido ao numero que consta no eSocial estar diferente do que foi gravado no banco de dados e com isso não consigo recuperar o numero do recibo via webservice e nesse caso tem que consultar manualmente o site do eSocial para ter tal informação. Obrigado

Estou com duvida, este processo será incluído no projeto acbresocial? https://www.gov.br/esocial/pt-br/documentacao-tecnica/manuais/20210903-minuta-nde-01-esocial-s-1_0-ir-sobre-rendimentos-do-trabalho.pdf pois estou com um problema em um cliente que após a mudança para o S-1.0, não esta mais aparecendo os valores de IR e Pensão Alimentícia no e-social. Sei que foi removida essa informação do S-1210, como devo proceder?

Estou com o mesmo problema. Já informei em todos os campos possiveis a informação referente ao cnpj do prestador e mesmo assim continua a mensagem, o rps esta sendo incluido no site porem apresenta essa mensagem após o envio.

pnfsNFSeW_EL.pas Segue em anexo.

Por necessidade do meu cliente (SANTA MARIA DE JETIBA MG) precisei altera a rotina GerarXML_EL do arquivo pnfsNFSeW_EL, segue abaixo o trecho alterado. procedure TNFSeW_EL.GerarXML_EL; var LocPrest: String; begin FIdentificador := 'Id'; Gerador.wCampo(tcStr, '#01', FIdentificador, 1, 15, 1, NFSe.InfID.ID, ''); LocPrest := '2'; //SANTA MARIA DE JETIBA if ((OnlyNumber(NFSe.PrestadorServico.Endereco.CodigoMunicipio) = 3204559) and (NFSe.NaturezaOperacao = no1) and (OnlyNumber(NFSe.PrestadorServico.Endereco.CodigoMunicipio) <> OnlyNumber(NFSe.Tomador.Endereco.CodigoMunicipio))) then LocPrest := '1' else if NFSe.NaturezaOperacao = no2 then LocPrest := '1'; // Código para identificação do local de prestação do serviço 1-Fora do município 2-No município Gerador.wCampo(tcStr, '#02', 'LocalPrestacao', 1, 1, 1, LocPrest, ''); //IssRetido no provedor EL é ao contrario (1 = normal, 2 retido) por isso não da de usar SituacaoTributariaToStr //Gerador.wCampo(tcStr , '#03', 'IssRetido' , 001, 001, 1, SituacaoTributariaToStr(NFSe.Servico.Valores.IssRetido), ''); if NFSe.Servico.Valores.IssRetido = stRetencao then Gerador.wCampo(tcStr, '#03', 'IssRetido', 1, 1, 1, '2', '') else Gerador.wCampo(tcStr, '#03', 'IssRetido', 1, 1, 1, '1', ''); Gerador.wCampo(tcDatHor, '#04', 'DataEmissao', 19, 19, 1, NFSe.DataEmissao, DSC_DEMI); GerarIdentificacaoRPS; GerarPrestador; GerarTomador; GerarIntermediarioServico; GerarListaServicos; GerarValoresServico; GerarRPSSubstituido; Gerador.wCampo(tcStr, '#90', 'Observacao', 1, 255, 0, NFSe.OutrasInformacoes, ''); Gerador.wCampo(tcStr, '#91', 'Status' , 1, 001, 1, StatusRPSToStr(NFSe.Status), ''); Gerador.wCampo(tcStr, '#92', 'CodigoMunicipioPrestacao' , 07, 007, 0, OnlyNumber(NFSe.PrestadorServico.Endereco.CodigoMunicipio), ''); end;

Ok, obrigado pela ajuda!!!

Esse método retorna todas as NF emitidas para essa transportadora em um único XML?

Boa tarde, existe uma forma de fazer a consulta/download do XML das NF emitidas para o transportador?

bom dia, Fiz mais esse ajuste no arquivo pnfsNFSeW_EL, pois ele usava a numeração do RPS como numero de identificação. E quando enviado o rps mais de uma vez, devido a erro no envio, acusava duplicidade de lotes no servidor. Deixei comentando como era antes. function TNFSeW_EL.GerarXml: Boolean; begin Gerador.ListaDeAlertas.Clear; Gerador.ArquivoFormatoXML := ''; Gerador.Prefixo := FPrefixo4; Gerador.Opcoes.QuebraLinha := FQuebradeLinha; if (RightStr(FURL, 1) <> '/') and (FDefTipos <> '') then FDefTipos := '/' + FDefTipos; if Trim(FPrefixo4) <> '' then Atributo := ' xmlns:' + StringReplace(Prefixo4, ':', '', []) + '="' + FURL + FDefTipos + '"' else Atributo := ' xmlns="' + FURL + FDefTipos + '"'; Gerador.wGrupo('Rps'); FNFSe.InfID.ID := StringOfChar('0', 15) + FNFSe.InfID.ID; //OnlyNumber(FNFSe.IdentificacaoRps.Numero) + //FNFSe.IdentificacaoRps.Serie; FNFSe.InfID.ID := copy(FNFSe.InfID.ID, length(FNFSe.InfID.ID) - 15 + 1, 15); GerarXML_EL; Gerador.wGrupo('/Rps'); Gerador.gtAjustarRegistros(NFSe.InfID.ID); Result := (Gerador.ListaDeAlertas.Count = 0); end;

Pessol, por necessidade de adequar o provedor EL ao layout disponibilizado por eles, tive que fazer uma alteração no form pnfsNFSeW_EL para inclusão do campo CodigoMunicipioPrestacao. Necessidade causada pelo município de Santa Maria de Jetibá - ES. Segue em anexo documentação da prefeitura e form alterado. pnfsNFSeW_EL.pas layout_rps_santa_maria_jetiba.zip

Descobri o problema, não estava preenchendo a informação referente ao ModeloDF e com isso entrava FXMLAssinado := SSL.Assinar(String(XMLUTF8), 'CTe', 'infCte') e dava o erro "Nenhum elemento encontrado".

Juliomar, outra pergunta, existe alguma diferença entre o envio de ct-e 57 e 67? preciso criar duas rotinas distintas para cada envio?

Vou pedir para testarem e retorno, obrigado por enquanto.

Foi seguido todo o exemplo do repositório, segue abaixo a configuração referente a autenticação.

O codigo ta igual a exemplo, será que pode ser a configuração do certificado, referente aos protocolos?

Estou tendo problema no envio de CT-e modelo 67. Esta apresentando a seguinte mensagem quando faço o envio. "Nenhum elemento encontrado"

Estou recebendo esta mensagem ao fazer a consulta da chave do CTEOS para verificar a existência no SEFAZ.

Reinstalei o ACBR. E Fiz o teste usando o exemplo, e continua o erro. ERRO: Erro Interno: 0 Erro HTTP: 0 URL: https://es-santamariadejetiba-pm-nfs.cloud.el.com.br/RpsServiceService?wsdl usei a opção Enviar Lote RPS (Enviar) Debuguei o sistema e parei nesta linha do ACBrDFeSSL.pas (1044), function TDFeSSLHttpClass.Enviar. Quando executa: WriteStrToStream(FDataReq, AnsiString(ConteudoXML)); FDataReq retorna vazio. ConteudoXML possui dados, segue abaixo, supri os dados do cliente: <?xml version="1.0" encoding="UTF-8"?> <soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:wsn="http://des36.el.com.br:8080/el-issonline/"><soapenv:Header/><soapenv:Body><wsn:autenticarContribuinte><identificacaoPrestador>XXXXXXXXXXXXXX</identificacaoPrestador><senha>YYYYYYYY</senha></wsn:autenticarContribuinte></soapenv:Body></soapenv:Envelope> rotina completa abaixo: function TDFeSSLHttpClass.Enviar(const ConteudoXML: String; const AURL: String; const ASoapAction: String; const AMimeType: String = ''; const AAuthorizationHeader : String = ''): String; var AMethod: String; begin FDataReq.Clear; if (ConteudoXML <> '') then begin AMethod := 'POST'; WriteStrToStream(FDataReq, AnsiString(ConteudoXML)); end else AMethod := 'GET'; HeaderReq.Clear; // Para informar Haders na requisição, use HTTPMethod(); if (AAuthorizationHeader <> '') then HeaderReq.AddHeader('Authorization', AAuthorizationHeader); FSoapAction := ASoapAction; FMimeType := AMimeType; Result := ''; try HTTPMethod( AMethod, AURL ) ; FDataResp.Position := 0; Result := ReadStrFromStream(FDataResp, FDataResp.Size); // Verifica se o ResultCode é: 200 OK; 201 Created; 202 Accepted // https://www.w3.org/Protocols/rfc2616/rfc2616-sec10.html if not (FpHTTPResultCode in [200..202]) then raise EACBrDFeException.Create(''); except // on E:EACBrDFeException do // raise; on E:Exception do begin raise EACBrDFeException.CreateDef( Format(ACBrStr(cACBrDFeSSLEnviarException), [FpInternalErrorCode, FpHTTPResultCode, FURL] ) + sLineBreak + LastErrorDesc + sLineBreak + Result); end; end; end; FpHTTPResultCode retorna 0 e com isso chama a mensagem de erro:

Ainda nao estou conseguindo enviar NFS-e para esta prefeitura...

Foi atualizado algo neste sentido, pois ainda não esta imprimindo esta informação na impressão do evento.

Obrigado Italo, já pedi ao meu cliente para me enviar o XML correto, estou fazendo uma rotina no sistema para importar os dados do XML para meu banco de dados.

Ao carregar o XML da NFS-e não são listados os campos Numero, CodigoVerificacao, DataEmissao, DataEmissaoRps, Competencia. Testei tambem no exemplo carregando o XML para impressão da NF e os campos não são preenchidos, envio em anexo o pdf(gerado pelo app exemplo) e o XML. NFS-e.pdf nfse_7751.xml

Italo, as rotinas da EL ainda estão em homologação? Ou é alguma particularidade? Estou enviando a documentação disponibilizada no site da prefeitura. layout_rps.zip

Italo, bom dia! Estou fazendo testes com o exemplo e mesmo informando o usuario e senha, retorna a mensagem abaixo quando consulto um xml: Inicio TNFSeConsultarNFSeRPS ERRO: Erro Interno: 0 Erro HTTP: 0 URL: https://es-santamariadejetiba-pm-nfs.cloud.el.com.br/RpsServiceService?wsdl A documentação do Webservice é muito fraca. Sabe dizer o que pode estar acontecendo? Já usei o CNPJ/Inscrição Municipal e senha de acesso ao site como parametro para usuario e senha no programa. O erro abaixo acontece quando tento enviar a NF pelo meu sistema:

Cidades.ini Obrigado Italo. Não vou conseguir testar agora, mas segue o arquivo em anexo. Não tenho o Link de homologação, irei tentar buscar essa informação mais tarde, visto que os demais municipios que utilizam o EL não possui esta configuração.