$Currec: Difference between revisions

From m204wiki
Jump to navigation Jump to search
No edit summary
No edit summary
Line 5: Line 5:
</p>
</p>
<p>
<p>
At the beginning of each pass through a <var>For Each Record</var> loop, <var>$Currec</var> is set to the record number of the record to be processed in that pass. When the <var>For</var> loop is exited, because all records have been processed or because a <var>[[Flow_of_control_in_User_Language#LOOP_END_statement|Loop End]]</var> or <var>Jump</var> statement has been encountered, <var>$Currec</var> is restored to its value prior to the <var>For</var> statement. </p>
At the beginning of each pass through a <var>For Each Record</var> loop, <var>$Currec</var> is set to the record number of the record to be processed in that pass. When the <var>For</var> loop is exited, because all records have been processed or because a <var>[[Flow_of_control_in_User_Language#LOOP_END_statement|Loop End]]</var> or <var>[[Flow_of_control_in_User_Language#JUMP_TO_statement|Jump]]</var> statement has been encountered, <var>$Currec</var> is restored to its value prior to the <var>For</var> statement. </p>
<p>
<p>
<var>$Currec</var> takes no arguments. </p>
<var>$Currec</var> takes no arguments. </p>

Revision as of 13:52, 13 February 2018

The $Currec function returns an integer equal to the internal number of the current record.

At the beginning of a request, $Currec is set to minus one, an invalid record number.

At the beginning of each pass through a For Each Record loop, $Currec is set to the record number of the record to be processed in that pass. When the For loop is exited, because all records have been processed or because a Loop End or Jump statement has been encountered, $Currec is restored to its value prior to the For statement.

$Currec takes no arguments.

Be aware of these facts when using $Currec:

  • A Store Record statement resets $Currec to the record number of the newly stored record. If the Store Record statement is issued inside of a For Record loop, $Currec retains the stored record number until the next pass through the For loop or until the next Store Record statement. If the Store Record statement is issued outside of a For Record loop, $Currec will retain the stored record number until the next Store Record or the next For Record loop.
  • An alternative to $Currec is the RecordNumber function used against a Record object. The RecordNumber function returns the record number of the current record being processed in a For loop, and that record number does not change when a Store Record statement is evaluated.
  • In a record loop on the records of a Sort statement, $Currec is set to the record number of the record from which the temporary sort copy was made.
  • Record numbers are not unique within a file group. The number returned by $Currec is valid only in reference to the file from which the record came.

Examples

This request prints the record number of a new record:

BEGIN GET.RECS: FIND ALL RECORDS END FIND FOR 5 RECORDS IN GET.RECS PRINT 'THE INTERNAL RECORD NO IS ' WITH $CURREC END FOR END

Also, as of Model 204 version 7.5, the FOR RECORD NUMBER statement accepts an expression after it, for example:

IN FILE CLAIMS STORE RECORD ... END STORE IN FILE CLAIMS FRN $CURREC ... END FOR