Skip to Main Content
IBM Power Ideas Portal

This portal is to open public enhancement requests against IBM Power Systems products, including IBM i. 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 (

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 ( - Use this site to find out additional information and details about the IBM Ideas process and statuses.

IBM Unified Ideas Portal ( - Use this site to view all of your ideas, create new ideas for any IBM product, or search for ideas across all of IBM. - Use this email to suggest enhancements to the Ideas process or request help from IBM for submitting your Ideas.

Status Not under consideration
Workspace IBM i
Categories Languages - RPG
Created by Guest
Created on Feb 14, 2020

Allow %KDS to be used for comparison

I would like to have the possibility to use the %KDS function in a compare situation. something like
if %kds(MyFileRecKey : 2) <> %kds(MyFileRecKeyOld : 2);
break2 = '1';

This would make it easier to test for "levelbreaks" when reading a file.

If combined with the RFEs
it would provide a really simple way to make this test.

Use Case:

Much code left out but this is only to clarify my point.

FMyFileP1 IF E K DISK include(MyFileR1)
D MyFileRec ds likerec(MyFileR1 : *INPUT)
D MyFileRecKey ds likerec(MyFileR1 : *KEY)
D MyFileRecKeyOld ds likerec(MyFileR1 : *KEY)
. code left out
eval-corr MyFileRecKey = MyFileRec;

if %kds(MyFileRecKey : 2) <> %kds(MyFileRecKeyOld : 2);
break2 = '1';

if %kds(MyFileRecKey : 3) <> %kds(MyFileRecKeyOld : 3);
break3 = '1';

eval-corr MyFileRecKeyOld = MyFileRec;

Idea priority Low
  • Guest
    Mar 11, 2021

    IBM does not intend to provide a solution to this request at this time, so it is being closed.

    It is unlikely that IBM will deliver this enhancement in the near future.

    However, please see RFE 109159, which is about comparing data structures in general. That enhancement is a prerequistive for this request. If the general enhancement for comparing data structures is implemented, then this enhancement could be considered.

  • Guest
    Apr 28, 2020

    IBM has received the requirement and is evaluating it. IBM will provide a response after evaluation is complete.