Nova NT 2025.002 v1.40 - Ajuste Evento teSolicApropCredPres 211110

[Bruno da Silva Albrechete]

Bom dia Pessoal, acabei de atualizar o ACBR e no evento citado não encontrei o campo cCredPres (P25a).

Antes ele ficava dentro dos grupos do IBS e CBS e foram removidos. Pelo que entendi ele deveria entrar um nivel acima, sendo informado apenas uma vez.

Estou fazendo confusão e esse campo foi removido, ou realmente deveria ter?
 

[juliomar.marchetti]

precisa ver na unit de geração mas sim ele foi parar em um nó acima 

[Bruno da Silva Albrechete]

1 hora atrás, Juliomar Marchetti disse:

precisa ver na unit de geração mas sim ele foi parar em um nó acima 

Bom dia Juliomar, obrigado por retornar... verificando as units ACBrNFe.EventoClass e ACBrNFe.EnvEvento, não tem o campo cCredPres.

Estou fazendo as modificações para incluir, e fiquei com uma duvida refrente ao codigo do campo... poderia me explicar como funciona?

na eventoclass eu alterei...
 

TgCredPresCollectionItem = class
  private
    FnItem: Integer;
    FcCredPres: String; --aqui
    FvBCCredPres : Double;
    FgIBSCredPres: TgIBSgCBS_CredPres;
    FgCBSCredPres: TgIBSgCBS_CredPres;
  public
    constructor Create;
    destructor Destroy; override;

    property nItem       : Integer    read FnItem        write FnItem;
    property cCredPres   : string     read FcCredPres    write FcCredPres; --aqui
    property vBCCredPres : Double     read FvBCCredPres  write FvBCCredPres;
    property gIBSCredPres: TgIBSgCBS_CredPres read FgIBSCredPres write FgIBSCredPres;
    property gCBSCredPres: TgIBSgCBS_CredPres read FgCBSCredPres write FgCBSCredPres;
  end;

na EnvEvento eu adicionei...
 

function TEventoNFe.Gerar_gCredPres(Idx: Integer): TACBrXmlNodeArray;
var
  i: integer;
begin
  Result := nil;
  SetLength(Result, Evento[Idx].FInfEvento.detEvento.gCredPres.Count);

  for i := 0 to Evento[Idx].FInfEvento.detEvento.gCredPres.Count - 1 do
  begin
    Result[i] := CreateElement('gCredPresOper');
    Result[i].SetAttribute('nItem',
     intToStr(Evento[Idx].InfEvento.detEvento.gCredPres[i].nItem));

    Result[i].AppendChild(AddNode(tcDe2, 'HP22', 'vBCCredPres', 1, 15, 1,
                             Evento[Idx].InfEvento.detEvento.gCredPres[i].vBCCredPres));

    Result[i].AppendChild(AddNode(tcStr, 'P25a', 'cCredPres', 2, 2, 1,
                         Evento[Idx].InfEvento.detEvento.gCredPres[i].cCredPres)); --aqui

    Result[i].AppendChild(Gerar_gIBSCredPres(Evento[Idx].InfEvento.detEvento.gCredPres[i].gIBSCredPres));

    Result[i].AppendChild(Gerar_gCBSCredPres(Evento[Idx].InfEvento.detEvento.gCredPres[i].gCBSCredPres));
  end;

  if Evento[Idx].FInfEvento.detEvento.gCredPres.Count > 990 then
    wAlerta('#1', 'gCredPres', '', ERR_MSG_MAIOR_MAXIMO + '990');
end;

A duvida sobre o codigo seria por exemplo o campo 'HP22', porque tem o H? Não seria 'P25' aqui...

Sobre as mudanças poderia validar se estão corretas por favor.

 

Editado 1 Julho por Bruno da Silva Albrechete

[Bruno da Silva Albrechete]

Units alteradas para análise.

 

ACBrNFe.EnvEvento.pas ACBrNFe.EventoClass.pas

[juliomar.marchetti]

Ok e emitido os documentos?

[Bruno da Silva Albrechete]

Boa tarde, mais 2 units que havia esquecido.

ACBrNFe.RetEnvEvento.pas ACBrNFeWebServices.pas

[Bruno da Silva Albrechete]

32 minutos atrás, Juliomar Marchetti disse:

Ok e emitido os documentos?

Tentei emitir agora mas ta dando erro de schema.
Acredito que o arquivoe211110_v1.00.xsd não tenha sido atualizado ainda.
Não tem as alterações nele.

e211110_v1.00.xsd

[Bruno da Silva Albrechete]

reparei tb que outros eventos nao estão enviando... por exemplo 112150 - Atualização da Data de Previsão de Entrega...

[juliomar.marchetti]

então não devemos subir até termos os schemas

[Dinarte Moscon]

Em 01/07/2026 at 16:24, Bruno da Silva Albrechete disse:

reparei tb que outros eventos nao estão enviando... por exemplo 112150 - Atualização da Data de Previsão de Entrega...

Estou com esse mesmo erro, começou ontem, xml aparentemente correto, mas retorna rejeição.

[juliomar.marchetti]

parece que ainda não aceita