Jump to content

click.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 click.png click.png
  • Este tópico foi criado há 1780 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 to comment
Share on other 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 to comment
Share on other sites

  • Este tópico foi criado há 1780 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.