$SAVE NOLIST dq$decode$time: PROCEDURE( dt$ptr, except$ptr ) EXTERNAL; DECLARE dt$ptr POINTER, except$ptr POINTER; END dq$decode$time; $RESTORE