MVSFORUMS.com

juan00982 · Posted: Tue Jun 29, 2004 2:12 pm Post subject: REXX calling COBOL program

Can somebody write an example of how to execute a cobol program with rexx on OS/390 Question

I'll really appreciate your help.

Thanks

juan00982 · Posted: Tue Jun 29, 2004 3:04 pm Post subject: Calling cobol with rexx

These solutions do not resolve my problem. I tried the:

ADDRESS TSO "CALL 'PROD.BATCH.LOADGNT(TEST)'"

The error that is giving me is:

kolusu · Posted: Tue Jun 29, 2004 3:16 pm Post subject:

Juan00982,

Your rexx indeed called the cobol program and your cobol program abended with a file status code of 96. Did you allocate a File for the DD Name REXX0TES?

File Status 96 explanation:

For VSAM file: An OPEN statement with the OUTPUT phrase was attempted, or an OPEN statement with the I-O or EXTEND phrase was attempted for an optional file, but no DD statement was specified for the file.

For QSAM file: An OPEN statement with the OUTPUT phrase was attempted, or an OPEN statement with the I-O or EXTEND phrase was attempted for an optional file, but no DD statement was specified for the file and the CBLQDA(OFF) run-time option was specified.

Hope that helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

juan00982 · Posted: Tue Jun 29, 2004 3:21 pm Post subject:

Actually I tried with the file name TESTFILE, but the file is located as

REXX.TESTFILE

is this the problem ?

semigeezer · Posted: Tue Jun 29, 2004 11:16 pm Post subject:

Iy is a misunderstanding of the word 'file'. on a PC a file is a physical unit. On a mainframe, it is a logical unit. The physical unit is a data set (hence DA(...)) but the logical unit is a file or ddname (or FILE(...) or DD(...) in the alloc command).

juan00982 · Posted: Wed Jun 30, 2004 6:56 am Post subject:

What i meant by file name TESTFILE was that on COBOL I assigned my output to TESTFILE.

I know that on OS/2 you use SET command to reference the physical file to the program. I think you do the same on mainframe with allocate, at least that's what I read on a post.

I'm working on this today, If I get any further errors I'll post them here.

Thanks to everyone for your help.