• The Four Hundred
  • Subscribe
  • Media Kit
  • Contributors
  • About Us
  • Contact
Menu
  • The Four Hundred
  • Subscribe
  • Media Kit
  • Contributors
  • About Us
  • Contact
  • RPG Gets the ‘Splits’ with Latest TRs

    May 5, 2021 Alex Woodie

    The latest batch of Technology Refreshes (TRs) for IBM i 7.4 and 7.3 wasn’t a barnburner by any means. But the twice-yearly update brought a little bit of new stuff for everybody, including RPG programmers, who gain three new built-in functions, one of which is called %SPLIT.

    RPG remains the most popular language on the IBM i platform, with a solid 87 percent share, according to the recent HelpSystems Marketplace Report, nearly twice the share of Java and over four times the share of COBOL. Good old Report Program Generator, for what it’s worth, is the closest thing to the default language for the platform, as it’s basically synonymous with IBM i development.

    The three new built-in functions that IBM delivered with IBM i 7.4 TR4 and 7.3 TR10, as well as a new keyword, will help IBM i developers do even more with the language. These new functions include:

    • %LOWER and %UPPER built-in functions to convert contents of a char variable from lowercase to uppercase or vice versa;
    • %SPLIT built-in function splits a string into an array;
    • %MAXARR and %MINARR return the index of the maximum or minimum element of an array.

    Barbara Morris, who heads up RPG compiler development at the IBM lab in Toronto, Ontario, spelled out the specifics in a recent blog post at the RPG Café.

    According to Morris’ post, the %LOWER and %UPPER functions will be useful to put entries into the proper case. For example, if a first name was originally entered with uppercase letters, the %LOWER function can convert them to lower case. To keep some of the characters uppercase, like the first character of a name, the start and stop operands can be used, Morris points out.

    The new %SPLIT function can also be used to break up a string into a collection of sub-strings, or an array. By default, Morris writes, %SPLIT splits the string at blanks. The second separator parameters, she writes, can be the list of characters the developer wants to split at. Users can select any character, including commas, dashes, periods, etc.

    So for a string with the value of “a bcd ef” the %SPLIT function by default would return an array with the values “a,” “bcd,” and “ef.” For The developer can use FOR-EACH to process the result of %SPLIT, Morris writes.

    One other enhancement in the TRs, which Morris covers in the RPG Café but which did not appear in the IBM announcement letters, is stricter rules for keys.

    “With the Control keyword EXPROPTS(*STRICTKEYS), the rules for the search arguments you can specify with a list of keys or %KDS are more strict,” Morris writes. “By default, the data type of the search argument has to match the key, but the length and CCSID can be different. For example, the length of a numeric search argument can be longer than the key, which can lead to a numeric overflow error at run time.”

    With the new EXPROPTS(*STRICTKEYS) keyword, the compiler does not allow the search argument to be longer than the key, Morris writes.

    The new features are being delivered in the RPG compilers, which are shipped in IBM’s Rational Development Studio (RDS) offering, or 5770-WDS. For IBM i 7.3, users need to apply PTFs SI76100 and SI76098 to get the necessary functionality for the ILE RPG compiler and the ILE RPG runtime, respectively. For IBM i 7.4, PTFs SI76101, SI76109, and SI76099 are needed for the compiler and runtimes, respectively.

    IBM also appears to have a new logo for RPG, to go along with the new logo for IBM i, which you can see above. For more information, check out the IBM Support site and the RPG Café.

    RELATED STORIES

    What’s New With BRMS, PowerHA, And Db2 Mirror

    IBM Unveils New and Improved IBM i Services

    Query Supervisor Gives Database Engineers New Power

    Big Blue Unveils Spring 2021 IBM i Technology Refreshes

    Share this:

    • Reddit
    • Facebook
    • LinkedIn
    • Twitter
    • Email

    Tags: Tags: 7.4 TR1, COBOL, IBM i, IBM i 7.4, ILE RPG, Java, RPG, Technology Refreshes, TR

    Sponsored by
    WorksRight Software

    Do you need area code information?
    Do you need ZIP Code information?
    Do you need ZIP+4 information?
    Do you need city name information?
    Do you need county information?
    Do you need a nearest dealer locator system?

    We can HELP! We have affordable AS/400 software and data to do all of the above. Whether you need a simple city name retrieval system or a sophisticated CASS postal coding system, we have it for you!

    The ZIP/CITY system is based on 5-digit ZIP Codes. You can retrieve city names, state names, county names, area codes, time zones, latitude, longitude, and more just by knowing the ZIP Code. We supply information on all the latest area code changes. A nearest dealer locator function is also included. ZIP/CITY includes software, data, monthly updates, and unlimited support. The cost is $495 per year.

    PER/ZIP4 is a sophisticated CASS certified postal coding system for assigning ZIP Codes, ZIP+4, carrier route, and delivery point codes. PER/ZIP4 also provides county names and FIPS codes. PER/ZIP4 can be used interactively, in batch, and with callable programs. PER/ZIP4 includes software, data, monthly updates, and unlimited support. The cost is $3,900 for the first year, and $1,950 for renewal.

    Just call us and we’ll arrange for 30 days FREE use of either ZIP/CITY or PER/ZIP4.

    WorksRight Software, Inc.
    Phone: 601-856-8337
    Fax: 601-856-9432
    Email: software@worksright.com
    Website: www.worksright.com

    Share this:

    • Reddit
    • Facebook
    • LinkedIn
    • Twitter
    • Email

    Guardicore Extends Zero-Trust Security to IBM i IBM i PTF Guide, Volume 23, Number 19

    One thought on “RPG Gets the ‘Splits’ with Latest TRs”

    • Chris Pando says:
      May 7, 2021 at 11:16 am

      A new logo. I’m sure more marketing is all the (what is it now? The most recent tshirt I have calls it an eServer iSeries 400) IBM midrange needs.

      Reply

    Leave a Reply Cancel reply

TFH Volume: 31 Issue: 34

This Issue Sponsored By

  • Maxava
  • Profound Logic Software
  • IBM
  • UCG Technologies
  • WorksRight Software

Table of Contents

  • RPG Gets the ‘Splits’ with Latest TRs
  • Guardicore Extends Zero-Trust Security to IBM i
  • In Search of Multi-Modal Data Integration
  • Four Hundred Monitor, May 5
  • IBM i PTF Guide, Volume 23, Number 18

Content archive

  • The Four Hundred
  • Four Hundred Stuff
  • Four Hundred Guru

Recent Posts

  • Meet The Next Gen Of IBMers Helping To Build IBM i
  • Looks Like IBM Is Building A Linux-Like PASE For IBM i After All
  • Will Independent IBM i Clouds Survive PowerVS?
  • Now, IBM Is Jacking Up Hardware Maintenance Prices
  • IBM i PTF Guide, Volume 27, Number 24
  • Big Blue Raises IBM i License Transfer Fees, Other Prices
  • Keep The IBM i Youth Movement Going With More Training, Better Tools
  • Remain Begins Migrating DevOps Tools To VS Code
  • IBM Readies LTO-10 Tape Drives And Libraries
  • IBM i PTF Guide, Volume 27, Number 23

Subscribe

To get news from IT Jungle sent to your inbox every week, subscribe to our newsletter.

Pages

  • About Us
  • Contact
  • Contributors
  • Four Hundred Monitor
  • IBM i PTF Guide
  • Media Kit
  • Subscribe

Search

Copyright © 2025 IT Jungle