nildglan

ata vou tentar

É isso aqui julimar?

Julimar como faço isso? porque to usando ACBrPosPrinter como faço pra imprimir essas duas linhas? e se sair em duas linhas não vai duplicar? não entendi bem

via Escpos

Pessoal estou usando o posprint e está cortando o Tributos na impressão da NFCe como faço aumentar espaço? vou mostrar como ta saindo

deu certo daniel

daniel fiz do jeito que vir, ou seja coloquei modelo ppEscPosepson e porta ficando USB:Elgin, mais não corta

daniel e na Elgin to com o mesmo problema qual modelo eu coloco porque não tem elgin

blz Daniel funcionou, mais eu colocando via dll também , fica assim modelo ppEscPosepson e porta ficando USB:Epson

Pessoal já tentei fazer a impressora Epson TM-T20 cortar o papel pelo ACBrPosPrinter mais não vai a propriedade CortalPapel = True a opção tipoCorte = ctTotal e no comando da impressora também to colocando mImp.Lines.Add('</corte_total>'); e mesmo assim não corta alguém tem uma impressora dessa que corta? alguém passou por isso? outra coisa se eu mandar pelo relatório do FastReport ela corta certo

pessoal depois que atualize não estão mais reconhecendo lPadrao do LayOut ACBrBoleto1.ACBrBoletoFC.LayOut := lPadrao foi mudado isso? qual unit que que tem que add?

Juliano que vc fez pra baixar as notas que não tem protocolo?

é muito arquivo de evento, qual arquivo é exatamente é que informa qual nsu ta sendo pesquisado? os que tem a nomeclatura "con" ou "dist" como eu sei? outra eu to fazendo assim NFe.DistribuicaoDFe(GetCodigoMunicipio,CNPJ,edtNSU.Text,edtUltNSU.Text); e ta os valores nos edtNSU.Text,edtUltNSU.Text dos valores finais mesmos no edtNSU.Text eu jogo o ultimo que foi lido, e no outro pega automatico, no caso do cliente ta o valor 000000000005969

Julimar tentei entrar em contato mais não conseguir, outra coisa teria que ter certeza se o problema era no ambiente nacional ou não por isso não fui entrar em contato direto , por isso da cautela e to pesquisando como fazer o procedimento

estou com mesmo problema tem um cliente meu que não aparece mais as notas de junho e nem de julho, qual o BO?

Pessoal estou tentando manifestar as notas de um cliente mais não aparece nada de erro, ou seja ao buscar a notas não aparece e ele comprou foi muitas notas veja a mensagem Documento Localizado para o Destinatário Utilizar o número que esta no campo: Último NSU Para uma nova pesquisa. e não aparece mais nada , vou anexar os arquivos dos eventos está com mais de 15 dias que não consegue buscar uma nota se quer Arquivos.zip

já tão com mais de 2 anos que dizem que vão tirar, isso ajuda de mais quem não tem certificado, exemplo o clientes que tem MEI que não tem certificado

Ricardo esse tenho, agora tenho clientes do MEI que não tenho certificado ai em pego o html direto e tento agilizar pra eles entende? se eu não fizer fica pior ai falta fazer para pegar esse rastro e gravar no html e gerar o xml, vc saber como fazer ? o problema é que to gerando o xml apartir da ACBrHTMLtoXML e não tava gerando essa tag, agora estou tentando gerar essa tag no xml mais não to conseguindo porque não acha nLote veja if Pos(AnsiUpperCase('|rastro|'), AnsiUpperCase(Grupo)) > 0 then begin Grupo := Copy(Grupo, Pos(AnsiUpperCase('|rastro|'), AnsiUpperCase(Grupo)), Length(Grupo)); with Prod.rastro do begin nLote // aqui não acha porque rastro é uma coleção como faço pra gerar essas tags? end; end;

o problema é que to gerando o xml apartir da ACBrHTMLtoXML e não tava gerando essa tag, agora estou tentando gerar essa tag no xml mais não to conseguindo porque não acha nLote veja if Pos(AnsiUpperCase('|rastro|'), AnsiUpperCase(Grupo)) > 0 then begin Grupo := Copy(Grupo, Pos(AnsiUpperCase('|rastro|'), AnsiUpperCase(Grupo)), Length(Grupo)); with Prod.rastro do begin nLote // aqui não acha porque rastro é uma coleção como faço pra gerar essas tags? end; end;

ja sei aonde é o erro é a forma de como to baixando o xml vou concertar

BigWings, fiz do mesmo jeito e não entra, vc fez com o xml que envie? com esse xml porque no meu não da certo ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(OpenDialog1.FileName,false); if ACBrNFe1.NotasFiscais.Items[0].NFe.Det.Items[0].Prod.Rastro.Count > 0 then Showmessage('Rastro'); não entra nesse if e outra eu tinha que fazer a cada item veja if ACBrNFe1.NotasFiscais.Items[0].NFe.Det.Items[0].Prod.RASTRO.Count > 0 then begin for iRastro := 0 to Prod.RASTRO.Count - 1 do begin frmmodulo.qrconfig.Open; if frmmodulo.qrconfig.FieldByName('CONTROLAR_LOTES').AsString = 'S' then qrProdutosEntradaPRODUTOS_CONTROLE_LOTES.AsString := 'S'; qrProdutosEntradaNLOTE.AsString := Prod.RASTRO[iRastro].nLote; qrProdutosEntradaQLOTE.AsFloat := Prod.RASTRO[iRastro].qLote; qrProdutosEntradaDTFABRICACAO.AsDateTime := Prod.RASTRO[iRastro].dFab; qrProdutosEntradaDTVALIDADE.AsDateTime := Prod.RASTRO[iRastro].dVal; end; end; e não entra que coisa

eu já fiz assim if ACBrNFe1.NotasFiscais.Items[0].NFe.Det.Items[0].Prod.RASTRO.Count > 0 then mais não entra e o xml tem essa tag rastro

Julionar mais como testar se tem essa tag? porque se eu fizer assim if NFe.Det.Items[0].Prod.med.Count > 0 then não da certo tenho que da um jeito de saber se esse xml tem tag de medicamento para eu gravar o código da anvisa na minha base

vou postar xml, nesse caso desse xml tem rastro então era pra entrar na tag rastro 51200619391064000199550010000102681003596884.xml

pessoal fiz um assim if Prod.med.Count > 0 then pra saber se xml é de medicamento mais não entra e assim if Prod.RASTRO.Count > 0 then também pra saber se tem rastro mais nunca entra nessa tag como saber se um xml é de medicamento para eu fazer minha programação?