Объектно-ориентированный подход в программировании. Проектирование и реализация приложений в среде Microsof Office. Евсеева О.Н. - 135 стр.

UptoLike

Составители: 

2.8. Пример разработки приложения 136
136
ENDIF
ENDIF
ENDFOREACH
IF только один наследник должен быть добавлен в эту
(строка,столбец) THEN (не добавлять строку в матрицу)
PertChart(строка,столбец) = AddInThisColuinn(1)
CALL addLink строка, столбец, строка, столбец+1
CALL ResolvePendingLinks AddInThisColuinn(1), строка,
столбец+1 (обработать отложенные связи для данного
наследника)
ELSEIF необходимо добавить более одного наследника THEN
CALL InsertRows строка, (размер AddInThisColumn)–1
(добавить необходимое количество строк)
FOREACH для добавляемого наследника SuccessorStep
PertChart(строка,столбец) = AddInThisColuum(строка)
(- этап)
CALL addLink строка, столбец, строка, столбец+1
(- связь)
CALL ResolvePendingLinks AddInThisColumn(l),
строка, столбец+1 (- отложенные связи)
INCREMENT Строка
ENDFOREACH
ENDIF
ENDFOREACH
INCREMENT столбец
ERASE массив nextSteps (очистить массив nextSteps)
FOREACH по всем строкам из PertChart для текущего столбца
IF PertChart(строка, столбец) содержит этап THEN
ADD PertChart(строка, столбец) в массив nextSteps
ENDIF
ENDFOREACH
IF nextSteps не пусто THEN (выполнить процедуру размещения
этапов для следующих данных)
CALL chartSuccessors для PPtoken, массива nextSteps,
счетчик массива nextSteps, столбца
ENDIF
Функциональная модель процедуры создания диаграммы
generateVisioDiagram. Формирование диаграммы Visio — это перевод
матрицы PertChart в страницу диаграммы Visio (рис. 2.8-11). Visio
поставляется с большим числом встроенных фигур, которые могут быть
выведены на страницу как пользователем, так и кодом Visual Basic. Для
данного приложения использован стандартный шаблон
Flowchart
. Генерация