Incompatible Types: 'tpcntipoemissao' And 'tnfsetemissao'

[Infoel]

Depois que atualizei o Acbr no último sábado, o Delphi 7 passou a notificar o seguinte erro:

 

"Incompatible Types: 'tpcntipoemissao' And 'tnfsetemissao'"

na linha:

ACBrNFe1.Configuracoes.Geral.FormaEmissao:=teNormal;

 

Usamos o mesmo formulário para gerar tanto NFe como NFSe.

 

O que faço para resolver?

[Juliomar Marchetti]

terá problemas pois pelo que percebi está usando o mesmo nome

para o tipo

[Infoel]

Juliomar,

O problema é que está se usando o mesmo nome (teNormal) para tipos diferentes:

 

na unit pcnConversao

  TpcnTipoEmissao = (teNormal, teContingencia, teSCAN, teDPEC, teFSDA, teSVCAN, teSVCRS, teSVCSP, teOffLine);

 

na unit pnfsConversao

  TnfseTEmissao = ( TeNormal, TeContigencia );

 

Como declarei as duas units na clausua "uses" está dando esse erro

na linha 

ACBrNFe1.Configuracoes.Geral.FormaEmissao:=teNormal;

Incompatible Types: 'tpcntipoemissao' And 'tnfsetemissao

[Cesar Balbinott]

Estou com o mesmo problema, alguém conseguiu resolver?

[Juliomar Marchetti]

Boa noite!

ao criar não foi tomado o devido cuidado para não criar tipagens iguais!

agora tente inverter a ordem das uses quem sabe já resolve!

[ALA]

Senhores, para resolver este problema alterei a

na unit pnfsConversao

  TnfseTEmissao = ( TeNormal, TeContigencia );

para

na unit pnfsConversao

  TnfseTEmissao = ( TeNormalNFSe, TeContigenciaNFSe );

[Italo Giurizzato Junior]

Bom dia a todos,

 

Favor atualizar os fontes e testar novamente.

 

Fiz a alteração proposta pelo nosso colega ALA.