На рис. 1 представлена структурно-функциональная схема моделируемой системы.

Рис. 1

2. Листинг

* Инициализация и определение

INITIAL X$EOQ,500 ;Оптимальный размер заказа.

INITIAL X$Point,600 ;Контрольный уровень запасов

INITIAL X$Stock,700 ;Начальный запас равен 700.

Inventory TABLE X$Stock,0,50,20 ;Таблица уровней запасов.

Sales TABLE P$Demand,38,2,20 ;Таблица уровней продаж.

Var2 VARIABLE RN1@24+40 ;40 + [0;23]

*****************************************************************************

GENERATE,,,1

Again TEST L X$Stock,X$Point ;Пора завозить

ADVANCE 5 ; Время реализации заказа - 1 неделя.

SAVEVALUE Stock+,X$EOQ ;Заказ

TRANSFER,Again ; Цикл снова повторяется.

*****************************************************************************

GENERATE 1 ; Суточный спрос (генерируется транзакт).

ASSIGN Demand,V$Var2 ; Назначается объем суточного спроса.

TABULATE Inventory ; Производится опись запасов.

TEST GE X$Stock,P$Demand ; Хватает ли деталей?

SAVEVALUE Stock-,P$Demand ;З апас уменьшается на величину спроса.

SAVEVALUE Sold,P$Demand ;X$Sold=суточному спросу.

TABULATE Sales ; Записывается величина суточных продаж.

TERMINATE 1 ; Суточный таймер.

START 100

Пояснения к листингу

Сначала производится инициализация используемых в модели переменных. Для этого используется ключевое слово INITIAL, после которого через стандартный числовой атрибут (СЧА) X, с помощью которого выполняется работа со значением переменной, через запятую следует присваиваемое значение. моделирование склад оборот

INITIAL X$EOQ,500 ; Оптимальный размер заказа.

Так, в первой строке переменной EOQ присваивается значение 500.

INITIAL X$Point,600 ; Контрольный уровень запасов

INITIAL X$Stock,700 ; Начальный запас равен 700.

Далее задаются параметры таблиц, используемых для сбора статистики. Для этого используется оператор TABLE, имеющий вид:

NAME QTABLE A,B,C,D, где NAME - имя таблицы, A - аргумент таблицы, указывает на переменную, информация о которой должна фиксироваться, B - верхний предел первого класса, C - размер классов, D - количество разбиений. Параметры B,C,D подбираются экспериментально.

Inventory TABLE X$Stock,0,50,20 ;Таблица уровней запасов.

Sales TABLE P$Demand,38,2,20 ;Таблица уровней продаж.

После этого зададим переменные. Переменные задаются с помощью оператора VARIABLE, перед которым указывается имя переменной, а после - выражение, её вычисляющее.

Var2 VARIABLE RN1@24+40 ;40 + [0;23]

В данном случае в качестве выражения используется СЧА RN, который генерирует равномерно распределённую величину. Выражение RN1@24 возвращает равномерно распределённую величину в интервале от 0 до 23. Далее к ней прибавляется величина 40, что в итоге описывает условие "суточный спрос равномерно распределен в интервале от 40 до 63 единиц".

После этого организуем приход транзакта, отвечающего за поставку.

GENERATE,,,1

Как видно из параметров оператора, транзакт будет входить в систему один раз. Далее проверяется меньше ли количество продукции на складе, чем управляющий уровень запасов.

Again TEST L X$Stock,X$Point ;Пора завозить

Если меньше, то "отсчитываем" 5 дней (рабочая неделя), иначе - ждём.

ADVANCE 5 ; Время реализации заказа - 1 неделя.

По прошествии недели склад пополняется на оптимальное количество единиц, хранимое в переменной EOU.

SAVEVALUE Stock+, X$EOQ ;Заказ

Это выполняется с помощью оператора SAVEVALUE, имеющего следующий вид

SAVEVALUE A,B, где А - имя переменной, B - управляющее значение. Если после за оператором А следует знак "+", то управляющее значение прибавляется к текущему значению переменной, если "-", то вычитается. Если же оператор А используется без дополнительных знаков, то переменной присваивается управляющее значение.

Далее замыкаем цикл, переходя с помощью оператора TRANSFER к метке AGAIN.

