[DUG] Importing XML Into THTTPRIO?

[Jeremy Coulter]

thanks David. I must be using a really old generated file because when I
regenerated the file, these functions were added and I couldnt understand
why they were missing.
I will wonder down to your desk in a min and pat you on the back :-)

On Tue, Apr 12, 2016 at 11:03 AM, David Moorhouse <
David.Moorhouse at pegasus.org.nz> wrote:

> Use the XML importer which gives  3 global functions:
>
>
>
> ·         function Getdoc(Doc: IXMLDocument): IXMLDocType;
>
> ·         function Loaddoc(const FileName: string): IXMLDocType;
>
> ·         function Newdoc: IXMLDocType;
>
>
>
> No need to use RIO (Remote Invocation Object) here.
>
>
>
> Cheers
>
>
>
> D
>
>
>
> *David Moorhouse (BCom)* | *Principal Software Engineer - HealthOne*
> Pegasus Health (Charitable) Ltd
>
> P: 03 353 0871 |   W:  www.pegasus.org.nz
> E: david.moorhouse at pegasus.org.nz
> PO Box 741, Christchurch 8140
> 160 Bealey Ave, Christchurch 8014
>
> [image: cid:image003.jpg at 01CEE516.6F544D00]
>
>
>
>
>
> *From:* delphi-bounces at listserver.123.net.nz [mailto:
> delphi-bounces at listserver.123.net.nz] *On Behalf Of *Jeremy Coulter
> *Sent:* Tuesday, 12 April 2016 10:45 a.m.
> *To:* NZ Borland Developers Group - Delphi List
> *Subject:* [DUG] Importing XML Into THTTPRIO?
>
>
>
> Hi all.
>
> A while back I created a class based on a SOAP XML. Doc.
>
> Basically what I need to do is by-pass the THTTPRIO call to the SOAP
> server and "import" an XML file that has some XML data in it that was
> retrieved by the THTTPRIO call.
>
> The idea is that I say, "here is a file, import then process it then give
> me the value for 'X'".
>
>
> When I look at the code, I see the following in the code in the function
> that does the RIO call:
>
>
>
>  Result := (RIO as MyPortType);
>
>
>
> MyPortType is:
>
>
>
> MyPortType = interface(IInvokable)
>
>
>
> so, is there a way I can basically open a file, and assign it to an object
> of the above so I can access the data?
>
>
>
> I hope I am being clear :-)
>
>
>
> Thanks, Jeremy
>
> *****************************************************
>
> This email or attachment(s) may contain confidential or legally privileged
> information intended for the sole use of the addressee(s). Any use,
> redistribution, disclosure, or reproduction of this message, except as
> intended, is prohibited. If you received this email in error, please notify
> the sender and erase all copies of the message, including any attachments.
>
> Any views or opinions expressed in this email (unless otherwise stated)
> may not represent those of Pegasus Health Ltd.
>
> **********************************************************
>
> _______________________________________________
> NZ Borland Developers Group - Delphi mailing list
> Post: delphi at listserver.123.net.nz
> Admin: http://delphi.org.nz/mailman/listinfo/delphi
> Unsubscribe: send an email to delphi-request at listserver.123.net.nz with
> Subject: unsubscribe
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://listserver.123.net.nz/pipermail/delphi/attachments/20160412/abca8741/attachment.html 
-------------- next part --------------
A non-text attachment was scrubbed...
Name: image001.jpg
Type: image/jpeg
Size: 3614 bytes
Desc: not available
Url : http://listserver.123.net.nz/pipermail/delphi/attachments/20160412/abca8741/attachment.jpg