Marcelo A. Rodrigues

Bom dia Estou usando o pagseguro em produção sim. São necessários algumas etapas para conseguir homologar, como: Disponiblizar um endpoint publico com a consulta da chave publica temporaria gerada; Realizar os testes em homologação e depois solicitar a homologação enviando os arquivos de log gerados;

Boa tarde Implementei os novos endpoints conforme manual do pagseguro em anexo. SolicitarCredenciais -> solicita o client id e client secret; SolicitarDesafioCertificado -> solicita o texto de desafio criptografado; SolicitarCertificado -> após resolver o desafio, é possível solicitar o certificado (key e pem) por essa chamada; Ajuste da versão http.protocol = '1.1' necessário para quando controla manualmente o token; Atenciosamente Manual API Pix.pdf ACBrPIXPSPPagSeguro.pas

Olá, Realizei os testes no ambiente de Homologação e Produção do PSP Sicredi Para solicitar a Devolução do Pix, foi necessário um ajuste no ResultCode do endpoint Antes era testado apenas o 201-Created, porém no Sicredi é retornado o 200-Ok function TACBrPixEndPointPix.SolicitarDevolucaoPix(const e2eid, idDevolucao: String): Boolean; .... fPSP.AcessarEndPoint(ChttpMethodPUT, EndPoint, ResultCode, RespostaHttp); Result := (ResultCode in [HTTP_CREATED,HTTP_OK]); if Result then fDevolucao.AsJSON := String(RespostaHttp) else fPSP.TratarRetornoComErro(ResultCode, RespostaHttp, Problema); Também inclui as configurações do Sicredi no exemplo do ACBr, porém estava gerando alguns erros para compilar. Deixei o fonte comentado do que dava erro nas rotinas do Pix vencimento. Caso queiram aproveitar, eu fiz só o básico para conseguir funcionar, segue em anexo. ACBrPIXCD.pas FrPrincipal.pas FrPrincipal.dfm

Boa tarde, Itápolis migrou para o novo provedor da SmarAPD, segue os ajustes necessários: Classe: pnfsNFSeW_ABRASFv2.pas Método > TNFSeW_ABRASFv2.GerarXML_ABRASF_v2 Acrescentado para o Provedor: proSmarAPDABRASF InfDeclaracaoPrestacaoServico com indentificador conforme anexo proSmarAPDABRASF: Gerador.wGrupo('InfDeclaracaoPrestacaoServico ' + FIdentificador + '="declaracao_' + NFSe.InfID.ID + '"'); Conforme o site abaixo, ajustei o arquivos INI de Homologação e Produção http://tributacao.smarapd.com.br/abrasf/loginWeb.jsp?execobj=ABRASFAcessoWS&hostProducao=http://notafiscal.itapolis.sp.gov.br:8090/tbw/&hostHomologacao=&rpsSincrono=10&rpsAssincrono=30&titulo=Prefeitura+Municipal+de+Itápolis ** SmarAPDABRASF.ini ** [URL_P] RecepcaoLoteRPS=%NomeURL_P%/tbw/services/nfseSOAP?wsdl [URL_H] RecepcaoLoteRPS=%NomeURL_H%/abrasf/services/nfseSOAP?wsdl ** Cidades.ini ** [3522703] Nome=Itapolis UF=SP Provedor=SmarAPDABRASF NomeURL_H=https://tributacao.smarapd.com.br NomeURL_P=http://notafiscal.itapolis.sp.gov.br:8090 Observação: O cancelamento só funcionou assinando o XML com CAPICOM, não entendi bem o motivo, pois sempre uso WinCrypt e LibXml2 nas demais assinaturas de XML. Testei apenas com certificado A1. Assinando com o WinCrypt e LibXml2 é retornado erro de assinatura, e acontece o mesmo validando a assinatura do arquivo pelo site: https://servicos.receita.fazenda.gov.br/servicos/assinadoc/ValidadorAssinaturas.app/valida.aspx Cidades.ini pnfsNFSeW_ABRASFv2.pas SmarAPDABRASF.ini

Boa tarde! Na leitura do Retorno não está previsto o código '5-Remessa Rejeitada', conforme o manual da Caixa Econômica. O que impossibilita a leitura do retorno para detalhar o motivo do erro ao usuário. Segue do manual e do fonte com o ajuste necessário. Manual: http://www.caixa.gov.br/Downloads/cobranca-caixa/Manual_de_Leiaute_de_Arquivo_Eletronico_CNAB_240.pdf Atenciosamente!

Entendi Italo, realmente se possuir duas seguradoras não irá mostrar os dados da segunda. Para resolver esse problema de mais de uma Seguradora, teriamos que colocar os dados da Seguradora como um bloco que ocuparia toda a largura da folha, abaixo do "Vale Pedágio". Nessa nova versão que vai entrar QR Code, qual é a idéia, refazer a impressão já existente ou apenas acrescentar os novos campos? (ainda não li sobre as mudanças)

