READAGAIN (RDAG)

Syntax

READAGAIN

Description

Restarts the table query loop from the first record of the result set.

Diagram

N.A.

Returned value type

None

Parameters

None

Remarks

The table query used may not have equal or start options.

Example

agncount := 0
tq_cust.index (idx_cust_custno)
loop tq_cust
  sme ('Custno is: ' + format (tq_cust.cust_no))
  if tq_cust.cust_no >= 5
    readagain
    agncount += 1
    if agncount = 3
      break
    endif
  endif
endloop