Ir para conteúdo
  • Cadastre-se

dev botao

  • Este tópico foi criado há 1770 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Postado

Boa Tarde Pessoal,

Estou migrando para o trunk 2 (última versão) e esta apresentando estes erros na unit pcnValidador.pas, na function ValidarXML:

[Error] pcnValidador.pas(90): E2003 Undeclared identifier: 'TpcnSchema'
[Error] pcnValidador.pas(91): E2003 Undeclared identifier: 'TpcnTipoLayout'
[Error] pcnValidador.pas(129): E2003 Undeclared identifier: 'SchemaToStr'
[Error] pcnValidador.pas(131): E2003 Undeclared identifier: 'TipoLayoutToStr'

Peguei o primeiro (TpcnSchema) e fui comparar na versão do trunk

Ele está dentro da pcnConversao.pas

  TpcnSchema = (TsPL005c, TsPL006,
                TsPL_CTe_103, TsPL_CTe_104,
                TsPL_MDFe_100);

Então fui verificar no trunk 2, (pcnConversao.pas) e ele não existe mais,

Procurei por TpcnSchema nos fontes e achei somente dentro do pcnValidador.pas a utilização dele.

Alguém sabe onde esta a classe TpcnSchema ?

 

 

Rodrigo ®¿®

Curitiba-PR

Postado

Eu apaguei o arquivo pcnValidador.pas e mandei atualizar para pegar a última versão.

https://svn.code.sf.net/p/acbr/code/trunk2/Fontes/PCNComum

https://svn.code.sf.net/p/acbr/code/trunk2/

Mas no geral o endereço do SVN está correto.

No meu baixou com TpcnSchema dentro do pcnValidador.???

Não entendi, o que ocorreu !!!

Alguém tem o pcnValidador.pas para eu comparar como o meu?

 

Rodrigo ®¿®

Curitiba-PR

Postado

Boa Tarde,

Tive que colocar dentro do pcnConversao.pas, o código antigo da 'TpcnSchema' para conseguir compilar, pois o pcnValidador está usando o código antigo. ( Imagem em anexo ).

Código:

  TpcnSchema = (TsPL005c, TsPL006,
                TsPL_CTe_103, TsPL_CTe_104,
                TsPL_MDFe_100);
  TpcnTipoLayout = (tlAtuCadEmiDFe, tlCadEmiDFe, tlCancNFe, tlConsCad, tlConsReciNFe,
                    tlConsSitNFe, tlConsStatServ, tlInutNFe, tlNFe, tlProcNFe,
                    tlProcInutNFe, tlRetAtuCadEmiDFe, tlRetCancNFe, tlRetConsCad,
                    tlRetConsReciNFe, tlRetConsStatServ, tlRetConsSitNFe, tlRetEnvNFe,
                    tlRetInutNFe, tlEnvNFe, tlProcCancNFe, tlCancCTe, tlConsReciCTe,
                    tlConsSitCTe, tlInutCTe, tlCTe, tlProcCTe, tlProcInutCTe, tlRetCancCTe,
                    tlRetConsReciCTe, tlRetConsSitCTe, tlRetEnvCTe, tlRetInutCTe,
                    tlEnvCTe, tlProcCancCTe, tlEnvDPEC, tlConsDPEC, tlConsStatServCTe,
                    tlCCeNFe, tlEnvCCeNFe, tlRetEnvCCeNFe, tlEnvEventoNFe, tlRetEnvEventoNFe,
                    tlConsNFeDest, tlDownloadNFe);
function SchemaToStr(const t: TpcnSchema): string;
function StrToSchema(var ok: boolean; const s: string): TpcnSchema;
function TipoLayoutToStr(const t: TpcnTipoLayout): string;
function StrToTipoLayout(var ok: boolean; const s: string): TpcnTipoLayout;
// Tipo de Schema **************************************************************

function SchemaToStr(const t: TpcnSchema): string;
begin
  result := EnumeradoToStr(t, ['PL005C'], [TsPL005c]);
end;

function StrToSchema(var ok: boolean; const s: string): TpcnSchema;
begin
  result := StrToEnumerado(ok, s, ['PL005C'], [TsPL005c]);
end;

// Tipo do Layout **************************************************************
function TipoLayoutToStr(const t: TpcnTipoLayout): string;
begin
  result := EnumeradoToStr(t, ['AtuCadEmiDFe', 'CadEmiDFe', 'CancNFe', 'ConsCad',
                               'ConsReciNFe', 'ConsSitNFe', 'ConsStatServ', 'InutNFe',
                               'NFe', 'ProcNFe', 'ProcInutNFe', 'RetAtuCadEmiDFe',
                               'RetCancNFe', 'RetConsCad', 'RetConsReciNFe', 'RetConsStatServ',
                               'RetConsSitNFe', 'RetEnvNFe', 'RetInutNFe', 'EnvNFe',
                               'ProcCancNFe', 'ConsStatServ', 'EnvCCeNFe', 'EnvEventoNFe',
                               'ConsNFeDest', 'DownloadNFe' {, 'ProcMDFe'}],
      [tlAtuCadEmiDFe, tlCadEmiDFe, tlCancCTe, tlConsCad, tlConsReciCTe, tlConsSitCTe,
       tlConsStatServ, tlInutCTe, tlCTe, tlProcCTe, tlProcInutCTe, tlRetAtuCadEmiDFe,
       tlRetCancCTe, tlRetConsCad, tlRetConsReciCTe, tlRetConsStatServ, tlRetConsSitCTe,
       tlRetEnvCTe, tlRetInutCTe, tlEnvCTe, tlProcCancCTe, tlConsStatServCTe, tlEnvCCeNFe,
       tlEnvEventoNFe, tlConsNFeDest, tlDownloadNFe{, tlProcMDFe}]);
