Ir para conteúdo
  • Cadastre-se

TiagoNormando

Membros
  • Total de ítens

    25
  • Registro em

  • Última visita

Posts postados por TiagoNormando

  1. Em 20/03/2024 at 16:25, Daniel Simoes disse:

    Desculpe pela demora na resposta...

    Faz muito tempo, que implementamos o componente MTER, e o Demo dele...

    Lembro que algumas coisas ocorriam de forma Assincrona.. então Sleeps não são uma boa técnica...

    Notei no Demo que tem o Evento:

    procedure TForm1.ACBrMTer1RecebeDados(const IP: AnsiString; const Recebido: AnsiString; var EchoMode: TACBrMTerEchoMode);  

    que acaba chamando o método:

    procedure AvaliarRespostaTerminal(aIP: String; const aResposta: String);

    Repare que ele tem estados que só pintam uma msg e saem, e que ele fica aguardando um "Enter", para buscar um Item, caso contrário, apenas adiciona o caractere digitado, no Buffer anterior

            if (aString[1] <> #13) then
            begin
              // Grava Resposta
              Edit;
              FieldByName('RESPOSTA').AsString := FieldByName('RESPOSTA').AsString + aString;
              Post;
    
              Exit;
            end;         

     

    Bom dia,  tudo bm? Obrigado pela repsota, sao nesses eventos que estou trablahando mesmo, mas a ideia era nao esperar enter mas sim a msg aparecer..esperar..sumir, por isso tentei usando o sleep.

  2. Numa primeira tentativa eu coloquei o código assim

    Dento de AvaliarReposta...

    ..Leu o que foi digitado.

    ACBrMTer.PosicionarCursor(IP, 1, 1);

    ACBrMTer.EnviarTexto(IP, 'Item: 1');

    ACBrMTer.PosicionarCursor(IP, 2, 1);

    ACBrMTer.EnviarTexto(IP, 'Nao foi encontrado');

    Sleep(2000):

    LimparDisplay:

    Alterar Status do terminal ..

     

    Nisso no display..depois que digitei o código..ele pausou 2 segundos e apareceu os dois textos que enviei chamou próximo Status..

    Numa segunda tentativa crei uma função MostrarMensagem ..dentro dela monto as duas linhas de texto para enviar e usei o Timer..onde ativo ele..com 2 segundos e coloquei nesse o comando de limpar display..mas teve o mesmo efeito do Sleep..

    ..

    10 minutos atrás, Daniel Simoes disse:

    Em que momento você inseriu o Sleep ?

    Desculpa.. esqueci de marcar 😄

    10 minutos atrás, Daniel Simoes disse:

    Em que momento você inseriu o Sleep ?

    Desculpa.. esqueci de marcar 😄

  3. Boa tarde, estou tendo um problema ao enviar o texto para o diplay do terminal depois que le as repostas(estou me baseando no exemplo do ACBrMTer)
    Exemplo: Quando a pessoa digita um codigo do Item:


    image.thumb.png.b7f72a8769f75002a09980ada526b447.png
     

    faço uma consulta no banco, se nao existir jogo para o display:

    ACBrMTer.PosicionarCursor(IP, 1, 1);
    ACBrMTer.EnviarTexto(IP, 'Item: 1');
    ACBrMTer.PosicionarCursor(IP, 2, 1);
    ACBrMTer.EnviarTexto(IP, 'Nao foi encontrado');


    ate ae tudo bem.. acontece que que o processo e muito rapido, nao da tempo de le, eu gostaria que na tela do terminal desse uma pausa e continuasse o processo..
    tentei mudar a propriedade WaitInterval.. tbm tentei usar uum Sleep.. mas pecebi que n funciona pos ele trava a app.. nao o processamento no display..

    alguem teria uma sujestao como resolver isso?

     

    Grato. 

  4. 8 minutos atrás, Reneu Mendes Garcia disse:

    Pelo que eu entendei no banco Sicredi tem dois layout um pra Cobrança com registro e outro pra  Cobrança sem registro, e esse é o motivo dos erros que citei no post acima.

    Mas não estou sabendo onde mudar o layout, já mudei em [BoletoBancoConfig] ->  TipoCobranca pra "1",  "A" , "9" e nada muda no layout

    Se alguém puder me ajudar eu agradeço.

    Amigo consegui revolver a meu caso, para mim o problema estava na tag de modalidade (Cedente.Modalidade), tinha um erro na minha app e tava passando o valor errado, passei o correto(1) e funcionou.

  5. Bom dia pessoal como vão?, seguinte.. me deparei com uma situação usando o ECF virtual:

    Quando realizo uma venda uando usando um valor com 3 cadas decimais no desconto, o Total da venda fica diferente dos somatorioas do total do item.

    Eu simulei uma venda comente com um item para mostrar(nesse caso ficou 0.01 de diferença, porem quando são varios itens.. fica significativo), onde:

    valor do produto : 99,9 e valor do desconto :  10,989

     impressao da bobina ficou:

    image.png.c34c3383e6759b823cb5fcda73a84bdc.png

     

    Debugando o codigo o notei e que quando ele esta montando o arquivo, no evento : TACBrECF.FinalizaVendeItem ele calcula o total do item considerando as 3 casas:

    image.png.e06b9a1b4a43b8d284a438d4acab7362.png

     

    Porem para pegar os valores do Subtotal, no evento TACBrECFVirtualClass.DescontoAcrescimoItemAnterior ele usa o ROUNDECF para o desconto, deixando difrente..

    image.thumb.png.2902ec81b5d5e5de5c2286df6a1bc742.png

     

    como faz nessa situação?

     

    Desde ja agradeço.

     

  6. Em 13/05/2019 at 09:24, lfbasso disse:

    Obtive o seguinte erro ao tentar cancelar uma nfe usando NFE.CANCLEARNFE agora a pouco

    ERRO: leiauteEvento_v1.00.xsd#/schema/complexType[2][@name = 'TRetEvento']/sequence[1]/element[1][@name = 'infEvento']/complexType[1]/sequence[1]/element[3][@name = 'cOrgao']
    Undeclared XSD type : '{http://www.portalfiscal.inf.br/nfe}TCOrgaoIBGE'.

    estou exatamente com esse mesmo problema.. como resolveu?

  7. 3 minutos atrás, doidopb disse:

    O que diz o log?

    C:\Desenvolvimento\SOFTWARE\Componentes\ACBr\Fontes\ACBrDFe\ACBrNFe\ACBrNFeNotasFiscais.pas(3566) Error: Declaration expected but identifier 'vv' found

    1 minuto atrás, TiagoNormando disse:

    C:\Desenvolvimento\SOFTWARE\Componentes\ACBr\Fontes\ACBrDFe\ACBrNFe\ACBrNFeNotasFiscais.pas(3566) Error: Declaration expected but identifier 'vv' found

     

    5 minutos atrás, doidopb disse:

    O que diz o log?

    vou baixar novamente

  8. Em 30/09/2016 at 09:32, Daniel Simoes disse:

    Você teria que criar uma classe própria do seu ECFVirtual... e nele, implementar o método GetEstadoVirtual, com os ajustes em fpEstado, que você achar necessário...

    Boa tarde @Daniel Simoes, essa solução se aplica tbm para quando tiver usando o  AcbrECF virtual na venda para Emitir NFc-e?  to fazendo assim e queria desativar a reduzão Z.. mas nao sei qual valor do Estado mudar.. 

  9. Bom dia pessoal, alguém pode me responder uma duvida? tenho um cliente com regime normal, e to fazendo uma nota de devolução, porem usa a situação tributaria:

    '041  - Não tributada',  ta dando erro no xml informando :

    ''531-Rejeicao: Total da BC ICMS difere do somatorio dos itens'

    pelo o que percebi no XML gerado, quando escolhe "041" o xml não monta  as TAGs <vBC></vBC>  no corpo ICSM,

    Porem, trás o total no ICMSTot><vBC>... </vBC>, minha duvida:

    pelo fato de ser 041 eu preciso não passar essa totalização? o componente não trata isso? ou seja, eu so posso os valores de ICMS para Normal se a situação tributaria for:

    '000-Tributada integralmente', estou anexando o xml.

     

    Desde já agradeço

     

    XML.xml

    • Curtir 1
  10. 59 minutos atrás, Juliomar Marchetti disse:

    Aplica uma correção e sugere o código aqui que analisamos e subimos!

    mas não lembro de poder fazer uma NFC-e somente com serviço!

     

    No ACBrNFeDANFEFRDM.pas  tem o trecho que mostra os tributos :

    if Assigned(CpTotTrib) then
    CpTotTrib.Visible := cdsCalculoImposto.FieldByName('VTotTrib').AsFloat > 0;

    Porém o calculo do imposto é carregado separado do ISSQN, assim o cdsCalculoImposto.FieldByName('VTotTrib')  o total dos tributos do ICMS:

    procedure TACBrNFeFRClass.CarregaDadosNFe;
    begin
      ..
      CarregaCalculoImposto;
      ..
      CarregaISSQN;
      ...
    end;

    Como a minha nota só possui ISS ele não mostra na DANFE porque o  VTotTrib fica zerado.

    Mudei para carregar o ISS dentro do CarregaCalculoImposto , somando o ICMS e o ISSQ no cdsCalculoImposto.FieldByName('VTotTrib').

  11. Boa tarde, alguém pode me tirar uma duvida , estou tentando colocar as Informação dos Tributos Totais no modelo do A4(DANFeNFCeA4.fr3) , eu já vi que possui  a informação no relatório :

    Porém o componente só mostra, se for passado o total de impostos em Total.ICMSTot.vTotTrib , mas estou gerando uma NFCe somente de serviços, a nota não possui ICMS ,

    somente imposto de ISS nessa situação, como faço nesse caso?

     

    desde já agradeço.

     

     

×
×
  • 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...