Предыдущая страница реферата | 10  11  12  13  14  15  16  17  18  19  20 | Следующая страница реферата

Вывод шапки таблицы

Вывод заключения таблицы

Сортировка по полю VidProd с помощью индексного файла

Do While .Not.EOF()

AllVol=Sum(Volum)

Вывод заключения таблицы

AllPrice=Sum(Volum*Price)

Переход на запись с новым видом продукции

1

2

1

2

Wait

Return

1

[pic]

Переход на следующую запись

AllPrice=Sum(Volum*Price)

Store 0 to MinAP, LastAP

Начало

Do While .Not.EOF()

For I=1 to 5

Вывод в строке таблицы MinVP, MinAP

Вывод шапки таблицы

False

Рекомендуем скачать другие рефераты по теме: инновационный менеджмент, курсовая работа.



Предыдущая страница реферата | 10  11  12  13  14  15  16  17  18  19  20 | Следующая страница реферата

Поделитесь этой записью или добавьте в закладки