Marcos_Muller

Boa tarde, a função ACBrNFSeX1.DANFSe.ImprimeCanhoto no padrão nacional não estava funcionando, uns clientes queriam parar de imprimir o canhoto, e olhando o motivo da mesma não funcionar achei esse 'erro' no ACBrNFSeXDANFSeRLPadraoNacional.pas // rlbCanhoto.Visible := fpDANFSe.ImprimeCanhoto; na linha só descomentei essa linha a property voltou a ser 'respeitada'

Boa tarde, Após a última atualização da DLL da PayGo, identificamos uma mudança no comportamento durante transações de débito. Atualmente, ao utilizar o parâmetro tefmNaoDefinido, o sistema está exibindo uma tela solicitando a seleção entre “à vista” e “pré-datado” para todos os cartões de débito, antes mesmo da inserção do cartão no pinpad. Nas versões anteriores (ex.: 4.1.15.2), essa seleção era apresentada somente após a leitura do cartão, e apenas quando aplicável — como no caso de cartões do Banrisul que possuem essa funcionalidade. Essa alteração tem gerado impacto na usabilidade, pois a tela passou a ser exibida de forma desnecessária na maioria das transações, resultando em reclamações por parte de diversos clientes. Gostaríamos de saber se existe alguma configuração ou parâmetro que permita retornar ao comportamento anterior, onde essa escolha é apresentada apenas quando o cartão inserido oferece múltiplas opções.

Boa tarde, tive que fazer um ajuste para poder usar a API do CRESOL na parte de gerar o token, tinha um IF legendado que estava causando um acessviolation, voltando com esse if resolveu e gerou o boleto na função function TOAuth.GerarToken: Boolean; esse if ( if Assigned(FACBrBoleto.OnDepoisAutenticar) then) atualizado pelo svn esta legendado function TOAuth.GerarToken: Boolean; var LToken : String; LExpire : TDateTime; function TokenValido: Boolean; begin Result := (FToken <> '') and (FExpire > Now); end; begin Result := False; try CarregaCertificados; // Antes de autenticar if Assigned(FACBrBoleto.OnAntesAutenticar) then begin FACBrBoleto.OnAntesAutenticar(LToken, LExpire); FToken := LToken; FExpire := LExpire; end; // Forçar novo token if FForceNewToken then begin FToken := ''; FExpire := 0; end; // Verificar se precisa autenticar if Assigned(FACBrBoleto.OnPrecisaAutenticar) and not TokenValido and not FForceNewToken then begin FACBrBoleto.OnPrecisaAutenticar(LToken, LExpire); FToken := LToken; FExpire := LExpire; end; // Se já possui token válido, só retorna sucesso if TokenValido then Result := True else if (not Assigned(FACBrBoleto.OnPrecisaAutenticar)) or FForceNewToken then begin // Converte ClientID/Secret para Basic Auth em Base64 Result := Executar('Basic ' + String(EncodeBase64(AnsiString(ClientID + ':' + ClientSecret)))); end; if Assigned(FACBrBoleto.OnDepoisAutenticar) then FACBrBoleto.OnDepoisAutenticar(FToken, FExpire); finally FForceNewToken := False; end; end;

Segue em anexo os schemas que a DIGIFRED me enviou nfse-esquemas_xsd-anexo_v-painelmun-prod-v1-00-20251216.zip nfse-esquemas_xsd-anexos_i_ii_iv-sefin_adn-prod-v1-00-20251226.zip nfse-esquemas_xsd-anexo_iii-cnc-prod-v1-00-20251216.zip

estou recebendo esse erro no provedora DIGIFRED preciso informar o nDPS porem não estou achando o mesmo no componente, uso o DELPHI esta assim a TAG no xml <nDPS /> porem na digifred tambem não posso informar o nNFSe e o nDFSe alquem consegue me dar uma mão, não achei em lugar nenhum esse erro

