Ir para conteúdo
  • Cadastre-se

Leonardo Galetti

Membros
  • Total de ítens

    5
  • Registro em

  • Última visita

Tudo que Leonardo Galetti postou

  1. Então Daniel essa ideia é maravilhosa! Porém como o próprio André disse: "Apesar de alertar que cada programador deve verificar com o cliente/contador como os cálculos devem ser feitos, alguns programadores poderiam simplesmente pegar a classe e usar e quando um cliente reclamasse que os cálculos estão errados iriam querer jogar a culpa apenas no ACBr. " Alguns cablocos ai poderiam colocar a culpa no ACBr. Mas se isso não acontecesse seria o sonho para todos nós uma classe robusta que fizesse todos os cálculos. Mas já que isso provavelmente não irá acontecer eu penso assim: Existem muuuitos sistemas que emitem NF-e no Brasil e nem todos utilizam o ACBr. Se criarmos uma classe acoplada ao projeto ou até mesmo acoplada ao componente ACBr NF-e os outros programadores que utilizam FlexDocs, TecnoSpeed e outros não se beneficiariam. Por isso acho que talvez seja até melhor essa classe ser um projeto a parte. Porque assim TODOS se beneficiam dela, porque como já vimos é uma "simples" classe que deve ser adicionada ao projeto e utilizada de forma simples. Minha opinião. Obrigado. rs'
  2. Eu imaginei Régys... Porém como algumas pessoas vem procurando por essa classe nesse tópico e não encontram uma mais atualizada eu criei o repo. porque daí a minha ideia é só dizer onde está a fonte mais atualizada para que mais pessoas baixem. Claro que a ideia principal é atualizar sempre a classe porém se já deixarmos pelo menos para download e com um exemplo funcional ai as pessoas se viram em atualiza talvez adaptando para o seu caso. Em resumo rs' foi mais para distribuição da classe a minha ideia de criar o repo. Obrigado.
  3. Salve amigos do fórum. Esse é meu primeiro comentário em algum tópico. Qualquer coisa errada me avisem. Bom eu comecei a implementar a NFe na minha empresa e me deparei com esse problema dos calculos. Depois de procurar achei esse tópico li ele inteiro rs' e vi que alguns amigos disseram que iriam criar um repositorio e tals porém não criaram. Eu peguei a ultima versão que tenho aqui da classe e comecei a montar um exemplo. Infelizmente ainda não tive tempo de completar o exemplo, mas segue funcional. Eu subi os fontes em um repositório do SorceForge porém sou leigo nele, peço pra que alguem me auxilie a como fazer para que todos utilizem o SVN. Bom para baixarem e testarem a unit é a uCalcTribNF.pas que está no code. Vou deixar abaixo a rotina de como usar. Assim que eu souber como utilizar o SVN do sourceforge podemos ir melhorando a unit em grupo. SourceForge do projeto: http://sourceforge.net/projects/calculonfe/ Com usar: var lItemNF: TItemNF; FNotaFiscal: TNotaFiscal; // lDuplicataNF: TDuplicataNF; begin FNotaFiscal := TNotaFiscal.Create(Self); try lItemNF := TItemNF.Create(FNotaFiscal); FNotaFiscal.Inicializar; FNotaFiscal.ValoresNF.VL_FRETE := 0.00; FNotaFiscal.ValoresNF.VL_SEGURO := 0.00; FNotaFiscal.EmitenteNF.NomeRazaoSocial := 'Empresa Industrial Alpha Ltda'; FNotaFiscal.EmitenteNF.CRT := crtRegimeNormal; //FNotaFiscal.EmitenteNF.ALiqCSOSN := 2.2; FNotaFiscal.EmitenteNF.Estado := 'SP'; FNotaFiscal.DestinatarioNF.NomeRazaoSocial := 'Empresa Atacadista Betha Ltda'; FNotaFiscal.DestinatarioNF.CRT := crtRegimeNormal; FNotaFiscal.DestinatarioNF.Estado := 'MG'; FNotaFiscal.Observacoes.Add('operação sujeita ao regime de Substituição Tributária nos termos do Convênio ICMS nº 85/1993.'); lItemNF.Inicializar; lItemNF.Item := 2; lItemNF.CodProduto := 'PR01'; lItemNF.DescProduto := 'PNEUS NOVOS PARA AUTOMOVEL'; lItemNF.NCMSH := '4011.10.00'; lItemNF.AliqMVA := 71.28; //lItemNF.ComFrete; //lItemNF.AliqIPI := 20; lItemNF.Quantidade := 5; lItemNF.ValorUnitario := 114.40; //lItemNF.Peso := 50.00; lItemNF.CST_ICMS := cst10; //lItemNF.ReducaoICMS :=40; //lItemNF.ReducaoICMSst :=40; //lItemNF.ComFrete :=false; //lItemNF.AliquotaICMS; // lItemNF.AliquotaTRIB := //lItemNF.VL_TRIB_OP //lItemNF. //lItemNF.CSOSN := csosn201; //lItemNF.ReducaoICMS := 0; FNotaFiscal.ItensNF.Add(FNotaFiscal, lItemNF); lItemNF.Item := 3; lItemNF.CodProduto := 'PR01'; lItemNF.DescProduto := 'PNEUS NOVOS PARA AUTOMOVEL'; lItemNF.NCMSH := '4011.10.00'; lItemNF.AliqMVA := 71.28; //lItemNF.ComFrete; //lItemNF.AliqIPI := 20; lItemNF.Quantidade := 5; lItemNF.ValorUnitario := 114.40; //lItemNF.Peso := 50.00; lItemNF.CST_ICMS := cst10; //lItemNF.ReducaoICMS :=40; //lItemNF.ReducaoICMSst :=40; //lItemNF.ComFrete :=false; //lItemNF.AliquotaICMS; // lItemNF.AliquotaTRIB := //lItemNF.VL_TRIB_OP //lItemNF. //lItemNF.CSOSN := csosn201; //lItemNF.ReducaoICMS := 0; FNotaFiscal.ItensNF.Add(FNotaFiscal, lItemNF); ShowMessage( 'DE ---> ' +FNotaFiscal.EmitenteNF.Estado +' PARA ---> ' +FNotaFiscal.DestinatarioNF.Estado + #13#10 + 'VL_FRETE ---> ' + FormatCurr('###,###,##0.00', FNotaFiscal.ValoresNF.VL_FRETE) + #13#10 + 'VL_SEGURO ---> ' + FormatCurr('###,###,##0.00', FNotaFiscal.ValoresNF.VL_SEGURO) + #13#10 + 'VL_DESPACESS ---> ' + FormatCurr('###,###,##0.00', FNotaFiscal.ValoresNF.VL_DESPACESS) + #13#10 + 'VL_TOTAL_PROD---> ' + FormatCurr('###,###,##0.00', FNotaFiscal.ValoresNF.VL_TOTAL_PROD) + #13#10 + 'VL_TOTAL_NF ---> ' + FormatCurr('###,###,##0.00', FNotaFiscal.ValoresNF.VL_TOTAL_NF) + #13#10 + 'BS_ICMS ---> ' + FormatCurr('###,###,##0.00', FNotaFiscal.ValoresNF.BS_ICMS) + #13#10 + '%_ICMS ---> ' + FormatCurr('###,###,##0.00', 12) + #13#10 + 'VL_ICMS ---> ' + FormatCurr('###,###,##0.00', FNotaFiscal.ValoresNF.VL_ICMS) + #13#10 + 'BS_ICMS_ST ---> ' + FormatCurr('###,###,##0.00', FNotaFiscal.ValoresNF.BS_ICMS_ST) + #13#10 + 'VL_CREDITO_CSOSN ---> ' + FormatCurr('###,###,##0.00', FNotaFiscal.ValoresNF.VL_CREDITO_CSOSN) + #13#10 + 'VL_ICMS_ST ---> ' + FormatCurr('###,###,##0.00', FNotaFiscal.ValoresNF.VL_ICMS_ST) ); finally FreeAndNil(FNotaFiscal); end; end; Bom proveito!
  4. Muito obrigado pela respostas amigo me esclareceu e muito. Bom eu gostaria de saber mais uma coisa: Pra que tipo de enquadramento você mudou? Obrigado novamente pela resposta.
  5. Bom dia, eu sei que para fazer a homologação do software é necessário realizar um cadastro junto a Receita/PR, porém a minha dúvida é: Sou Micro Empreendedor Individual, posso me cadastrar como fornecedor de software e fazer a homologação do meu software ou preciso ser Simples Nacional para isso? Se puderem me responder fico grato.
×
×
  • 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.