TUX 6.5 - How to call External Program within a Service written in COBOL on AS/400? (Doc ID 767483.1)

Last updated on NOVEMBER 04, 2016

Applies to:

Oracle Tuxedo / Tuxedo / 6,5
Information in this document applies to any platform

Goal

How to call External Program within a Service written in COBOL on AS/400?

When creating a Cobol module (first step to build a Cobol server on AS/400), you must use LINKLIT option set to *PRC
because Tuxedo Verbs are called as ILE procedure.
You must create your Cobol module using this option LINKLIT(*PRC), otherwise your server will hang when executing it.

Within your Cobol service code you might call external programs which are built as program objects (*PGM). 

If you only type the following code line :
CALL "TP3300A" USING TP3300-LK.
when building the server an error will be reported :
CMDTUX_CAT:4331: ERROR: can't execute crtpgm
No program is created !

Solution

Sign In with your My Oracle Support account

Don't have a My Oracle Support account? Click to get started

My Oracle Support provides customers with access to over a
Million Knowledge Articles and hundreds of Community platforms