MVSFORUMS.com

hari prasad · Beginner Joined: 20 Oct 2005 Posts: 4 Topics: 1

Hi,

I need to call a pl1 program from a cobol program.
I tried normal way of calling, But it ABENDs with code S0C1.

I tried searching in the forums but no post is having any conclusive information.

Any help or ideas.

Thanks.

Cogito-Ergo-Sum · Posted: Thu Oct 20, 2005 3:20 am Post subject:

WHAT abends with S0C1? The CALL statement? The PL/I program? The COBOL program?

You need to be more elaborate....
_________________
ALL opinions are welcome.

Debugging tip:
When you have eliminated all which is impossible, then whatever remains, however improbable, must be the truth.
-- Sherlock Holmes.

hari prasad · Beginner Joined: 20 Oct 2005 Posts: 4 Topics: 1

I don't know exactly where it is ABENDing.

I given Display statements in COBOL program before calling PL1 program.
Those are getting displayed.

Only statements i have in PL1 code is PUT SKIP LISTs.
But none of them are getting displayed.

So Where it is abending ??????. no idea.

Code Looks like this.

Cobol main program.

Display msg.
Call subpgm.
Display msg.

PL1 sub program.

SUBPGM: proc();

put skip list('msg');

End SUBPGM;

any ideas

hari prasad · Beginner Joined: 20 Oct 2005 Posts: 4 Topics: 1

I mean it is ABENDING in call statement. But i don't know why.

kolusu · Posted: Thu Oct 20, 2005 4:25 am Post subject:

hari prasad,

Please search before posting . check this link

http://www.mvsforums.com/helpboards/viewtopic.php?t=2821&highlight=pli+call

Hope this helps..

Cheers

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

hari prasad · Beginner Joined: 20 Oct 2005 Posts: 4 Topics: 1

That helps a lot.

Thanks every one.

whizkid79 · Beginner Joined: 29 Sep 2004 Posts: 53 Topics: 14

Hi,

I'm calling a PLI program from a COBOL program.
The COBOL pgm opens a file ABCD and passes that to the PLI pgm. The PLI pgm tries to write a record into the file, but the program abends. The length of the file/report is 133. The PLI pgm and its entry has OPTIONS(COBOL) defined in it.

Suppose A is the COBOL pgm and B is the PLI pgm. The entry copybook for B is defined as

B entry(FILE) OPTIONS (COBOL);

A passes the file as :

CALL 'B' USING ABCD

The error I get is a S04C protection exception.

Please help me out in resolving this issue.

Thanks,
Whizkid79.