Shaun, The code is freely available on the VA FTP server.... **Nancy, can you supply the URL?
I will tell you that you will have to have Delphi professional ($300) to compile it. I think I have that version, and I would be willing to put in an hour or two to try to get it compiled for you if you want. Kevin --- CS Wagner <[EMAIL PROTECTED]> wrote: > I assumed that was the case, but I cannot get my > hands on the CPRS > source code. I've asked twice if it is available > and both times I was > pointed to some M code in a .kid file. > -Shaun > > Roy wrote: > > >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 it? -- > >>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 > === message truncated === _______________________________ Do you Yahoo!? Declare Yourself - Register online to vote today! http://vote.yahoo.com ------------------------------------------------------- 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
