PARM F1,F2=0,F3=0,F4=0,F5=0,F6=0,F7=0,F8=0,F9=0,F10=0,F11=0,F12=0

##  SEC.XEQ - BRUTE FORCE SECURE FILES
##  TIM ERICSON

SETVAR FNUM 1
WHILE FNUM <= 12 AND "!'F!FNUM'" <> "0" DO
  SECURE !"F!FNUM"
  SETVAR FNUM FNUM + 1
ENDWHILE
DELETEVAR FNUM