PL/I

PL/I

PL/I

 View Only

  • 1.  How can I get all of my PLI compiler options to work when the JCL is generated by the IDz client?

    Posted Tue June 16, 2020 09:56 AM
    Edited by Di Hu Wed June 17, 2020 04:59 AM

    I have the following compiler options set in my property group for PLI programs: EXIT,OR('!|'),PP(MACRO,SQL('VERSION($SC$)','EMPTYDBRM',),CICS(SP,CPSM))

    The generated JCL looks like this: //

     PARM.PLI=('EXIT,OR(''!|''),PP(MACRO,SQL(''VERSION($SC$)'',''EMPTYDBRM'',

     

    ),CIC

    Or if I have these: or EXIT OR('!|') PP(MACRO,SQL('VERSION($SC$)','EMPTYDBRM','APOSTSQL','FLOAT

     

    (IEEE)','NOCCSID0'),CICS(SP,CPSM)) the generated JCL is: NC

     

    XINFO(XML)

     

    EXIT

     

    OR('!|')

     

    PP(MACRO,SQL('VERSION($SC$)','EMPTYDBRM','APOSTSQL','FLOAT

     

    (IEEE)','NOCCSID0'),C


    (Disclaimer: This post is migrated from IBM Developer Answers that is no longer in use. Its original author is

     candice, posted on 14 Nov 2018.)



  • 2.  RE: How can I get all of my PLI compiler options to work when the JCL is generated by the IDz client?

    Posted Wed June 17, 2020 05:03 AM
    Edited by Di Hu Wed June 17, 2020 05:09 AM

    You may have to break up the options so that there are not all together.For instance, when I specify the first one I put a space between some of the options to cause a break, below is the changed line: EXIT OR('!|') PP(MACRO,SQL('VERSION($SC$)','EMPTYDBRM',),CICS(SP,CPSM))and the generated JCL is: // PARM.PLI=('EXIT',

     

    // 'OR(''!|'')',

     

    // 'PP(MACRO,SQL(''VERSION($SC$)'',''EMPTYDBRM'',),CICS(SP,CPSM))')

     

    For the second case where the one option is really long I had to break it into multiple options insteadhaving the one long option. Below is how I specified the second case in my property group:

    EXIT OR('!|') PP(MACRO,SQL('VERSION($SC$)','EMPTYDBRM','APOSTSQL'))

     

    PP(MACRO,SQL('FLOAT(IEEE)','NOCCSID0')) PP(CICS('SP,CPSM')) this generates the following JCL: // COMP=',''+DD:FELOPTF'''

     

    //FELOPTF DD

     

    EXIT

     

    OR('!|')

     

    PP(MACRO,SQL('VERSION($SC$)','EMPTYDBRM','APOSTSQL'))

     

    PP(MACRO,SQL('FLOAT(IEEE)','NOCCSID0'))

     

    PP(CICS('SP,CPSM'))

     

    /

    The FELOPTF is new with IDz v14.1 client that enables you to have more than 100 characters for PLI compiler options.

    (Disclaimer: This answer is migrated from IBM Developer Answers that is no longer in use. Its original author is

     candice.)


Related Content