Daniel - PiraByte

Você pode usar a função para consultar o dps, mas precisa montar a chave do DPS. Se olhar no programa exemplo deve ter essa consulta também, e você pode usar lá pra ver como é montada a chave do DPS para realizar a consulta

O nome das seções na parte do total estão incorretos, de uma olhada aqui no exemplo: https://acbr.sourceforge.io/ACBrMonitor/ModeloNFeINICompletoReformaTribu.html Também percebi que está somando o valor do IBS e CBS na tag <vItem>37875.00</vItem>, se não me engano em 2026 não vai somar esses valores ainda nessa tag, mas recomendo pesquisar para confirmar.

Pelo que vi está sem o total do CBS, está preenchido no item, mas não no total. Além disso, o vCBS no item parece incorreto, acredito que seja a alíquota informada incorretamente, <pCBS>0.0900</pCBS>, acredito que seria: <pCBS>0.9000</pCBS> Também na parte do IBS vi que está <pIBSMun>0.0500</pIBSMun> e <pIBSUF>0.0500</pIBSUF>, nessa parte acredito que o correto seria 0,1% (0.1000) para pIBSUF e 0% para pIBSMun (isso para 2026, mas esse não tenho certeza.)

Cidade/UF: Piracicaba/SP Previsão de Mudança: 1º de janeiro de 2026 Tipo de Mudança: Padrão Nacional Fonte/Documentação: https://piracicaba.sp.gov.br/noticias/prefeitura-de-piracicaba-orienta-empresas-sobre-nova-forma-de-emissao-de-nota-fiscal-de-servicos/ Alteração realizada no arquivo ACBrNFSeXServicosRTC.ini

Boa tarde @Italo Giurizzato Junior, muito obrigado. Sobre a leitura, fiz com base no arquivo de gravação do XML: case NFSe.tpEmit of teTomador: Result.AppendChild(AddNode(tcStr, '#1', 'cLocEmi', 7, 7, 1, NFSe.Tomador.Endereco.CodigoMunicipio, '')); teIntermediario: Result.AppendChild(AddNode(tcStr, '#1', 'cLocEmi', 7, 7, 1, NFSe.Intermediario.Endereco.CodigoMunicipio, '')); else Result.AppendChild(AddNode(tcStr, '#1', 'cLocEmi', 7, 7, 1, NFSe.Prestador.Endereco.CodigoMunicipio, '')); end; Pelo que vi nas alterações, foi adicionado a propriedade cLocEmi, junto disso a leitura da tag direto para essa propriedade, porém no arquivo de gravação, a alteração foi apenas para gravação do arquivo ini: AINIRec.WriteString(LSecao, 'cLocEmi', NFSe.cLocEmi); A gravação do XML parece estar usando ainda o código que mencionei usar de base acima, com isso ao carregar um XML com cLocEmi preenchido e sem o endereço do prestador, ao usar a função de Emitir, ele vai gravar o XML novamente, e com isso vai tentar pegar a informação do cLocEmi no endereço do prestador, que vai estar vázio. Fiz a alteração para que a gravação do XML seja feita usando a propriedade cLocEmi, não mantive o código acima com o case. PadraoNacional.GravarXml.pas

tag cLocEmi não é lida ao ler um DPS (Padrão Nacional) usando a procedure ACBrNFSe.NotasFiscais.LoadFromFile PadraoNacional.LerXml.pas

Tem no exemplo de boleto do ACBr como fazer a leitura do retorno, olhando lá da pra ver como é feito, lá inclusive mostra como obter o campo EMV

Como eu disse, uso API do Bradesco apenas, mas olhando o código de leitura de CNAB do bradesco, parece que tem uma leitura que gera o EMV com base nos dados do arquivo de retorno. acho que o ideal é você fazer a leitura do arquivo de retorno com o componente de boleto e ver se retorna o emv nas propriedades do boleto, se não, debugar e ver se está passando no método que gera o EMV

ACBrTitulo.QrCode.PIXQRCodeDinamico esse é do componente de boleto, quando você faz a leitura do retorno, ele monta o emv com os dados no arquivo de retorno (pelo que entendi, não fiz uso de CNAB lendo retorno).

Pix := ACBrPIXCD1.GerarQRCodeDinamico(Chave_pix, Txid, Valor); Olhei aqui, e você está passando a chave pix na geração do QRCode Dinâmico procedure TACBrBancoBradesco.LerRetorno400Transacao4(ACBrTitulo :TACBrTitulo; ALinha: String); var LURL, LtxId: string; begin inherited; LURL := Trim(Copy(ALinha, 29,77)); LtxId := Trim(Copy(ALinha,106,35)); if NaoEstaVazio(lURL) and NaoEstaVazio(LtxId) then ACBrTitulo.QrCode.PIXQRCodeDinamico(Lurl, LtxId, ACBrTitulo); end; Aqui no código do ACBr ele passa a URL, a chave parece que passa no estático, verifica esse parametro que está passando, aqui no código da pra ver as posições que ele copia

Eu uso a API Apenas, pego o EMV ja montado no componente. Mas olhando o manual CNAB400 do bradesco o txid tem tamanho de 35, e no código do ACBr que lê o retorno 400, ele usa o método PIXQRCodeDinamico, então deve ser um QRCode dinâmico mesmo. Pelo que entendi o retorno do banco não tem o EMV mesmo, mas o ACBrBoleto monta ao ler o retorno.

Não sei onde está fazendo a validação, mas está considerando o tipo correto de QRCode (Estático ou Dinâmico)? Pelo que vi aqui, o Estático é 25 Caracteres, já o dinâmico:

Dependendo da situação, passar o item direto como parâmetro pode ser uma solução. procedure TfrmACBrNFe.GerarImposto(ADet: TDetCollectionItem); begin ADet.Prod.CProd := '100'; ... end;

https://docwiki.embarcadero.com/RADStudio/Athens/en/Methods_(Delphi)#Constructors na documentação fala sobre os Constructors, recomendo ver por lá. Pelo que entendo, é necessário que o Create retorne a referência do objeto, para que você possa usar, exemplo: procedure Exemplo; var SL: TStringList; begin SL := TStringList.Create; try SL.Add('1'); SL.Add('2'); FuncaoQueUsaStringList(SL); finally SL.Free; end; end; Fazendo conforme seu exemplo (abaixo), você não vai ter referência ao objeto do tipo TStringList, e não vai conseguir acessar ele em outra parte do código, nem mesmo liberar da memória TStringList.Create.Add

Não me atentei que havia a quebra no 509 e pulava o 510. Type TCancelCode = (tcc501 = 501, tcc502 = 502, tcc503 = 503, tcc504 = 504, tcc505 = 505, tcc506 = 506, tcc507 = 507, tcc508 = 508, tcc509 = 509, tcc511 = 511, tcc512 = 512, tcc513 = 513); ... var ValorInteiro: Integer; TC: TCancelCode; begin TC := tcc501; ValorInteiro := Ord(TC); end; Não sei exatamente o que precisa, mas essa é uma outra forma, ainda seria possível atribuir um valor incorreto a TC, usando por exemplo TC := TCancelCode(510); Mas dependendo do que está buscando pode ser uma alternativa