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.

The popup will be closed in 10 segundos...
The popup will be closed in 10 segundos...