[Walder]

Postado Originalmente por LuizVaz

Para utilizar, crie um RIO assim:

var
  wsGINFES: GINFES;
  FHTTPRIO: THTTPRIO;

  //HTTPRIO
  FHTTPRIO := THTTPRIO.Create(Self);
  FHTTPRIO.HTTPWebNode.UseUTF8InHeader := True;
  FHTTPRIO.HTTPWebNode.InvokeOptions := [soIgnoreInvalidCerts, soAutoCheckAccessPointViaUDDI];
  FHTTPRIO.HTTPWebNode.OnBeforePost := DoBeforePost;
  FHTTPRIO.OnBeforeExecute := DoBeforeExecute;
  FHTTPRIO.Converter.Options := [soSendMultiRefObj, soTryAllSchema,
                                 soRootRefNodesToBody, soCacheMimeResponse];


  If (wsGINFES = nil) Then
    wsGINFES := GetGINFES(FALSE, URLWebServices, FHTTPRio);

Onde URLWebServices pode ser:
'https:\\producao.ginfes.com.br\\ServiceGinfesImpl '
'https:\\homologacao.ginfes.com.br\\ServiceGinfesI mpl'


Atenciosamente,
Luiz Vaz

Bom dia, Luiz.
Desculpe, mas não entendi essa parte da implementação do RIO. Essa parte do código deve ser posta onde?