How to copy level 1 inport and outport blocks to top most parent level

Question

Vandhana 2018-4-23

2
链接

此问题的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/396756-how-to-copy-level-1-inport-and-outport-blocks-to-top-most-parent-level

评论： Kiran Kannan 2020-4-24

I need to copy level 1 inport and outport blocks to top most parent level. How to copy in/outport blocks and connect to respective input and output ports.

Please suggest.

1 个评论
显示 -1更早的评论隐藏 -1更早的评论

Vandhana 2018-4-23

This Question is based on mscripting

请先登录，再进行评论。

请先登录，再回答此问题。

Answer 1

TAB 2018-4-27

1
链接

此回答的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/396756-how-to-copy-level-1-inport-and-outport-blocks-to-top-most-parent-level#answer_317436

在 MATLAB Online 中打开

You can use following function. It works for inport block. It routes the inport block from a subsystem to route level. You can easily modify the code to make it work for outport block.

function MEditRoutePortToRootLevel(argInportH)
% Local assignment
inPBlkH = argInportH;
% Collect root model name
rootMdlH = bdroot(inPBlkH);
rootMdlName = get_param(rootMdlH, 'Name');
% Collect original inport info
inPBlkPar = get_param(inPBlkH, 'Parent');
% Loop to copy the inport block to parent level untill model root is
% reached
isParRoot = strcmp(inPBlkPar, rootMdlName);
while(~isParRoot)
      % Collect inport block and its parent info
      inPIdx = get_param(inPBlkH, 'Port');
      inPBlkName = get_param(inPBlkH, 'Name');
      inPBlkPar = get_param(inPBlkH, 'Parent');
      inPBlkParH = get_param(inPBlkPar, 'handle');
      inPBlkPath = [inPBlkPar '/' inPBlkName];
      inPBlkParPar = get_param(inPBlkParH, 'Parent');
      % Collect the corresponding port position on parent subsystem
      parPortH = get_param(inPBlkParH, 'PortHandles');
      pos = get_param(parPortH.Inport(str2double(inPIdx)), 'Position');
      % Decide new block position 
      pX_OFFSET = 60;
      pW = 30;
      pH = 14;
      pX = pos(1)- pX_OFFSET;
      pY = pos(2)-(pH/2);
      % Decide src and dst blocks to copy
      srcBlk = inPBlkPath;
      dstBlk = [inPBlkParPar '/' inPBlkName];
      % Copy the inport block to subsystem parent level and add connection
      newBlkH = add_block(srcBlk, dstBlk, 'Position', [pX, pY, pX+pW, pY+pH]);
      add_line(inPBlkParPar, [inPBlkName '/1'], [inPBlkParSysName '/' inPIdx]);
      % Check if new block is at root level. If not then loop again
      inPBlkH = newBlkH;
      inPBlkPar = get_param(inPBlkH, 'Parent');   
      isParRoot = strcmp(inPBlkPar, rootMdlName);
  end