Re: COBOL Micro Focus Application accessing Postgresql

** Reply to message from Dragan Matic <gekko(at)eunet(dot)yu> on Tue, 01 Apr 2003
21:29:48 +0000
Hmm,
We've just been through the exercise of converting from mf and ibm cobol to
Fujitsu cobol. We run it against db2 and postgres on linux (we use cobol only
on the backend :). Works just fine, compiles to executable, and there ar no
runtime fees.(the compiler is comparatively inexpensive also). While the cobol
is using odbc to talk to the database, at the code level - it still looks like
embeded sql (ie exec sql decalre cursor for .... etc). I recommend it highly if
you are looking to run cobol on linux.

Regards,
Wayne
http://www.bacchus.com.au

> alain(dot)bruneau(at)acoss(dot)fr wrote:
>
> >Hi.
> >Has anyone developped Cobol (Micro-Focus) application with postgresql
> >database ??
> >
> >
> We have developed an application written in COBOL that works fine
> with Postgresql. Since our aim was to create an application that can
> communicate to almost any database we used ODBC. We are using MicroFocus
> NetExpress 3.1 and although we are constantly testing application with
> MsSql server, Oracle and Interbase, our primary target is PostgreSql.
> So, the answer is Yes, ODBC is the solution here, if your target OS is
> Windows, don't know for UNIX systems.
>
> Dragan
>
>
> >I don't know how to make the link between cobol and postgresql.
> >
> >Today, my application is implemented with oracle database.
> >Cobol source sample :
> > MOVE SQLERRD(3) TO TOT-NB-DEL
> > MOVE 0 TO ANC-REFER
> > MOVE "LKXX" TO TOT-REFER
> > GO TO RETOUR.
> > ***** DELETE D UN ARTICLE DE LA CHAINE
> > EXEC SQL DELETE FROM LM18 WHERE
> > LM18_REFER = :WREFER
> > END-EXEC.
> > IF SQLCODE NOT = 0
> > MOVE 'V' TO WTYPE
> > PERFORM DEB-ERROR THRU FIN-ERROR
> >
> >Compilation :
> >.pco
> > -> procob ->
> > .cob
> > -> cob ->
> > exec module
> >
> >Procob is oracle precompiler tool. Is there something similar with
> >postgresql ??
> >
> >If no, is ODBC the solution ??
> >
> >Thank you for your help.
> >
> >Regards,
> >Alain.
> >
> >
> >---------------------------(end of broadcast)---------------------------
> >TIP 5: Have you checked our extensive FAQ?
> >
> >http://www.postgresql.org/docs/faqs/FAQ.html
> >
> >
> >
> >
>
>
> ---------------------------(end of broadcast)---------------------------
> TIP 2: you can get off all lists at once with the unregister command
> (send "unregister YourEmailAddressHere" to majordomo(at)postgresql(dot)org)