PM92523: IMS SUPPORT ENHANCEMENT

A fix is available

Subscribe

You can track all active APARs for this component.

APAR status

  • Closed as unreproducible in next release.

Error description

  • IMS Support Enhancement
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Enterprise COBOL V5.1 users developing IMS   *
    *                 SQL applications                             *
    *                                                              *
    ****************************************************************
    * PROBLEM DESCRIPTION: This APAR adds IMS SQL coprocessor      *
    *                      support to the COBOL V5.1 compiler to   *
    *                      work with coprocessor services added to *
    *                      IMS V13 with the PTF for APAR PM97137   *
    *                      (UK98028) installed                     *
    *                                                              *
    ****************************************************************
    * RECOMMENDATION: Apply the provided PTF.                      *
    *                                                              *
    ****************************************************************
    This new feature allows users to compile IMS applications that
    use the new EXEC SQLIMS language support available in IMS V13
    

Problem conclusion

Temporary fix

Comments

  • A new compiler option SQLIMS is  added to allow users to
    embed EXEC SQLIMS statements in their COBOL applications.  The
    new EXEC SQLIMS statements allow users to interface with the IMS
    database using the SQL language.
    
    +--------------------------------------------------------------+
    | Start of changes for:                                        |
    | Enterprise COBOL Language Reference, SC14-7381-00            |
    
       Appendix E. Reserved Words. Table 60. Reserved Words
        add an entry:
    
    |   SQLIMS             with an X in the Reserved column only.
    
    | End of changes for:                                          |
    | Enterprise COBOL Language Reference, SC14-7381-00            |
    +--------------------------------------------------------------+
    
    +--------------------------------------------------------------+
    | Start of changes for:                                        |
    | Enterprise COBOL Programming Guide, SC14-7382-00             |
    
      Preface, Summary of changes
      Version 5 release 1  add:
    
    | A new compiler option, SQLIMS, enable the new IMS SQL
    | coprocessor.
    
      Chapter 14. Compiling under z/OS
      Topic: Defining the library-processing output file (SYSMDECK)
               About this task
      The first paragraph has been changed to:
    
    | The SYSMDECK file will contain a copy of the updated input
    | source after library processing, that is, the result of COPY,
    | BASIS, REPLACE, EXEC SQL INCLUDE and EXEC SQLIMS INCLUDE
    | statements. The file can be a traditional MVS data set or a
    | z/OS UNIX file.
    
      Chapter 14. Compiling under z/OS
      Topic: Specifying compiler options under z/OS
             About this task
      Bullet 2 in the second paragraph has been changed to:
    
    | 2. Values of the BUFSIZE, OUTDD, SIZE, SQL and SQLIMS compiler
    |    option in effect for the first program in a batch
    
      Chapter 14. Compiling under z/OS
      Topic: Specifying compiler options in a batch compilation
             About this task
      Bullet 2 of the second paragraph has being changed to:
    
    | 2. Values of the BUFSIZE, OUTDD, SIZE, SQL and SQLIMS compiler
    |    option in effect for the first program in a batch
    
      Chapter 14. Compiling under z/OS
      Topic: Specifying compiler options in a batch compilation
             About this task
      The third paragraph has been changed to:
    
    | If any program in the batch sequence requires the BUF,
    | OUTDD, SIZE, SQL or SQLIMS option, that option must be in
    | effect for the first program in the batch sequence (When
    | processing BASIS, COPY, or REPLACE statements, the compiler
    | handles all programs in the batch as a single input file.)
    
      Chapter 15. Compiling under z/OS UNIX
      Topic: Specifying compiler options under z/OS UNIX
             About this task
      Bullet 2 of the second paragraph has been changed to:
    
    | 2. The values of BUFSIZE, SQL, SQLIMS, OUTDD, and SIZE options
    |    in effect for the first program in a batch compilation.
    
      Chapter 15. Compiling under z/OS UNIX
      Topic: Specifying compiler options under z/OS UNIX
    
      Add the following bullet under Restrictions
    
    | .  Do not use the SQLIMS compiler option under z/OS UNIX.
    
      Chapter 17. Compiler options.
      Add the following to Table 43 "Source Language" row
    
    |      SQLIMS          NOSQLIMS          NONE
    
      Chapter 17. Compiler options.
      under CODEPAGE option
      Add the following bullet to the third paragraph
    
    | . Processing of source code for EXEC SQLIMS statements
    
      Chapter 17. Compiler options.
      under MAXPCF option
      The first bullet has been modified to:
    
    | . The number of COBOL statements in the PROCEDURE DIVISION,
    |   including generated statements from the SQL, SQLIMS
    |   or CICS options and the expansion of COPY statements.
    
      Chapter 17. Compiler options.
      under MDECK option
      The first paragraph has been modified to:
    
    | The MDECK compiler option specifies that a copy of the
    | updated input source after library processing (that is,
    | the result of COPY, BASIS, REPLACE, EXEC SQL INCLUDE
    | and EXEC SQLIMS INCLUDE statements) is written to a file.
    
      Chapter 17. Compiler options.
      under MDECK option
      The first paragraph in the section on "Contents of the MDECK
      output file" has been changed to:
    
    | If you use the MDECK option with programs that contain
    | EXEC CICS, EXEC SQL or EXEC SQLIMS statements, these EXEC
    | statements are included in the MDECK output as is. However,
    | if you compile using the SQL option or the SQLIMS option,
    | the corresponding EXEC SQL INCLUDE or EXEC SQLIMS INCLUDE
    | statements are expanded in the MDECK output.
    
      Chapter 17. Compiler options
      Add the new SQLIMS option
    
    | SQLIMS
    | Use the SQLIMS compiler option to enable the IMS SQL
    | coprocessor and to specify IMS suboptions. You must specify
    | the SQLIMS option if a COBOL source program contains SQLIMS
    | statements.
    |
    | SQLIMS option syntax
    |
    |      ______NOSQLIMS____________________________________
    |      |                                                |
    | -->--|------------------------------------------------|-->>--
    |      |_____SQLIMS_____________________________________|
    |                   |___("IMS-suboption-string")____|
    |
    | Default is: NOSQLIMS
    | Abbreviations are: None
    |
    | If you specify the NOSQLIMS option, any SQLIMS statements
    | found in the source program are diagnosed and discarded.
    |
    | Use either quotation marks or single quotation marks to
    | delimit the string of IMS suboptions.
    | You can partition a long suboption string into multiple
    | suboption strings in multiple CBL statements. For example:
    | //STEP1 EXEC IGYWC, . . .
    | // PARM.COBOL='SQLIMS("string1")'
    | //COBOL.SYSIN DD *
    | CBL SQLIMS("string2")
    | CBL SQLIMS('string3')
    | IDENTIFICATION DIVISION.
    | PROGRAM-ID. DRIVER1
    | ...
    | The IMS suboptions are concatenated in the order of their
    | appearance. Thus in the example above, the compiler passes the
    | following suboption string to the IMS SQL coprocessor:
    | "string1 string2 string3"
    |
    | The concatenated strings are delimited with single spaces as
    | shown. If multiple instances of the same IMS suboption are
    | found, the last specification of each suboption prevails.
    | The compiler limits the length of the concatenated IMS
    | suboption string 4 KB.
    |
    | When SQLIMS is specified only CODEPAGE 37 and 1140 will be
    | allowed.
    
      Chapter 19. Debugging
      Topic: Getting listings
      Under "Signature information bytes" subsection
      Add to Table 54. Signature information bytes
      the following bit 7 of signature byte 1
    
    |    7      SQLIMS            NOSQLIMS
    
      Chapter 22. Developing COBOL programs for IMS
      Add to the bottom of chapter 22 the following sections:
    
    | IMS SQL coprocessor
    |
      (for details of this section, please see the ++HOLD for
       DOCUMENTATION)
    |
    
      Chapter 30. Writing object-oriented programs
      Add the following bullet to the list of restrictions:
    
    | - COBOL class definitions and methods cannot contain EXEC
    |    SQLIMS statements and cannot be compiled using the
    |    SQLIMS compiler option.
    
      Appendix D. EXIT compiler option
      Topic: Using the EXIT compiler option with CICS and SQL
             statements
      The first paragraph has been changed to:
    
    | When you compile using suboptions of the EXIT compiler
    | option, and your program contains EXEC CICS, EXEC SQL
    | or EXEC SQLIMS statements, the actions that you can take
    | in the exit modules depend on whether you use the separate
    | CICS translator and DB2 precompiler, or the integrated
    | CICS translator and DB2 coprocessor. If the program
    | contain EXEC SQLIMS statements the actions that you can
    | take in the exit modules are the actions listed for the
    | the integrated translator.
    
      Appendix D. EXIT compiler option
      Topic: Using the EXIT compiler option with CICS and SQL
             statements
      replace in Table 109 the term "EXEC SQL" With the term
      "EXEC SQL and EXEC SQLIMS"
    
      Appendix F. COBOL SYSADATA file contents
      Topic: Options record: X'0010'
             Table 115. SYSADATA options record
      Add the following bit to the fifth byte
    
    | ..1. ....  Bit 1 = SQLIMS, Bit 0 = NOSQLIMS
    
      Appendix F. COBOL SYSADATA file contents
      Topic: Token record: X'0030'
      Table 118. SYSADATA token record
      Add the following token:
    
    |    0840       SQLIMS
    
    | End of changes for:                                          |
    | Enterprise COBOL Programming Guide, SC14-7382-00             |
    +--------------------------------------------------------------+
    
    PUBS CLOSING CODE: DEVCHNG
    

