ELowell at 22:51, 12 July 2016

2016-07-12T22:51:04Z

← Older revision		Revision as of 22:51, 12 July 2016
Line 1:		Line 1:
	The conventions used on this page are described in [[HLI: Function ~~call list~~#Function call notation conventions\|Function call notation conventions]].		The conventions used on this page are described in [[HLI: Function summary#Function call notation conventions\|Function call notation conventions]].

	==Summary==		==Summary==

ELowell at 22:02, 11 July 2016

2016-07-11T22:02:20Z

← Older revision		Revision as of 22:02, 11 July 2016
Line 1:		Line 1:
			The conventions used on this page are described in [[HLI: Function call list#Function call notation conventions\|Function call notation conventions]].

	==Summary==		==Summary==

ELowell: Created page with " ==Summary==

Description

The IFERR call (ERROR) places an error message on the Model 204 journal.

Thread type

multiple cursor IFSTRT, singl..."

2016-07-06T23:32:24Z

Created page with " ==Summary== <dl> <dt>Description</dt> <dd>The IFERR call (ERROR) places an error message on the Model 204 journal.</dd> <dt>Thread type</dt> <dd>multiple cursor IFSTRT, singl..."

New page

==Summary==
<dl>
<dt>Description</dt>
<dd>The IFERR call (ERROR) places an error message on the Model 204 journal.</dd>
<dt>Thread type</dt>
<dd>multiple cursor IFSTRT, single cursor IFSTRT</dd>
<dt>IFCALL function number</dt>
<dd>28</dd>
</dl>

==Syntax==
IFERR(RETCODE,PRINT_OP,ERR_MSG)
<dl>
<dt>Compile-only form</dt>
<dd>Not available</dd>
<dt>Execute-only form</dt>
<dd>Not available</dd>
</dl>

Specify the parameters in the syntax order shown above.
<table>
<tr class="head">
<th>Parameter</th>
<th>Description</th>
</tr>
<tr>
<td>RETCODE</td>
<td>[O,i,r] The Model 204 return code is a required output parameter. The code is a binary integer value.</td>
</tr>
<tr>
<td>PRINT_OP</td>
<td>[I,i,r] The print option is a required input parameter. Specify any of the following integer values for printing the message, or sum any of the values:
0 = Print the message only on the journal.
1 = Print the message on the operator's console and on the journal. 
128 = Print the message on the journal and snap the current thread's storage areas including the Host Language Interface/Model 204 server area and control blocks. 
</td>
</tr>
<tr>
<td>ERR_MSG</td>
<td>[I,c,r] The error message is a required input parameter that specifies the message to be printed. Specify a character string less than 256 characters in length.</td>
</tr>
</table>

==Usage notes==

Use the IFERR call to document errors encountered during host language program processing. Model 204 writes the message in the journal as an AD line. You can use the IFERR call on any type of IFSTRT thread. 

==Coding example (COBOL)==

In the example below, a message is written to the Model 204 journal. 
WORKING-STORAGE SECTION.
01 CALL-ARGS.
05 RETCODE PIC 9(5) COMP SYNC.
05 AUDIT-ERROPT PIC 9(5) VALUE 0.
.
.
.
01 MESSAGES.
05 MESSAGE-A PIC X(19) VALUE "INPUT CODE INVALID;".
05 MESSAGE-B PIC X(19) VALUE "RECORD NOT FOUND;".

.
.
.
PROCEDURE DIVISION.
.
.
.
CALL "IFERR" USING RETCODE, AUDIT-ERROPT, MESSAGE-B.

[[Category: HLI functions]]

IFERR (HLI function) - Revision history

ELowell at 22:51, 12 July 2016

ELowell at 22:02, 11 July 2016

ELowell: Created page with " ==Summary== Description The IFERR call (ERROR) places an error message on the Model 204 journal. Thread type multiple cursor IFSTRT, singl..."

ELowell: Created page with " ==Summary==

Description

The IFERR call (ERROR) places an error message on the Model 204 journal.

Thread type

multiple cursor IFSTRT, singl..."