pis /confis

[Sergio Sartori]

Boa tarde a todos.

Pessoal estou com problema para mudar cst do pis e cofins.

 

 

-<PIS>
-<PISAliq>

<CST>01</CST>

<vBC>0.00</vBC>

<pPIS>0.0000</pPIS>

<vPIS>0.00</vPIS>

</PISAliq>

</PIS>

-<COFINS>
-<COFINSAliq>

<CST>01</CST>

<vBC>0.00</vBC>

<pCOFINS>0.0000</pCOFINS>

<vCOFINS>0.00</vCOFINS>

</COFINSAliq>

</COFINS>

</imposto>

 

esta saindo no xml como esta acima empresa optante pelo simples nacional    cst 01 tanto pis/cofins, preciso mudar a cst para 49

quando colo esta rotina da erro  no envio.

 

se não colocar nenhuma rotina ai sai como esta acima no xml, e funciona normal, porem se eu colocar a rotina a baixo da erro no enviao

 

          Imposto.PIS.CST       := Variant(DMNFE.cdsNfe_itensPIS_CST.AssTring);  que é = '49'
          Imposto.PIS.vBC       := DMNFE.cdsNfe_itensVPROD.Asfloat;
          Imposto.PIS.pPIS      := DMNFE.cdsNfe_itensPIS_PPIS.Asfloat;
          Imposto.PIS.vPIS      := DMNFE.cdsNfe_itensPIS_VPIS.Asfloat;

 

        alguem sabe como posso resolver esse problema ?  alguem tem um exemplo, como implementar de forma correta essa rotina?

  desde já agradeço a atenção. 

 

[BigWings]

15 minutos atrás, Sergio Sartori disse:

          Imposto.PIS.CST       := Variant(DMNFE.cdsNfe_itensPIS_CST.AssTring);  que é = '49'

A propriedade CST é um enumerado, você pode fazer assim:

Imposto.PIS.CST := StrToCSTPIS(ok, DMNFE.cdsNfe_itensPIS_CST.AssTring);

 

[Sergio Sartori]

BigWings 

obrigado por responder.

Imposto.PIS.CST := StrToCSTPIS(ok, DMNFE.cdsNfe_itensPIS_CST.AssTring);

só que quando compilo da erro, função absoleta.

[BigWings]

17 horas atrás, Sergio Sartori disse:

só que quando compilo da erro, função absoleta.

Não entendi qual o erro...

Você declarou a pcnConversao no uses da sua unit?

[Sergio Sartori]

Obrigado finalizado

Editado 8 Julho, 2020 por Sergio Sartori

[BigWings]

Obrigado por reportar.

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