Ajustes Provedor - proSigCorp - Pouso Alegre - MG

[adilsonpazzini]

Fiz alguns ajustes para Leitura do XML que estavam ocasionando alguns erros para consulta do RPS e cancelamento  .

Na unit : pnfsNFSeR.pas .  foram feitos alguns ajustes entre as linhas - 559 e 1643 .

Linha - 559 :  Pois esta interpretando incorretamente o valor, gerando erro na leitura .

    if FProvedor = ProSigCorp then <-------- incluido
      NFSe.Competencia := Leitor.rCampo(tcDat, 'Competencia') <---- incluido
    else
      NFSe.Competencia := Leitor.rCampo(tcStr, 'Competencia');
 

Linha - 1643 : Pois esta interpretando incorretamente o valor, gerando erro na leitura .

   if NFSe.NfseCancelamento.DataHora = 0 then
      if Provedor = proSigCorp then <------ incluido 
        NFSe.NfseCancelamento.DataHora := StringToDateTime(Leitor.rCampo(tcStr, 'DataHoraCancelamento') , 'DD/MM/YYYY hh:nn:ss') <--- incluido
      else
        NFSe.NfseCancelamento.DataHora := Leitor.rCampo(tcDatHor, 'DataHoraCancelamento');    

 

 

Desde ja agradeço . 

 

Adilson Pazzini

pnfsNFSeR.pas

[Juliana Tamizou]

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn

[adilsonpazzini]

Muito Obrigado Juliana .

[Italo Giurizzato Junior]

Bom dia Adilson,

Muito obrigado pela colaboração, já vou enviara para o repositório.

[adilsonpazzini]

Valeu Italo ... 

 

Adilson Pazzini

[Juliomar Marchetti]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.