Ir para conteúdo
  • Cadastre-se

Dream Sistemas

Membros Pro
  • Total de ítens

    67
  • Registro em

  • Última visita

Posts postados por Dream Sistemas

  1. Bom dia Ítalo estávamos realizando a consulta pelo recibo pois pelo ID já havíamos tentado e também tivemos erro. Fiz novamente o teste para confirmar.

    Retorno da consulta do protocolo para confirmar o ID e o Recibo.

    Código Retorno: 201
    Mensagem: Lote processado com sucesso.
    ideEmpregador
     - TpInsc: 1
     - NrInsc: 73759417
    ideTransmissor
     - TpInsc: 1
     - NrInsc: 73759417000106
    dadosRecepcaoLote
     - dhRecepcao..............: 08/04/2019 10:12:57
     - versaoAplicativoRecepcao: 0.1.0-A0356
     - protocoloEnvio..........: 1.2.201904.0000000000086835241
    Processamento
     - ID Evento..........: ID1737594170000002019040809143500233
     - cdResposta.........: 201
     - descResposta.......: Sucesso.
     - versaoAplicProcLote: 12.0.0-A4074
     - dhProcessamento....: 08/04/2019 10:12:57
    Recibo
     - nrRecibo: 1.2.0000000000421432455
     - hash....: c703CPUSYmB16RwkDSJCt3wzmwiUq85VNAy/KmOAJ9M=

     

    Retorno Teste pelo ID:

    Inicio TDownloadEventos
    Versão Layout: 02_05_00 
    Ambiente: 2 
    Status Código: 402 
    Status Descrição: Solicitação inválida. Redefina sua consulta 

     

    Retorno Teste pelo Recibo:

    Inicio TDownloadEventos
    Versão Layout: 02_05_00 
    Ambiente: 2 
    Status Código: 202 
    Status Descrição: Evento não encontrado ou não processado ou sem perfil para acesso. 

     

    Tenho uma dúvida com relação ao perfil de uso. Tenho que criar um perfil de uso para o certificado da própria empresa?  em tudo que li vejo falar de liberar perfil quando é feito uma procuração eletrônica.

    talvez seja importante comentar, temos tido bastante dificuldade nas consultas, vários Erro: 12002 - TimeOut de Requisição até conseguir uma responta.

  2. Nossa versão do Delphi é 10.2 Version 25.0.26309.314 (Tokyo) / Versão do Fast Report: 5.6

    Após transmissão/autorização da NFCe ao imprimir simplesmente retorna o erro Access Violation e não realiza a impressão. Isso acontece no executável Frente de Caixa. Se o cliente abrir o executável do Retaguarda e reimprimir, sai corretamente. Já inserimos o MidasLib no uses do projeto. No PC do cliente, inserimos a midas.dll (versão 25 que está na pasta de instalação do nosso Delphi) nas pastas System32, SysWow64, e também junto com o executável. Também registramos a dll via CMD. Ambos utilizam Windows 7 x64. Algo que está nos intrigando é que não acontece sempre. As vezes esses dois clientes ficam 3, 4 dias usando sem erro. Esses dois clientes utilizam impressora não fiscal, os modelos são Bematech 4200 TH e Elgin i9.  Configuramos nas opções avançadas para enviar a impressão direto na impressora.

     

  3. Bom dia. Eu fiz a implementação para o banco CRESOL SC/RS.

    Essa cooperativa trabalha apenas com o Layout CNAB 400 e é baseada no banco Bradesco.

    Segue os fontes da unit para avaliação e adição no Subversion, assim como o documento de layout usado e a logomarca.

     

    OBS: não foi anexado as alterações necessárias na unit ACBrBoleto, como a criação do TACBrTipoCobranca.cobCresol e nem a inicialização dentro do método SetTipoCobrança.

     

     

    Manual_Cobrança_Integrada_Cooperado.doc

    ACBrBancoCresol.pas

    Cresol.bmp

    • Curtir 1
  4. Boa tarde Italo;

    Lendo novamente minha postagem creio que a descrição que coloquei "eventos trabalhistas" possa ter gerado confusão. O correto seria "Eventos de Segurança e Saúde no Trabalho - SST". O Governo publicou no dia 30/05/2018 a nota evolutiva que trouxe mudanças em praticamente todos os Eventos de Segurança e Saúde no Trabalho - SST.  por ex: foi excluído o evento S-2241, foram criados os eventos S-1065 e S-2245. sofreram ainda mudanças os eventos S-1005, S-1060, S-2210, S-2220, S-2240, S-2241. também foram criadas novas tabelas acessórias. Não identificamos nas últimas atualizações disponíveis mudanças nos mesmos.  

  5. Encontrei um problema na função TratarResposta da Classe TNFeStatusServico no arquivo ACBrNFeWebServices.pas.

    o problema acontece no trecho a seguir:

        { WebService do RS retorna horário de verão mesmo pros estados que não
          adotam esse horário, ao utilizar esta hora para basear a emissão da nota
          acontece o erro. }
        if (pos('svrs.rs.gov.br', FPURL) > 0) and
           (MinutesBetween(NFeRetorno.dhRecbto, Now) > 50) and
           (not IsHorarioDeVerao(CUFtoUF(FcUF), NFeRetorno.dhRecbto)) then
          FdhRecbto:= IncHour(NFeRetorno.dhRecbto,-1)
        else
          FdhRecbto := NFeRetorno.dhRecbto;

    - Agora que acabou o horario de verão o webservice do RS passa a retornar o horario padrão, porem este teste está decrementando o horario retornado pela sefaz em 1 hora no caso da máquina ainda estar desconfigurada com o horario antigo.

    Fiz um ajuste nesta rotina criando uma função no pcnAuxiliar.pas que me retorna se o estado onde foi enviado a consulta usa o horario de verão:

    function UFUsaHorarioVerao(const UF: string): Boolean;
    const
      UFHV = '.MT.MS.GO.MG.ES.RJ.SP.PR.SC.RS.DF.';
    begin
      Result := (AnsiPos(UF, UFHV) > 0);
    end;

    e adequei a função IsHorarioDeVerao (já Existente) que testa se o horario de verão está ativo para usar a mesma (tambem no pcnAuxiliar.pas), só o trecho alterado:

      Result := False;
      if (GetInicioDoHorarioDeVerao(anoInicio) <= dataHora) and
         (GetFimDoHorarioDeVerao(anoFim) >= dataHora) and
         (UFUsaHorarioVerao(UF)) then
        Result := True;

     

    a rotina corrigida na ACBrNFeWebServices.pas ficou assim:

        { WebService do RS retorna horário de verão mesmo pros estados que não
          adotam esse horário, ao utilizar esta hora para basear a emissão da nota
          acontece o erro. }
        if (pos('svrs.rs.gov.br', FPURL) > 0) and
           (not UFUsaHorarioVerao(CUFtoUF(FcUF))) and
           (IsHorarioDeVerao('RS', NFeRetorno.dhRecbto)) then
          FdhRecbto:= IncHour(NFeRetorno.dhRecbto, -1)
        else
          FdhRecbto := NFeRetorno.dhRecbto;

    agora ele só verifica se o estado do WebService não participa do horario do verão e se o horario de verão está ativo no RS antes de fazer o decremento.

     

    obrigado!

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