Skip to Main Content
IBM Z Software


This portal is to open public enhancement requests against IBM Z Software products. To view all of your ideas submitted to IBM, create and manage groups of Ideas, or create an idea explicitly set to be either visible by all (public) or visible only to you and IBM (private), use the IBM Unified Ideas Portal (https://ideas.ibm.com).


Shape the future of IBM!

We invite you to shape the future of IBM, including product roadmaps, by submitting ideas that matter to you the most. Here's how it works:

Search existing ideas

Start by searching and reviewing ideas and requests to enhance a product or service. Take a look at ideas others have posted, and add a comment, vote, or subscribe to updates on them if they matter to you. If you can't find what you are looking for,

Post your ideas
  1. Post an idea.

  2. Get feedback from the IBM team and other customers to refine your idea.

  3. Follow the idea through the IBM Ideas process.


Specific links you will want to bookmark for future use

Welcome to the IBM Ideas Portal (https://www.ibm.com/ideas) - Use this site to find out additional information and details about the IBM Ideas process and statuses.

IBM Unified Ideas Portal (https://ideas.ibm.com) - Use this site to view all of your ideas, create new ideas for any IBM product, or search for ideas across all of IBM.

ideasibm@us.ibm.com - Use this email to suggest enhancements to the Ideas process or request help from IBM for submitting your Ideas.

Status Not under consideration
Workspace COBOL Compilers
Created by Guest
Created on Jul 12, 2017

DIAGTRUNC in context with PERFORM VARYING

Missing WARNING when a variable value is exceeded. We just found that using PERFORM a variable overrun is not always handeled in the same way.
Example:

05 IND-D PIC 9(2).

MOVE +102 TO IND-D

IGYPA3228-W High order digit positions in the sender may be truncated in the move to receiver "IND-D (NUMERIC INTEGER)"

PERFORM VARYING IND-D FROM 102 BY -1
UNTIL ZAEHLER > 10
DISPLAY 'TEST: ' IND-D
ADD 1 TO ZAEHLER
END-PERFORM.

The WARNING is correct but its only related to the value assignment. If the value assignment is omitted no WARNING is given, even the variable value is also exceeded in the PERFORM loop:

* MOVE +102 TO IND-D

PERFORM VARYING IND-D FROM 102 BY -1
UNTIL ZAEHLER > 10
DISPLAY 'TEST: ' IND-D
ADD 1 TO ZAEHLER
END-PERFORM.

A programmer should avoid such a situation, but however we believe its an error that in the second case no WARNING is given.

Idea priority Low
  • Guest
    Reply
    |
    Dec 16, 2020

    IBM Enterprise COBOL for z/OS is a continuous delivery offering, and aims to satisfy the needs of a rapidly evolving market segment. Product strategy evolves and requirements are continuously evaluated against that strategy. This RFE has recently been reappraised against the wider product strategy and does not fall into IBMs delivery plans for the next 12 month. Whilst this RFE might be valid and we might look to deliver longer term, this RFE is being rejected at this time. The requirement will be kept in our internal RFE backlog and might be reassessed in the future.

  • Guest
    Reply
    |
    Aug 1, 2017

    This RFE has been accepted. It will be updated once put into plan for a future compiler version.