Erro Schemas Servidor Pvh (Prefeitura Porto Velho / Ro )

[amnchaves]

Caros colegas,

 

Estou implementando a NFS-e da prefeitura de Porto Velho / RO e ao tentar enviar a nota, estou com os seguintes problemas:

 

1 - Ele diz que não foi encontrado o arquivo de schema:  nfse.xsd

     Sendo que no site da prefeitura, o arquivo é outro: nfse_v2.0.xsd

 

Alguem pode me dar uma ajuda?

 

Agradeço pela atenção

 

Marcos

[Italo Giurizzato Junior]

Boa noite Marcos,

 

Se você estiver utilizando o programa exemplo, note que há necessidade de informar o caminho onde esta os schemas para o provedor PVH.

 

...\Exemplos\ACBrNFSe\Delphi\Schemas\PVH

[amnchaves]

Ítalo, ja fiz isso, mas mesmo assim ele continua dizendo que o layout não foi localizado: nfse.xsd, mas o detalhe é que no site da prefeitura, eles forecem os arquivos de schemas que é : nfse_v2.0.xsd,

ou seja, diferente dos que vem no acbr.

[amnchaves]

As configurações que fiz foram:

 

 ACBrNFSe1.Configuracoes.Certificados.NumeroSerie := A_Menu.LeRegistro('NFS-e','NSerieCertificado');

 ACBrNFSe1.Configuracoes.Arquivos.AdicionarLiteral := True;
 ACBrNFSe1.Configuracoes.Arquivos.EmissaoPathNFSe  := True;
 ACBrNFSe1.Configuracoes.Arquivos.PastaMensal      := True;

 ACBrNFSe1.Configuracoes.Arquivos.PathCan  := A_Menu.LeRegistro('NFS-e','PathLogs');
 ACBrNFSe1.Configuracoes.Arquivos.PathNFSe := A_Menu.LeRegistro('NFS-e','PathNFSe');
 ACBrNFSe1.Configuracoes.Arquivos.Salvar   := True;

 PathMensal:=ACBrNFSe1.Configuracoes.Arquivos.GetPathNFSe(0);

 ACBrNFSe1.Configuracoes.Geral.PathSchemas := A_Menu.LeRegistro('NFS-e','PathSchemas');;
 ACBrNFSe1.Configuracoes.Geral.Salvar      := True;
 ACBrNFSe1.Configuracoes.Geral.PathSalvar  := A_Menu.LeRegistro('NFS-e','PathLogs');

 ACBrNFSe1.Configuracoes.WebServices.CodigoMunicipio := StrToIntDef(A_Menu.LeRegistro('NFS-e','CodMunicipio'), 0);
 ACBrNFSe1.Configuracoes.WebServices.Ambiente        := StrToTpAmb(Ok, xAmbiente);
 ACBrNFSe1.Configuracoes.WebServices.Visualizar      := True;
 ACBrNFSe1.Configuracoes.WebServices.SenhaWeb        := A_Menu.LeRegistro('NFS-e','wsUsuario');
 ACBrNFSe1.Configuracoes.WebServices.UserWeb         := A_Menu.LeRegistro('NFS-e','wsSenha');

 ACBrNFSe1.Configuracoes.WebServices.SetConfigMunicipio(ACBrNFSe1.Configuracoes.Geral.PathSchemas);

 //Alimentar a DANFESeFR
 with ACBrNFSeDANFSeFR1 do
  begin
   FastFile   := A_Menu.PathLayouts + 'DANFSE.fr3';
   Logo       := A_Menu.LeRegistro('NFS-e','PathLogos')+'LogoNFSe.BMP';
   PrestLogo  := A_Menu.LeRegistro('NFS-e','PathLogoPrestador')+'LogoPrestador.BMP';
   Prefeitura := A_Menu.LeRegistro('NFS-e','PathLogoPrefeitura')+'LogoPrefeitura.BMP';
   PathPDF    := A_Menu.LeRegistro('NFS-e','PathNFSe')+'PDF\';
   Email      := A_Menu.CDS_FiliaisEMAIL.Value;
   Site       := A_Menu.CDS_FiliaisSITE.Value;
   Fax        := A_Menu.CDS_FiliaisFAX.Value;
  end;

 edtServidor.Text := ACBrNFSe1.Configuracoes.WebServices.xProvedor;
 

[Italo Giurizzato Junior]

Bom dia Marcos,

 

A linha:

 

ACBrNFSe1.Configuracoes.Geral.PathSchemas := A_Menu.LeRegistro('NFS-e','PathSchemas');;
 

Você configurando a propriedade PathSchemas, ao executar o A_Menu.LeRegistro qual é o caminho retornado?

 

Dentro da pasta informada nesse caminho quais são os arquivos que estão salvos nela?

[erikepvh]

Caro amigo o arquivo que esta no acbr e mesmo da prefeitura somente foi renomeado o nome para ficar padrão dentro do Acbr.

 

...\Exemplos\ACBrNFSe\Delphi\Schemas\PVH

 

Espero ter ajudado..

[amnchaves]

Caros colegas, obrigado por ter respondido ao meu tópico, mas estou com os seguintes problemas:

 

1 - Montei a rotina que alimenta o componente, conforme listado a baixo:

    try
     ACBrNFSe1.Enviar(vNumLote);
      EProtocolo.Text := acbrNfse1.NotasFiscais.Items[0].NFSe.Protocolo; //ACBrNFSe1.WebServices.ConsLote.Protocolo;
      EditStatus.Lines.add( acbrNfse1.NotasFiscais.Items[0].NFSe.CodigoVerificacao );
    except
      on E: Exception do
      begin
        ACBrNFse1.NotasFiscais.Clear;
        EditStatus.Lines.Add(E.Message);
        Exit;
      end;

    end;
 

 Ao enviar o lote, me vem o seguinte erro:

 

