Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Passing parms when calling ISRSUPC(superc) from COBOL

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
jasorn

Active User


Joined: 12 Jul 2006
Posts: 153
Location: USA

PostPosted: Mon Nov 16, 2015 12:06 pm    Post subject: Passing parms when calling ISRSUPC(superc) from COBOL
Reply with quote

I'm calling ISRSUPC from COBOL and passing 'DELTAL,LINECMP' like this:

Code:

01 WC-ISRSUPC-PARMS PIC X(14) VALUE 'DELTAL,LINECMP'.
CALL 'ISRSUPC' USING WC-ISRSUPC-PARMS


This executes superc but the listing type is 'OVSUM' instead of 'DELTA', which is what I want.

Like any good idiot would do, I've tried many variations of the above to no avail. I can find any examples calling superc from cobol either. The only thing I've found is one post from Dickthedinosaur(sp) in this forum with a list of programs pointing out you can call them from cobol but no example. Actually, that list gives isrseprm. I've tried calling that with no luck either.

Anyone know how to call superc from cobol and parms?
Back to top
View user's profile Send private message

Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1218
Location: Israel

PostPosted: Mon Nov 16, 2015 7:24 pm    Post subject:
Reply with quote

I found a program with:
Code:
       01 ISRSUPC-PARM.
          03 FILLER          PIC S9(4) COMP VALUE 26.
          03 FILLER          PIC X(26) VALUE 'SRCHCMP DPCBCMT ANYC COBOL'.
Code:
               CALL 'ISRSUPC' USING ISRSUPC-PARM
but I haven't tried it.
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7223

PostPosted: Mon Nov 16, 2015 7:54 pm    Post subject: Reply to: Passing parms when calling ISRSUPC(superc) from COBOL
Reply with quote

I'd bet it works. The PARM to ISRSUPC is seen by that program in exactly the same way as a COBOL program (or anything else) would see the PARM, so it needs to be preceded by a half-word indicating the number of characters (and that has to be less than or equal to 100. Perhaps).

If you are up-to-date enough PARMDD allows for a "somewhat larger" PARM statement, so ISRSUPC may be able to cater for more. Not that you even need 100, it seems.
Back to top
View user's profile Send private message
jasorn

Active User


Joined: 12 Jul 2006
Posts: 153
Location: USA

PostPosted: Mon Nov 16, 2015 8:13 pm    Post subject:
Reply with quote

Lying in bed after posting this I thought, "Idiot! You didn't pass parm length!" Tried it first thing in the morning works as expected. Went to update the post with the solution but I'm naturally too late.

As always, hats off to the fine folks in this forum.

Marso wrote:
I found a program with:
Code:
       01 ISRSUPC-PARM.
          03 FILLER          PIC S9(4) COMP VALUE 26.
          03 FILLER          PIC X(26) VALUE 'SRCHCMP DPCBCMT ANYC COBOL'.
Code:
               CALL 'ISRSUPC' USING ISRSUPC-PARM
but I haven't tried it.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts FTP - JCL failed while passing FTP co... Suneetha1612 JCL & VSAM 12 Wed Nov 16, 2016 7:33 pm
This topic is locked: you cannot edit posts or make replies. RANDOM Function in COBOL swapnil781 COBOL Programming 2 Tue Nov 15, 2016 6:17 pm
No new posts Regarding COBOL Stored Procedure opti... selvamsrinivasan85 DB2 4 Fri Nov 04, 2016 8:57 pm
No new posts COBOL Version 6.1 Virendra Shambharkar COBOL Programming 5 Tue Nov 01, 2016 11:24 am
No new posts Cobol list of programs being called biswajit.dattagupta COBOL Programming 5 Tue Nov 01, 2016 2:10 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us