Messages serve many purposes: to provide information, to ask a question and request a reply, and to solicit some action on the recipient's part.
Editor's note: This article is an excerpt from Chapter 16, "Advanced Message Handling," of Control Language Programming for IBM i.
Understanding how messages work is an important part of writing good CL programs. In fact, without at least a basic understanding of messages, your CL programs will be error-prone and, in many cases, unreliable.
IBM i is driven by messages. Messages are used for a multitude of different purposes, including initiating jobs, executing commands, communicating between programs, signaling error conditions, letting users communicate with each other, and letting jobs communicate with users.
What Is a Message?
In everyday life, the concept of a message is quite simple. Webster's dictionary defines a message as "a communication, verbal or written, sent by one person to another." A message, by definition, is sent and is not of any true significance until it is received. Once a message has been received, it can be acted upon. The one who receives the message decides what to do with the information contained in the message.
Messages serve many purposes: to provide information, to ask a question and request a reply, and to solicit some action on the recipient's part. Regardless of the message type, the recipient determines what will be done after the message has been received. The receiver can ignore the message, act on the message, or, if requested, choose to send a reply.
IBM i messages are no different: A message is sent to convey information, and the recipient of the message determines what will be done with that information.
Message Queues
Messages can be sent from only two sources: system users and running programs. Messages are not sent directly to other users or programs but rather to a message queue associated with a user, a program, or a workstation device.
A message queue (object type *MSGQ) is a holding area or "in basket" for messages. A message queue usually can store hundreds or even thousands of messages. Once a message has arrived on a message queue, it is up to the recipient to view (or receive) the message, take any action, and remove the message when it is no longer needed.
When a user profile object is created, a user message queue is created for that user. The system uses this message queue whenever a message is sent specifically to that user. Usually, the name of the message queue object is the same as the name of the associated user profile.
Whenever a workstation device is created, a workstation message queue is created for that device. Some types of messages are routinely sent to a workstation message queue rather than to a user message queue. It is the responsibility of the workstation user to view any messages sent to the workstation message queue and to take any action necessary. The workstation message queue is usually named the same as the associated workstation device.
In addition, a few special message queues exist on every system. The system operator message queue (QSYSOPR) lets the system operator receive messages sent by the system, by programs, or by other users and take appropriate action. The system sends system-related messages to the system history log message queue (QHST), which you then can view using the DSPLOG (Display Log) command. You can create other message queues as needed using the CRTMSGQ (Create Message Queue) command.
All the message queues we've discussed so far are permanent objects on the system. You can delete them using the DLTMSGQ (Delete Message Queue) command, but they will be permanent until explicitly deleted. The IBM i operating system also supports two types of temporary message queues: a call message queue and an external message queue.
Immediately before a program begins executing, the system creates a message queue for that program. The call stack entry message queue (sometimes called the call message queue or the program message queue) is the program's own "in basket" for messages. Every called program has an associated call stack entry message queue. In an ILE CL program, each procedure in the program also has its own call message queue. Once a message arrives on the call message queue, it is up to the program or procedure to determine what to do with it. Certain messages can be ignored; others must be dealt with, depending on the message type.
Whenever a job starts, an external message queue is created for that job. The external message queue is used to communicate between the executing job and the job's external requester. Many different message types can be sent to the external message queue as a job runs. Some require attention; others do not.
The structure of all message queues is the same, whether they are permanent or temporary. There is an area for the message and an area for a system-generated message key. The system uses the message key to uniquely identify each message on the queue. The message storage area is used to hold the message type, severity, text, and other data associated with the message.
Types of Messages
Several message types can be sent and received. Every message in a message queue has an associated type, such as *DIAG, *COMP, *INFO, *INQ, and *ESCAPE. Each message type has a unique purpose; the message type sent will depend on the purpose of the message as determined by the sender of the message. The following table lists the types of messages, a description of each type, and its purpose.
|
Message Type |
Description |
Purpose |
|
*COMP |
Completion |
Signals the successful completion of a processing step. |
|
*DIAG |
Diagnostic |
Indicates that an error condition exists. |
|
*ESCAPE |
Escape |
Indicates that a severe error has occurred and that the program that sent the message has ended in error. A program that sends an *ESCAPE message ends immediately. |
|
*INFO |
Informational |
Informs the recipient of any pertinent information. Not generally used to indicate an error. |
|
*INQ |
Inquiry |
Requests additional information, which is sent back with a *RPY message. |
|
*NOTIFY |
Notification |
Can be used as an *INQ or *ESCAPE message, depending on the recipient. |
|
*RPY |
Reply |
Replies to an *INQ or *NOTIFY message. |
|
*RQS |
Request |
Sends a processing request (i.e., executes a command). |
|
*STATUS |
Status |
Advises an interactive user of a job's progress. Can also function as an *ESCAPE message. |
You must be aware of certain rules about sending and receiving different types of messages. A workstation user can send only *INFO, *INQ, and *RPY message types. A CL program can send any of the message types. The following table summarizes the types of message queues and which message types they can accept.
|
Message Type |
|||||||||
|
Message Queue |
*COMP |
*DIAG |
*ESCAPE |
*INFO |
*INQ |
*NOTIFY |
*RPY |
*RQS |
*STATUS |
|
Job *EXT message queue |
Yes |
Yes |
— |
Yes |
Yes
|
Yes
|
— |
Yes
|
Yes
|
|
Call message queue |
Yes
|
Yes
|
Yes
|
Yes
|
— |
Yes
|
Yes
|
Yes
|
Yes
|
|
QSYSOPR |
Yes
|
Yes
|
— |
Yes
|
Yes
|
— |
Yes
|
— |
— |
|
User message queue |
Yes
|
Yes
|
— |
Yes
|
Yes
|
— |
Yes
|
— |
— |
|
Workstation message queue |
Yes
|
Yes
|
— |
Yes
|
Yes
|
— |
Yes
|
— |
— |
Jim is the president and founder of imPower Technologies, where he provides professional IBM i training and consulting services. He is active in the IBM i community, working to help companies train their employees in the latest IBM technologies and develop the next generation of IBM i professionals.
MC Press books written by Jim Buck available now on the MC Press Bookstore.
 |
||
 |
|
Control Language Programming for IBM i Master the A-Z of CL, including features such as structured programming, file processing enhancements, and ILE. List Price $79.95 Now On Sale
|
|
||
 |
|
Mastering IBM i Get the must-have guide to the tools and concepts needed to work with today's IBM i. List Price $85.95
Now On Sale
|
|
||
 |
|
Programming in ILE RPG Get the definitive guide to the RPG programming language. List Price $95.95
Now On Sale
|
|
||
 |
|
Programming in RPG IV Understand the essentials of business programming using RPG IV. List Price $79.95
Now On Sale
|
More 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.
TRY 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.
Forms 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.
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:
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.
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:
LATEST COMMENTS
MC Press Online