chico_lopes

Boa tarde Italo, mas o estranho é que é a mesma impressora q já era utilizada quando o sistema estava instalada na estação de trabalho. Já instalei os drive da impressora no servidor e mesmo assim continua embaçado. Pedi para o pessoal, que dá manutenção no servidor, se há alguma coisa q pode ser feita por eles mas ate o momento não me responderam. agradeço pela atenção.

Bom dia em um cliente nosso eles já utilizavam o MDF-e com o sistema instalado na estação de trabalho e jogamos o sistema de MDF-e em um servidor 2012 R2, para logar por TS, e ao imprimir o MDF-e está saindo com o Qr Code embaçado impossibilitando a leitura, na impressora Brother HL 1210W SERIES e na impressora Brother DCP-8157DN saiu embaçado conforme imagem abaixo e fizemos o teste imprimindo em duas outras HP saiu correto. Salvamos em PDF o MDF-e e imprimimos nas impressoras impressoras borther e saíram normais. Estamos deduzindo que uma relação TS+Brother+sistema pois antes funcionava quando era instalada na estação de trabalho. Alguém já passou por isso ? ou tem alguma ideia do que pode ser ?

Bom dia fizemos a atualização para o Fortes / Delphi no Layout do MDF-e, tentamos deixar o mais próximo do manual. Somente o Código de barras que não conseguimos aumentar para deixar a disposição igual esta no manual, alguém saberia como fazer essa mudança ? Pois toda mudança que realizávamos ao tentar fazer a leitura da impressão não reconhecia. Poderiam validar se está totalmente correto, fazendo um favor segue os fontesACBrMDFeDAMDFeRLRetrato.dfmACBrMDFeDAMDFeRLRetrato.pas

Bom dia Pessoal, conseguir resolver o problemas, segue as soluções: - o primeiro caso foi que a linguagem da zebra TLP 2844 deve ser etqEpl2 - e segundo a Origem tive que deixar como ogTop, e após isso fazer as rotações necessárias - sobre o tamanho da etiqueta, pelo que eu entendi, ele vai pegar a horizontal, do ponto zero definido pela origem acima até o máximo da etiqueta, e a vertical vai pegar do ponto zero ate o gap(que eu entendi é o final da etiqueta) , se for superior a isso a impressora nem aceita o comando do texto.

Bom dia fiz teste nesta manhã, na linguagem etqPplb, porém percebemos que a zebra TLP2844 utiliza a ligagem EPL conforme o site http://zebramaster.blogspot.com/2013/04/linguagem-de-programacao-zebra-epl.html nos teste usando a etqEpl2 vimos que exemplo que está no ACBRSerial está com erro na passagem dos parametros mutiplicadorH e V, abaixo segue o código corrigido, se puderem upar no servidor. Porém mesmo assim, esta saindo um pagina em branco porém agora no incio , Por usarmos a linguagem EPL2 pode ser o motivo da EPL estar saltando? Mas vamos continuar mais teste assim q conseguir achar mais alguma coisa irei reportando. with ACBrETQ do begin if Modelo in [etqPpla, etqPplb] then begin ImprimirTexto(orNormal, 2, 2, 2, 3, 3, 'BISCOITO MARILAN RECH 335G', 0, True); ImprimirTexto(orNormal, 2, 2, 1, 8, 3, 'CHOC BRANCO'); ImprimirBarras(orNormal, barEAN13, 2, 2, 13, 5, '7896003701685', 10, becSIM); ImprimirTexto(orNormal, 3, 3, 2, 18, 32, 'R$'); ImprimirTexto(orNormal, 3, 4, 4, 15, 50, '20,59'); end else //if Modelo = etqZPLII then begin ImprimirTexto(orNormal, '0', 1, 1, 3, 3, 'BISCOITO MARILAN RECH 335G', 0, True); ImprimirTexto(orNormal, '0', 1, 1, 8, 3, 'CHOC BRANCO'); ImprimirBarras(orNormal, barEAN13, 2, 2, 13, 5, '7896003701685', 10, becSIM); ImprimirTexto(orNormal, 'A', 1, 1, 18, 32, 'R$'); ImprimirTexto(orNormal, 'A', 1, 1, 15, 50, '20,59'); end;

@Juliana Tamizou estou utilizando o ACBrLib + delphi7, o gap que vc diz é o espaço entre uma etiqueta é a outra? a bobina que estou utilizando é parecida com essa, no caso da argox pelo que eu li seria o tipo do papel, podem eu fiz um teste com o zebra design e funcionou corretamente. Na segunda eu vou analisar o sensor da zebra aonde fica para ver se está pegando corretamente a distancia entre as etiquetas, dai eu posto novamente aqui. por enquanto obrigado.

