Cancelamento NFSe pela SIGEP

[TS1Desenvolvimento]

Boa tarde
estou tentando efetuar o cancelamento de uma NFSe pelo provedor SIGEP porém a mensagem que retorna é: "A chave privada do contribuinte é obrigatória". Conforme a imagem de erro.
Estou postando também os XML, o que foi liberado pelo provedor e os que foram emitidos pelo ACBr para tentar o cancelamento.
 

5220073387493100017856000000000000003-rps.xml 3-can.xml 3-can-soap.xml 3-ped-can.xml 3-ped-can-soap.xml

[TS1Desenvolvimento]

Consegui com o pessoal da SIGEP um modelo de como deve estar o XML para o cancelamento

modelo-soap-cancelar-nfse.xml

[Juliomar Marchetti]

Certo. com isso identificou algo no fonte que poderia ser corrigido?

[TS1Desenvolvimento]

Boa tarde
Juliomar, demorei para responder hein.
Devido a quarentena estamos trabalhando com redução jornada de trabalho e com isso acaba acumulando chamados, o que complicou algumas coisas.
Porém eu achei sim uma questão que precisei alterar nos fontes.
arquivo: ACBrNFSeWebServices, na linha 4810 estava
if FProvedor = proCTA then
  ChaveAcessoPrefeitura := FPConfiguracoesNFSe.Geral.Emitente.WebChaveAcesso
else
  ChaveAcessoPrefeitura := FNotasFiscais.Items[0].NFSe.Prestador.ChaveAcesso;

a minha alteração foi

if FProvedor = proCTA then
  ChaveAcessoPrefeitura := FPConfiguracoesNFSe.Geral.Emitente.WebChaveAcesso
else if FProvedor = proSigep then
begin
  ChaveAcessoPrefeitura := FPConfiguracoesNFSe.Geral.Emitente.WebChaveAcesso;
  CodVerificacaoRPS := FNotasFiscais.Items[0].NFSe.CodigoVerificacao;
end
else
  ChaveAcessoPrefeitura := FNotasFiscais.Items[0].NFSe.Prestador.ChaveAcesso;

Com essa alteração consegui resolver o problema da chave do contribuinte, porém apresentou outro erro só que na comparação do XML gerado com o XLM de modelo enviado pelo provedor eu não consegui achar a diferença e não foi possível efetuar o cancelamento.
O erro apresentado é: Informe um motivo para o cancelamento. 
O motivo foi informado, só que a quantidade de caracteres informado como motivo é menor do que está no exemplo, alterei o motivo para ficar igual ao XML do exemplo, porém o erro Informe um motivo para o cancelamento, persiste. 
Já estramos em contato com o provedor repassando o XML gerado. 
Vou aguardar o retorno deles e toda e qualquer alteração minha irei repassando aqui e no final repassei os arquivos alterados.
Por enquanto muito obrigado!

[Italo Giurizzato Junior]

Boa tarde,

Assim que conseguir realizar o cancelamento, por favor anexa as units que foram sofreram alteração para que possamos analisar.

Estando tudo OK enviaremos para o repositório.

[TS1Desenvolvimento]

Bom dia Italo,
a questão é o retorno do cancelamento, no servidor Sigep fica como cancelada a nota, mas retorna erro.

[TS1Desenvolvimento]

Bom dia Italo,
a questão é o retorno do cancelamento, no servidor Sigep fica como cancelada a nota, mas retorna erro.
Mas de toda forma está aí o arquivo alterado, a alteração foi:
 

na linha 4810 estava
if FProvedor = proCTA then
  ChaveAcessoPrefeitura := FPConfiguracoesNFSe.Geral.Emitente.WebChaveAcesso
else
  ChaveAcessoPrefeitura := FNotasFiscais.Items[0].NFSe.Prestador.ChaveAcesso;

a minha alteração foi

if FProvedor = proCTA then
  ChaveAcessoPrefeitura := FPConfiguracoesNFSe.Geral.Emitente.WebChaveAcesso
else if FProvedor = proSigep then
begin
  ChaveAcessoPrefeitura := FPConfiguracoesNFSe.Geral.Emitente.WebChaveAcesso;
  CodVerificacaoRPS := FNotasFiscais.Items[0].NFSe.CodigoVerificacao;
end
else
  ChaveAcessoPrefeitura := FNotasFiscais.Items[0].NFSe.Prestador.ChaveAcesso;

ACBrNFSeWebServices.pas

[Italo Giurizzato Junior]

Boa tarde,

Muito obrigado pela colaboração, já inclui na minha lista de tarefas, assim que possível vou analisar a sua alteração, estando tudo OK vou enviar para o repositório.

[Italo Giurizzato Junior]

Bom dia,

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

Observação: os seus fontes estão bem desatualizados.