13
Wed, Nov
5 New Articles

Practical RDPi: Managing Message Descriptions

RPG
Typography
  • Smaller Small Medium Big Bigger
  • Default Helvetica Segoe Georgia Times

Message descriptions are one of the unsung heroes of IBM i application development, and this article shows you how to use RDPi to manage them with ease.

 

The message description is unique to the IBM i. The concept is simple: a seven-character key provides a link to a fully featured message, which supports both a short version suitable for presentation on a user display and a long message with enough information to provide full diagnostic and help capabilities. Such a basic idea, yet message descriptions provide a wide range of capabilities. For example, messages are contained in a message file,m and internationalization is as simple as supplying a different message file for the locale. The i had i18n before i18n was cool!

Using Message Fields Today

Messages are incredibly feature-rich. You can design a message with replacement variables and also design a data record that is passed to the message at run time. This message data is then parsed when the message is displayed, and the variable data is inserted into the message. Here's a simple example in which the customer number and name is displayed as an informational message:

 

      Customer &1, name &2.

 

The message is further defined to identify the size of the two variables, &1 and &2, and then when the application program sends the message to the user, it passes a data structure with the appropriate values and the message is displayed with the data in place. Given the power of messages, it may seem surprising that they're not universally used. But I think that message files are a little bit like externally described printer files: the pain of the standard tooling is just enough to prevent the adoption of the tool. The good news is that, like printer files, the Rational tooling provides easier-to-use capabilities to get you over the hump and using messages in your everyday programming. Not only that, but the message file capabilities are present all the way back to WDSC, so even folks who haven't made the move to the newer Rational tool sets can still use these techniques (that's unfortunately definitely not the case with printer files).

 

100601PlutaFigure1

Figure 1: The CHGMSGD command is not the most user-friendly command in the i toolkit. (Click images to enlarge.)

 

The problem with message files lies in their maintenance. Take a look at Figure 1. The CHGMSGD command is almost useless for maintenance. The keyword values throughout the command are not filled in with the current definitions from the message; they instead only support the dreaded *SAME keyword, which means you have to key in the whole new value. This is not only annoying for things like text, but also almost impossible to use when your message data has many variables; you effectively have to key in all the variables every time you make a change. And I'm not just complaining to hear myself talk: check out the CHGUSRPRF command. Execute CHGUSRPRF on a user profile to which you have authority (such as your own) and hit F4; you'll see that most of the values are pre-filled. CHGMSGD just doesn't work that way.

 

100601PlutaFigure2

Figure 2: WRKMSGF has a little more functionality.

 

The WRKMSGF command gives you a little better interface. It's still rather labor-intensive, as you can see in Figure 2; you have to first call up the message file, then position to the message description, and then finally maintain the message. It does pre-fill the values for the keywords based on the current message definition, a feature that is absolutely essential when maintaining messages with many message data fields. But it's far from an easy experience, and making any sort of wholesale changes is out of the question.

 

The other problem is that a message file is like a number of other objects in the system, particularly non-program objects such as output queues and subsystem descriptions, in that it does not have a source member that is compiled to create the object. You create these objects by executing commands from the command line. Since command-line changes are ad hoc, you always have the chance of somebody making a change that wipes out yours—or even deleting the object—and then your changes are lost. This argues for a practice I try to implement at all my client sites: I always have a source file that contains all the commands used in defining or modifying system objects.

RDPi and Message Files

So how does RDPi make message file management easier? Well, at first glance, you might think that Remote Systems Explorer (RSE) has your back, but unfortunately that turns out not to be quite true.

 

100601PlutaFigure3

Figure 3: RSE has some nice inquiry capabilities for message files.

 

100601PlutaFigure4

Figure 4: But the maintenance capabilities are the same as the CHGMSGD, which is to say not very good.

 

Looking at Figure 3, you can see that the Remote System Explorer (RSE) will show you the message file and the messages in it. You can even initiate a change using the right-click context menu. However, the change isn't particularly user-friendly. RSE uses its built-in ability to execute any IBM i command. Unfortunately, that ability is limited by the features of the command being executed, which, in the case of the CHGMSGD, are somewhat underwhelming, as we've already seen. But even if the RSE change feature was more powerful, I still wouldn't recommend it, because of the ad hoc nature of the change. Instead, I recommend a source-file approach. In my library, I created source file QSRC1009 with a CLP member MYMSGF. Here's the source for that member:

 

 MYMSGF:     PGM

 

             DCL        &MSGF *CHAR 10 VALUE('MYMSGF')

             DCL        &MSGFLIB *CHAR 10 VALUE('MCP')

 

             MONMSG     CPF2419

 

             RMVMSGD    MSGID(CUS0001) MSGF(&MSGFLIB/&MSGF)

             ADDMSGD    MSGID(CUS0001) MSGF(&MSGFLIB/&MSGF) +

               MSG('Customer &1, name &2.') +

               FMT((*DEC 6 0) (*CHAR 30))

 

             RMVMSGD    MSGID(CUS9001) MSGF(&MSGFLIB/&MSGF)

             ADDMSGD    MSGID(CUS9001) MSGF(&MSGFLIB/&MSGF) +

               MSG('No customer number passed.')

 

             RMVMSGD    MSGID(CUS9002) MSGF(&MSGFLIB/&MSGF)

             ADDMSGD    MSGID(CUS9002) MSGF(&MSGFLIB/&MSGF) +

               MSG('Invalid opcode.')

 

             RMVMSGD    MSGID(CUS9999) MSGF(&MSGFLIB/&MSGF)

             ADDMSGD    MSGID(CUS9999) MSGF(&MSGFLIB/&MSGF) +

               MSG('Feature not yet implemented.')

 

             ENDPGM

 

This is the standard template I use for all "message file compile" programs. I put the name of the message file and library into variables at the top of the program; that way, I don't have to change every line of the source if the message file name or library needs to change. I do a RMVMSGD and an ADDMSGD; this works whether the message exists or not. The MONMSG CPF2419 ignores any errors if I execute a RMVMSGD on a message that doesn't exist. Use RDPi to maintain the file; it's very easy to copy and paste an existing message description definition to create a new one.

 

You'll note that I did just that: I added a new message that doesn't appear in Figure 3, message ID CUS9999. Next I have to compile the program. However, this program is a little different than others; it's a setup program rather than an application program. Unlike application programs, which you only need to compile, you have to compile a setup program and then run it. The compile part is easy in RDPi; options include pressing Ctrl+Shift+C when you're in the editor and right-clicking on the member in the RSE view and selecting Compile. But running a program from RDPi is not always the easiest. You can run any command by right-clicking on the Objects subsystem and selecting Run Command or by using the command field in the Commands Log tab, and these are both options I'll address a little more another day. Unfortunately, they both suffer from the same flaw: you have to key in the entire command, such as CALL MYMSGF. This is tedious and error-prone, being subject to the whims of both typographical errors and library list malfunctions.

 

To close this article, I would like to show you one extra feature.

 

You can run the program in one of two ways. The first is straightforward: expand your library and look for the program. When you find it, right-click on it and select Run As > IBM i application in RSE Job, as shown in Figure 5. It's easy, but it does require looking for the program. I have one other little trick. If your source file is in the same library as your setup program (not an unreasonable notion, especially for these sorts of programs), you can set up a User Action. Figure 6 shows the definition of the action, while Figure 7 shows how to use the action.

 

100601PlutaFigure5

Figure 5: The simplest way to run a program is to right-click on the program object and select Run As.

 

100601PlutaFigure6

Figure 6: A more convenient way, though, is to use a User Action, like the one shown here.

 

100601PlutaFigure7

Figure 7: Then you can right-click on the source member and invoke the User Action to call the program.

 

You might wonder why I create the user action when the Run As option is perfectly adequate. I do it because it allows me to keep my focus on the source file. Libraries tend to get cluttered with objects, and having to search for the appropriate program to run can require enough scrolling to make things cumbersome; in Figure 5 I had to scroll all the way to the top of the library to find the program. Instead, with the user action, I do everything from the source file: I double-click on the source member to edit it, make my changes, hit Ctrl+Shift+C to save and compile the member, and then right-click on the same source member to run the resulting program. It's simple and quick.

 

In fact, I hope the technique is quick enough that those of you not using message files might be willing to give it another shot. And at the same time, I hope the message file mavens among us have learned a little something from this article as well. I may devote another article to the fine art of defining and naming messages and using them in conjunction with another IBM i exclusive: the message subfile.

 

 

as/400, os/400, iseries, system i, i5/os, ibm i, power systems, 6.1, 7.1, V7,

Joe Pluta

Joe Pluta is the founder and chief architect of Pluta Brothers Design, Inc. He has been extending the IBM midrange since the days of the IBM System/3. Joe uses WebSphere extensively, especially as the base for PSC/400, the only product that can move your legacy systems to the Web using simple green-screen commands. He has written several books, including Developing Web 2.0 Applications with EGL for IBM i, E-Deployment: The Fastest Path to the Web, Eclipse: Step by Step, and WDSC: Step by Step. Joe performs onsite mentoring and speaks at user groups around the country. You can reach him at This email address is being protected from spambots. You need JavaScript enabled to view it..


MC Press books written by Joe Pluta available now on the MC Press Bookstore.

Developing Web 2.0 Applications with EGL for IBM i Developing Web 2.0 Applications with EGL for IBM i
Joe Pluta introduces you to EGL Rich UI and IBM’s Rational Developer for the IBM i platform.
List Price $39.95

Now On Sale

WDSC: Step by Step WDSC: Step by Step
Discover incredibly powerful WDSC with this easy-to-understand yet thorough introduction.
List Price $74.95

Now On Sale

Eclipse: Step by Step Eclipse: Step by Step
Quickly get up to speed and productivity using Eclipse.
List Price $59.00

Now On Sale

BLOG COMMENTS POWERED BY DISQUS

LATEST COMMENTS

Support MC Press Online

$

Book Reviews

Resource Center

  • SB Profound WC 5536 Have you been wondering about Node.js? Our free Node.js Webinar Series takes you from total beginner to creating a fully-functional IBM i Node.js business application. You can find Part 1 here. In Part 2 of our free Node.js Webinar Series, Brian May teaches you the different tooling options available for writing code, debugging, and using Git for version control. Brian will briefly discuss the different tools available, and demonstrate his preferred setup for Node development on IBM i or any platform. Attend this webinar to learn:

  • SB Profound WP 5539More than ever, there is a demand for IT to deliver innovation. Your IBM i has been an essential part of your business operations for years. However, your organization may struggle to maintain the current system and implement new projects. The thousands of customers we've worked with and surveyed state that expectations regarding the digital footprint and vision of the company are not aligned with the current IT environment.

  • SB HelpSystems ROBOT Generic IBM announced the E1080 servers using the latest Power10 processor in September 2021. The most powerful processor from IBM to date, Power10 is designed to handle the demands of doing business in today’s high-tech atmosphere, including running cloud applications, supporting big data, and managing AI workloads. But what does Power10 mean for your data center? In this recorded webinar, IBMers Dan Sundt and Dylan Boday join IBM Power Champion Tom Huntington for a discussion on why Power10 technology is the right strategic investment if you run IBM i, AIX, or Linux. In this action-packed hour, Tom will share trends from the IBM i and AIX user communities while Dan and Dylan dive into the tech specs for key hardware, including:

  • Magic MarkTRY the one package that solves all your document design and printing challenges on all your platforms. Produce bar code labels, electronic forms, ad hoc reports, and RFID tags – without programming! MarkMagic is the only document design and print solution that combines report writing, WYSIWYG label and forms design, and conditional printing in one integrated product. Make sure your data survives when catastrophe hits. Request your trial now!  Request Now.

  • SB HelpSystems ROBOT GenericForms of ransomware has been around for over 30 years, and with more and more organizations suffering attacks each year, it continues to endure. What has made ransomware such a durable threat and what is the best way to combat it? In order to prevent ransomware, organizations must first understand how it works.

  • SB HelpSystems ROBOT GenericIT security is a top priority for businesses around the world, but most IBM i pros don’t know where to begin—and most cybersecurity experts don’t know IBM i. In this session, Robin Tatam explores the business impact of lax IBM i security, the top vulnerabilities putting IBM i at risk, and the steps you can take to protect your organization. If you’re looking to avoid unexpected downtime or corrupted data, you don’t want to miss this session.

  • SB HelpSystems ROBOT GenericCan you trust all of your users all of the time? A typical end user receives 16 malicious emails each month, but only 17 percent of these phishing campaigns are reported to IT. Once an attack is underway, most organizations won’t discover the breach until six months later. A staggering amount of damage can occur in that time. Despite these risks, 93 percent of organizations are leaving their IBM i systems vulnerable to cybercrime. In this on-demand webinar, IBM i security experts Robin Tatam and Sandi Moore will reveal:

  • FORTRA Disaster protection is vital to every business. Yet, it often consists of patched together procedures that are prone to error. From automatic backups to data encryption to media management, Robot automates the routine (yet often complex) tasks of iSeries backup and recovery, saving you time and money and making the process safer and more reliable. Automate your backups with the Robot Backup and Recovery Solution. Key features include:

  • FORTRAManaging messages on your IBM i can be more than a full-time job if you have to do it manually. Messages need a response and resources must be monitored—often over multiple systems and across platforms. How can you be sure you won’t miss important system events? Automate your message center with the Robot Message Management Solution. Key features include:

  • FORTRAThe thought of printing, distributing, and storing iSeries reports manually may reduce you to tears. Paper and labor costs associated with report generation can spiral out of control. Mountains of paper threaten to swamp your files. Robot automates report bursting, distribution, bundling, and archiving, and offers secure, selective online report viewing. Manage your reports with the Robot Report Management Solution. Key features include:

  • FORTRAFor over 30 years, Robot has been a leader in systems management for IBM i. With batch job creation and scheduling at its core, the Robot Job Scheduling Solution reduces the opportunity for human error and helps you maintain service levels, automating even the biggest, most complex runbooks. Manage your job schedule with the Robot Job Scheduling Solution. Key features include:

  • LANSA Business users want new applications now. Market and regulatory pressures require faster application updates and delivery into production. Your IBM i developers may be approaching retirement, and you see no sure way to fill their positions with experienced developers. In addition, you may be caught between maintaining your existing applications and the uncertainty of moving to something new.

  • LANSAWhen it comes to creating your business applications, there are hundreds of coding platforms and programming languages to choose from. These options range from very complex traditional programming languages to Low-Code platforms where sometimes no traditional coding experience is needed. Download our whitepaper, The Power of Writing Code in a Low-Code Solution, and:

  • LANSASupply Chain is becoming increasingly complex and unpredictable. From raw materials for manufacturing to food supply chains, the journey from source to production to delivery to consumers is marred with inefficiencies, manual processes, shortages, recalls, counterfeits, and scandals. In this webinar, we discuss how:

  • The MC Resource Centers bring you the widest selection of white papers, trial software, and on-demand webcasts for you to choose from. >> Review the list of White Papers, Trial Software or On-Demand Webcast at the MC Press Resource Center. >> Add the items to yru Cart and complet he checkout process and submit

  • Profound Logic Have you been wondering about Node.js? Our free Node.js Webinar Series takes you from total beginner to creating a fully-functional IBM i Node.js business application.

  • SB Profound WC 5536Join us for this hour-long webcast that will explore:

  • Fortra IT managers hoping to find new IBM i talent are discovering that the pool of experienced RPG programmers and operators or administrators with intimate knowledge of the operating system and the applications that run on it is small. This begs the question: How will you manage the platform that supports such a big part of your business? This guide offers strategies and software suggestions to help you plan IT staffing and resources and smooth the transition after your AS/400 talent retires. Read on to learn: