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 (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 IBM i
Categories Languages - RPG
Created by Guest
Created on Jan 23, 2021

Enhance %char %BIF to add %EDITC functionality %CHAR(mynumber:*NOZEROSUPPRES|*ZEROSUPPRESS)

If we have a numeric field and want to put it in a CHAR field it will show the leading zeros:

Assuming myNumber is 7,0 numeric and myAlpha is 7 alpha

>> myAlpha = %char(myNumber);

myAlpha = '123____'

to keep the leading zeros we have to use the %EDITC Build in Function:

>> myAlpha= %editc(myNumber:'X');

myAlpha = '0000123'

It would be *really nice* if we could do this with the %char BIF

>> myAlpha = %CHAR(mynumber:*ZEROSUPPRESS|*NOZEROSUPPRESS)

or something like that...


Use Case:

Would allow easy data transformation when building webservice data-strings where we have to pass *ZERO as a value rather than letting %CHAR translate it to *BLANKS

Simplifies the use of RPGLE using one %BIF for character to numeric conversions


Idea priority Low
  • Guest
    Reply
    |
    Mar 10, 2021

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

    This team has quite a long list of higher priority requirements, so this request is not likely to be implemented anytime soon.

  • Guest
    Reply
    |
    Feb 17, 2021

    The CEAC has reviewed this requirement and recommends that IBM view this as a MEDIUM priority requirement that should be addressed.

    Background: The COMMON Europe Advisory Council (CEAC) members have a broad range of experience in working with small and medium-sized IBM i customers. CEAC has a crucial role in working with IBM i development to help assess the value and impact of individual RFEs on the broader IBM i community and has therefore reviewed your RFE.

    To find out how CEAC help to shape the future of IBM i, see CEAC @ ibm.biz/BdYSYj and the article "The Five Hottest IBM i RFEs Of The Quarter" at ibm.biz/BdYSZT

    Therese Eaton – CEAC Program Manager, IBM

  • Guest
    Reply
    |
    Jan 24, 2021

    And the next question is can we have *SEPARATOR:*NOSEPARATOR or *LEADINGSIGN:*TRAILINGSIGN :-)

    But why not write your own procedure ?

    Dcl-Pr MyEdit;

    Dcl-Pi *N VarChar(64);
    Number Packed(30:10) Const;
    Options VarChar(64) Const;
    End-Pi;

    Select;
    When %Scan('*NOZEROSUPPRES: Options) > 0;
    Return %Edit(Number: 'X');
    Other;
    Return %Char(Number);
    EndSl;
    End-Pr;

    So you could write var = %MyEdit(137: '*NOZEROSUPPRES);