Ir para conteúdo
  • Cadastre-se

Rosemir

Membros
  • Total de ítens

    36
  • Registro em

  • Última visita

Últimos Visitantes

O bloco dos últimos visitantes está desativado e não está sendo visualizado por outros usuários.

Rosemir's Achievements

  1. show Italo, então está explicado, tem que ajustar quando o canhoto esta rodapé, rsss vou dar uma olhadinha sim e quando conseguir corrigir eu posto aqui novamente (inicio da semana provavelmente). por enquanto muito obrigado
  2. Oi Italo, anexo sim, até antes de te enviar, fiz mais um teste aqui, reinstalei o acbr para garantir que pegou a alteração (como expliquei acima estou com essa dificuldade), build no projeto e testei novamente, funcionou certinho, vou anexar o PDF também. ACBrCTeDACTeRLRetrato.dfm 43230748259736000105570010000359531306826125-cte.pdf
  3. Foi alterado somente o .pas Um problema que lembrei agora, venho enfrentando isso com o componente a algum tempo, é ter que reinstalar o ACBr sempre que preciso alterar alguns fontes. Talvez seja o mesmo problema seu ali.
  4. Bom dia Italo, segue em anexo 43230748259736000105570010000359531306826125-cte.xml
  5. Voltando aqui com a solução, depois de descobrir o problema, tive que batalhar aqui para achar as definições corretas para quantificar o numero de chaves de acesso a partir da segunda pagina e tive que fazer também um ajuste ao dimensionar a banda. O componentes esta fixo para adicionar 70 chaves por coluna e por página, porém, não cabe tudo isso. No máximo 58. Fiz um ajuste também onde é definido a altura dos memos "rlDocOrig_tpDoc1" e "rlDocOrig_tpDoc2", pois eles são definidos dinamicamente da seguinte forma: rlDocOrig_tpDoc1.Height := Round(rlDocOrig_tpDoc1.Lines.Count * 12); rlDocOrig_tpDoc2.Height := Round(rlDocOrig_tpDoc2.Lines.Count * 12); O que fiz foi adicionar 10 a esse calculo para ficar um pouco mais alto, ficando da seguinte forma: rlDocOrig_tpDoc1.Height := Round(rlDocOrig_tpDoc1.Lines.Count * 12) + 10; rlDocOrig_tpDoc2.Height := Round(rlDocOrig_tpDoc2.Lines.Count * 12) + 10; Fiz testes com 100, 200, 300, 400 e 500 chaves de acesso, funcionou certinho. Segue em anexo o arquivo alterado para que algum moderador possa subir para o repositório. Espero ter ajudado. ACBrCTeDACTeRLRetrato.pas
  6. Olá amigos, gostaria de trazer o problema e também a solução, porém, não consegui resolver. Enquanto continuo tentando descobrir o problema, já deixo aqui no fórum caso alguém posso tentar nos ajudar aqui. Eu tenho um CT-e com 242 chaves de acesso, autoriza tudo certinho, problema apenas quando tenta imprimir o DACT-e, ele imprime a primeira pagina corretamente, com 20 chaves de acesso (10 em cada coluna), mas imprime a segunda e terceira pagina somente com o cabeçalho (restante da pagina em branco), ai na quarta página imprimir a pagina cheia (cabeçalho e o restante com chaves de acesso), na quinta página com o que deveria ser o restante das chaves. Tenho 2 problemas: 1) imprime 2 páginas em branco com apenas o cabeçalho 2) constatei que não mostrou no DANF-e todas as chaves de acesso, faltou 10 chaves de acesso Tentei mudar algumas configurações de margem, mas o problema persiste. Vou anexar o PDF para facilitar a visualização. 43230748259736000105570010000359541007142256-cte.pdf
  7. Olá, gostaria de sugerir uma nova opção para a impressão da NFC-e, quando o componente ACBr estiver configurado para imprimir os itens em uma linha. Fiz alguns testes aqui e ficou bem legal. O motivo da minha sugestão, é porque da forma que está, só funciona bem para fonte tamanho 7, se o cliente quiser usar fonte 6 por exemplo, apenas diminui a fonte, mas não ocupa o espaço a mais que tem disponível, onde na verdade poderia estar mostrando mais caracteres na descrição do item. A ideia principal é criar no componente uma opção para configurar a quantidade de caracteres que deseja imprimir na linha, pois pode variar de acordo com o tamanho de margem e tamanho da fonte, dessa forma ficaria bem flexível. No meu caso, fiz um teste utilizando fonte 6 e esta nova configuração, utilizaria 49 caracteres. O que fiz no código fonte, além de criar o parâmetro, foi dividir a linha do item em 3 partes: 1ª parte seria o SEQ, 2ª parte vai ser o código do produto e descrição (fiz desta forma porque pode estar configurado para imprimir o código do produto ou código de barras - EAN) e na 3ª parte os valores. O SEQ no caso cai ser sempre fixo, vai utilizar 3 caracteres e 1 espaço em branco para separar. Os valores (un, qtde, valor e total), pode variar, então nessa parte, vai usar o que for necessário. E a 2ª parte, o que fica no meio, vai ocupar o que tiver de caracteres disponíveis, sendo que se ficar menor, vai preencher com brancos, para que a linha toda fique sempre com a mesma quantidade de caracteres. Veja no anexo como ficou a impressão e veja a seguir como ficou o código fonte: procedure TACBrNFeDANFCeFortesFr.FormataTextoItemParaUmaLinha(out LinhaItem: string); var UmProd: TProd; CaracteresCodigoDescricao: integer; LinhaItemSeq, LinhaItemCodigoDescricao, LinhaItemValores: string; begin UmProd := ACBrNFeDANFCeFortes.FpNFe.Det.Items[fNumItem].Prod; LinhaItemSeq := IntToStrZero(UmProd.nItem, 3) + ' '; LinhaItemValores := ' ' + ACBrNFeDANFCeFortes.FormatarQuantidade(UmProd.QCom, False) + ' ' + Trim(UmProd.uCom) + ' X ' + ACBrNFeDANFCeFortes.FormatarValorUnitario(UmProd.VUnCom) + ' ' + FormatFloatBr(UmProd.vProd); if ACBrNFeDANFCeFortes.QuantidadeCaracterLinhaItem > 0 then begin CaracteresCodigoDescricao := ACBrNFeDANFCeFortes.QuantidadeCaracterLinhaItem - Length(LinhaItemSeq) - Length(LinhaItemValores); LinhaItemCodigoDescricao := PadRight(copy(ACBrNFeDANFCeFortes.ManterCodigo(UmProd.cEAN, UmProd.cProd) + ' ' + UmProd.xProd, 1, CaracteresCodigoDescricao), CaracteresCodigoDescricao, ' '); LinhaItem := LinhaItemSeq + LinhaItemCodigoDescricao + LinhaItemValores; end else begin LinhaItem := LinhaItemSeq + ACBrNFeDANFCeFortes.ManterCodigo(UmProd.cEAN, UmProd.cProd) + ' ' + '[DesProd]' + LinhaItemValores; LinhaItem := AjustarDescricaoAteTamanhoMaximo(UmProd, LinhaItem); end; end; Seque em anexo também os fontes alterados. Agradeço se puderem avaliar a minha sugestão, lembrando que esta alteração não irá interferir em nada no que já funciona, pois por padrão a nova propriedade virá zerada e não executará o código que criei. ACBrNFeDANFEClass.pas ACBrDANFCeFortesFr.pas
  8. @EMBarbosa. agradecido, testei aqui e está tudo certo. Att. Rosemir
  9. Minha situação é a seguinte: quando realizo a impressão da DANF-e, onde no XML foi preenchida a inscrição na SUFRAMA, o próprio componente adiciona nas informações complementares o testo "INSCRIÇÃO SUFRAMA: 9999999999", porém, quando o componente coloca apenas essa informação, ao concatenar com as informações complementares do usuário, não está quebrando a linha. Percebi que na unit "ACBrNFeDANFEClass.pas", no método "ManterSuframa()", não é colocado o ponto-e-vírgula no final do texto. Aproveitei e alterei também o método "ManterProtocolo()" que resultaria no mesmo problema. Apenas adicionando o ";" no final já irá quebrar a linha, pois existe um tratamento pra isso. Segue em anexo o fonte alterado, agradeço se puderem analisar e subir a alteração. ACBrNFeDANFEClass.pas
  10. Tenho um cliente que manda fazer na gráfica uma folha personalizada, já com a logo e o destaque do canhoto "picotado". Ele utiliza a impressão em formato paisagem e utilizamos o Fortes para a impressão. Como normalmente as notas deles não ultrapassam o limite de apenas uma página, estava tudo ok para ele, porém, agora que precisou, começou a ter problemas. O que acontece na verdade é que a partir da segunda página, o canhoto não é impresso e o layout é redimensionado de tal forma que ocupe sempre toda a segunda página. Como a logo da empresa já vem impressa no papel que vem da gráfica, ela tem uma posição específica. Quando o layout vem todo para a esquerda, por não ter mais o canhoto, a impressão fica por cima da logomarca. Se a segunda página exibisse também o canhoto, resolveria o problema, mas não acho legal, pois não tem necessidade de imprimir um canhoto para cada página. Lembrando que a logo não é impressa pela impressora, vem pré-impresso da gráfica. Então, fiz uma alteração bem simples no componente, adicionando um parâmetro na unit "ACBrNFeDANFEClass.pas" chamado "ExibeCanhotoEmBrancoSegundaPagina" e na unit "ACBrNFeDANFeRLPaisagem.pas", alterei para exibir mesmo assim o panel do canhoto, mas não exibir os componentes adicionados a ele. Isto fará com que a partir da segunda página, o canhoto continuará a não ser exibido, mas manterá o espaço ocupado por ele. Talvez esta seja uma necessidade muito específica, mas talvez possa atender a mais clientes. Agradeço se puderem opinar sobre a alteração ou sugerir alguma outra alternativa. Segue em anexo fontes alterados e uma imagem de como fica a impressão sem esta minha alteração. ACBrNFeDANFEClass.pas ACBrNFeDANFeRLPaisagem.pas
  11. Obrigado pelo retorno, agora já rodando nos clientes, percebi que utilizando OpenSSL fica melhor realmente. Mas criei uma configuração para escolher entre OpenSSL e Wincrypt, fica mais flexível. Grato pela ajuda
  12. Bom dia, entendi, vou criar uma configuração em meu sistema para escolher qual utilizar, assim fica mais tranquilo do que escolher uma e deixar fixo. Muito obrigado.
  13. Antes tarde do que nunca...rssss Estou nesse momento abandonando a "capicom" para começar a utilizar a "libWinCrypt". Consegui fazer todos os procedimentos indicados, utilizando as propriedades padrão "libWinCrypt" e salvando agora o certificado digital diretamente no banco de dados. Eu utilizo o Windows 10 no meu computador, testei a consulta de status do serviço, consulta do status da NF-e, enviei, tudo funcionando certinho em ambiente de produção e homologação. Testei em outro computador também com o Windows 10 e também tudo funcionando certinho. Quando fui testar em um terceiro computador, ocorreu erros na comunicação com a SEFAZ. Testei em outros 2 computadores, um com windows 7 e o outro com windows 8.1 e os erros são os mesmos. Porém, só ocorre em ambiente de homologação. Em produção só não consegui testar o envio, mas consulta de status do serviço e consulta do status da NF-e estão funcionando. Atualizamos o Windows para ter certeza que não seria algo nesse sentido. Erro ao consultar o Status do Serviço em homologação com windows 7 ou 8.1: Erro ao enviar a NF-e em ambiente de homologação com windows 7 ou 8.1 Vou continuar meus testes e se descobrir algo posto aqui novamente. Desde já agradeço qualquer ajuda dos colegas do fórum.
  14. Exatamente, onde consta isso no manual? É fácil falar que está lá e mandar os outros procurarem, se achar achou, kkkk. No meu caso é igual ao seu exemplo, o cliente é do mesmo estado e mandou entregar a mercadoria em uma obra em outro estado, mas não necessariamente precisa ser uma construtora, a empresa pode estar construindo uma filial naquele estado, por exemplo. Mas claro que poderia ser este outro exemplo do depósito. A principio a única forma encontrada, seria emitir com CFOP iniciado em 5 e mandar a mercadoria normalmente para o outro estado com esta nota, mas ainda tenho que ver a questão do MDF-e se não vai dar problema, mas pelo que lembro não tem validação quanto a isso. sim, essa é a única forma que encontramos por enquanto, emite com CFOP iniciado em 5 e manda essa nota para o outro estado, mesmo que o transporte da mercadoria seja interestadual.
×
×
  • 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.