APAR Information

  • APAR number

    PM92523

  • Reported component name

    ENT COBOL FOR Z

  • Reported component ID

    5655W3200

  • Reported release

    510

  • Status

    CLOSED UR1

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    YesSpecatt / New Function

  • Submitted date

    2013-07-08

  • Closed date

    2013-10-11

  • Last modified date

    2013-11-04

  • APAR is sysrouted FROM one or more of the following:

  • APAR is sysrouted TO one or more of the following:

    UK98481 UK98482 UK98483

Modules/Macros

  • IGYCDOPT IGYCLVL0 IGYCOPI  IGYCOPT  IGYCRWT  IGYDMETA IGYDPR03
    IGYDPR06 IGYEEN$R IGYEEN$0 IGYEEN$4 IGYEJA$R IGYEJA$0 IGYEJA$4
    IGYICNTL IGYKCNFL IGYKCNTL IGYKSTAT IGYLADAT IGYLBASI IGYLCNTL
    IGYLCOPY IGYLLIBH IGYLLIBO IGYLSRVE IGYQMETA IGYQPR14 IGYSCNTL
    IGYSSQL  IGYTCNTL IGYTIMS  IGYTIMS1 IGYTIMS2 IGYTSQL  IGYTSQL1
    IGYTSQL2 IGYVCNTL IGYVSRVE
    

Publications Referenced
SC14738100 SC14738200      

Fix information

  • Fixed component name

    ENT COBOL FOR Z

  • Fixed component ID

    5655W3200

Applicable component levels

  • R510 PSY UK98481

       UP13/10/22 P F310

  • R511 PSY UK98482

       UP13/10/22 P F310

  • R512 PSY UK98483

       UP13/10/22 P F310

Fix is available

  • Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.



Rate this page:

(0 users)Average rating

Add comments

Document information


More support for:

z/OS family

Software version:

5.1

Reference #:

PM92523

Modified date:

2013-11-04

Translate my page

Machine Translation

Content navigation