TRANSFER, Again ;Цикл снова повторяется.

Перейдём к моделированию суточного спроса. За единицу времени в модели принят 1 день, поэтому транзакт должен приходить в каждую единицу времени моделирования.

GENERATE 1 ;Суточный спрос (генерируется транзакт).

Для текущего транзакта параметру Demand присваивается значение переменной Var2, которая, как было показано выше, возвращает равномерно распределённую случайную величину дневного спроса. Операция производится с помощью оператора ASSIGN.

ASSIGN Demand,V$Var2 ;Назначается объем суточного спроса.

Через оператор TABULATE указывается таблица, в которую следует внести статистику по текущему транзакту. В данном случае выполняется пополнение таблицы Inventory.

TABULATE Inventory ;Производится опись запасов.

Перед отгрузкой следует проверить, хватает ли для удовлетворения заказа запасов на складе. Для получения значения объёма текущего заказа используется СЧА P, возвращающий значение параметра.

TEST GE X$Stock,P$Demand ;Хватает ли деталей?

Если запасов хватает, то производится отгрузка, т.е. уменьшение значения переменной Stock.

SAVEVALUE Stock-,P$Demand ;Запас уменьшается на величину спроса.

Количество проданной продукции записывается в переменную Sold.

SAVEVALUE Sold,P$Demand ;X$Sold=суточному спросу.

Далее обновляем таблицу продаж.

TABULATE Sales ;Записывается величина суточных продаж.

День кончился, товар отгружен, прекращаем транзакт.

TERMINATE 1 ;Суточный таймер.

Процесс моделирования запускаем на 100 дней.

START 100

Результаты

START TIME END TIME BLOCKS FACILITIES STORAGES

0.000 100.000 13 0 0

NAME VALUE

AGAIN 2.000

DEMAND 10006.000

EOQ 10000.000

INVENTORY 10003.000

POINT 10001.000

SALES 10004.000

SOLD 10007.000

STOCK 10002.000

VAR2 10005.000

LABEL LOC BLOCK TYPE ENTRY COUNT CURRENT COUNT RETRY

1 GENERATE 1 0 0

AGAIN 2 TEST 11 0 0

3 ADVANCE 11 1 0

4 SAVEVALUE 10 0 0

5 TRANSFER 10 0 0

6 GENERATE 100 0 0

7 ASSIGN 100 0 0

8 TABULATE 100 0 0

9 TEST 100 0 0

10 SAVEVALUE 100 0 0

11 SAVEVALUE 100 0 0

12 TABULATE 100 0 0

13 TERMINATE 100 0 0

TABLE MEAN STD.DEV. RANGE RETRY FREQUENCY CUM.%

INVENTORY 612.340 144.998 0

300.000 - 350.000 1 1.00

350.000 - 400.000 8 9.00

400.000 - 450.000 9 18.00

450.000 - 500.000 10 28.00

500.000 - 550.000 10 38.00

550.000 - 600.000 10 48.00

600.000 - 650.000 10 58.00

650.000 - 700.000 11 69.00

700.000 - 750.000 11 80.00

750.000 - 800.000 9 89.00

800.000 - 850.000 9 98.00

850.000 - 900.000 2 100.00

SALES 51.890 6.546 0

38.000 - 40.000 3 3.00

40.000 - 42.000 7 10.00

42.000 - 44.000 7 17.00

44.000 - 46.000 9 26.00

46.000 - 48.000 5 31.00

48.000 - 50.000 8 39.00

50.000 - 52.000 10 49.00

52.000 - 54.000 15 64.00

54.000 - 56.000 8 72.00

56.000 - 58.000 9 81.00

58.000 - 60.000 9 90.00

60.000 - 62.000 6 96.00

62.000 - 64.000 4 100.00

SAVEVALUE RETRY VALUE

EOQ 0 500.000

POINT 0 600.000

STOCK 0 511.000

SOLD 0 51.000

FEC XN PRI BDT ASSEM CURRENT NEXT PARAMETER VALUE

102 0 101.000 102 0 6

1 0 104.000 1 3 4

3. Анализ результатов

Графики распределения запасов и дневного оборота представлены на рис. 2 и 3.

Рис. 2. График распределения запасов

Рис. 3. График распределения дневного оборота

Список литературы