Segue em anexo

Faltou o anexo do arquivo .dfm.. ACBrMDFeDAMDFeRLRetrato.dfm

Bom dia, Sobre essa alteração do "Numero da Averbação", tenho um cliente que está questionando por cortar o campo na impressão. Eu fiz um ajuste na impressão, não sei se ficou da melhor forma, caso queiram subir o ajuste ou dar uma outra ideia para não cortar o campo. Segue em anexo o ajuste e o print do manual com o tamanho do campo ACBrMDFeDAMDFeRLRetrato.lfm ACBrMDFeDAMDFeRLRetrato.pas

Bom dia! No ambiente de Homologação para São Paulo, está gerando esse erro também quando não possui o campo INSS no XML Modifiquei o código para testar, conforme abaixo, e foi enviado normalmente: if (((CTe.ide.UFIni <> CTe.ide.UFFim) or (CTe.ide.UFEnv = 'RS') or (CTe.ide.UFEnv = 'SP')) and (CTe.ide.indIEToma = inNaoContribuinte)) and ((CTe.Imp.infTribFed.vPIS > 0) or (CTe.Imp.infTribFed.vCOFINS > 0) or (CTe.Imp.infTribFed.vIR > 0) or ((CTe.Imp.infTribFed.vINSS > 0) or (InformarINSS = 1)) or (CTe.Imp.infTribFed.vCSLL > 0)) then begin Gerador.wGrupo('infTribFed', '#125'); Gerador.wCampo(tcDe2, '#', 'vPIS ', 01, 15, 0, CTe.Imp.infTribFed.vPIS, DSC_VPIS); Gerador.wCampo(tcDe2, '#', 'vCOFINS', 01, 15, 0, CTe.Imp.infTribFed.vCOFINS, DSC_VCOFINS); Gerador.wCampo(tcDe2, '#', 'vIR ', 01, 15, 0, CTe.Imp.infTribFed.vIR, DSC_VIR); Gerador.wCampo(tcDe2, '#', 'vINSS ', 01, 15, InformarINSS, CTe.Imp.infTribFed.vINSS, DSC_VINSS); Gerador.wCampo(tcDe2, '#', 'vCSLL ', 01, 15, 0, CTe.Imp.infTribFed.vCSLL, DSC_VCSLL); Gerador.wGrupo('/infTribFed'); end; Mesmo passando zerado os campos PIS, COFINS, IR, INSS e CSLL envia normalmente no ambiente de Homologação

Caso use o ACBrETQ, eu estava com o mesmo problema, até ser corrigido na atualização do dia 12/12/2017, revisão 14281. -- ACBrETQPpla -- [*] Inclusão de um valor mínimo(220) para aAvançoEtq em "ComandosFinalizarEtiqueta". (por: Elias César)

Boa tarde. Precisei diminuir a velocidade da impressão de etiquetas de um cliente, como no ACBr não estava implementada essa opção, realizei os ajustes necessários. Segue em anexo os fontes para análise, e um print do manual. Obrigado! ACBrETQ.pas ACBrETQClass.pas ACBrETQEpl2.pas ACBrETQPpla.pas

Bom dia, Eu pego os retornos do manifesto da seguinte forma: with ACBrMDFe.WebServices.EnvEvento do begin EventoRetorno.retEvento.Items[0].RetInfEvento.cStat EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo EventoRetorno.retEvento.Items[0].RetInfEvento.nProt EventoRetorno.RetEvento.Items[0].RetInfEvento.tpEvento EventoRetorno.RetEvento.Items[0].RetInfEvento.chMDFe EventoRetorno.RetEvento.Items[0].RetInfEvento.nSeqEvento end; att.

Conforme a Graça postou acima, você deve apenas incluir o novo motorista ao MDF-e

Bom dia, É possível apenas incluir um novo motorista no manifesto que está em aberto: ACBrMDFe1.EventoMDFe.Evento.Clear; ACBrMDFe1.EventoMDFe.idLote := XNumeroLote; with ACBrMDFe1.EventoMDFe.Evento.Add do begin InfEvento.chMDFe := xChaveAcesso; infEvento.CNPJ := xCNPJ; infEvento.dhEvento := Now; infEvento.tpEvento := teInclusaoCondutor; infEvento.nSeqEvento := nSeqEvento; infEvento.detEvento.nProt := xProtocolo; infEvento.detEvento.xNome := xNomeMotoristaAIncluir; infEvento.detEvento.CPF := xCPFMotorista; end; // Enviar o evento inclusao de condutor if ACBrMDFe1.EnviarEvento(xNumeroLote) then begin