Back to SPR List Previous Next
JUMPing out of a PROCESS RECORD ..INDEXED BY ... block can cause problems
Moderate Closed - Fixed Found:2002.20.32 09 FEB 2004 Fixed:2002.20.33 13 FEB 2004

DETAILS
 JUMPing out of a PROCESS RECORD ... INDEXED BY ... block can give you an
 execution error
 message:
 Database return code 3035  Record operation performed on case block.

 After this if the program is run again, the thing hangs using tons of CPU
 and can't be interrupted with the 'Break' key.  Ctl-
 Alt-Del to end the task must be used.  If the retrieval is run only once
 then try to exit SIR you get a Windows ABEND notice.
EXAMPLE PROGRAM
 retrieval
 process cases
 process rec employee
 . get vars name
 . write name
 . execute subprocedure test
 end rec
 end case
 c
 subprocedure test
 process rec employee indexed by name via (name)
 . if(gender=2)jump mylabel
 end rec
 mylabel:
 end subprocedure
 c
 end retrieval
WORKAROUND
Use an EXIT RECORD command rather than a JUMP.
Back to SPR List Previous Next