MACRO 00020000 &NAME INDEX &LIST,&DUMMY= 00040017 &NAME LOCATE &LIST EXPAND USING LOCATE 00060018 MEND 00080000