[4316105] Nome=Ronda Alta UF=RS Provedor=Digifred ProRecepcionar=https://sim.digifred.net.br/rondaalta/nfse/ws/principal o ini tem que ficar assim agora

https://sim.digifred.net.br/rondaalta/nfse/web/nfse/passo_webservice https://sim.digifred.net.br/rondaalta/xsd/wsdl/nfse_nacional_rondaalta.wsdl nesses dois links estão como vão fazer a partir de agora só estou tentando acessar os manuais já que a pagina que teria esta offline

Pior que não tenho INI nenhum mais junto, to usando só o do acbr, tive falando com a prefeitura, e eles voltaram para o Layout antigo da DIGIFRED

Continuou o mesmo erro

tenho que marcar algo diferente aqui?

Boa tarde, por volta das 13:45 da tarde de ontem dia 05/03 começamos a ter esse retorno em um cliente nosso de ronda alta, e na teoria estava tudo certo, pois o cliente estava imitindo nota até as 13:33 normalmente começou a retornar isso: O município emissor informado na DPS deve estar parametrizado para utilizar os emissores públicos nacionais, conforme parametrização do município no Sistema Nacional NFS-e. estávamos usando o ACBrNFSeXServicosRTC.ini assim [4316105] Nome=Ronda Alta UF=RS Provedor=PadraoNacional no layout PadraoNacional101

Resolvido, a ordem do CST na atualização do Acbr tinha mudado um pouco

Na emissão da nota qual TAG devo informar a situação tributaria do PIS/COFINS pois esta sempre não informado.

