ACBrNFe - Erro - Undeclared identifier

Delphi

21/08/2009

Estou querendo botar pra funcionar nfe no sistema mas não estou nem conseguindo iniciar o desenvolvimento quando mando compilar ele me retorna o seguinte erro
Undeclared identifier: ´identificação´
Creio que falta eu declarar alguma coisa no uses mas ja tentei de tudo que sei vou mandar o código abaixo e agradeço qualquer ajuda desde já!

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ACBrNFe, ACBrNFeNotasFiscais, ACBrNFeDANFEClass,
ACBrNFeDANFERave;

type
TfrmACBrNFe = class(TForm)
ACBrNFe1: TACBrNFe;
memoResposta: TMemo;
btnStatus: TButton;
btnCriarEnviar: TButton;
btnConsultar: TButton;
btnCancelar: TButton;
btnInutilizar: TButton;
btnValidar: TButton;
btnImprimir: TButton;
ACBrNFeDANFERave1: TACBrNFeDANFERave;
procedure btnStatusClick(Sender: TObject);
procedure btnCriarEnviarClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
frmACBrNFe: TfrmACBrNFe;

implementation

uses ACBrNFeWebServices;

{$R *.dfm}

procedure TfrmACBrNFe.btnStatusClick(Sender: TObject);
begin
ACBrNFe1.WebServices.StatusServico.Executar;
memoResposta.Lines.Text := ACBrNFe1.WebServices.
StatusServico.RetWS;
ShowMessage(ACBrNFe1.WebServices.StatusServico.Msg);
end;

procedure TfrmACBrNFe.btnCriarEnviarClick(Sender: TObject);
begin
ACBrNFe1.NotasFiscais.Clear;

with ACBrNFe1.NotasFiscais.Add do
begin
identificacao.naturezaoperacao := ´VENDA PRODUCAO DO ESTAB.´;
identificacao.Codigo := 1;
identificacao.Numero := 1;
identificacao.Serie := 1;
identificacao. DataEmissao := date;
identificacao.DataSaida := Date;
identificacao.Tipo := tSaida;
identificacao.Formapagamento := pgAvista;


Helynathan

Helynathan

Curtidas 0
POSTAR