Ir para conteúdo
  • Cadastre-se

leandroaoa

Membros
  • Total de ítens

    376
  • Registro em

  • Última visita

  • Days Won

    3

Community Answers

  1. leandroaoa's post in Consultar cstat antes de enviar was marked as the answer   
    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. 
     
  2. leandroaoa's post in AcBRETQ Pulando etiqueta was marked as the answer   
    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 
     
  3. leandroaoa's post in DistribuicaoDFe não baixa was marked as the answer   
    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.
  4. leandroaoa's post in Mover string contendo html para um RichEdit e exibir formatado was marked as the answer   
    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>
  5. leandroaoa's post in NFe com devolução de IPI was marked as the answer   
    bom dia
    o Campo vOutros esta tambem com valor nesse caso ele deve ser zerado
     
  6. leandroaoa's post in csosn 3500 was marked as the answer   
    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
     
  7. leandroaoa's post in Problema com ACBrETQ apos atualização was marked as the answer   
    adicione na uses ACBrETQClass
  8. leandroaoa's post in erro de autorizacao was marked as the answer   
    da uma olhada ai vai encotrar seu problema
     
  9. leandroaoa's post in Rejeição 660: CFOP de Combustível e não informado grupo de combustível da NF-e was marked as the answer   
    Boa tarde voce deve preencher os campos
           Produto.Prod.comb.cProdANP := clientdataset1.fieldbyname('cprodanp').asinteger;
           Produto.Prod.comb.descANP  := clientdataset1.fieldbyname('descanp').asstring;
           Produto.Prod.comb.UFcons   := ifthen(NotaF.NFe.Dest.EnderDest.UF = '',NotaF.NFe.Emit.EnderEmit.UF,NotaF.NFe.Dest.EnderDest.UF);
     
  10. leandroaoa's post in Emitir boletos was marked as the answer   
    boa tarde
    o ACBrBoleto segue os layouts exigido pelos banco se voce programa em delphi ou lazarus basta estudar o exemplo que la tem tudo.
  11. leandroaoa's post in Boletos via webserver was marked as the answer   
    Boa tarde
    vai na pasta exemplo do ACBr e estuda o exemplo do acbrboleto ali tem tudo o que voce precisa
  12. leandroaoa's post in Boas práticas com interfaces was marked as the answer   
    boa tarde
    acesso a dados e persistencia na DAO
    na classe cliente somente verificaria se os dados estão ok exemplo  verificaria se o campo nome esta em branco se sim dispararia um raise;
    pra verificar limite eu criaria uma outra classe. uma coisa estude sobre SOLID.  eu vou separando minhas classe cada classe responsavel por fazer uma coisa é assim que eu faço. Mas como nosso amigo @Thulio Bittencourt diz existe mil maneira de prepara o neston 
    e trabalhar com interface no começo vai apanhar muito mas depois é mamão com açúcar
  13. leandroaoa's post in Modo Sincrono was marked as the answer   
    Boa noite 
    basta olhar a assinatura do metodo 
    mas vamos la 
    Enviar(aLote: 1, imprimir: false, sincrono: true, zipado: false); ACBrNFe1.Enviar(nLote, True, True) 1º - Numero do lote
    2º - Se vai Impirmir
    3º - Sincrono = True
     
  14. leandroaoa's post in Relatório FortesReport composto (mais de uma tabela) was marked as the answer   
    boa tarde
    basta colocar rlgroup dentro do outro ai o primeiro o datafields = categorias aqui coloca uma band sumary que vai somar o tota da categoria
    no segundo datafields = grupo aqui voce colocaria a band rldetail para apresentar o itens a banda sumary que seria soma dos itens
    no index da sua tabela deve esta categoria, grupo
  15. leandroaoa's post in FortesReport Medidas em mm was marked as the answer   
    Boa tarde
    Tem a propriedade RealBounds a ultima vez que tentei usar ainda não estava implementada mas faz muito tempo quem sabe ja não a implementaram
     
  16. leandroaoa's post in CFOP 5405 com CST 060 was marked as the answer   
    bom dia sugiro a você estudar o manual de orientacao da nfe depois consultar um bom contador pois emissao de DFe não é uma coisa tão simples assim quanto a regras fiscais mas o seu erro esta facil olha o seu xml nessa parte aqui 
    <total> <ICMSTot> <vBC>6.90</vBC> <vICMS>0.83</vICMS> <vICMSDeson>0.00</vICMSDeson> <vFCP>0.00</vFCP> <vBCST>6.90</vBCST> <vST>1.24</vST> os campos vBC, vICMS, vBSST e vST tem que estar zerado pois no item não tem esse valor conforme abaixo
    <imposto> <ICMS> <ICMS60> <orig>0</orig> <CST>60</CST> </ICMS60> </ICMS> </imposto>  
  17. leandroaoa's post in Imprimir Etiquetas 3 coluna was marked as the answer   
    tarde ta ai :
     
                 with ACBrETQ do
                  begin
                   Desativar;
                   Modelo       := TACBrETQModelo(strtoint(covalor(FormConfig.edit79.text))) ;
                   Porta        := trim(FormConfig.edit38.text);
                   Unidade      := etqMilimetros;
                   Ativar ;
                                 ImprimirTexto(orNormal, 2, 1, 1, 2, 1, clientdataset2.fieldbyname('desc1').asstring);
                                 ImprimirTexto(orNormal, 2, 1, 1, 5, 1, clientdataset2.fieldbyname('tam').asstring);
                                 ImprimirTexto(orNormal, 2, 1, 2, 8, 1, 'REF '+xValor);
                                 ImprimirBarras(orNormal, barCODE128, 2, 2, 12, 1, trim(clientdataset2.fieldbyname('barra').asstring), 5, BecNAO);
                                 ImprimirTexto(orNormal, 2, 1, 2, 18, 1, trim(clientdataset2.fieldbyname('barra').asstring));
                                 ImprimirTexto(or90, 1, 1, 1, 2, 26, trim(FormConfig.Edit2.Text));
                                 ImprimirTexto(or90, 2, 1, 1, 1, 29, trim(FormConfig.Edit8.Text));

                                 ImprimirTexto(orNormal, 2, 1, 1, 2, 37, clientdataset2.fieldbyname('desc1').asstring);
                                 ImprimirTexto(orNormal, 2, 1, 1, 5, 37, clientdataset2.fieldbyname('tam').asstring);
                                 ImprimirTexto(orNormal, 2, 1, 2, 8, 37, 'REF '+xValor);
                                 ImprimirBarras(orNormal, barCODE128, 2, 2, 12, 37, trim(clientdataset2.fieldbyname('barra').asstring), 5, BecNAO);
                                 ImprimirTexto(orNormal, 2, 1, 2, 18, 37, trim(clientdataset2.fieldbyname('barra').asstring));
                                 ImprimirTexto(or90, 1, 1, 1, 2, 62, trim(FormConfig.Edit2.Text));
                                 ImprimirTexto(or90, 2, 1, 1, 1, 65, trim(FormConfig.Edit8.Text));

                                 ImprimirTexto(orNormal, 2, 1, 1, 2, 73, clientdataset2.fieldbyname('desc1').asstring);
                                 ImprimirTexto(orNormal, 2, 1, 1, 5, 73, clientdataset2.fieldbyname('tam').asstring);
                                 ImprimirTexto(orNormal, 2, 1, 2, 8, 73, 'REF '+xValor);
                                 ImprimirBarras(orNormal, barCODE128, 2, 2, 12, 73, trim(clientdataset2.fieldbyname('barra').asstring), 5, BecNAO);
                                 ImprimirTexto(orNormal, 2, 1, 2, 18, 73, trim(clientdataset2.fieldbyname('barra').asstring));
                                 ImprimirTexto(or90, 1, 1, 1, 2, 98, trim(FormConfig.Edit2.Text));
                                 ImprimirTexto(or90, 2, 1, 1, 1, 101, trim(FormConfig.Edit8.Text));
                                 Imprimir(1, StrToInt(covalor(FormConfig.edit80.text)));
                  end;    
     

  18. leandroaoa's post in Impressão de NFCe no formato A4 was marked as the answer   
  19. leandroaoa's post in Impressão A4 da NFC was marked as the answer   
    siga esse link ai 
     
  20. leandroaoa's post in Problema na Impressão do Danfe NFCe para A4 was marked as the answer   
    olhe este poste ve se ajuda
     
  21. leandroaoa's post in Problemas com Gertec PPC 910/920 was marked as the answer   
    bom dia 
    eu passei por esse erro 31 com impressora bematech. solucao encontrada troquei de computador pois o driver da impressora não é compativel com a placa mae antiga essas placas maes que ainda tem suporte a USB 1.1 e tambem troquei de impressora passei a usar a epson que não apresentou esse conflito o seu caso deve ser o mesmo. deve ser algum conflito entre o driver da GERTEC e as Placas mais antigas.
  22. leandroaoa's post in Nfc-E Para Destinatario Contribuinte De Icms was marked as the answer   
    Sim para NFC-e você sempre vai usar 9 e não informa o campo IE 
     
    não esquece de por como resolvido...
×
×
  • 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...
The popup will be closed in 10 segundos...