IFRRFL (HLI function)

From m204wiki
Revision as of 20:39, 8 July 2016 by ELowell (talk | contribs) (Created page with " ==Summary== <dl> <dt>Description</dt> <dd>The IFRRFL call (REMOVE RECORD FROM LIST) removes the current record from the specified list.</dd> <dt>Thread type</dt> <dd>multiple...")
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to navigation Jump to search

Summary

Description
The IFRRFL call (REMOVE RECORD FROM LIST) removes the current record from the specified list.
Thread type
multiple cursor IFSTRT, single cursor IFSTRT
IFCALL function number
34

Syntax

IFRRFL(RETCODE,LIST_NAME,CURSOR_NAME)

Compile-only form
Not available
Execute-only form
Not available

Specify the parameters in the syntax order shown above.

Parameter

Description

RETCODE [O,i,r] The Model 204 return code is the required first parameter. The code is a binary integer value.
LIST_NAME [I,c,r] The list name is a required input parameter that specifies the name of the list to be used. Specify a character string variable that is the name of an existing list.
CURSOR_NAME [I,s,r] The name of the cursor is an input parameter that is available only for use with a multiple cursor IFSTRT thread and is required for specifying the current record to be removed. Specify the cursor name as a short character string, using the name previously assigned to the cursor in a corresponding IFOCUR call. See the description of CURSOR_NAME for the IFOCUR call.

Note: The cursor name is not a valid parameter for use with a single cursor IFSTRT thread.

Usage notes

Use the IFRRFL call to remove a record from a list.

The IFRRFL call is valid on all types of IFSTRT threads. On a multiple cursor IFSTRT thread, you must specify the cursor name for the current record. On a single cursor IFSTRT thread, IFRRFL processes the current record using the set that is current for the file or group most recently opened.

Coding example (COBOL)

WORKING-STORAGE SECTION. 01 ARGS-FOR-CALL. 05 RETCODE PIC 9(5) COMP SYNC. 05 LISTNAME PIC X(5) VALUE "SAVE;". . . . PROCEDURE DIVISION. . . CALL "IFRRFL" USING RETCODE, LISTNAME.

In this example, processing is done on a single cursor IFSTRT thread, and the IFRRFL call is preceded by IFFIND, IFLIST, and IFGET calls (not shown).