Boa tarde estou estudando sobre o componente ACBrETQ (https://acbr.sourceforge.io/ACBrLib/ACBrLibETQ.html) para impressão em zebra, porém não estou encontrando a forma de definir o tamanho da etiqueta ou o salto da impressão que a impressora irá pular para próxima etiqueta, pois estou tentando fazer um para imprimir em uma zebra tlp2844 , a etiqueta será em paisagem (23,1x10 cm) porém nos meus teste ela está imprimindo em uma etiqueta pulando outra etiqueta em branco. Somente para verificar se minha lógica está correta, se a orientação no comando ImprimirTexto, vai definir se as coordenadas verifical e horizontal irá começar to topo, base, direito ou esquerdo! Exemplo seu eu colocar um orientação or90 significa q meu horizontal será do topo para base e vertical será da esquerda para direita? aproveitando o gancho para que serve na ImprimirTexto as variáveis MultiplicadorH e MultiplicadorV que não ficou claro no manual. segue o código gerado para impressora. JF R0,0 N D10 ZB S1 A40,1199,1,1,1,1,N,"BISCOITO MARILAN RECH 335G" A56,1199,1,1,1,1,N,"90 90 90 90 90 90 90 90 90 90 " P1 N código usado ate o momento with ACBrETQ1 do begin Desativar; //ArqLOG :; Porta := ifthen(trim(Edit1.Text) = '', 'lpt1',Edit1.text); //cbPorta.Text; Temperatura := 10; //StrToInt(eTemperatura.Text); Velocidade := 1; //StrToInt(eVelocidade.Text); //Avanco := 0; // avanco entre etiquetas padrão 0 MargemEsquerda:= 0 ; //padrão 0 LimparMemoria := true; //ckMemoria.Checked; //Ativo := true; Modelo := etqPplb; //TACBrETQModelo(cbModelo.ItemIndex); modelo zebra tlp2844 Unidade := etqMilimetros; BackFeed := bfOn; //TACBrETQBackFeed(cbBackFeed.ItemIndex); Origem := ogNone; //origem da impressão DPI := dpi203; // TACBrETQDPI(cbDPI.ItemIndex); Ativar; if Modelo in [etqPpla, etqPplb] then begin ImprimirTexto(or90, // Orientacao 1, //Fonte 1, //MultiplicadorH 1, //MultiplicadorV 150, //Vertical 5, //Horizontal 'BISCOITO MARILAN RECH 335G', //Texto 0, //SubFonte false); //ImprimirReverso ImprimirTexto(or90, // Orientacao 1, //Fonte 1, //MultiplicadorH 1, //MultiplicadorV 150, //Vertical 7, //Horizontal '90 90 90 90 90 90 90 90 90 90 ', //Texto 0, //SubFonte false); //ImprimirReverso end else //if Modelo = etqZPLII then begin ImprimirTexto(orNormal, '0', 60, 60, 3, 3, 'BISCOITO MARILAN RECH 335G', 0, True); ImprimirTexto(orNormal, '0', 60, 60, 8, 3, 'CHOC BRANCO'); ImprimirBarras(orNormal, barEAN13, 2, 2, 13, 5, '7896003701685', 10, becSIM); ImprimirTexto(orNormal, 'A', 100, 100, 18, 32, 'R$'); ImprimirTexto(orNormal, 'A', 120, 120, 15, 50, '20,59'); end; //FinalizarEtiqueta(); Imprimir(1, 0); Desativar; end;

Boa tarde @Cleonir você pode compartilhar a forma utilizada. Está funcionando atualmente?

você tentou entrar em contato com o eFrete se está normal com eles?

Bom dia estou realizando teste com o ACBrCIOT, porem não estou conseguindo transmitir com o eFrete , pelo post do @Italo Jurisato Junior está homologado porém pelo exemplo não estou conseguindo está retornando erro gostaria de saber alguém está conseguindo realizar as transmissão. somente para mostrar como estou transmitindo, usando certificado digital.

Obrigado juliana.

Bom dia Juliana muito obrigado, era isso mesmo da carteira na linha digitável, a outra questão do digito verificar da agencia no boleto há como não mostrar ele?

Boa noite na homologação do santander, foi exigido que na linha digitável seja informado a carteira porem analisando o fonte, não encontrei parâmetro que posa ser alterado para o mesmo atenda a essa exigência, não quero alterar o fonte devido que outros usuários utilizam esses mesmo e foram homologados. gostaria de saber se há alguma outra maneiro de atender ao santander já pronta. Outra questão que no boleto exigiram que não apareça o digito verificar há possibilidade de não aparecer 20170106_Layout de Código de Barras Santander Janeiro 2017v 31.pdf

Boa tarde @Jonas Ponciano Rosnieski você não precisa fazer essa mudança no componente. quando vocês estiver atribuindo o titulo no componente coloque para taxa mensal Titulo.CodigoMora := '2'; Titulo.ValorMoraJuros := taxa do juros mensal ou valor por dia Titulo.CodigoMora := '1'; Titulo.ValorMoraJuros := valor_doc * (taxa_juros_mes / 30) / 100

Boa tarde @Juliana Tamizou conforme havia sugerido, coloquei para passar automático para o campo EspecieDoc, não sei se é a melhor forma ou se é a forma que vocês utilizam no componente. segue os fontes para sua avaliação. criei o SetEspecieDoc para setar os valores nos campos EspecieDoc e tpEspecieDoc, deixei somente no Sicoob pois eu possuo atualizado somente este manual atualizado. ACBrBoleto.pas ACBrBancoBancoob.pas ACBrBoletoFCFortesFr.pas

Boa noite, qual melhor local para colocar essa sugestão de melhoria no componente? Caso não esteja no local correto desculpe. criei um novo campo TpEspecieDoc identificado como TACBrEspecieDoc para facilitar a identificação do tipo de especie de documentos, com isso todos as especies já estariam previamente cadastradas, auxiliando o uso do componente, gostaria que avaliassem a melhoria. Obs. não exclui o campo antigo especiedoc para não afetar os outros bancos, peguei o bancoob como exempo. ACBrBoletoFCFortesFr.pas ACBrBancoBancoob.pas ACBrBoleto.pas

Boa noite Cledersoncaruaru, nao sei se você já resolveu seu problema, mas segue a resposta como o italo falou a melhor maneira e gravar no DB ou em uma pasta no servidor, eu optei por salvar em DB, com isso qualquer usuário local ou remoto que tenha acesso ao DB pode acessar o xml sem ter q baixar da receita novamente.

Boa noite gustavokato aki voltou normalmente a tade, pelo visto probelma no sefaz sp.

Bom dia gustavokato estou com o mesmo problema tbm desde ontem ao cancelar ou realizar carta de correção. Ao consultar a chava de acesso do ct-e no portal nacional, consulta normalmente, porem ao consultar no porta de SP da erro "Erro inesperado: Erro ao ler informações do banco de dados". Mandei um e-mail para "fale conosco" de SP para ver o que eles dizem. quando eles me responderem eu posto aki no forum.

Bom dia Italo consegui agora, deixei da da seguinte forma ACBrMDFe1.Configuracoes.Geral.Salvar := true; ACBrMDFe1.Configuracoes.Arquivos.Salvar := true; ACBrMDFe1.Configuracoes.Arquivos.AdicionarLiteral := false; obrigado pela ajuda

Boa noite Italo não estava, estava deixando somente ACBrMDFe1.Configuracoes.Geral.Salvar := true; agora coloquei tbm ACBrMDFe1.Configuracoes.Arquivos.Salvar := true; agora esta acontecendo o seguinte: existe a pasta ..\xml\mdfe aonde são guardados os xml dos MDF-e quando ativei o ACBrMDFe1.Configuracoes.Arquivos.Salvar := true; o componente criou ..\xml\mdfe\mdfe e salva dois xml aonde eu informei salva sem protocolo e nessa nova pasta salva com protocolo coloco o path da seguinte forma ACBrMDFe1.Configuracoes.Geral.PathSalvar := ExtractFilePath(Application.ExeName) + 'xml\mdfe'; ACBrMDFe1.Configuracoes.Arquivos.PathMDFe := ExtractFilePath(Application.ExeName) + 'xml\mdfe'; será q tenho q mudar alguma lugar para ele nao criar essa nova pasta

Bom dia Itálo estou com o problema descrito acima meu xml não estão gravando numero de protocolo. tenho q consultar para gravar os campos da <infProt>. estou fazendo da seguinte maneira, que eu utilizo para NF-e e CT-e porem para MDF-e não esta gravando preparar_MDFe; // aonde carrego todos dados ACBrMDFe1.Manifestos.Valida; ACBrMDFe1.Enviar(QCONSMDFElote.AsInteger); estou utilizando ACBrMDFe1.Configuracoes.Geral.VersaoDF := ve100a; o que será que estou fazendo de errado.

Boa tarde a todos, meu cliente foi fez um CT-e logo após fez uma carta de correção. agora ele quer cancelar a CT-e e está aparecendo a seguinte mensagem Rejeição: vedado o cancelamento quando existir evento de carta de correção. procurei e achei a NT 2014/01 dizendo que não é mais possível fazer cancelamento com CC-e. para eu cancelar esse CT-e tenho q fazer um CT-e de anulação? mas ele vai me isentar de imposto?

boa noite amigos, alguem sabe como fazer para aparecer o nome da transportadora no canhoto do DACTE? abraços

Estou com o mesmo problema em um servidor 2003 certificado A1, ja ollhei outros post e nao obtive resultado. estou utilizando windows server 2003, com certificado A1 da VALID procurando achei esse outro post que me resolveu