Ir para conteúdo
  • Cadastre-se

Ricardo Rohde

Membros
  • Total de ítens

    210
  • Registro em

  • Última visita

Tudo que Ricardo Rohde postou

  1. NFE nao tem como descontar, por vai dar erro total da nota difere do somatorio dos valores
  2. ate onde entendi a tabela é federal, nao tem nada de alíquota do municipio nao (exceto do iss) o calculo é o q o @rofresi postou mesmo... BC * % da tabela (segmento do orgao)
  3. Pessoal me tira uma dúvida pfr Na retenção do iRR na NFE, minha dúvida é a seguinte o valor retido além de alimentar as tags correspondente e destacar nas observações complementares, deve-se descontar do valor total da NF???
  4. veja a autenticacao em duas etapas.. veja tb o acesso menos seguro
  5. verifica as configuraões dos protocolos nas opções de internet, lembrando q o w7 precisa estar com o Service pack 1 instalado Configuração do Protocolo no Internet Explorer Marque as opções no internet explorer, aba Avancadas, : ✔Não salvar páginas criptografadas em disco; ✔Usar SSL 3.0; ✔Usar TLS 1.0; ✔Usar TLS 1.2; Desmarque as opções caso tenha ou estejam marcadas: Usar SSL 2.0; Usar TLS 1.1; faz um teste ai
  6. fuja disso... usa a api do receitaws..
  7. já... foi feito tudo isso q vc disse, e antes de vir aqui, ja tinha feito... os valores só se ajustam mudando o fonte...
  8. o token é pra vc consultar a api deles vc tem q fazer +- isso te dar um pequeno passo UrlConsulta := 'https://apidoni.ibpt.org.br/api/v1/produtos' + '?token=' + Self.AjustaParam(FToken) + '&cnpj=' + Self.AjustaParam(OnlyNumber(FCNPJEmpresa)) + '&codigo=' + Self.AjustaParam(ANCM) + '&uf=' + Self.AjustaParam(AUF) + '&ex=' + Self.AjustaParam(IntToStr(AExcecao)) + '&descricao=' + Self.AjustaParam(ADescricaoProduto) + '&unidadeMedida=' + Self.AjustaParam(AUnidadeMedida) + '&valor=' + Self.AjustaParam(FloatToString(AValorUnitario, '.', '0.##')) + '&gtin=' + Self.AjustaParam(AGtin); // parâmetros opcionais if Trim(ACodigoProprio) <> '' then UrlConsulta := UrlConsulta + '&codigoInterno=' + Self.AjustaParam(ACodigoProprio); // enviar consulta Self.HTTPGet(TraduzStrToAnsi(UrlConsulta)); // retorno em JSON Result.JSON := TraduzStrToAnsi(Self.RespHTTP.Text);
  9. Hmm, vc setou alguma propriedade pra tirar o "espaço em branco"?
  10. Quais delas?? esse q vc citou do espaço grande no final nem me preocupo... mas se tiver como reduzir.. seria melhor.. até pq diminuiria o pdf
  11. ja feito e sem sucesso. só procuro o forum qdo minhas alternativas acabam Será mesmo? Será q todo mundo gera PDF e anexa ao email qdo emite a nota? Ou só manda o xml? Será q todos abrem e olham? É um detalhe tão imperceptivel... q nem se nota q o valor total nao aparece
  12. Xará, Mudei o seguinte no mLinhaTotalItem, alterei o Alignment de taRightJustify para taCenter ((( Na procedure FormataTextoItemParaNormal (linha 699) Mudei de: LinhaTotal := TDFeReportFortes.EspacejarTextoGrafico(LinhaTotal, mLinhaTotalItem.Width - 10, mLinhaTotalItem.Font); Para: LinhaTotal := TDFeReportFortes.EspacejarTextoGrafico(LinhaTotal, mLinhaTotalItem.Width - 50, mLinhaTotalItem.Font); Problema se resolve... qual impacto ocasionaria nos demais?! Aqui, com essa alteração não mudou mais nada além desse problema. Danfce := TACBrNFeDANFCeFortes.Create(nil); Danfce.MargemInferior := 8; Danfce.MargemSuperior := 8; Danfce.MargemEsquerda := 1; Danfce.MargemDireita := 5; Danfce.ImprimeQRCodeLateral := True; Danfce.ImprimeLogoLateral := True; Danfce.LarguraBobina := 280; Danfce.ImprimeEmUmaLinha := False; Danfce.ExibeInforAdicProduto:= infNenhum;
  13. eu coloquei em produção uma versão aqui, antes de chamar print ou preview seto o SetRoundMode(rmNearest); vamos ver se faz diferença
  14. @André Ferreira de Moraes, sat não é minha área.. mas me parece q a MotivoInvalidoVenda da AcbrSat.pas não contem todos os códigos de erro.
  15. fala Ricardo, já está tudo certinho, é só no geraPdf q da esse pau do boleto, vou usar o SetRoundMode(rmNearest); antes de imprimir, conforme visto no outro tópico q eu havia "abandonado"
  16. estou com o erro acima... assim como este a baixo q gera linhas tortas q me atormenta e não sei o que fazer
  17. Utilizo o seguinte comando para gerar o PDF da NFC-e ACBrNFe1.DANFE.ImprimirDANFEPDF o pdf Gerado está bugando a linha onde aparece a quantidade x vlr un x vlr total na pre visualização e impressão na bobina estão ok!!!! já mexi nas margens e não surge efeito. segue print Danfce := TACBrNFeDANFCeFortes.Create(nil); Danfce.MargemInferior := 8; Danfce.MargemSuperior := 8; Danfce.MargemEsquerda := 1; Danfce.MargemDireita := 5; Danfce.ImprimeQRCodeLateral := True; Danfce.ImprimeLogoLateral := True; Danfce.LarguraBobina := CfgLocal.LargBobinaNFCE; já usei 280 a 302 Danfce.ImprimeEmUmaLinha := False; Danfce.ExibeInforAdicProduto:= infNenhum; ACBrNFe1.DANFE := Danfce;
  18. olá, vc ja tem algo pronto ou necessita de desenvolvimento? qual seria o valor?
  19. veja se te ajuda http://www.activedelphi.com.br/forum/viewtopic.php?t=95064&sid=c6e1a688cb43a0d3dc4b39ea6631b5b3
  20. pague o plano > prata e tenha consulta "real" ~´e dificil, a receita muda direto o site
  21. Olá, Eu utilizo os csv disponibilizado pelo acbr e não tive problema algum.
  22. existe, mas vc tem q pagar https://www.loja.serpro.gov.br/consultacnpj qto ao delay da api ali, vale lembrar que dados das empresas não mudam constantemente. já o site ridículo da receita muda constantemente
  23. cara fuja dessa m@@@@@@.. faz consulta pela api da receitaws
×
×
  • 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.