Jump to content

dia-do-acbr-online.png

.Promoção do Suporte ACBr:
Ganhe o Curso Migração e Modernização de Aplicações Legadas

Saiba Mais


RAFAEL_E_ANGELO3.png

logo_acbr_paygo.png

TEF ACBr PayGo
Seja um revendedor e ofereça uma solução completa para seu cliente.


botao.png

beneficios.png

Marcelo Bill

Membros
  • Content Count

    411
  • Joined

  • Last visited

  • Days Won

    1

Everything posted by Marcelo Bill

  1. Italo e demais Peço mais vez ajuda pra tentar implantar a minha NFSe Já configurei tudo que podia e que não podia, já tentei seguir o que voce me disse anteriormente mas continuo tendo o problema com esse erro URL não definida para :TNFSeGerarNFSe Meu provedor é SIAPNet, voce até já adicionou ele no Cidades.INI e tudo mais. Infelizmente estou patinando no gelo. Essas são as configurações do DataModule +--------------------------------------------------------------- With acbrNFSe.Configuracoes.Certificados do begin NumeroSerie :=dm.EmpresaCERTIFICA
  2. Daniel Eu de vorta ACBrETQPPLa.pas (Perfeito) não precisa mexer em nada, está funcionando corretamente no caso do Milimetro. agora eu determino 5,5 por exemplo e está sendo impresso à 5mm da esquerda e a 5mm do topo, perfeito. A única mudança mesmo é na ZPLII conforme post anterior. Espero que isso não se altere mais, já estou corrigindo meus modelos de etiqueta conforme essas configurações. Agora chega neh. das 8:00 as 1:08 da madrugada só vendo etiqueta, aja.. abraço a todos
  3. Daniel Ebaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa Alterei a ComandoUnidade da ACBrETQZPLII.pas function TACBrETQZplII.ComandoUnidade: AnsiString; var a: Char; begin case Unidade of etqDots : a := 'd'; etqPolegadas : a := 'i'; else a := 'm'; end; // Result := '^MU'+a; //Result := ''; // Todos os comandos são convertidos para etqDots; end; e Removi todas as ConverterUnidade existente. (Bingo) problema resolvido na ZPLII Basta utilizar as medidas como antigamente era naquelas folhas quadriculadas onde a gente
  4. Daniel Mais um detalhe, voltei no tempo ACBr/AC (antes de Cristo) Eu usava dessa forma. zmemo.Lines.Add('^XA'); zmemo.Lines.Add('^MUm'); zmemo.Lines.Add('^LH1,1'); zmemo.Lines.Add('^FT3,3^A0N,3,3^FD'+LeftStr(dm.EmpresaFANTASIA.AsString,10)+'^FS'); zmemo.Lines.Add('^FT3,3^A0N,3,3^FD'+vCodigo+'^FS'); zmemo.Lines.Add('^FT1,4^AON5,5^FD'+vDescricao1+'^FS'); zmemo.Lines.Add('^FT1,6^AON1,5^FD'+vDescricao2+'^FS'); zmemo.Lines.Add('^FT1,8^AON1,5^FD'+vDescricao3+'^FS'); zmemo.Lines.Add('^FT1,10^AON1,5^FD'+'Original :'+vOriginal+'^FS');
  5. Daniel Me desculpa por não ser um gênio e não ter capacidade corrigir o problema no componente. A única coisa que posso dizer pra ajudar é que aparentemente o problema está ACBrETQClass.ConverterUnidade (entre calculos) que reflete diretamente em ACBrETQZPLII.ComandoCoordenadas assim como existe a diferença quando determino 3mm da esquerda e ela imprime a 10mm, existe também a definição da largura da etiqueta, pq se voce perceber na figura2, a segunda etiqueta lateral sai totalmente em branco, quando deveria ser preenchida conforme minha impressão. Sendo assim, em todas as
  6. desculpa disse 60,60 quando deveria dizer 3,3 pelo que entendi voce determinou que seria 3mm da esquerda e 3mm do topo no caso do Biscoito, o que mesmo assim da essa diferença grande
  7. Daniel Veja se entende o que estou fazendo Figura1: Largura de cada Etiqueta 50mm 2 Colunas Largura entre as etiquetas 3mm Codigo=Config do Campo Codigo que convertendo seria ImprimirTexto(ONormal, Fonte, FonteH, FonteV, LinhaV(mm), ColunaH(mm), CODIGO, 0); Figura2: Assim vou mostrar que mesmo colocando na Linha(1), Coluna(2), ele dá uma diferença de 7mm Figura3: Com aquelas conversões eu consigo fazer isso, mas não etá seguro, varia muito se eu mexer em tamanho, espaços etc. Figura4: Usando o Demo, voce mandou na Linha(60), Coluna(60), o que na realidad
  8. Daniel Perai. depois que atualizei o componente todo, agora, o Demo está dando sinal de vida. Tá meio grandão as fontes mas vou verificar agora tudo denovo. De volta a novos testes. Assim que terminar eu grito abraço
  9. Guenta ai Atualizei o componente e da dando um erro Fortes D:\CD\ACBr\trunk2\Fontes\ACBrDFe\ACBrNFe\DANFE\NFCe\Fortes\ACBrDANFCeFortesFr.pas(1371) Error: Undeclared identifier: 'UnlimitedHeight' vou tentar descobrir. Reinstalar o componente e testar o Demo novamente
  10. Bom dia aTodos Daniel Me perdoe na demora da resposta. Estive meio acamado. hoje estou testando aquela ACBrSerial.zip que voce postou aqui e disse inclusive que o demo também estava corrigido de acordo com o teste online da ZPLII. Putz, agora ferrou de vez. não testei ainda a PPLA. Com relação a impressora Zebra S4M, digo que ela realmente não é compativel com EPL2 em nenhuma das resoluções. Fiz o teste com o proprio Demo. ZPLII pra conseguir imprimir alguma coisa, tive que criar variaveis de fator de multiplicação pra chegar no milimetro desejado. Exe
  11. Boa noite Daniel Só lembrando, eu estou com uma S4M da zebra aqui comigo, ganhei mais uma semana pra ficar com ela. Se te interessar, posso ir até Tatui e levar a impressora pra voce testar o que precisar... O que voce acha ? O único problema é que não posso deixar a impressora com voce, no máximo, posso levar, deixar ai com voce durante o dia todo, dormirei em Tatui e no dia seguinte talvez o dia todo também. Digo isso porque estou no Vale do Paraíba a 300km. Estou a sua disposição. Se concordar com isso, na terça-feira dia 30 estarei ai. abraço
  12. Oia eu mais uma vez Esquece tudo ACBrDownload Funciona perfeitamente, acho que foi apenas uma confusão no preenchimento das propriedades. Vou deixar claro aqui procedure TFormulario.acao_Baixar_SchemasExecute(Sender: TObject); Try With Baixar do begin Protocolo :=protHTTP; DownloadDest :='c:\pasta_para_destino_do_arquivo_que será_baixado'; DownloadNomeArq :='nome_do_arquivo_no_site.rar'; DownloadUrl :='https://www.dominio.com.br/pasta/subpasta/nome_do_arquivo_no_site.rar'; StartDownload; end; Except
  13. Daniel Obrigado pela dica do HTTPSend. Testei aqui, funciona bonitinho, mas não tem controle de progresso. Fiz var arquivo:TStringlist; begin with THTTPSend.Create do begin HTTPMethod('GET','https://www.dominio.com.br/pasta/subpastaadmgeral.txt'); arquivo:=TStringlist.Create; arquivo.LoadFromStream(Document); arquivo.SaveToFile('d:\delphi\aplicacao\admgeral.txt'); end; end;
  14. Daniel obrigado por responder, já imaginava isso, diante de algumas perguntas no forum e sem respostas. Tudo bem posso tentar usar a Synapse, só tem uma situação. Até semana passada, meu site estava num provedor HTTP:// ai troquei o provedor e nesse novo, por conta do meu projeto, meu site passará a ficar no modo seguro HTTPS:// Já tentei com o acbrDownload, IdHTTP e ambos me trazem um erro de OIHandler Invalid ISS, algo do tipo. já adicionei o IOHandle mas não tenho conhecimento suficiente para configura-lo, pois, depois de adicionar, o erro passou a ser falta de DLL. Entã
  15. Pessoal Uso D7, estou tentando fazer uso do ACBrDownload, pelo que vi nos posts anteriores, está com o mesmo problema. Meu ACBr foi atualizado em 18/01/2018 Ele executa rapidinho, cria o arquivo Exemplo: Arquivo.rar.part e não executa nada quando ligado a barras de progresso, alem de travar a aplicação. Testei no ACBrDownload Demo, e dá exatamente o mesmo problema. alguem já passou por isso ?
  16. Ultimo detalhe, em relação a posição Vertical (linha) está perfeito, se informo que quero que seja impresso a 2mm do topo ele corresponde, com relação Horizontal, se informo que quero que seja impresso a 6mm da Esq, ele imprime a 12mm, ou seja, ele ta dobrando a medida. Fiz a gambiarra e dividi por 2 todas as informações que se referem a medida horizontal. Isso inclui todos os tipos que envolvem essa medida. Mas não vou disponibilizar minha aplicação dessa forma, vou aguardar suas possíveis correções. Se não conseguirmos fazer funcionar onde mm vale mm, então manteremos as RTIs (Recurso T
  17. Daniel boa tarde É o seguinte, depois muito testes, cheguei a conclusão em relação a AcbrEtqZplII.Pas: a- Melhor resolução para Zebra ZPLII é 600 dpi, pois as demais, o componente não consegue acompanhar a qualidade principalmente no tange o código de barras; b- Nessa resolução, a etqMilimetros funciona adequadamente, já nas demais resoluções, se voce define 1 mm ela não corresponde na impressão; c- Conforme o último post, não consegui resolver, a solução foi desabilitar, voce seria mais capaz do que eu pra pensar nesse caso (obs*) obs*: o acbrEtq tem duas funções ImprimirT
  18. Daniel boa tarde É o seguinte, depois muito testes, cheguei a conclusão: a- Melhor resolução para Zebra ZPLII é 600 dpi, pois as demais, o componente não consegue acompanhar a qualidade principalmente no tange o código de barras; b- Nessa resolução, a etqMilimetros funciona adequadamente, já nas demais resoluções, se voce define 1 mm ela não corresponde na impressão; c- Conforme o último post, não consegui resolver, a solução foi desabilitar, voce seria mais capaz do que eu pra pensar nesse caso (obs*) obs*: o acbrEtq tem duas funções ImprimirTexto, uma recebe Fonte:Integer
  19. Daniel boa noite. Encontrei a primeira divergência no acbrETQZPLII.pas Em TacbrETQZPLII.ComandoFonte Voce está bloqueando a funcionalidade criando uma Exception onde Caso o cFonte não esteja dentro de ['0'..'9','A'..'Z'] Porem, no AcbrETQ.ImprimirTexto voce está mandando, quando a fonte for >=10, cFonte := Chr(55+Fonte) //'A'..'Z' Bom, se usei uma fonte 15 por exemplo, o cFonte teria o resultado de Chr(55+15)= Chr(70) = 'F', ou seja, está dentro de A..Z, mas não entendi porque a Excepion foi disparada; Então eu desabilitei as linhas if
  20. Oxi, ajudou e muito. Vou estudar tudo e todas as opções com relação a Gerar e EnviarSincrono, a ideia é que possamos enviar e já imediatamente receber o OK da Prefeitura assim como na NF-e Muito obrigado Ítalo, espero que eu consiga andar com minhas próprias pernas depois dessa Aula.
  21. Meu Deus. Não sei mais o que faço. Já fiz aparecer todos os dados do prestador, preenchi a tags do PrestadorDeServiços, a nota ta sendo impressa bonitinha, mas na hora de enviar continua a mesma coisa o mesmo erro "URL não definida para TNfseEnviarLoteRps"
  22. Eu estava com um problema ao imprimir a NFSe. Ai o Juliomar resolveu o problema. agora estou conseguindo imprimir. Mas percebi uma coisa, não está aparecendo os dados do prestador que no caso sou eu, acredito que esteja faltando preencher a XML de forma correta veja essa foto da nota, me diga se ta errada.
  23. To tentando executar o Demo da NFSE e quando abre o projeto da falta de uma propriedade "Property ExplicitLeft does not exist", então eu ignoro todos, depois quando tento executar ocorre um erro diz que falta RLINK32.DLL e em outra hora "Erro interno LA30" Será que tem algum demo já compilado (EXE) ?
  24. Boa tarde Ítalo Caramba, to rodando como peão aqui. preciso saber qual é propriedade que armazena essa "URL não definida" A coisa parece ser muito simples mas não acho nada. Vou configurar o Demo com as informações que tenho logo volto com mais informações
×
×
  • Create New...