Jump to content

logo_acbr_paygo.png

TEF ACBr PayGo
Seja um revendedor e ofereça uma solução completa para seu cliente.


Saiba mais

beneficios.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png click.png click.png

ICMSOutrasUF - Não preenche a TAG


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

Recommended Posts

Boa tarde,

estou tentando fazer um CTE e preencher a TAG ICMSOutrasUF,

porem a tag não está aparecendo no XML. Será que preciso fazer alguma

configuração? Ou basta preencher os valores no componente?

Segue o código abaixo.

       case dm.cdsGil_Mes.FieldByName( 'me_cst1' ).AsInteger of
        00:  begin
             Imp.ICMS.SituTrib      := cst00;
             Imp.ICMS.ICMS00.CST    := cst00; // Tributação Normal ICMS
             Imp.ICMS.ICMS00.vBC    := dm.cdsGil_Mes.FieldByName( 'me_vlr_base_calc_icms' ).asFloat;
             Imp.ICMS.ICMS00.pICMS  := dm.cdsGil_Mes.FieldByName( 'me_aliq_icms'          ).asFloat;
             Imp.ICMS.ICMS00.vICMS  := dm.cdsGil_Mes.FieldByName( 'me_vlr_icms'           ).asFloat;
             end;
        20:  begin
             Imp.ICMS.SituTrib      := cst20;
             Imp.ICMS.ICMS20.CST    := cst20; // Tributação com BC reduzida do ICMS
             Imp.ICMS.ICMS20.pRedBC := 0.00;  // RoundTo(DM_CNT.Conhec2ReducaoICMS.AsFloat, -2);
             Imp.ICMS.ICMS20.vBC    := dm.cdsGil_Mes.FieldByName( 'me_vlr_base_calc_icms' ).asFloat;
             Imp.ICMS.ICMS20.pICMS  := dm.cdsGil_Mes.FieldByName( 'me_aliq_icms'          ).asFloat;
             Imp.ICMS.ICMS20.vICMS  := dm.cdsGil_Mes.FieldByName( 'me_vlr_icms'           ).asFloat;
             end;
        40:  begin
             Imp.ICMS.SituTrib      := cst40;
             Imp.ICMS.ICMS45.CST    := cst40; // ICMS Isento
             end;
        41:  begin
             Imp.ICMS.SituTrib      := cst41;
             Imp.ICMS.ICMS45.CST    := cst41; // ICMS não Tributada
             end;
        51:  begin
             Imp.ICMS.SituTrib      := cst51;
             Imp.ICMS.ICMS45.CST    := cst51; // ICMS diferido
             end;
        90:  begin
             Imp.ICMS.SituTrib      := cst90;
             Imp.ICMS.ICMS90.CST    := cst90; // ICMS Outros
             Imp.ICMS.ICMS90.pRedBC := 0.00;  // RoundTo(DM_CNT.Conhec2ReducaoICMS.AsFloat, -2);
             Imp.ICMS.ICMS90.vBC    := dm.cdsGil_Mes.FieldByName( 'me_vlr_base_calc_icms' ).asFloat;
             Imp.ICMS.ICMS90.pICMS  := dm.cdsGil_Mes.FieldByName( 'me_aliq_icms'          ).asFloat;
             Imp.ICMS.ICMS90.vICMS  := dm.cdsGil_Mes.FieldByName( 'me_vlr_icms'           ).asFloat;
             Imp.ICMS.ICMS90.vCred  := 0.00;  // RoundTo(DM_CNT.Conhec2CreditoICMS.AsFloat, -2);
             end;

        end;


        if   rem.enderReme.UF <> emit.enderEmit.UF
        then begin
             imp.ICMS.ICMSOutraUF.CST           := cstICMSOutraUF;
             imp.ICMS.ICMSOutraUF.pRedBCOutraUF := 0;
             imp.ICMS.ICMSOutraUF.vBCOutraUF    := dm.cdsGil_Mes.FieldByName( 'me_vlr_base_calc_icms' ).asFloat;
             imp.ICMS.ICMSOutraUF.pICMSOutraUF  := dm.cdsGil_Mes.FieldByName( 'me_aliq_icms'          ).asFloat;
             imp.ICMS.ICMSOutraUF.vICMSOutraUF  := dm.cdsGil_Mes.FieldByName( 'me_vlr_icms'           ).asFloat;
             end;

 

 

Desde já,

Obrigado.

Atenciosamente,

 

Gabriel Monteiro Rezende

Link to comment
Share on other sites

  • Consultores

Boa tarde Gabriel,

Inclua dentro do seu IF a seguinte linha:

Imp.ICMS.SituTrib := cstICMSOutraUF;

Consultor SAC ACBr Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Link to comment
Share on other sites

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

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...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.