poddergrukovodstkp (538828), страница 10
Текст из файла (страница 10)
е. каждыйцех производит блоки одного типа. Интервалы выпуска блоков T1, T2, …, Tn1— случайные. Из n1 блоков собирается одно изделие.Перед сборкой каждый тип блоков проверяется на n11, n12, …, n1n соответствующих постах. Длительности контроля одного соответствующего блока T11,T12, …, T1n — случайные. На каждом посту бракуется q11, q12, …, q1n % блоков соответственно. Эти блоки в дальнейшем процессе сборки не участвуют иудаляются с постов контроля.Прошедшие контроль, т. е. не забракованные блоки поступают на один из n2пунктов сборки.
На каждом пункте сборки одновременно собирается только одно изделие. Сборка начинается только тогда, когда имеются все необходимыеn1 блоков различных типов. Время сборки Tc случайное.После сборки изделие поступает на один из n3 стендов выходного контроля.На одном стенде одновременно проверяется одно изделие. Время проверки Tпслучайное.
По результатам проверки бракуется q2 % изделий. Причиной бракаможет быть от одного до q3 блоков.Забракованное изделие направляется в цех сборки, где неработоспособныеблоки заменяются новыми. Время замены Tз одного блока случайное. После замены блоков изделие вновь поступает на один из стендов выходного контроля.Блоки, которые были заменены только один раз, вновь направляются на соответствующие посты входного контроля. Блоки, замененные более одного раза,в дальнейшем процессе сборки изделия не участвуют и удаляются.Прошедшие стенд выходного контроля изделия поступают в отдел военнойприемки. Время приемки Tпр одного изделия случайное. По результатам приемки бракуется q4 % изделий, которые направляются вновь на стенд выходногоконтроля.Принятые военной приемкой изделия направляются на склад.Исходные данныеn1 = 3;Exp(T1) = Exp(22);Rav(T3, Tо3) = Rav(27,n11 = 2; Exp(T11) = Exp(7);n13 = 2; Exp(T13) = Exp(10);n2 = 2; Nor(Tс, Tос) = Nor(18,q3 = 2; Exp(Tз) = Exp(12);Rav(T2, Tо2) = Rav(18, 4);5);n12 = 2;Rav(T12, Tо12) = Rav(9, 3);2);n3 = 2; Nor(Tп, Tоп) = Nor(12, 2);Nor(Tпр, Tопр) = Nor(15, 2).Величины брака q11, q12, q13 для n11, n12, n13 соответственно, q2 и q4исследователь устанавливает самостоятельно.
Результаты моделирования необходимо получить с точностью ε = 1 и доверительной вероятностью α = 0,99.Задание на исследованиеРазработать имитационную модель функционирования предприятия. Исследовать влияние интервалов выпуска блоков из цехов (T1, T2, T3, Т4) и их качества (q11, q12, q13, q14) на время выпуска принятых военной приемкой 100изделий.Сделать выводы о загруженности подразделений предприятия и необходимыхмерах по повышению эффективности его функционирования.52Программа модели; Вариант 9; Модель функционирования предприятия; Изделия, забракованные на стендах выходного контроля из-за нескольких типов блоков,; направляются на пункты сборки, где блоки заменяются.; После замены блоков изделие направляется на стенды выходного контроля,; блоки, прошедшие первичную замену, направляются на посты конроля цехов, а прошедшиевторичную замену - бракуются.; После военной приемки изделие вновь направляется на стенды выходного контроля.; Замена имен МКУ номерамиKontr1Kontr2Kontr3EQUEQUEQU123; Замена имен МКУ номерами; Замена имен МКУ номерами; Замена имен МКУ номерами; Заданиеq11_q12_q13_q2_q4_q3_TipBlVrModT1_T2_T02_T3_T03_T11_T12_T012_T13_Tc_T0c_Tp_T0p_Tz_Tpr_T0pr_N_исходных данныхEQU0.01; Доля забракованных блоков на постах n11EQU0.03; Доля забракованных блоков на постах n12EQU0.05; Доля забракованных блоков на постах n13EQU0.05; Доля забракованных изделий на пункте выходного контроляEQU0.05; Доля забракованных изделий военной приемкойEQU2; Мах количество блоков в изделии для замены после контроляEQU3; Мах количество типов блоков, изготавливаемых цехамиEQU2880; Время моделирования, 1 ед.
мод. вр. = 1 минEQU22; Средний интервал выпуска блоков типа 1EQU18; Средний интервал выпуска блоков типа 2EQU4; Стандартное отклонение времени выпуска блоков типа 2EQU27; Средний интервал выпуска блоков типа 3EQU5; Стандартное отклонение времени выпуска блоков типа 3EQU7; Среднее время контроля на постах n11EQU9; Среднее время контроля на постах n12EQU3; Стандартное отклонение времени контроля на постах n12EQU10; Среднее время контроля на постах n13EQU18; Среднее время сборки изделияEQU2; Стандартное отклонение времени сборки изделияEQU18; Среднее время проверки изделияEQU2; Стандартное отклонение времени проверки изделияEQU12; Время замены одного забракованного блокаEQU15; Среднее время приема изделияEQU2; Стандартное отклонение времени приема изделияEQU100; Количество изделий, которые должны быть приняты; ЗаданиеSborKontr1Kontr2Kontr3Kontsbколичества пунктов сборки и контроляSTORAGE2; КоличествоSTORAGE2; КоличествоSTORAGE2; КоличествоSTORAGE2; КоличествоSTORAGE2; Количествопунктов сборкипостов n11постов n12постов n13пунктов сборки;Сегмент имитации работы цеха 1 без постов контроляGENERATE (Exponential(32,0,T1_))ASSIGN1,1; Код 1 в параметре 1 транзакта - тип 1 блокаASSIGN2,(Exponential(23,0,T11_)) ; Розыгрыш времени контроля и запись в Р2ASSIGN9,q11_; Запись в Р9 доли брака блоков после постов контроляTRANSFER ,Met1; СегментимитацииGENERATEASSIGNASSIGNзапись в Р2ASSIGNработы цеха 2 без постов контроляT2_,T02_1,2; Код 2 в параметре 1 транзакта - тип 2 блока2,((T12_-T012_)+2#T012_#(RN27/1000)); Розыгрыш времени контроля и9,q12_; Запись в Р9 доли брака блоков после постов контроля53; СегментTRANSFER,Met1имитацииGENERATEASSIGNASSIGNASSIGNработы цеха 3 без постов контроляT3_,T03_1,3; Код 3 в параметре 1 транзакта - тип 3 блока2,(Exponential(22,0,T13_)) ; Розыгрыш времени контроля и запись в Р29,q13_; Запись в Р9 доли брака блоков после постов контроля; Сегмент имитации работы постов контроля блоковMet1QUEUEP1; Встать в очередь с номером в Р1ENTERP1; Занять МКУ с номером в Р1DEPARTP1; Покинуть очередь с номером в Р1ADVANCEP2; Имитация контроля с временем в Р2LEAVEP1; Освободить МКУ с номером в Р1ASSIGN10,0; Подготовка к циклуMet21ASSIGN10+,1; Начало цикла по числу типов блоковTEST EP10,P1,Met21; Какой тип блока подготовлен?TRANSFER P9,,Met14; Отправить брак блоков к Met14LINKP1,FIFO; Готовые блоки на склад с номером в Р1; Сегмент имитации сборки изделийGENERATE ,,,1Met3ASSIGN1,0; Подготовка к циклуMet13ASSIGN1+,1; Начало цикла по числу типов блоковTEST LP1,TipBl,Met4TEST NECH*1,0; Есть на складе готовые блоки?UNLINKP1,Term5,1; ДаTEST GP1,TipBl,Met13; Блоки всех типов есть? Если да, тоMet4UNLINKP1,Met5,1; отправить блоки на сборкуTRANSFER ,Met3; Вернуться для проверки наличия всех типов блоковдля следующего изделияMet5QUEUESborka; Занять очередь на пункты сборкиENTERSbor; Занять пункт сборкиDEPARTSborka; Освободить очередь на пункт сборкиADVANCE(Normal(15,Tc_,T0c_)); Имитация сборкиLEAVESbor; Освободить пункт сборки; Cегмент имитации работы стендов выходного контроляMet9QUEUEKontSbor; Занять очередь на стенд выходного контроляENTERKontsb; Занять стенд выходного контроляDEPARTKontSbor; Освободить очередь на стенд выходного контроляADVANCE(Normal(11,Tp_,T0p_)); Имитация работы стенда выходного контроляLEAVEKontsb; Освободить стенд выходного контроляTRANSFER q2_,,Met6; Направить в военную приемку, а брак-на замену; Сегмент имитации работы военной приемкиQUEUEOvpr; Занять очередь в военную приемкуSEIZEKonvpr; Занять военную приемкуDEPARTOvpr; Освободить очередь в военную приемкуADVANCE(Normal(11,Tpr_,T0pr_)) ; Имитация работы военной приемкиRELEASEKonvpr; Освободить военную приемкуTRANSFER q4_,,Met9; Готовые изделия-на склад; Сегмент организации завершения моделирования и расчета результатов моделированияTEST LX$Prog,TG1,Met10 ; Если X$Prog< содержимого счетчика завершений, тоSAVEVALUE Prog,TG1 ; записать в X$Prog содержимое счетчика завершенийSAVEVALUE NIzd,0Met10SAVEVALUE NIzd+,1; Счет количества принятых военной приемкой изделийTEST EX$NIzd,N_,Term5 ; Если принято N_ изделий, зафиксировать один прогонTEST ETG1,1,Met12; Если содержимое счетчика завершений равно 1, торасчет результатов моделированияASSIGN 1,0; Подготовка к циклуMet15ASSIGN 1+,1; Начало цикла по числу типов блоковSAVEVALUE (10+P1),(INT(CH*1/X$Prog)); Количество готовых блоков всех типов,оставшихся на складахSAVEVALUE P1,(INT(X*1/X$Prog)); Количество забракованных блоков всех типов54минMet12Met14ASSIGNTEST GESAVEVALUESAVEVALUE11,(20+P1); Задание номера Х и запись его в Р11P1,TipBl,Met15; Все ли типы блоков?TIzd,((AC1/X$Prog)/60) ; Время подготовки N_ изделий, часSTIzd,((X$TIzd/N_)#60) ; Среднее время подготовки одного изделия,SAVEVALUE NIzd,0; Обнуление X$NIzdTERMINATE 1SAVEVALUE P1+,1; Количество забракованных блоков всех типовTERMINATE; Сегмент имитации замены блоков на пунктах сборки;Определение количества блоков, подлежащих заменеMet6ASSIGN6,(RN713/1000); Обращение к RN и запись в P6ASSIGN3,0; Подготовка к циклуMet7ASSIGN3+,1; Начало цикла по количеству блоков, подлежащих заменеTEST LEP6,(P3#(1/q3_)),Met7; Если условие выполняется, тоASSIGN5,P3 ; занести в Р5 количество блоков, подлежащих замене; Определение типов блоков, подлежащих замене, и имитация их замены на пунктах сборкиASSIGN7,0 ; Подготовка к внешнему циклу по числу блоков, подлежащих заменеMet11ASSIGN7+,1 ; Начало внешнего цикла по числу блоков, подлежащих заменеASSIGN6,(RN73/1000); Обращение к RN и запись в P6ASSIGN3,0 ; Подготовка к внутреннему циклу по числу типов блоковMet8ASSIGN3+,1; Начало внутреннего цикла по числу типов блоковTEST LEP6,(P3#(1/TipBl)),Met8 ; Если условие выполняется, то тип блока определен и он в Р3ASSIGN4,0; Подготовка к циклу по числу типов блоковMet17ASSIGN4+,1; Начало цикла по числу типов блоковTEST EP3,P4,Met17; При выполнении условия тип блока определенTEST NECH*3,0; Есть ли готовые блоки этого типа? Если есть,ASSIGN6,(Exponential(47,0,Tz_)); Разыграть время замены блокаPRIORITY 1; Дать более высокий приоритетQUEUESborka; Встать в очередь на пунты сборкиENTERSbor; Занять пункт сборкиDEPARTSborka; Покинуть очередь на пункты сборкиADVANCEP6; Замена блокаLEAVESbor; Освободить пункт сборкиUNLINKP3,Met19,1; Замененный блокMet16TEST GEP7,P5,Met11 ; Если условие выполняется, то все типы блоков замененыTRANSFER ,Met9 ; Направить изделие после замены блоков на стенды выходногоконтроляMet19ASSIGN8+,1 ; Код 1 - признак того, что этот блок один раз был отправлен напосты контроля цехаTEST EP8,2,Met1 ; Если код 1, направить замененный блок на посты контроляцехаMet20ASSIGN10,(20+P1)SAVEVALUE P10+,1; Запись признака первой замены блокаTERMINATE ; Блоки с кодом 2, т.