!JOB FINDIT,FIELD.SUPPORT,HP32002                                       00001000
!FILE F=FINDIT;TEMP;REC=-12,170,F,ASCII;NOCCTL                          00002000
!LISTF S@;*F                                                            00003000
!QE                                                                     00004000
SET BATCH ON                                                            00005000
T FINDIT                                                                00006000
SET LENGTH 80                                                           00007000
DQ "        " (1/8)                                                     00008000
DQ "FILENAME" (1/8)                                                     00009000
CQ 10 #"FPROCTERM"# ALL                                                 00010000
CQ 1 "L " ALL                                                           00011000
KEEP                                                                    00012000
USE *                                                                   00013000
EXIT                                                                    00014000
!EOJ                                                                    00015000
