Você chegou a observar as diretivas de compilação?
tem uma na linha acima e outra abaixo
Atualizei os Fontes e observei o seguinte:
procedure TWebServicesBase.DoCTeStatusServico;
var
ConsStatServ: TConsStatServ;
begin
ConsStatServ := TConsStatServ.create;
{$IFDEF PL_103}
ConsStatServ.schema := TsPL_CTe_103;
{$ENDIF}
{$IFDEF PL_104}
ConsStatServ.schema := TsPL_CTe_104;
{$ENDIF}
ConsStatServ.TpAmb := TpcnTipoAmbiente(FConfiguracoes.WebServices.AmbienteCodigo-1);
ConsStatServ.CUF := FConfiguracoes.WebServices.UFCodigo;
ConsStatServ.GerarXML;
FDadosMsg := ConsStatServ.Gerador.ArquivoFormatoXML;
ConsStatServ.Free;
// FDadosMsg := StringReplace( FDadosMsg, '<'+ENCODING_UTF8_STD+'>', '', [rfReplaceAll] ) ;
// FDadosMsg := StringReplace( FDadosMsg, '<'+ENCODING_UTF8+'>', '', [rfReplaceAll] ) ;
// FDadosMsg := StringReplace( FDadosMsg, '<?xml version="1.0"?>', '', [rfReplaceAll] ) ;
end;
aquela parte em vermelho nao deveri a cair fora para funcionar a consulta status na versao 1.04?