EasySoft Sistemas

???

function TfrmEnvioEmail.ExecutarEnvioEmail(const sSmtpHost, sSmtpPort, sSmtpUser, sSmtpPasswd, sFrom, sTo, sAssunto: String; sMensagem : TStrings; SSL : Boolean; sCC: TStrings=nil; Anexos:TStringList=nil; PedeConfirma: Boolean = False; AguardarEnvio: Boolean = False; NomeRemetente: String = '' ) : Boolean; var ThreadSMTP : TSendMailThread; m:TMimemess; p: TMimepart; StreamNFe : TStringStream; NomeArq : String; i: Integer; mmCopia : TStringList; vTimeOut : Shortint; begin Result := False; mmCopia := TStringList.Create; mmCopia.Clear; m := TMimemess.create; ThreadSMTP := TSendMailThread.Create(Self) ; // Não Libera, pois usa FreeOnTerminate := True ; StreamNFe := TStringStream.Create(''); try TratarsCC(sCC, mmCopia); TratarsTO(sTO, mmCopia); AnexarRodape(sMensagem, mmCopia, sFrom, sAssunto); ADDBody(m, sMensagem, p); ADDAnexos(Anexos, m, p); ADDDestino(m, p, NomeRemetente, sFrom, sAssunto, PedeConfirma); ThreadSMTP.FreeOnTerminate := True; ThreadSMTP.sFrom := sFrom; ThreadSMTP.sTo := fDestino; if (mmCopia.Count > 0) then ThreadSMTP.sCC := mmCopia; ThreadSMTP.slmsg_Lines.AddStrings(m.Lines); ThreadSMTP.smtp.UserName := sSmtpUser; ThreadSMTP.smtp.Password := sSmtpPasswd; ThreadSMTP.smtp.TargetHost := sSmtpHost; if Trim(sSmtpPort)<>'' then ThreadSMTP.smtp.TargetPort := sSmtpPort; ThreadSMTP.smtp.FullSSL := SSL; ThreadSMTP.smtp.AutoTLS := IIF(Configurar_Integer(731) IN [2,3], True, False); // TLS ThreadSMTP.Resume; // inicia a thread if AguardarEnvio then begin vTimeOut := 0; repeat Sleep(500); Application.ProcessMessages; inc(vTimeOut); if vTimeOut >= 6 then break; until ThreadSMTP.Terminado; Result := not ThreadSMTP.OcorreramErros; end; finally m.free; StreamNFe.Free; mmCopia.Free; end; end; procedure TfrmEnvioEmail.ADDAnexos(Anexos:TStringList; m:TMimemess; p: TMimepart); var i : Integer; begin if not assigned(Anexos) then exit; // for i := 0 to Anexos.Count - 1 do for i := Anexos.Count - 1 downto 0 do begin if Anexos <> nil then m.AddPartBinaryFromFile(Anexos[i], p); end; end; Lembrando que o e-mail é enviado, mas, mesmo passando os anexos para a função, somente o último arquivo é enviado em anexo.

Boa tarde amigos. Atualizai recentemente o ACBR e estou com problemas no envio de e-mail com mais de um anexo. Apenas o ultimo anexo adicionado ao e-mail é encaminhado. Vocês podem me ajudar? Obrigado.

Deu certo. Muito obrigado.

Boa tarde. Estou implementando o CRT 4 (Simples Nacional - Microempreendedor Individual - MEI) na Emissão de NF-e de acordo com a NT 2024.001. E na emissão me retorna o seguinte erro. Falha na validação dos dados da nota: 100 '4' violates enumeration constraint of '1 2 3'. The element '{http://www.portalfiscal.inf.br/nfe}CRT' with value '4' failed to parse. Alguém pode me ajudar? Atenciosamente. Rony

Deu certo dessa forma. Obrigado pela ajuda.

Boa Tarde Pessoal. Estou com um problema na Distribuição de DFE com Certificado A3. (Segue anexo com imagem do erro). Com o certificado A1 está funcionando normalmente. Alguém consegue me ajudar? Atenciosamente.

Resolvido. Creio que a Sefaz tenha alterado alguma coisa, pois agora fui testar e funcionou em Ambiente de Produção.