end;

function StrToTipoLayout(var ok: boolean; const s: string): TpcnTipoLayout;
begin
  result := StrToEnumerado(ok, s, ['AtuCadEmiDFe', 'CadEmiDFe', 'CancNFe', 'ConsCad',
                                   'ConsReciNFe', 'ConsSitNFe', 'ConsStatServ', 'InutNFe',
                                   'NFe', 'ProcNFe', 'ProcInutNFe', 'RetAtuCadEmiDFe',
                                   'RetCancNFe', 'RetConsCad', 'RetConsReciNFe', 'RetConsStatServ',
                                   'RetConsSitNFe', 'RetEnvNFe', 'RetInutNFe', 'EnvNFe',
                                   'ConsStatServ', 'EnvCCeNFe', 'EnvEventoNFe',
                                   'ConsNFeDest', 'DownloadNFe'{, 'ProcMDFe'}],
      [tlAtuCadEmiDFe, tlCadEmiDFe, tlCancCTe, tlConsCad, tlConsReciCTe, tlConsSitCTe,
       tlConsStatServ, tlInutCTe, tlCTe, tlProcCTe, tlProcInutCTe, tlRetAtuCadEmiDFe,
       tlRetCancCTe, tlRetConsCad, tlRetConsReciCTe, tlRetConsStatServ, tlRetConsSitCTe,
       tlRetEnvCTe, tlRetInutCTe, tlEnvCTe, tlConsStatServCTe, tlEnvCCeNFe, tlEnvEventoNFe,
       tlConsNFeDest, tlDownloadNFe{, tlProcMDFe}]);
end;

Library paths : ACBr\Fontes\PCNComum - OK

Por enquanto vou deixar assim, se alguém tiver alguma outra dica, é bem vinda.

Abraços,

 

pcnConversao.png

Rodrigo ®¿®

Curitiba-PR

Postado

Nós apagamos tudo do antigo... todas bpls. fontes...etc...

Veja se dentro do pcnValidador.pas seu não tem 'TpcnSchema', para onde ele aponta?

Na última versão do pcnValidador tem a referência a TpcnSchema, isso que não entendo ! :(

Rodrigo ®¿®

Curitiba-PR

Postado

Resolvido,

Agora que o Italo comentou, fui verificar as referencias(uses) e não estava usando o pcnValidador.

Voltei o fonte original do SVN.

Removi do uses o pcnValidador

Obrigado Italo e Juliomar  !!!!

Valeu Tiago

 

Rodrigo ®¿®

Curitiba-PR

Postado

Estou tendo problemas com a instalação do ACBrCTe no qual está resultando esse erro: 

C:\Programacao\Delphi\Componentes\ACBr\Fontes\ACBrDFe\ACBrCTe\PCNCTe\pcteCTe_V104.inc(168) Error: Undeclared identifier: 'TpcnSchema'
C:\Programacao\Delphi\Componentes\ACBr\Fontes\ACBrDFe\ACBrCTe\PCNCTe\pcteCTe_V104.inc(1174) Error: Undeclared identifier: 'UnidMed'
C:\Programacao\Delphi\Componentes\ACBr\Fontes\ACBrDFe\ACBrCTe\ACBrCTeWebServices.pas(49) Fatal: Could not compile used unit '..\..\..\..\Fontes\ACBrDFe\ACBrCTe\PCNCTe\pcteCTe.pas'

 

Estou utilizando Delphi7 + Win7.. caso eu não marque o CTe o instalador do Trunk2 funciona perfeitamente! 

Mesmo instalamento o CTe manualmente obtenho o mesmo erro.

 

Alguém já passou por isso ou sabe como resolver?

  • 4 anos depois...
  • Moderadores
Postado
5 horas atrás, mauriciodeoliveirasouza@ya disse:

Quem já passou por esse erro: [dcc32 Error] ACBr.pcnConversao.Helper.pas(1091): E2003 Undeclared identifier: 'StrToTpEvento'

Essa unit não faz parte do projeto ACBr portanto deverá verificar o código de onde pegou ou se fez verifique se as uses necessárias estão declaradas nela

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

Postado
16 horas atrás, Juliomar Marchetti disse:

Essa unit não faz parte do projeto ACBr portanto deverá verificar o código de onde pegou ou se fez verifique se as uses necessárias estão declaradas nela

 

16 horas atrás, Juliomar Marchetti disse:

Essa unit não faz parte do projeto ACBr portanto deverá verificar o código de onde pegou ou se fez verifique se as uses necessárias estão declaradas nela

Estão declaradas sim, isso aconteceu  depois que atualizei o ACBR, Mas, já limpei a instalação e refiz a instalação com a nova atualização e mesmo assim, continuou esse erro.em relação pcnConversao.pas.

  • Este tópico foi criado há 1770 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.