Ir para conteúdo
  • Cadastre-se

Davi

Membros
  • Total de ítens

    83
  • Registro em

  • Última visita

Posts postados por Davi

  1. Bom Dia,

     

    Eu vou atualizar novamente os componentes, até tentei ontem, mas deu muito erros, tive que voltar.

    E tenho que entregar isso até amanhã para um cliente. Então fiz o seguinte:

    var
      cStr, cNumeroNF, cCodigoVerificao, sMensagem : String;
      posInicial, posFinal : Integer;
    begin
      //Em branco :
      //ACBrNFSe1.NotasFiscais.Items[0].NFSe.CodigoVerificacao
      //ACBrNFSe1.WebServices.ConsLote.NotasFiscais.Items[0].NFSe.CodigoVerificacao
      cStr := ACBrNFSe1.WebServices.ConsLote.RetWS;
      posInicial := pos('<Numero>',cStr)+8;
      posFinal := pos('</Numero>',cStr);
      posFinal := posFinal - posInicial;
      cNumeroNF:= copy(cStr, posInicial, posFinal);
    
      posInicial := pos('<CodigoVerificacao>',cStr)+19;
      posFinal := pos('</CodigoVerificacao>',cStr);
      posFinal := posFinal - posInicial;
      cCodigoVerificao:= copy(cStr, posInicial, posFinal);
    

    Depois vou dar uma olhada com mais calma, para descobrir porque não esta trazendo no componente.

     

    Outra coisa que terei que ver como fazer, é que quando consulta  e a NFSe está cancelada retorna nesta mesma String:

    <InfPedidoCancelamento id="pedidoCancelamento05343673000168_201400000000004">
    

    Também uma forma de recuperar o CodigoCancelamento pelo componente.

     

    Obrigado,

     

    Bom dia Também estou com o mesmo problema você  já resolveu? 

  2. Bom Dia fiz um update dos fontes ontem e quando fui rencopilar os pacotes NFe e NFSe entraram em conflito com o seguinte erro

     

    [DCC Error] ACBrNFSeDanfseFRpkg.dpk(36): E2199 Packages 'ACBr_NFe2' and 'ACBr_NFSe' both contain unit 'JwaWinCrypt'

     

    Já removi o componente por completo nas pasta bpl deletei todas fiz o buid em todos pacotes porem da sempre conflito quando tento instalar o ACBrNFSeDanfseFRpkg se tiver o nfe se remover ele instala porem o nfe não

     

    notei que quando vou compilar ele pede uses do   ACBr_NFe2; porem o componente é de serviço

     

     

  3. Entrei novamente em contato agora com o pessoal que faz homologação, relatei oque foi passado pelo desenvolvimento deles frizando o roteiro PAF que deve exbir a mensagem  onde o mesmo me informou que sim o roteiro esta controverso "Porem" é opcional o cancelamento, então não sera necessario a implementação pois fiz ela com base num informação equivocada de um dos tecnicos que me atenderam e falaram que era Vedado a Exibição da Mensagem! Agradeço a Todos.

    Marcado Mais 1 Homologação  :cool:

  4.  

     

    Olhe, as mensagens são mostradas nos dois eventos dependendo da configuração conforme passei, concordo com o Juliomar, sempre que precisei fazer algo utilizei os eventos e o seu caso é até simples, basta não mostrar a mensagem e tratar o retorno.

    sim concordo com vocês ate porque no roteiro no PAF tem que exibir a mensagem SIM NÃO, porem para o roteiro na BemaTEF Total não pode ser aparecer por isso fiz a modificação sendo ela configurável no sistema pois não acho correto o cancelamento direto de acordo com o roteiro PAF

  5. Para funcionar Alterei o fonte AcbrTEFD linha 1127

            if not ImpressaoOk then
            begin
              if DoExibeMsg( opmYesNo, CACBrTEFD_Erro_ECFNaoResponde ) <> mrYes then
                 break ;
            end;
    
    

    Para uma verificação

            if ((not ImpressaoOk) and (UvarSys.Tef.Auttar = '1')) then \\Onde tenho uma variavel avisando que o GP é da BemaTEF
               break ;
            if not ImpressaoOk then
            begin
              if DoExibeMsg( opmYesNo, CACBrTEFD_Erro_ECFNaoResponde ) <> mrYes then
                 break ;
            end;
    
    

    Com esta modificação funcionou conforme o roteiro que me passaram e o contato que fiz com o pessoal do desenvolvimento que me confirmou que é necessario cancelar! caso tenha alguma dica para não alterar nos fontes acbr fico grato!

  6. Boa tarde!

     

    Estou passando o ROTEIRO_BASICO VAREJO fornecido pela Bematech para o uso do Bematef Total como um tef_dial

     

    no roteiro Passo 1 etapa 4

       -> Teste de desligamento

           -> Realizar uma transação de Crédito, no valor de 110,00. Utilizar o cartão 5111 1111 1111 8, validade 12/12 cod segurança 123. No momento da impressão do comprovante desligar a ECF, ligar novamente a ECF e verificar o comportamento da AUTOMAÇÃO.

               ->A transação deve ser desfeita pela automação comercial.(UTILIZAR FERRAMENTA WEB PARA VALIDAR O STATUS DA TRANSAÇÃO).

     

    entrei em contato com eles onde me enformaram que a mesma deveria ser cancelada não poderia dar a opção de tentar novamente

    minha duvida é como intercepto o a menssagem "CACBrTEFD_Erro_ECFNaoResponde = 'Impressora não responde'+sLineBreak+

                                       'Deseja imprimir novamente ?' ;"
    e mando cancelar a transação automático! 
  7. Estou realizando o roteiro esta faltando somente o item 3 e 4 referente ao fechamento do GP.

    Eu finalizo o GP e quando mando abrir pela aplicação ela abre porem não conecta na redecard da o erro "Não ativou TEF DISCADO - REDECARD (2)" ja apaguei os arquivos da pasta req e resp e dos subdiretórios conforme outros tópicos ja coloquei meu aplicativo para rodar no c: pois uso partição e estava rodando da D: porem nada resolve, mas se eu finalizar o GP e em vez de mandar a aplicação abrir eu for na pasta e clicar ela funciona corretamente estou usando Win7 x64 ja baixei permições de usuário desabilitei anti vírus executei como admin porem nada ate o momento

  8. Ola comigo não funcionou passei a aplicação para o C:\ deletei os arquivo na Req ou Resp perdido...  porem não da certo

    estou executando o roteiro Item pulei a etape de fechamento do GP e fiz todas as outras só falta esta e a 04:

    03

    CRT

    [REDECARD]

    [Teste na Venda]

    Com a Automação Comercial aberta, finalizar o GP e realizar uma transação de venda.

     

     

     

     

     

    Win 7 x64 aplicação atualmente no D:

    tef_dial no c:

    Banco SQLServer rodando pela rede

  9. Informa um nome ou patch completo de um arquivo no ACBrECF.ArqLog e ele vai gerar para você!

    Mas voltando a falar um pouco sobre o timeout, lembro que o Daniel fez um post ou respondeu alguém  no fórum

    que deveria de modificar para mais o timeout para emissão da redução Z!

     

    Sim fiz a modificação timeout  := 300 e depois mando a redução!

    Já habilitei o log amanha posto o resultado do teste.

     

    Muito Obrigado pela ajuda.

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