ROLS command and call

You can use the ROLS request to backout to the state all full function databases were in before: (a) a specific SETS request or (b) the most recent commit point.

The format of the ROLS command is:

EXEC DLI ROLS [TOKEN(mytoken) AREA(data-area)]

The format of the ROLS call is:

CALL 'CBLTDLI' USING ROLS,pcb[,i/o_area,token]

i/o_area and token on the call, and TOKEN(mytoken) AREA(data-area) on the command are optional. If you include them, ROLS backs out to the SETS you specified . If you omit them, ROLS backs out to the most recent SETS.

The ROLS command has a second format, the purpose of which is to backout to before an ACCEPT STATUSGROUPA request:

EXEC DLI ROLS [USING(PCB(n)]

where n is the name of a database PCB that has received a data unavailable status code. This causes the same action to take place that would have occurred had the program not issued an ACCEPT STATUSGROUPA request. (See Accepting database availability status codes .)