1295          FOR DISPLAY.LOOP = 1 TO KEY.COUNT
1296             UTILITY.ID = KEY.LIST<1,DISPLAY.LOOP>
1297             GOSUB GET.UTILITY.RECORD
1298             IF INDEX(UTILITY.NAME,LAST.NAME,1) = 0 THEN
1299                KEY.LIST = DELETE(KEY.LIST,1,DISPLAY.LOOP,0)
1300                DISPLAY.LOOP -= 1
1301                KEY.COUNT -= 1
1302             END
1303          NEXT DISPLAY.LOOP


Comments?


_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

Reply via email to