NFe cims monofásico

[MARCOS OLIVEIRA SOUZA]

Bom dia

--  No produto oleo diesel, na nfe do distribuidor ( nfe de entrada) tem o grupo

-<imposto>
 -<ICMS>
  -<ICMS61>
   <orig>0</orig>
   <CST>61</CST>
   <qBCMonoRet>12000.0000</qBCMonoRet>  <<----
   <adRemICMSRet>0.9456</adRemICMSRet>
   <vICMSMonoRet>11347.20</vICMSMonoRet>
</ICMS61>

--- Na minha nfe de saida, produto oleo diesel  a tag assinalada acima não é 
gerada. Parece que o componente não está gerando a tag <qBCMonoRet>
quando cst igual a 61. 

-<imposto>
 -<ICMS>
  -<ICMS61>
   orig>0</orig>
   <CST>61</CST>
   <adRemICMSRet>0.9456</adRemICMSRet>
   <vICMSMonoRet>4728.00</vICMSMonoRet>
</ICMS61>

Componente e schemas, sistema compilado e recebo a rejeição :
769 = obrigatório o preenchimento da quantidade tributada retida anteriormente.

no programa está assim :

                   With Imposto do
                      Begin 
                         vTotTrib  := 0 ; //T_ImpItem ; //0 ; // lei da transparencia nos impostos
                         T_ImpNota := T_ImpNota + T_ImpItem ;
                         With ICMS do
                            Begin

                               If  (cst_nf = 61)  Then //  ICMS MONOFASICO
                                  Begin

                                     Quantidade := F_DM_NFe.CDS_NFEItens.FieldByName('INFE_Quantid').AsFloat ;
                                     vr_ICMSMonoRet  := (Quantidade * ALIQ_AD_REM)  ;

                                     T_vICMSMonoRet := T_vICMSMonoRet + vr_ICMSMonoRet ;
                                     T_qICMSMonoRet := T_qICMSMonoRet + Quantidade ;

                                     qBCMonoReten := Quantidade ;
                                     adRemICMSRet := ALIQ_AD_REM ;
                                     vICMSMonoRet := vr_ICMSMonoRet ;

                                  End ;

                            End ;  //  icms

                      End ; 

  GRATO PELA ATENÇÃO

Marcos

[BigWings]

Veja que está preenchendo a tag qBCMonoReten e não a qBCMonoRet.

[MARCOS OLIVEIRA SOUZA]

Boa tarde.

Resolvido.

Alterei a tag qBCMonoRet e continuou apresentando a mesma rejeição

em homologação. Em produção a nota foi enviada normalmente.

Obrigado.

 

 

[Alexandre de Paula]

Obrigado por reportar.

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