2002 Archives - IT Jungle

Make Qshell Clean Up After Itself

December 18, 2002 Timothy Prickett Morgan

Hey, Ted:

I’ve written a Qshell script that creates some work files that are needed only for the duration of the script. I want the script to delete them before it ends. Here’s the problem: There are several places where the script can end normally and plenty of places where execution of the script could end abnormally. In CL, I’d use a goto command to branch to an end-of-job routine, where I could put commands to clean up, but Qshell does not have a goto command.

I never thought I’d wish for a goto command, but I do. …
Read more

Compiler Directives for RPG Programs and Modules

November 13, 2002 Ted Holt

Hey, Ted:

I would like to define a standard set of H specs for my RPG source members so that all will compile with the same options. However, some RPG source members are compiled as modules and others are compiled as standalone programs. This means I can’t include the DFTACTGRP and ACTGRP keywords in the standard H specs because RPG doesn’t allow them when compiling modules. Do you have any tips that will help me solve the problem?

— Tony

In V5R1 IBM added some new predefined compiler conditions that will help you solve this problem. The new conditions are
…
Read more
Using APIs to Send Impromptu Messages

October 9, 2002 Ted Holt

Hey, Ted:

I would like to use the error message APIs QMHRMVPM and QMHSNDPM in an RPG IV program to send messages to an error-message subfile.

I do not want to have to define the messages in a message file. I would prefer to use constant definitions from within my RPG program. Is this possible?

I’ve searched written manuals and have not yet found a way to do this.

— Russell

Any message that is not sent as an *ESCAPE, *STATUS, or *NOTIFY message can be sent as an impromptu message, Russell. Here’s a short program you can play with. …
Read more