Requisicao de servico invalida. O sistema nao conseguiu capturar o parametro nfseCabecMsg e/ou nfseDadosMsg.

 

Alguem pode me ajudar a resolver isso?

 

Obrigado

 

Marcos

[Italo Giurizzato Junior]

Boa tarde Marcos,

 

A montagem do Envelope-Soap me parece estar correto, tudo indica que o problema seja no webservice do provedor.

[amnchaves]

Boa Tarde Ítalojjr,

 

Camarada, ja tentei de tudo aqui, mas toda NFSe que mando da o erro acima. Você tem ideia do que possa ser?

 

Marcos

[Italo Giurizzato Junior]

Bom dia Marcos,

 

O erro ocorre nos dois ambientes, homologação e produção ?

[amnchaves]

Bom dia Italo,

 

sim, acontece nos dois ambientes, acabei de testar em produção e da a mesma coisa.

 

Marcos

[Gallixx]

Caros colegas, obrigado por ter respondido ao meu tópico, mas estou com os seguintes problemas:

 

1 - Montei a rotina que alimenta o componente, conforme listado a baixo:

    try

     ACBrNFSe1.Enviar(vNumLote);

      EProtocolo.Text := acbrNfse1.NotasFiscais.Items[0].NFSe.Protocolo; //ACBrNFSe1.WebServices.ConsLote.Protocolo;

      EditStatus.Lines.add( acbrNfse1.NotasFiscais.Items[0].NFSe.CodigoVerificacao );

    except

      on E: Exception do

      begin

        ACBrNFse1.NotasFiscais.Clear;

        EditStatus.Lines.Add(E.Message);

        Exit;

      end;

    end;

 

 Ao enviar o lote, me vem o seguinte erro:

 

Requisicao de servico invalida. O sistema nao conseguiu capturar o parametro nfseCabecMsg e/ou nfseDadosMsg.

 

Alguem pode me ajudar a resolver isso?

 

Obrigado

 

Marcos

 

Estou tendo o mesmo problema.

 

Alguma solução??

[Italo Giurizzato Junior]

Bom dia Gallixx,

 

Tente usar o Envio Sincrono.

[Gallixx]

Bom dia Gallixx,

 

Tente usar o Envio Sincrono.

 

Bom dia Italo, Obrigado por responder.

 

Desculpe a ignorancia, aonde se encontra o EnviarSincrono? Obrigado.

 

---

Editado:

Recompilei o ACBR e consegui agora

 

Estou com outro erro agora, mas é de campo errado. 

 

Obrigado ITALO

Editado 22 Janeiro, 2014 por Gallixx

[Binho Biatheski]

Estou na tentativa/erro desde o ano passado para emitir para Porto Velho, para não ficar parado utilizei o provedor Betha no desenvolvimento, está funcionado sem problema, mas para PVH apresenta a mensagem ao enviar o lote (Sincrono), mandei e-mail para suporte, esperando a resposta.

 

Código Erro : L4

Mensagem... : Erro interno do servidor

Correção... : Verificar com o orgao responsavel o motivo do problema

Provedor... : PVH

Código Erro : 

Mensagem... : 

Correção... : 

Provedor... : PVH

[erikepvh]

Pessoal, a mensagem do Binho Biatheski, aparece quando clica em Enviar Sicrono, se clicar em Gerar Enviar Lote ate envia e recebo o protocolo de envio, mas logo que vai fazer a consulta aparece outro erro.

 

 Adelson vc conseguiu enviar as notas para o provedor ?

[Binho Biatheski]

Erike, eles estão com problema no servidor de homologação com os métodos que gera NFS-e e o programador responsável pelo Web Service está de férias, entraram em contato com ele relatando a situação, mas até agora não obtiveram resposta. Quarta-feira (05/02) estará de volta, nos resta aguardar.

[Binho Biatheski]

Finalmente consertaram o servidor de homologação de Porto Velho, utilizando o provedor Betha executo o seguinte procedimento para enviar:

 

NFSe.Enviar(NFSe.NotasFiscais.NumeroLote,false)

Após o envio consulto o número do protocolo e situação para baixar o xml da nfs-e:

 

lsProtocolo := NFSe.NotasFiscais.Items[0].NFSe.Protocolo;

 

NFSe.ConsultarSituacao(NFSe.NotasFiscais.Items[0].NFSe.Prestador.Cnpj, NFSe.NotasFiscais.Items[0].NFSe.Prestador.InscricaoMunicipal, lsProtocolo);

 

Então baixo a nfs-e:

 

NFSe.ConsultarNFSeporRps(NFSe.NotasFiscais.Items.NFSe.IdentificacaoRps.Numero,

                                     NFSe.NotasFiscais.Items.NFSe.IdentificacaoRps.Serie,

                                     TipoRPSToStr(NFSe.NotasFiscais.Items.NFSe.IdentificacaoRps.Tipo),

                                     NFSe.NotasFiscais.Items.NFSe.Prestador.Cnpj,

                                     NFSe.NotasFiscais.Items.NFSe.Prestador.InscricaoMunicipal);

 

Fazendo testes com Porto Velho, notei algo diferente no processo, após enviar:

 

NFSe.EnviarSincrono(NFSe.NotasFiscais.NumeroLote,false)

 

Fui consultar o protocolo e estava zerado '0', olhando os xmls de retorno, foi gerado o arquivo no diretório NFSe sem consultar a Situação ou NFSeporRPS.

 

Alguns provedores retornam protocolo e outros o arquivo da nota? 

Editado 13 Fevereiro, 2014 por Binho Biatheski