Segue abaixo resposta do SEFAZ. Prezado Rony, Inicialmente, esclarecemos que a sistemática oficial de consultas está descrita nos Artigos 510 a 526 do Regulamento do ICMS (RICMS) e que a consulta em questão, não preenchendo os requisitos lá exigidos, não se reveste de caráter formal. Deste modo, a resposta abaixo, não sendo de lavra da Consultoria Tributária (órgão com competência legal para responder às consultas), não tem valor jurídico, e visa apenas nortear o contribuinte quanto ao estudo da legislação, pois a ele cabe a responsabilidade pela sua aplicação. Favor consultar a versão 1.40 da Nota Técnica 2023.001, disponível no Portal Nacional da NFe. Se produto (tag: cProdANP) não está presente na Tabela de Combustíveis Sujeitos à Tributação Monofásica (coluna cProdANP): - Proibido o preenchimento de CST de tributação monofásica sobre combustíveis (CST= 02, 15, 53, 61) Observação 1: Tabela de Combustíveis Sujeitos à Tributação Monofásica publicada na aba “Documentos”, opção “Diversos” do Portal Nacional da Nota Fiscal Eletrônica Observação 2: Regra implantada até 25/09/2023 em homologação e em 30/10/2023 em produção. Agradecemos seu contato no "Fale Conosco" da Secretaria da Fazenda. Sua opinião é muito importante para nós. Por gentileza, clique no link abaixo e opine sobre este e-mail: Pesquisa de Satisfação Atenciosamente, Secretaria da Fazenda do Estado de São Paulo

O XML está OK. Fiz a abertura do chamado junto à SEFAZ. Vou aguardar uma posição.

Bom dia, Estou tentando emitir uma NF-e de Combustível passando o codigo ANP 620505001. Esse código não consta na tabela de Combustíveis Sujeitos a Tributação Monofásica que esta disponível no Portal da NF-e. Porém está ocorrendo o erro abaixo. Rejeição 959 Rejeição: NF-e não pode ter preenchimento de Grupo de Tributação do ICMS monofásica sobre combustíveis. De acordo com a NT 2023.001, pelo que entendi, se o codigo de ANP não estiver na tabela informada pelo Portal, é proibido o preenchimento do CST. Eu não estou informando o CST, e sim o CSOSN 500 - <comb> <cProdANP>620505001</cProdANP> <descANP>OUTROS OLEOS LUBRIFICANTES AUTOMOTIVOS</descANP> <UFCons>SP</UFCons> </comb> </prod> - <imposto> <vTotTrib>16.15</vTotTrib> - <ICMS> - <ICMSSN500> <orig>0</orig> <CSOSN>500</CSOSN> <vBCSTRet>0.00</vBCSTRet> <pST>0.0000</pST> <vICMSSubstituto>0.00</vICMSSubstituto> <vICMSSTRet>0.00</vICMSSTRet> </ICMSSN500> </ICMS> Se puderem me dar uma luz aqui pra poder resolver essa questão, eu agradeço. Obrigado.

Boa Tarde pessoal, Um cliente me questionou sobre esse bloco de Faturas na Nota Fiscal de Serviço. Hoje o ACBR atende esses campos para o servidor Fiorili? Tentei verificar no código do exemplo no ACBR e ele possui os campos de Condição de Pagamento. Seria a mesma coisa? Se sim, pelo site que o cliente me enviou existem outras formas de pagamento diferentes do ACBR. Enfim, poderia me tirar essa dúvida?

Boa tarde amigos. Vocês sabem me dizer se o ACBrBAL é compatível com o Android?

Alguém conhece alguma melhor forma de entrar em contato com a 4R além do telefone e email que se encontra no site deles?

Bom dia, Fiz as alterações e o erro foi esse abaixo. Vou anexar os arquivos de envelope. Requisição Ambiente: 2 Cidade : Cajati/SP Provedor: Sistemas4R Versão: 2.00 Método Executado: Enviar Lote Síncrono Parâmetros de Envio Numero do Lote: 1 Parâmetros de Retorno Data de Envio : 30/12/1899 Numero do Prot: Numero da Nota: Link : Código Verif. : Sucesso : False Erro(s): Código : X999 Mensagem: Erro de Conexão: SOAP-ENV:Client - No SOAP request found. Call https://cajati.cidadeonline.inf.br/Abrasf/ahrecepcionarloterpssincrono.aspx?wsdl to get the WSDL. Correção: --------- NFS-e Numero....: 1 Cod. Verificacao: Prestador.......: DIESEL TEC - MANUTENCAO E SERVICOS LTDA Tomador.........: INSCRICAO DE TESTE E TESTE 1-env-lot-sinc-soap.xml 1-lista-nfse-sinc-soap.xml 1-env-lot-sinc.xml

