Галактика в вопросах и ответах

проще надо быть . Тогда кол-во ошибок сокращается. Зачем вам while внутри vdrag да еще без First- Next? Зачем вам вообще юзать таблицы в памяти через TBL? Это изобрели 20 лет назад(эт не шутка) , но уже лет 10 как можно все делать проще и надежней(да и раньше можно было юзая таблы пользовательской схемы). В чем смысл этого накопления? Ладно бы отсортировать бы - чтобы золото шло первым - так у вас вроде не прослеживается.

edward_K писал(а):проще надо быть . Тогда кол-во ошибок сокращается. Зачем вам while внутри vdrag да еще без First- Next? Зачем вам вообще юзать таблицы в памяти через TBL? Это изобрели 20 лет назад(эт не шутка) , но уже лет 10 как можно все делать проще и надежней(да и раньше можно было юзая таблы пользовательской схемы). В чем смысл этого накопления? Ладно бы отсортировать бы - чтобы золото шло первым - так у вас вроде не прослеживается.

Знал бы я как сделать проще, давно бы уже сделал... Поэтому и прошу помощи

убрать все с TBL . while(но начинку оставить) и т.п. Программный блок для вычисление переменных тоже оставить, но вместо "таблицы в памяти" взять с naldrag напрямую. Vip - ом собираете?