Ir para conteúdo
  • Cadastre-se

leandroaoa

Membros
  • Total de ítens

    372
  • Registro em

  • Última visita

  • Days Won

    3

Tudo que leandroaoa postou

  1. Boa tarde da uma olhada ai nesse topico acho que pode te ajudar
  2. Boa tarde pessoal. tenho a seguinte situacao. eu recebo um retorno ja com a etiqueta montada e preciso imprimir em uma argox ppla alguem consegue me ajudar recebo o seguinte N R30,10 D10 A210,0,0,1,1,1,N,"Leandro da Silva Alves" B285,65,0,2,2,4,70,N,"206323216001" A210,20,0,1,1,1,N,"206-3232160-01 19/01/24 11:42" A210,35,0,1,1,1,N,"CONV: 15665" A330,35,0,1,1,1,N,"PED.CONV: 536" A210,50,0,1,1,1,N,"NTOSP" A430,50,0,1,1,1,N,"DN 07/03/77" A195,220,3,1,1,1,R," NTOSP" A210,143,0,1,1,1,N,"SORO" A210,158,0,1,1,1,N,"" A210,173,0,1,1,1,N,"VOL: 800ul" A450,173,0,1,1,1,N,"(REFRIG.)" A210,188,0,1,1,1,N,"TSH-B" A210,206,0,1,1,1,N,"" P1 N
  3. Bom dia o fluxo é o mesmo voce vai imprimir a NFCe que deu rejeitada nela sera impresso o dizeres NFCe emitida em contigencia algo assim. Entrega pra pessoa e apos a normalizacao reenvia a NFCe pra Sefaz
  4. bom dia Eu uso o seguinte fluxo : Salvo os dados da NFCe no banco de dados Salvo os dados de pagamento envio a nota rejeitado ou nao é impresso o cupom e libero o cliente a tarde no fechamento do caixa ai sim vai aparecer as notas rejeitadas so permitindo o fechamento apos a validacao das mesma basicamente seria isso. A forma que voce quer fazer ai nao vai dar muito certo imagina um supermercado lotado voce vai para um caixa ate que arrume o problema na emissao da nfce e se for problema no cadastro do produto, vai ficar travado ate a pessoa que faz cadastro alterar pra poder liberar a nota imagina quantas outras pessoas vao ter comprado o mesmo produto, e ai vai parar todos os caixas. no meu ponto de vista a unica coisa que pode travar é a confirmacao da forma de pagamento apos confirmado o pagamento libera o cliente e vamos pro proximo.
  5. Boa tarde segue esse topico ai que voce vai encontrar tudo o que precisa
  6. @Daniel Simoes Bom dia. deu certo aqui eu que passei os dados errado obrigado ai pela ajuda pode fechar o topico ACBrPSPSicredi1.Certificado := DecodeBase64(aDataSet.FieldByName('certificado_cer').AsAnsiString);
  7. boa noite Daniel no meu teste nao deu certo salvando no banco. se eu passar o caminho da certo agora salvando no banco da erro 500 Olha como estou fazendo estou usando essa funcao pra salvar no banco MYSQL function LerCertificado(pCaminho: string): AnsiString; var vFile: TFileStream; begin vFile := TFileStream.Create(pCaminho, fmOpenRead); try Result := EncodeBase64(ReadStrFromStream(vFile, vFile.Size)); finally vFile.Free; end; end; dm1.sqldataset1.close; dm1.sqldataset1.sql.text:='update config_pix set certificado_cer=:certificado'; dm1.sqldataset1.parambyname('certificado').AsAnsiString := LerCertificado(lCaminho);//trim(destino); dm1.sqldataset1.ExecSQL; ACBrPixCD1.PSP := ACBrPSPSicredi1; ACBrPSPSicredi1.ChavePIX := aDataSet.FieldByName('chavepix').AsString; ACBrPSPSicredi1.ClientID := aDataSet.FieldByName('clientid').AsString; ACBrPSPSicredi1.ClientSecret := aDataSet.FieldByName('clientsecret').AsString; ACBrPSPSicredi1.ArquivoChavePrivada := FDir+aDataSet.FieldByName('chave_privada').AsString; ACBrPSPSicredi1.ArquivoCertificado := DecodeBase64(aDataSet.FieldByName('certificado_cer').AsAnsiString);
  8. Bom dia pessoal. É possivel salvar os certificado PEM, CER, KEY em base de dados ? Estou implementando a APIPIX e estava vendo essa possibilidade ao inves de ter que levar os certificados pra distribuir junto a aplicacao
  9. boa tarde segue o passo que tem ai nesse link ai tem os banco suportados atualmente
  10. Boa tarde pessoal é possivel concatenar varios PDFs em delphi utilizando o ACBrFPD ? se for alguem teria um exemplo !
  11. Bom dia se voce tinha uma versão tão antiga assim sugiro a dar uma olhada nos fontes pois tiveram algumas mudancas pegue o exemplo tambem a analisa. Essa foi uma das prorpiedades alteradas que pode estar dando esse problema ai FETQ.Unidade := etqMilimetros; //etqMilimetros, etqPolegadas, etqDots, etqDecimoDeMilimetros essa propriedade altera o tamanho conforme o que estiver selecionado
  12. Bom dia estude melhor o link que o @Renato Rubinho te passou voce esta fazendo errado a consulta por ultNSU voce tem que informar o ultimo NSU que é devolvido da consulta anterior e deve espera 1 hora entre consulta. Pra poder efetuar o download dos xml voce precisa fazer a manifestacao so apos a manifestacao é que é liberado o XML para ser baixado. A consulta so traz um resumo.
  13. Mas é so voce criar os style estou deduzindo que voce saiba trabalhar com htm var Doc: Variant; begin if not Assigned(WebBrowser1.Document) then WebBrowser1.Navigate('about:blank'); Doc := WebBrowser1.Document; Doc.Clear; Doc.Write('<html>'); Doc.Write('<head>'); Doc.Write('<style>'); Doc.Write('.important {background-color: blue; color: white; border: 2px solid black; margin: 2px; padding: 2px;}'); Doc.Write('</style>'); Doc.Write('</head>'); Doc.Write('<body>'); Doc.Write('<h1 class="important">Isto é um cabeçalho</h1>'); Doc.Write('<p class="important">Isto é um parágrafo.</p>'); Doc.Write('</body>'); Doc.Write('</html>
  14. bom dia porque voce não usa WebBrowser no lugar do RichEdit exemplo: var Doc: Variant; begin if not Assigned(WebBrowser1.Document) then WebBrowser1.Navigate('about:blank'); Doc := WebBrowser1.Document; Doc.Clear; Doc.Write('<b>Erro:</b>Forma de pagamento inválida.'); Doc.Close;
  15. no seu caso deve ficar assim: vtroco := 5,00 pois o valor da nota é menor que o pagamento e fazer um controle interno desse valor, nao tem outra solução a nao ser controle interno seu pra fazer o que voce quer faca o seguinte informa o valor da nota na forma de pagamento e esse valor voce salva em ouro lugar seria mais ou menos isso
  16. Bom dia pra voce usar outros voce tem que alimentar a seguinte tag tambem xPag := 'CREDITO COMPRA FUTURA';
  17. Boa tarde Esta usando fortes ou fast e qual o layout e como esta alimentando o componente. esse mesmo comportamento acontece tambem no programa de exemplo.
  18. bom dia o Campo vOutros esta tambem com valor nesse caso ele deve ser zerado
  19. como eu disse acima nao existe csosn 3500 voce tem que passar o seguinte icms.orig := 3; icms.csosn := 500; nao importa se é nota de venda devolucao etc esse seu if esta totalmente errado verifica ai essa sua funcao. outra coisa verirfica com o contador da empresa para gerar a nota de devolucao correta pois existe produtos com ST e produtos normal existe regras e tem que empresas que ate mandam um espelho de como dever ser feita a nota de devolucao
  20. Boa tarde esses numeros nao existe. abaixo tabela CSOS consulte um contador para enteder a numeracao pelo visto ali o primeiro numero seria a origem da mercadoria o campo Produto.Imposto.ICMS.orig
  21. Voce esta usando o danfe do Fortes use o ACBrNFeDANFeESCPOS da uma olhado no exemplo do acbr
  22. Opa boa tarde manda em escpos eu uso assim e não tenho problemas usando a mesma impressora
×
×
  • 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.

The popup will be closed in 10 segundos...