HP3000-L Archives

June 2007, Week 3

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Charles Finley <[log in to unmask]>
Reply To:
Charles Finley <[log in to unmask]>
Date:
Thu, 21 Jun 2007 08:49:08 -0700
Content-Type:
text/plain
Parts/Attachments:
text/plain (72 lines)
We do something close to that with migrated applications.  We have an
implementation of some MPE VPLUS Intrinsics on *nix platforms that is
written in C.  With an environment variable we can redirect the
communications layer to talk to anything else using xmlrpc-c.  

The way we use it is to run a handler on another box with a J2EE
applications server (in our case JBOSS). The code on the J2EE server
maintains state by creating a session that persists concurrently with the
life of the COBOL program.  After the COBOL program is launched, whenever
the COBOL program makes a VPLUS call the call is redirected through the
listener on the J2EE server to something else. In our case it is a session
EJB and ultimately either a JAVA Swing application or a web application. The
effect of all this is to treat any migrated COBOL program as a Web Service
by simply intercepting its VPLUS calls.  This also means that the COBOL
program is unmodified.  

What would be required to use it on an HP 3000 would be to port xmlrpc-c to
MPE/iX.  Since xmlrpc-c is pure C it would not be very difficult to do this.
We just haven't found anyone who is interested in getting it done.

Charles Finley
619-795-0720


> -----Original Message-----
> From: HP-3000 Systems Discussion [mailto:[log in to unmask]] On Behalf
> Of Gerber, Jim V
> Sent: Thursday, June 21, 2007 8:31 AM
> To: [log in to unmask]
> Subject: Web Services and Cobol/iX
> 
> Hi, folks.
> 
>   Is anyone out there communicating with a web service (XML/SOAP) from a
> Cobol II/iX program on your 3000?  If so, are you using a middleware
> application?
> 
> Thanks for your help.
> 
> Jim Gerber
> Sr. Programmer/Analyst
> Quest Diagnostics, Incorporated
> Irving, TX  75063
> Phone: 972-916-3437
> 
> 
> 
> ==========================================================================
> ====
> The contents of this message, together with any attachments, are intended
> only for the use of the person(s) to which they are addressed and may
> contain confidential and/or privileged information. Further, any medical
> information herein is confidential and protected by law. It is unlawful
> for unauthorized persons to use, review, copy, disclose, or disseminate
> confidential medical information. If you are not the intended recipient,
> immediately advise the sender and delete this message and any attachments.
> Any distribution, or copying of this message, or any attachment, is
> prohibited.
> ==========================================================================
> ====
> 
> * To join/leave the list, search archives, change list settings, *
> * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
> 
> __________ NOD32 2342 (20070621) Information __________
> 
> This message was checked by NOD32 antivirus system.
> http://www.eset.com

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2