RECSIN

Figure 1. Syntax

1 RECSIN()

Can be used in FASTREXX condition expressions.

Returns the count of records read so far from the input data set. When the input data set is a PDS, the RECSIN count restarts for each member being processed.

When used with DSEB, RECSIN returns the record number of the furthest record read so far in the data set. (For example, if you have moved down as far as record number 500 in the data set, then you move up to a previous record, RECSIN still returns 500 after moving up.)

Example

Print every hundredth record.
If RECSIN()//100 = 0 Then PRINT(inrec,'CHAR')