Eu adicionei os parâmetros necessários. Os mesmos que eu ja usava antes de começar a dar o problema. [3509254] Nome=Cajati UF=SP Provedor=Sistemas4R Versao=2.00 ProRecepcionar=* ProConsultarLote=http://cajati.cidadeonline.inf.br/abrasf/aconsultarloterps.aspx?wsdl ProConsultarNFSeRps=http://cajati.cidadeonline.inf.br/abrasf/aconsultarnfseporrps.aspx?wsdl ProCancelarNFSe=http://cajati.cidadeonline.inf.br/abrasf/acancelarnfse.aspx?wsdl ProRecepcionarSincrono=http://cajati.cidadeonline.inf.br/abrasf/arecepcionarloterpssincrono.aspx?wsdl ; HomRecepcionar=* HomConsultarLote= HomConsultarNFSeRps=http://cajati.cidadeonline.inf.br/abrasf/ahconsultarnfseporrps.aspx?wsdl HomCancelarNFSe=http://cajati.cidadeonline.inf.br/abrasf/ahcancelarnfse.aspx?wsdl HomRecepcionarSincrono=http://cajati.cidadeonline.inf.br/abrasf/ahrecepcionarloterpssincrono.aspx?wsdl ; ProLinkURL= HomLinkURL=

Ola, bom dia. Realizei os testes no Programa de testes do ACBrNFSeX e tive o seguinte retorno: Requisição Ambiente: 2 Cidade : Cajati/SP Provedor: Sistemas4R Versão: 2.00 Método Executado: Enviar Lote Síncrono Parâmetros de Envio Numero do Lote: 1 Parâmetros de Retorno Data de Envio : 30/12/1899 Numero do Prot: Numero da Nota: Link : Código Verif. : Sucesso : True Erro(s): Código : X201 Mensagem: WebService retornou um XML vazio. Correção: --------- NFS-e Numero....: 1 Cod. Verificacao: Prestador.......: DIESEL TEC - MANUTENCAO E SERVICOS LTDA Tomador.........: INSCRICAO DE TESTE E TESTE Exatamente o erro que está me retornando no ACBRNFse, Os dados do protocolo retornam vazios.

Boa tarde, fiz conforme me orientou e obtive os arquivos em anexo. 37-env-lotS-soap.xml 37-recS.xml 37-recS-soap.xml 37-env-lotS.xml

Bom dia Italo. A ideia é migrarmos pra esse novo componente mais pra frente. Porém , agora precisavamos resolver essa questão no cliente. Esse problema está acontecendo em uma cidade especifica que utiliza o 4R [3509254] Nome=Cajati UF=SP Provedor=4R NomeURL_H=cajati.cidadeonline.inf NomeURL_P=cajati.cidadeonline.inf Provável que seja algo alterado no servidor deles, mas não consigo obter uma mensagem de erro clara pra poder investigar.

Boa tarde Italo, Usamos o componente ACBRNFSe.

Boa Tarde amigos. Tenho dois clientes na cidade de Cajati - SP que utilizam a emissão de NFS-e com o provedor 4R. E hoje reparei que os dois estão com problemas na emissão. O estranho é que ao tentar debugar o codigo, não retorna erro nenhum. Simplesmente não transmite e o erro retorna vazio. Alguém pode ter uma ideia do motivo? Obrigado.

Uma duvida, com essa correção, os boletos com PIX que já foram emitidos devem funcionar ou somente os boletos gerados daqui pra frente?

O arquivo de retorno foi enviado no email.

Boa tarde amigos. Estou com um problema em relação ao pagamento do QRCode gerado pelo boleto híbrido na Sicredi. Fiz todo processo e gerei o QRCode normalmente. Porém, aqui pelos meus testes, somente o NUBANK e a Caixa Econômica fizeram a leitura correta do QRCode, para os demais bancos que testei todos informaram como QRCode inválido. Testei com Banco do Brasil, PagSeguro, Bradesco, Mercado Pago, Pic Pay e o próprio Sicredi. Nenhum deles conseguiu ler o QRCODE. Podem me auxiliar com alguma solução? Obrigado.

Resolvido, o certificado estava criptografado. Muito obrigado pela ajuda.