Debugging

CACHEINFO

Definition

Prints information about cached table records to SYSPRINT.

Example

/* print cached table records */
CALL SAY(CACHEINFO());

INSMSG

Definition

Inserts a message. When the message text contains variables, their values must be passed to the PARM list.

Example

The function uses the messages that are defined under JCK-MSG. Each message has a CODE, a SEVERITY and a MESSAGE that can contain variables.

TST0001W 04 THE JOB FINISHED WITH &VAR1 WARNINGS IN ENVIRONMENT &VAR2
TST0002E 08 THE JOB FINISHED WITH &VAR1 ERRORS IN ENVIRONMENT &VAR2

/* insert a warning message */
CALL INSMSG("TST0001W", [7, "TEST"]);

/* insert an error message */
CALL INSMSG("TST0002E", [3, "TEST"]);

INSMSGEX

Definition

Inserts a message with an explicit severity. When the message text contains variables, their values must be passed to the PARM list.

Example

For this example, the same messages are being used as in INSMSG.

/* insert a warning message with explicit severity */
CALL INSMSGEX("TST0001W", 4, [7, "TEST"]);

SAY

Definition

Prints a value to SYSPRINT. Optionally, a prefix can be defined that is appended in front of the value.

Example

Using a prefix can be useful, if a variable is being used that changes depending on the context (e.g. a different system). This could also be achieved via concatenation.

/* print a message */
CALL SAY("TEST");

/* print a concatenated message */
CALL SAY("PRE"!!"TEST");

/* print a message with prefix */
CALL SAY("PRE", "TEST");