Bom dia, notei hoje um problema considerado grave, a parte das tributações da nota estão sempre vazias, mesmo informando que o pis e cofins vão ser retidos e que o issqn não é considerado imunidade segue minha procedure pra fins de conferencia, caso esteja passando algo despercebido. procedure padraonacional; var strDDD: string; strTel: string; i: Integer; Telefone : string; teste : boolean; TeveReducao,TemDiferimento : boolean; totalibs,totalcbs,totalibsMun,totalis,totalbc_ibscbs:double; totaldifIBS,totaldifCBS,totaldifIBSMUN:double; valorteste : double; begin with frmconsultanfse_X do begin with ACBrNFSeX1 do begin NotasFiscais.NumeroLote := vNumLote; with NotasFiscais.New do begin with NFSe do begin case ACBrNFSeX1.Configuracoes.WebServices.ambiente of taProducao : Producao := snSim; taHomologacao : producao := snNao; end; cLocEmi := qryparametroIBGE.value; // Numero do DPS a ser gerado e enviado para o WebService Numero := FormatFloat('#########0', qryconsultanumero.value); verAplic := 'ACBrNFSeX-1.00'; IdentificacaoRps.Numero := FormatFloat('#########0', qryconsultanumero.value); IdentificacaoRps.Serie := dtmDados.serie_nfse; DataEmissao := qryconsultahorario.value; Competencia := qryconsultahorario.value; InformacoesComplementares := qryConsultaOUTRAS_INF.Value; // TtpEmit = (tePrestador, teTomador, teIntermediario) tpEmit := tePrestador; // TOptanteSN = (osnNaoOptante, osnOptanteMEI, osnOptanteMEEPP) IF qryparametroSIMPLES.VALUE = 'S' THEN OptanteSn := osnOptanteMEEPP else OptanteSN := osnNaoOptante; //osnOptanteMEEPP; case strtoint(copy(trim(qryConsultaNATUREZA_OP.VALUE),0,2)) of 0 : NaturezaOperacao := no0; 1 : NaturezaOperacao := no1; 2 : NaturezaOperacao := no2; 3 : NaturezaOperacao := no3; 4 : NaturezaOperacao := no4; 5 : NaturezaOperacao := no5; 6 : NaturezaOperacao := no6; 7 : NaturezaOperacao := no7; 8 : NaturezaOperacao := no8; 9 : NaturezaOperacao := no9; 10 : NaturezaOperacao := no10; 15 : NaturezaOperacao := no15; end; {========================================================================= Dados do Serviço =========================================================================} //Servico.CodigoMunicipioLocalPrestacao := qryparametroIBGE.AsInteger; Servico.ItemListaServico := QryItensServicoITEM_LISTA.value; Servico.CodigoCnae := StringReplace(StringReplace(QryItensServicoCOD_SERVICO.value,'/','',[rfReplaceAll]),'-','',[rfReplaceAll]); Servico.CodigoNBS := QryItensServicoCODIGO_NBS.AsString; Servico.Discriminacao := qryConsultaDISCRIMINACAO.value; Servico.CodigoMunicipio := inttostr(ACBrNFSeX1.Configuracoes.Geral.CodigoMunicipio); Servico.CodigoPais := 1058; // Brasil {========================================================================= Dados do Serviço (valores) =========================================================================} Servico.Valores.ValorServicos := qryConsultaVALOR_TOTAL.value; Servico.Valores.ValorDeducoes := qryConsultaDEDUCOES_P_LEI.VALUE; Servico.Valores.Aliquota := qryConsultaALIQ.VALUE; Servico.Valores.DescontoIncondicionado := qryConsultaDESCONTOS_INC.VALUE; Servico.Valores.DescontoCondicionado := qryConsultaDESCONTO_COND.VALUE; // TtribISSQN = (tiOperacaoTributavel, tiImunidade, tiExportacao, tiNaoIncidencia); Servico.Valores.tribMun.tribISSQN := StrTotribISSQN(teste,qryConsultaTRIBISSQN.AsString); //tiOperacaoTributavel; Servico.Valores.tribMun.tpImunidade := StrTotpImunidade(teste,qryConsultaTIPO_IMUNIDADE.AsString); Servico.Valores.tribMun.tpRetISSQN := StrTotpRetISSQN(teste,qryConsultaRET_TOMADOR.AsString); Servico.Valores.totTrib.indTotTrib := indNao; Servico.MunicipioIncidencia := qryparametroIBGE.AsInteger; Servico.CodigoMunicipioLocalPrestacao := qryparametroIBGE.AsInteger; if OptanteSN = osnNaoOptante then begin Servico.Valores.totTrib.indTotTrib := indSim; Servico.Valores.totTrib.pTotTribSN := 2.01; end; RegimeEspecialTributacao := TnfseRegimeEspecialTributacao(qryConsultaREGIME_ESPECIAL.asinteger); //retISSQNAutonomos; { Só devem ser informados se o Prestador não for Simples Nacional } IF trim(qryparametroSIMPLES.VALUE) = 'N' THEN begin case qryConsultaCST.VALUE of 0 : Servico.Valores.tribFed.CST := TCST(0); 1 : Servico.Valores.tribFed.CST := TCST(1); 2 : Servico.Valores.tribFed.CST := TCST(2); 3 : Servico.Valores.tribFed.CST := TCST(3); 4 : Servico.Valores.tribFed.CST := TCST(4); 5 : Servico.Valores.tribFed.CST := TCST(5); 6 : Servico.Valores.tribFed.CST := TCST(6); 7 : Servico.Valores.tribFed.CST := TCST(7); 8 : Servico.Valores.tribFed.CST := TCST(8); 9 : Servico.Valores.tribFed.CST := TCST(9); end; if Servico.Valores.tribFed.CST <> TCST(0) then Servico.Valores.tribFed.vBCPisCofins := qryConsultaBASE_CALCULO.value; //calculo pis cofins Servico.Valores.tribFed.pAliqPis := qryConsultaALQUOTA_PIS.value; //1.65; Servico.Valores.tribFed.pAliqCofins := qryConsultaALIQUOTA_COFINS.value; //7.60; Servico.Valores.tribFed.vPis := qryConsultaTRIB_PIS.value; Servico.Valores.tribFed.vCofins := qryConsultaTRIB_COFINS.value; Servico.Valores.tribFed.tpRetPisCofins := TtpRetPisCofins(qryConsultaTIPORETPISCOFINS.value); Servico.Valores.totTrib.vTotTribFed := Servico.Valores.tribFed.vPis + Servico.Valores.tribFed.vCofins + 0.000001; Servico.Valores.totTrib.vTotTribEst := 0; Servico.Valores.totTrib.vTotTribMun := qryConsultaVALOR_ISS.value; {========================================================================= Dados do Prestador de Serviço =========================================================================} Prestador.IdentificacaoPrestador.CpfCnpj := qryparametroCGC.value; end; Prestador.contato.Email := qryparametroE_MAIL.value; Prestador.IdentificacaoPrestador.CpfCnpj := qryparametroCGC.value; {========================================================================= Dados do Tomador de Serviço =========================================================================} Tomador.AtualizaTomador := snNao; Tomador.TomadorExterior := snNao; Tomador.IdentificacaoTomador.CpfCnpj := qryConsultaCPF_CLI.VALUE; Tomador.IdentificacaoTomador.InscricaoMunicipal := ''; Tomador.IdentificacaoTomador.InscricaoEstadual := qryConsultaIE_cli.VALUE; Tomador.IdentificacaoTomador.CAEPF := ''; Tomador.RazaoSocial := qryConsultaNOME_CLI.VALUE; Tomador.Endereco.Endereco := qryConsultaENDERECO_CLI.VALUE; Tomador.Endereco.Numero := qryConsultaNEND_CLI.VALUE; Tomador.Endereco.Complemento := ''; Tomador.Endereco.Bairro := qryConsultabairro_cli.VALUE; Tomador.Endereco.TipoBairro := 'BAIRRO'; Tomador.Endereco.CodigoMunicipio := qryConsultaIBGE_CLI.value; Tomador.Endereco.xMunicipio := qryConsultaCIDADE_CLI.value; Tomador.Endereco.UF := qryConsultaUF_CLI.value; Tomador.Endereco.CodigoPais := 1058; // Brasil Tomador.Endereco.CEP := qryConsultaCEP_CLI.value; Tomador.Endereco.xPais := 'BRASIL'; Tomador.Contato.Telefone := qryConsultaFONE_CLI.value; Tomador.Contato.Email := qryConsultaEMAIL_CLI.asstring; if qryparametroREFORMA.value = 1 then begin IBSCBS.finNFSe := fnfsRegular; IBSCBS.indFinal := ifSim; IBSCBS.tpEnteGov := tcgNenhum; // idTomadorAdquirenteDestinatarioIguais, idTomadorAdquirenteIguais, IBSCBS.indDest := idTomadorAdquirenteDestinatarioIguais; IBSCBS.valores.trib.gIBSCBS.cClassTrib := qryConsultaCCLASSTRIB.Value; IBSCBS.valores.trib.gIBSCBS.cCredPres := cpNenhum; IBSCBS.valores.trib.gIBSCBS.gTribRegular.CSTReg := cstNenhum; IBSCBS.valores.trib.gIBSCBS.gTribRegular.cClassTribReg := ''; // IBSCBS.valores.trib.gIBSCBS.gDif.pDifUF := qryconsultaALIQ_IBS_DIF.Value; // IBSCBS.valores.trib.gIBSCBS.gDif.pDifMun := qryConsultaALIQ_IBSMUN_DIF.Value; // IBSCBS.valores.trib.gIBSCBS.gDif.pDifCBS := qryConsultaALIQ_CBS_DIF.Value; end; end; end; end; end; end; segue xml da nota em questão usado como exemplo nota exemplo.xml

Boa tarde, já testei todos os métodos de consulta de dps possível pelo componente e todos retorna que está indisponível pro provedor, alquem sabe como posso consultar esse dps?retorno.xmlenvio.xml