Запорожец  Издания 

0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 [ 83 ] 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139

в функции процедур-подпрограмм WRASL1 и WRASL2 входит вывод результатов расчетной записки на проектируемый трансформатор, в которой в сжатой форме даны все основные электрические, конструктивные и технологические данные.

Передаваемым параметром в процедурах служит номер варианта проектирования, результаты которого необходимо вывести на печать. Вызываются процедуры-подпрограммы оператором CALL. Примеры обращений:

CALL WTSLl(NW); CALL WRCDLl (NW); CALL WRASLl(NW),

где NW - номер варианта проектирования, определяемый диалогом.

Блок-схема сервисной программы ALZWET приведена на рис. 5.7.

Структура диалога программного модуля ALZWET состоит из трех запросов и трех ответов. В диалог включены вопросы, требующие либо пояснительного, либо утвердительного ответа. Диалог идет на естественном языке.

Первое сообщение. На консоль выдается текст: «Укажите вариант».

Пользователь указывает номер варианта, результаты которого необходимо вывести: NW=1,...,M, где М - число вариантов.

Второе сообщение уточняет характер вводимой информации. На консоль выдается текст: «Ответьте - «ВСЕ» - «ТЗ» - «РД»-«РЗ» или укажите номера выходных листов».

Пользователь вводит ответ, соответствующий желаемому режиму работы, указанному в сообщении. Для режима работы «Вывод любого листа выходной информации» пользователь представляет ответ в виде трехсимвольного текста, где первые два символа характеризуют характер выводимых данных (ТЗ- данные технического задания, РД - расчетные. данные, РЗ - расчетная записка), а последний символномер листа соответствующих данных. Например, пользователь на второе сообщение выдает ответ: «Т32» - в этом случае будет произведен вывод данных технического задания - конкретно лист 2/

Третье сообщение запрашивает дальнейшие директивы: «Прекратить работу или продолжить вывод выходной информации?» На консоль выдается сообщение: «Конец?»..Пользователь отвечает утвердительно «Да» или отрицательно «Нет»; При утвердительном ответе программа ALZWET заканчивает работу, при отрицательном - диалог повторяется. При повторении диалога на первое сообщение «Укажите вариант» пользователь отвечает «СТВ», если необходимо вывести информацию предыдущего варианта проектирования или указать номер интересующего варианта проектирования.



Начало

Определеггие в диалоговом режиме переменных OTV и WINF

г 2-

Определение значений

массива WLIST; в ззЕиси мости от WINF


L3: L4:

L7:.

Lio;

Lii;

L12:

Lis:

CALL WTSLl (NW)

CALL WTSL2(NW) -

CALL WRCDL1 (NW) -

CALL WRCDL2(NW)[-

CALL WRCDL3

(NW)-

CALL WRCDL4(NW)-

CALLWRCDL5(NW) If- CALLWRCDL6(NW)[-

CALL WRCDL7(NW)- CALL WRCDL8(NW)[-

CALL WRCDL9(NW) - JCALL WRASL1 (NW) \\-

CALL WRASL2(NW) -

конец )

Рис. 5.7. Блок-схема сервисной программы ALZWET



Оверлейная структура программы состоит из одной области и имеет 13 сегментов. Корневой сегмент содержит главную программу ALZWET, подпрограмму WTSL1 и постоянно находится в основной памяти. Другие сегменты загружаются в па-

WTSL2

WRCDLl

Управляющая программа ALZWET

WTSL1


VVRASL2

WRASLT

Сегменты имеют символическое имя TSRDRS. Порядок следования сегментов следующий;

INSERT WTSL1 OVERLAY TSRDRS INSERT WTSL2 OVERLAY TSRDRS INSERT WRCDLT OVERLAY TSRDRS INSERT WRCDL2

OVERLAY TSRDRS INSERT WRCDL9 OVERLAY TSRDRS INSERT WRASL1 OVERLAY TSRDRS INSERT WRASL2

Рис. 5.8. Граф оверлейной структуры программы ALZWET

МЯТЬ по мере необходимости. Граф оверлейной структуры изображен на рис. 5.8.

Все загрузочные модули находятся в библиотечном иаборе загрузочных модулей SAPRTL. Необходимые обслуживающие секции PL/1 вызываются автоматически из библиотеки SYS1, PL1LIB на этапе редактирования и помещаются в корневой сегмент, как показано на рис. 5.8.

Возможности работы сервисной программы ALZWET показаны на примерах расчета, приведенных в § 5.9.



0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 [ 83 ] 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139