Pesquisar na Comunidade
Showing results for tags 'V.APROX.TRIBUTOS'.
Encontrado 1 registro
-
Minha Duvida é vTotTrib só aceita se for o valor total da nota resultando na nfe o V.APROX.TRIBUTOS ficá 100% é para ser assim mesmo? with ICMS do //essa primeira parte e o imposto individual para para cada produto begin CST := cst10; ICMS.orig := oeNacional; ICMS.modBC := dbiValorOperacao; ICMS.vBC := DBGrid1.DataSource.DataSet.FieldByName('PrecoUnitario') .AsCurrency; ICMS.pICMS := 17; ICMS.vICMS := DBGrid1.DataSource.DataSet.FieldByName ('PrecoUnitario').AsCurrency * 17 / 100; ICMS.modBCST := dbisMargemValorAgregado; ICMS.pMVAST := 0; ICMS.pRedBCST := 0; ICMS.vBCST := 0; ICMS.pICMSST := 0; ICMS.vICMSST := 0; ICMS.pRedBC := 0; end; end; end; DBGrid1.DataSource.DataSet.Next; end; // essa parte são os impostos geral! Total.ICMSTot.vBC := StrToFloat(TiraPontos(dbTotal.Text)); Total.ICMSTot.vICMS := StrToFloat(TiraPontos(dbTotal.Text)) * 17 / 100; Total.ICMSTot.vBCST := 0; Total.ICMSTot.vST := 0; Total.ICMSTot.vProd := StrToFloat(TiraPontos(dbTotal.Text)); Total.ICMSTot.vFrete := 0; Total.ICMSTot.vSeg := 0; Total.ICMSTot.vDesc := 0; Total.ICMSTot.vII := 0; Total.ICMSTot.vIPI := 0; Total.ICMSTot.vPIS := 0; Total.ICMSTot.vCOFINS := 0; Total.ICMSTot.vOutro := 0; Total.ICMSTot.vNF := StrToFloat(TiraPontos(dbTotal.Text)); Total.ICMSTot.vTotTrib := StrToFloat(TiraPontos(dbTotal.Text)); NFe.pdf