Ir para conteúdo
  • Cadastre-se

dev botao

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

Recommended Posts

Ola, estou implantando o calculo de Fundo de combate a pobreza na meu NFCe, estou seguindo o exemplo do ACBRNFCe/NFe, e esta me retornando um erro.

segue abaixo meu codigo, e o print do erro que me retorna.

//codigo

with Imposto do
              begin
                vTotTrib := (Prod.vProd * qrProdNCFE.fieldbyname('ALIQNACIONAL')
                  .Value) / 100;
                total_trib := roundABNT(total_trib + vTotTrib, 2);

                // simples nacional
                if qrfilial.fieldbyname('CRT').asinteger < 3 then
                begin
                  with ICMS do
                  begin

                    if (grid.Cell[11, i].asstring = '000') then
                      CST := cst00
                    else if (grid.Cell[11, i].asstring = '010') then
                      CST := cst10
                    else if (grid.Cell[11, i].asstring = '020') then
                      CST := cst20
                    else if (grid.Cell[11, i].asstring = '030') then
                      CST := cst30
                    else if (grid.Cell[11, i].asstring = '040') then
                      CST := cst40
                    else if (grid.Cell[11, i].asstring = '050') then
                      CST := cst50
                    else if (grid.Cell[11, i].asstring = '060') then
                      CST := cst60
                    else if (grid.Cell[11, i].asstring = '070') then
                      CST := cst70
                    else if (grid.Cell[11, i].asstring = '080') then
                      CST := cst80
                    else if (grid.Cell[11, i].asstring = '090') then
                      CST := cst90;

                    if qrProdNCFE.fieldbyname('csosn').asstring = '101' then
                      ICMS.CSOSN := csosn101
                    else if qrProdNCFE.fieldbyname('csosn').asstring = '102'
                    then
                      ICMS.CSOSN := csosn102
                    else if qrProdNCFE.fieldbyname('csosn').asstring = '103'
                    then
                      ICMS.CSOSN := csosn103
                    else if qrProdNCFE.fieldbyname('csosn').asstring = '201'
                    then
                      ICMS.CSOSN := csosn201
                    else if qrProdNCFE.fieldbyname('csosn').asstring = '202'
                    then
                      ICMS.CSOSN := csosn202
                    else if qrProdNCFE.fieldbyname('csosn').asstring = '203' then
                      ICMS.CSOSN := csosn203
                    else if qrProdNCFE.fieldbyname('csosn').asstring = '300'
                    then
                      ICMS.CSOSN := csosn300
                    else if qrProdNCFE.fieldbyname('csosn').asstring = '400'
                    then
                      ICMS.CSOSN := csosn400
                    else if qrProdNCFE.fieldbyname('csosn').asstring = '500'
                    then
                      ICMS.CSOSN := csosn500
                    else if qrProdNCFE.fieldbyname('csosn').asstring = '900'
                    then
                      ICMS.CSOSN := csosn900
                    else
                      ICMS.CSOSN := csosnVazio;

                    ICMS.pCredSN := 0;
                    ICMS.vCredICMSSN := 0;

                    ICMS.orig := oeNacional;
                    ICMS.modBC := dbiValorOperacao;
                    ICMS.vBC := 0;
                    total_base := 0;
                    ICMS.pICMS := 0;
                    ICMS.vICMS := 0;
                    total_icms := 0;
                    ICMS.modBCST := dbisMargemValorAgregado;
                    ICMS.pMVAST := 0;
                    ICMS.pRedBCST := 0;
                    ICMS.vBCST := 0;
                    ICMS.pICMSST := 0;
                    ICMS.vICMSST := 0;
                    ICMS.pRedBC := 0;

-->Aqui       // partilha do ICMS e fundo de probreza
                    with ICMSUFDest do
                    begin
                     vBCUFDest      := 0.00;
                     pFCPUFDest     := 0.00;
                     pICMSUFDest    := 0.00;
                     pICMSInter     := 0.00;
                     pICMSInterPart := 0.00;
                     vFCPUFDest     := 0.00;
                     vICMSUFDest    := 0.00;
                     vICMSUFRemet   := 0.00;
                   end;

                 end;
 

  erro retornado no print.

 

desde já agradeço.

erro.png

Link para o comentário
Compartilhar em outros sites

  • Moderadores

Primeiro NFCe não gera o grupo ICMSUFDest, pois ela não acoberta transações interestaduais. Segundo, vc está com seus schemas desatualizados.

djsystem-logo.png
 youtube.png facebook.png instagram.png linkedin.png
André Ferreira de Moraes | Analista de Sistemas
www.djsystem.com.br | www.djpdv.com.br
www.tefhouse.com.br | www.lambretinha.com.br
Link para o comentário
Compartilhar em outros sites

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

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.