Nothing has to be modified at all.  The question was could VistA be used
without using CPRS, that is, using the List Manager version of CPRS.  There
is no GUI client nor callback in the List Manager version.  It is just a
ordinary terminal session.

Now if the question is how to make CPRS to use a specific port.  Then Roy
gave the direction for that change.  The M code does not need to be modified
whatsoever.  However, the Delphi code that sets up the client to be a
listener must be changed to send a fixed port number.

----- Original Message ----- 
From: "Bill Walton" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Tuesday, September 28, 2004 6:43 AM
Subject: Re: [Hardhats-members] Vista without CPRS


> A very lucid explanation, Roy.  Thank you.
>
> What package in VistA contains the host end of this?  I'm interested in
the
> possibility that VistA could be wrapped in SOAP as a way of addressing the
> lack of M-proficient system administrators in the IT population at large
> (context = VistA viability for community-based physicians).  Has anyone
here
> ever been down this alley?
>
> Thanks,
> Bill
>
>
> ----- Original Message -----
> From: "Roy" <[EMAIL PROTECTED]>
> To: <[EMAIL PROTECTED]>
> Sent: Monday, September 27, 2004 9:41 PM
> Subject: Re: [Hardhats-members] Vista without CPRS
>
>
> > The code is acutally in the RPB Broker so you would have to modify it to
> use
> > a specific port rather than a "random" port.
> >
> > The code is in wsockc.pas, the port for the callback is actually set by
> the
> > client.  Look for LocalPort in the code and you will see how the RPC
> Client
> > gets this port, it sends the port to the host (VistA) along with the ip
> > address so the host (VistA) knows where to do the call back.
> >
> > The process is rather simple, an initial connection is made and the
client
> > sends the necessary info to the host, the host forks off a process to
> > perform the callback to the client, this forked process is the one used
> for
> > all subsequent IP communiation to the client.  I hope this helps.
> >
> > ----- Original Message -----
> > From: "Nancy Anthracite" <[EMAIL PROTECTED]>
> > To: <[EMAIL PROTECTED]>
> > Sent: Sunday, September 26, 2004 6:59 AM
> > Subject: RE: [Hardhats-members] Vista without CPRS
> >
> >
> > > Is that with the RPC broker components in the Delphi code, or, as I
> would
> > > guess, in the M code? How would I find it?
> > > Can you think of a string I could search M code for to hone in on
> t?  --
> > > i.e., you got to do better than that, Roy, for us newbies!!! ;-)
> > >
> > > -----Original Message-----
> > > From: [EMAIL PROTECTED]
> > > [mailto:[EMAIL PROTECTED] Behalf Of Roy
> > > Sent: Sunday, September 26, 2004 12:34 AM
> > > To: [EMAIL PROTECTED]
> > > Subject: Re: [Hardhats-members] Vista without CPRS
> > >
> > >
> > > It is in the winsock code.
> > >
> > > ----- Original Message -----
> > > From: "Kevin Toppenberg" <[EMAIL PROTECTED]>
> > > To: <[EMAIL PROTECTED]>
> > > Sent: Saturday, September 25, 2004 6:32 PM
> > > Subject: Re: [Hardhats-members] Vista without CPRS
> > >
> > >
> > > > Shaun,
> > > >
> > > > The server side is written in M, and the windows
> > > > client is written in Delphi pascal.
> > > >
> > > > I wouldn't advise you to try to pick through all that
> > > > M code--it's pretty ugly if you ask me.  I was
> > > > thinking that someone else on the list might know
> > > > right how to do it.
> > > >
> > > > Kevin
> > > >
> > > > --- CS Wagner <[EMAIL PROTECTED]> wrote:
> > > >
> > > > > I worked on that for the past couple weeks and I
> > > > > haven't even found a
> > > > > starting point.  I wrongly assumed that CPRS was
> > > > > written in C or C++.
> > > > > It appears to be in M.  Since I can barely recognize
> > > > > M at this point, I
> > > > > can't work on the code.
> > > > >  -Shaun
> > > > >
> > > > > Kevin Toppenberg wrote:
> > > > >
> > > > > >How difficult would it be to modify the source code
> > > > > so
> > > > > >that a specific port is used for the call back,
> > > > > rather
> > > > > >than a random port.  I would think that finding the
> > > > > >code would the difficult part.  But after found, I
> > > > > >would think that specifying a given port would be
> > > > > >straightforward.
> > > > > >
> > > > > >Kevin
> > > > > >
> > > > > >
> > > > > >--- CS Wagner <[EMAIL PROTECTED]> wrote:
> > > > > >
> > > > > >
> > > > > >
> > > > > >>It is becoming clear that we cannot use CPRS with
> > > > > >>our network security.
> > > > > >>
> > > > > >>
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >__________________________________
> > > > > >Do you Yahoo!?
> > > > > >Yahoo! Mail - 50x more storage than other
> > > > > providers!
> > > > > >http://promotions.yahoo.com/new_mail
> > > > > >
> > > > > >
> > > > >
> > > > >-------------------------------------------------------
> > > > > >This SF.Net email is sponsored by: YOU BE THE
> > > > > JUDGE. Be one of 170
> > > > > >Project Admins to receive an Apple iPod Mini FREE
> > > > > for your judgement on
> > > > > >who ports your project to Linux PPC the best.
> > > > > Sponsored by IBM.
> > > > > >Deadline: Sept. 24. Go here:
> > > > > http://sf.net/ppc_contest.php
> > > > > >_______________________________________________
> > > > > >Hardhats-members mailing list
> > > > > >[EMAIL PROTECTED]
> > > > >
> > > > >https://lists.sourceforge.net/lists/listinfo/hardhats-members
> > > > > >
> > > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > -------------------------------------------------------
> > > > > This SF.Net email is sponsored by: YOU BE THE JUDGE.
> > > > > Be one of 170
> > > > > Project Admins to receive an Apple iPod Mini FREE
> > > > > for your judgement on
> > > > > who ports your project to Linux PPC the best.
> > > > > Sponsored by IBM.
> > > > > Deadline: Sept. 24. Go here:
> > > > > http://sf.net/ppc_contest.php
> > > > > _______________________________________________
> > > > > Hardhats-members mailing list
> > > > > [EMAIL PROTECTED]
> > > > >
> > > > https://lists.sourceforge.net/lists/listinfo/hardhats-members
> > > > >
> > > >
> > > >
> > > >
> > > >
> > > > __________________________________
> > > > Do you Yahoo!?
> > > > Yahoo! Mail Address AutoComplete - You start. We finish.
> > > > http://promotions.yahoo.com/new_mail
> > > >
> > > >
> > > > -------------------------------------------------------
> > > > This SF.Net email is sponsored by: YOU BE THE JUDGE. Be one of 170
> > > > Project Admins to receive an Apple iPod Mini FREE for your judgement
> on
> > > > who ports your project to Linux PPC the best. Sponsored by IBM.
> > > > Deadline: Sept. 24. Go here: http://sf.net/ppc_contest.php
> > > > _______________________________________________
> > > > Hardhats-members mailing list
> > > > [EMAIL PROTECTED]
> > > > https://lists.sourceforge.net/lists/listinfo/hardhats-members
> > >
> > >
> > > -------------------------------------------------------
> > > This SF.Net email is sponsored by: YOU BE THE JUDGE. Be one of 170
> > > Project Admins to receive an Apple iPod Mini FREE for your judgement
on
> > > who ports your project to Linux PPC the best. Sponsored by IBM.
> > > Deadline: Sept. 24. Go here: http://sf.net/ppc_contest.php
> > > _______________________________________________
> > > Hardhats-members mailing list
> > > [EMAIL PROTECTED]
> > > https://lists.sourceforge.net/lists/listinfo/hardhats-members
> > >
> > >
> > >
> > >
> > > -------------------------------------------------------
> > > This SF.Net email is sponsored by: YOU BE THE JUDGE. Be one of 170
> > > Project Admins to receive an Apple iPod Mini FREE for your judgement
on
> > > who ports your project to Linux PPC the best. Sponsored by IBM.
> > > Deadline: Sept. 24. Go here: http://sf.net/ppc_contest.php
> > > _______________________________________________
> > > Hardhats-members mailing list
> > > [EMAIL PROTECTED]
> > > https://lists.sourceforge.net/lists/listinfo/hardhats-members
> >
> >
> >
> > -------------------------------------------------------
> > This SF.Net email is sponsored by: YOU BE THE JUDGE. Be one of 170
> > Project Admins to receive an Apple iPod Mini FREE for your judgement on
> > who ports your project to Linux PPC the best. Sponsored by IBM.
> > Deadline: Sept. 24. Go here: http://sf.net/ppc_contest.php
> > _______________________________________________
> > Hardhats-members mailing list
> > [EMAIL PROTECTED]
> > https://lists.sourceforge.net/lists/listinfo/hardhats-members
>
>
>
> -------------------------------------------------------
> This SF.Net email is sponsored by: YOU BE THE JUDGE. Be one of 170
> Project Admins to receive an Apple iPod Mini FREE for your judgement on
> who ports your project to Linux PPC the best. Sponsored by IBM.
> Deadline: Sept. 24. Go here: http://sf.net/ppc_contest.php
> _______________________________________________
> Hardhats-members mailing list
> [EMAIL PROTECTED]
> https://lists.sourceforge.net/lists/listinfo/hardhats-members



-------------------------------------------------------
This SF.Net email is sponsored by: YOU BE THE JUDGE. Be one of 170
Project Admins to receive an Apple iPod Mini FREE for your judgement on
who ports your project to Linux PPC the best. Sponsored by IBM.
Deadline: Sept. 24. Go here: http://sf.net/ppc_contest.php
_______________________________________________
Hardhats-members mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/hardhats-members

Reply via email to