全球FlexSim系统仿真中文论坛

标题: 根据类型设置优先处理-FMAT样题第一题 [打印本页]
作者: zorsite    时间: 2015-8-17 20:46
标题: 根据类型设置优先处理-FMAT样题第一题
本帖最后由 zorsite 于 2015-8-17 20:49 编辑

在模型1中实现这样的逻辑：发生器可以产生多种不同类型的产品（具体类型数量可自行决定），不同的产品加工优先级根据其类型号而各不相同，本题中要求其类型号越小则加工优先级越高，即多个产品等待加工的时候，优先加工产品类型号最小的产品。


此题是FlexSim建模水平认证考评大纲(2015版)
中的第一个建模题。刚好最近也做了一个返工优先处理的模型，见http://flexsim.asia/viewthread.php?tid=5045&page=1&fromuid=610#pid17589。
于是照着同样的思路把这一题也做了一下，欢迎大家批评指正。

假设发生器产生duniform(1,3)类型的临时实体，需要设置类型为1的临时实体进入暂存区后要排在最前列。假设已经有一个类型1的临时实体，则新进入的排在第二。如果此时再进入类型2的临时实体，则排在第三。


仍然是通过在暂存区设置标签来实现。
暂存区的创建触发中添加一下代码：

  2. int value = getitemtype(item);
  3. switch (value)
  4. {
  5. case 1:  
  6. {
  7.   inc(label(current,"type1"),1);
  8.   setrank(item,getlabelnum(current,"type1"));
  9.   break;
  10. }
  11. case 2:
  12. {
  13.   inc(label(current,"type2"),1);
  14.   setrank(item,getlabelnum(current,"type1")+getlabelnum(current,"type2"));
  15.   break;
  16. }
  17. }
复制代码
离开触发中添加一下代码：

  2. int value = getitemtype(item);
  3. switch (value)
  4. {
  5. case 1:  inc(label(current,"type1"),-1);break;
  6. case 2:  inc(label(current,"type2"),-1);break;
  7. }

复制代码
具体操作见图。
[attach]2736[/attach]
[attach]2739[/attach]
[attach]2738[/attach]
[attach]2737[/attach]
[attach]2740[/attach]
[attach]2741[/attach]

[attach]2742[/attach]

作者: 慧娴亚伦    时间: 2015-8-18 08:34
感谢分享！加老师的思路是推式的，在暂存区里面根据要求来排布，对建模逻辑的培养非常有帮助！
作者: FFFrenk    时间: 2015-8-19 20:16
本帖最后由 FFFrenk 于 2015-8-24 11:37 编辑

感谢分享~


我也试着做了这个模型，本着分享才有进步的思想，也拿出自己的模型与大家分享，欢迎指正。

看到题目，我第一反应是，可以用拉入策略，很快能够完成。在处理器上的拉入策略中选择“pull best item”，就直接有下拉框可以选择拉入上游中itemtype值为最小的临时实体。其实题目比较简单，考验的是建模者对FlexSim自带逻辑的理解。

然后看了楼主的模型，使用了推式，能够实现效果。

不过，个人觉得，此方法有局限性：
1.目前只针对三种类型，如果更多类型的实体，代码会更加复杂，缺乏通用性。
2.实现上述逻辑的方法，其实还能够再简化。

我就贴出我自己的模型（根据类型设置优先处理推式v7.3），只在上游的on entry中写如下代码：
  1. treenode item = parnode(1);
  2. treenode current = ownerobject(c);
  3. int port = parval(2);

  5. for (int index=1;index<=content(current)-1;index++)
  6. {
  7.         if (getitemtype(item)<getitemtype(rank(current,index)))
  8.         {
  9.                 setrank(item,index);
  10.                 break;
  11.         }
  12. }
复制代码
可能会比较简单，欢迎指正，互相交流学习~~~
作者: missman    时间: 2015-9-10 14:58
本帖最后由 missman 于 2015-9-12 08:29 编辑

我采用了另一种方式——【拉入方式】实现效果，请参考。
[attach]2780[/attach]
代码位置在处理器的拉入条件中。
  1. treenode current = ownerobject(c);
  2. treenode item = parnode(1);
  3. int port =  parval(2);
  4. /***popup:SpecificType*/
  5. /**Specific Itemtype*/

  7. int type = 99999;
  8. treenode inobj=inobject(current,1);
  9. int contents=content(inobj);
  10. for(int index=1;index<=contents;index++)
  11. {
  12.         treenode part=rank(inobj,index);
  13.         int type_part=getitemtype(part);
  14.         if(type_part<=type)    //也可以直接用：type=min(type,type_part);
  15.                 type=type_part;
  16. }
  17. return getitemtype(item) == type;
复制代码
作者: jkqwe111    时间: 2015-10-5 17:03
作者: zorsite    时间: 2015-10-6 07:03
本帖最后由 zorsite 于 2015-10-6 07:14 编辑
FFFrenk 发表于 2015-8-19 20:16
可能会比较简单，欢迎指正，互相交流学习~~~
  1. for (int index=1;index<=content(current)-1;index++)
  2.     {      
  3.         if (getitemtype(item)<getitemtype(rank(current,index)))
  4.             {
  5.                 setrank(item,index);
  6.                 break;      
  7.             }
  8.     }
复制代码

FFFrenk的代码让我大开眼界。这段代码不是“可能会比较简单”，在我看来，简直就是简单到不能再简单了，一下子就抓住了本质。




missman 发表于 2015-9-10 14:58
我采用了另一种方式——【拉入方式】实现效果，请参考。代码位置在处理器的拉入条件中。
  1. int type = 99999;
  2. treenode inobj=inobject(current,1);
  3. int contents=content(inobj);
  4. for(int index=1;index<=contents;index++)
  5. {　　　　treenode part=rank(inobj,index);
  6. 　　　　int type_part=getitemtype(part);
  7. 　　　　if(type_part<=type)　　//也可以直接用：type=min(type,type_part);
  8. 　　　　　type=type_part;
  9. }
  10. return getitemtype(item) == type;
复制代码



missman的拉式策略也让我受益匪浅，看过他的代码再去学习拉入策略中的“pull best item”，有事半功倍之效。
请教missman：for循环找到了最小itemtype之后，是如何拉入第一个最小itemtype临时实体的？当代码运行到return getitemtype(item) == type;语句时，getitemtype(item) 中的item，指向哪一个临时实体？
作者: 657776724    时间: 2015-10-21 15:25
6# zorsite


说一下我的认识：
拉入策略会对上游的临时实体从第一个临时实体开始评估，如果第一个评估没有通过，就会自动转到第二个。在对每一个临时实体进行评估之前，该段代码就会搜索出上游中最小的临时实体类型，并将与正在评估的这个临时实体进行对比，如果评估通过，则拉入这个临时实体。否则，继续下一个item。



欢迎光临 全球FlexSim系统仿真中文论坛 (http://www.flexsimasia.com/) Powered by Discuz! X3.3