Undeclared identifier: 'atNao'

[Edevair Viesa Junior]

Bom dia.

Minha aplicação roda 100% no Delphi Berlin, eu estou migrando para o Delphi Rio e estou tendo um erro ao compilar. O erro é na linha do aceite no boleto.

 

v_titulo := ACBrBoleto.CriarTituloNaLista;
		with v_titulo do
		begin
			Vencimento        := Now;
			DataDocumento     := Now;
			NumeroDocumento   := '1';
			EspecieDoc        := 'DM';
			EspecieMod        := 'R$';
			Aceite := atNao; //Aqui Gera o Erro
			DataProcessamento := Now;
			Carteira          := '1';
			NossoNumero       := '1';
			ValorDocumento    := 0;
			with Sacado do
			begin
				NomeSacado := g_numero_empresa;
				CNPJCPF    := OnlyNumber(g_cnpj_empresa);
				Logradouro := g_endereco_nf_empresa;
				Numero     := g_numero_empresa;
				Bairro     := 'Teste';
				Cidade     := 'Teste';
				UF         := 'SP';
				CEP        := OnlyNumber(g_cep_empresa);
			end;
			ValorAbatimento   := 0;
			LocalPagamento    := cdsCO0200.FieldByName('C_MENSAGEM_BANCO').AsString;
			ValorMoraJuros    := 0;
			ValorDesconto     := 0;
			DataMoraJuros     := Now;
			DataDesconto      := Now;
			DataAbatimento    := Now;
			PercentualMulta   := 0;
			Mensagem.Text     := 'Teste de Mensagens';
			OcorrenciaOriginal.Tipo := F_Ocorrencia_Original_Boleto(cmbOcorrenciaOriginal.ItemIndex);
			Instrucao1        := PadLeft(trim('Instrução 1'),2,'0');
			Instrucao2        := PadLeft(trim('Instrução 2'),2,'0');
		end;

 

O erro gerado : [dcc32 Error] DadosBoleto.pas(474): E2003 Undeclared identifier: 'atNao'

Na uses está ssim :

uses
  SysUtils, Types, Classes, Variants, Vcl.Graphics, Vcl.Controls, Vcl.Forms,
  Vcl.Dialogs, Vcl.StdCtrls, Vcl.Buttons, Vcl.ExtCtrls, Vcl.Mask, Vcl.DBCtrls, FMTBcd,
  SqlExpr, DataSnap.Provider, Data.DB, DataSnap.DBClient, Vcl.ComCtrls, ACBrUtil,
  ACBrBoleto, ACBrBase, ACBrBoletoFCFR, Vcl.FileCtrl, Windows, Messages;

Ao que m consta o atNao e atSim dos boletos estão na UNIT ACBrUtil certo ? 

Mudou algo para o Delphi Rio ?

[Edevair Viesa Junior]

Estão ocrrendo também os seguintes erros :

 

[dcc32 Error] FUVAREJO.pas(5052): E2003 Undeclared identifier: 'TACBrHandShake'
[dcc32 Error] FUVAREJO.pas(5053): E2003 Undeclared identifier: 'TACBrSerialParity'
[dcc32 Error] FUVAREJO.pas(5054): E2003 Undeclared identifier: 'TACBrSerialStop'
[dcc32 Error] FUVAREJO.pas(5175): E2003 Undeclared identifier: 'TACBrPessoa'
[dcc32 Error] FUVAREJO.pas(5265): E2003 Undeclared identifier: 'atSim'
[dcc32 Error] FUVAREJO.pas(5269): E2003 Undeclared identifier: 'atNao'

[BigWings]

Provavelmente você não atualizava o ACBr há algum tempo.

Algumas declarações foram movidas para novas units.

6 minutos atrás, Edevair Viesa Junior disse:

[dcc32 Error] FUVAREJO.pas(5052): E2003 Undeclared identifier: 'TACBrHandShake'

 

46 minutos atrás, Edevair Viesa Junior disse:

O erro gerado : [dcc32 Error] DadosBoleto.pas(474): E2003 Undeclared identifier: 'atNao'

 

[Edevair Viesa Junior]

6 minutos atrás, BigWings disse:

Provavelmente você não atualizava o ACBr há algum tempo.

Algumas declarações foram movidas para novas units.

 

 

@BigWings deu certo sim, realmente não atualizava há algum tempo mesmo.... Agradeço a ajuda. Pode fechar o tópico por favor...

Muito Obrigado !

[Juliomar Marchetti]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.