Jump to content

Nova Loja Oficial
loja.projetoacbr.com.br
Ajude o projeto a crescer, com estilo

Comprar

Balança SM100 performance surpreendente

Tecnologia Japonesa   Teclado e Visor resistentes a água
Consumo inteligente de etiquetas   Baixo custo de manutenção
Comunicação Ethernet e WIFI independentes

Saiba mais

Impressora de Etiquetas ELGIN - L42 PRO

Protocolos PPLA, PPLB, ZPL, EPL (automático)
Porta USB padrão Opcionais: Ethernet, Serial, Paralela
Sensor de Etiquetas Móvel Garantia de 18 meses

Saiba mais

Desenvolvedor.

ANSWERED erro ao converte variavel string sped fiscal

Recommended Posts

boa tarde estou tendo problema ao converter uma variavel de string para TacbrCstIPI

 

o curioso é que fiz a mesma variavel para o sped contribuições e converteu sem erro 

 

 

CST_Pis := StrToCstPis(CstPis);

[dcc32 Error] USpedFiscal.pas(3413): E2010 Incompatible types: 'string' and 'TACBrCstpis'

o curioso que fiz o mesmo procedimento para o sped contribuições e não apresentou erro , então observei que as funções  tem declarações diferente coloquei as duas para melhor entender

 

mas preciso usar a função de conversão , o que faço para não apresentar erro ?

 

 

grato 

 

 

função do sped fiscal 


function StrToCstPis(const AValue: string): TACBrCstPis;
var
   ifor: Integer;
begin
 Result := stpisNenhum;
   for ifor := 0 to High(CstPis) do
   begin
      if AValue = CstPis[ifor] then
      begin
         Result := TACBrCstPis( ifor );
         Break;
      end;
   end;
end;

 

 

função do sped contribuiçoes 

function StrToCstPis(AValue: String): TACBrCstPis;
var
   ifor: Integer;
begin
 Result := stpisNenhum;
   for ifor := 0 to High(CstPis) do
   begin
      if AValue = CstPis[ifor] then
      begin
         Result := TACBrCstPis( ifor );
         Break;
      end;
   end;
end;

Share this post


Link to post
Share on other sites
Em 30/04/2018 at 16:31, Desenvolvedor. disse:

pode deixar , observei que não preciso converter o cst_pis

 

grato 

 

obrigado pelo retorno.


[]'s

Consultor SAC ACBr

Elton
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...