View previous topic :: View next topic
|
Author |
Message |
John Poulakos
Active User
Joined: 13 Jun 2012 Posts: 178 Location: United States
|
|
|
|
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 |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
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 |
|
|
John Poulakos
Active User
Joined: 13 Jun 2012 Posts: 178 Location: United States
|
|
|
|
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 |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
Glad to hear you got it working! |
|
Back to top |
|
|
|