IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Translator Option SP?


IBM Mainframe Forums -> CICS
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
John Poulakos

Active User


Joined: 13 Jun 2012
Posts: 178
Location: United States

PostPosted: Sat Oct 13, 2018 12:59 am
Reply with quote

I'm not sure if this belongs here, but it's worth a shot. I have a CICS COBOL program that issues an EXEC CICS INQUIRE command. According to the documents I read, this requires translator option SP. But I don't know how I am supposed to specify it. Here are my options and the first error message:

Invocation parameters:
LIB,NODBCS,CICS,LIST,MAP,RENT,S,NOSSR,SP,TRUNC(BIN),X(SHORT)

IGYOS4003-E Invalid option "SP" was found and discarded.

And at the end of the compile listing:

IGYPS0210-S DFH7262I S TRANSLATOR OPTION 'SP' REQUIRED BUT NOT SPECIFIED.

I'm confused. But, at least I always have something unusual to entertain myself with.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Sat Oct 13, 2018 1:38 am
Reply with quote

SP is a CICS translator option. You need to use the translator, then compile the translated code through the COBOL compiler. Using the integrated CICS translator in the COBOL compiler obviously didn't work.

You might be able to use CBL CICS("SP") as a PROCESS (CBL) option but I've never tried that so I don't know for sure if it works.
Back to top
View user's profile Send private message
John Poulakos

Active User


Joined: 13 Jun 2012
Posts: 178
Location: United States

PostPosted: Sat Oct 13, 2018 2:18 am
Reply with quote

Thanks Robert,

But, just in case anyone is interested, I figured it out. I had to use an OPTFILE with these values:
APOST
LIB
TRUNC(OPT)
CICS('COBOL3,SP')
NODYNAM
RENT
LIST
MAP
XREF
OPT
They are in this file: XXXX.PARM.LIB.TEST(COBOL)

My compile proc needed these changes:
//COB2 EXEC PGM=IGYCRCTL,REGION=0M,PARM=(OPTFILE)
//SYSOPTF DD DISP=SHR,DSN=XXXX.PARM.LIB.TEST(COBOL)

Note: I don't think the COBOL3 specification matters much.

I am writing a web service that will allow a user to reset their CICS terminal using their user ID. So far, so good.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Sat Oct 13, 2018 2:20 am
Reply with quote

Glad to hear you got it working!
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CICS

 


Similar Topics
Topic Forum Replies
No new posts SCOPE PENDING option -check data DB2 2
No new posts OUTFIL with SAVE option DFSORT/ICETOOL 7
No new posts CICS vs LE: STORAGE option CICS 0
No new posts INSYNC option with same function as I... JCL & VSAM 0
No new posts Option DYNALLOC second parameter. DFSORT/ICETOOL 11
Search our Forums:

Back to Top