{"id":1579,"date":"2016-01-12T13:16:11","date_gmt":"2016-01-12T12:16:11","guid":{"rendered":"http:\/\/www.capri-soft.de\/blog\/?p=1579"},"modified":"2018-07-04T08:27:53","modified_gmt":"2018-07-04T06:27:53","slug":"ibm-doors-dxl-usefull-iterations","status":"publish","type":"post","link":"https:\/\/www.capri-soft.de\/blog\/?p=1579","title":{"rendered":"IBM Doors DXL: Useful incoming\/outgoing Link-Loops and -iterations (inlinks \/ in-link \/ out-link \/ outlinks) and other Iterations through Doors collections"},"content":{"rendered":"

Loop all views in module<\/h1>\n
\r\nModule m=current;\r\nstring myView;\r\n\r\nfor myView in views m do \r\n{\r\n   print myView "\\n";\r\n}\r\n<\/pre>\n
Example: Get all Filter Strings from all views in current Module<\/p>\n
\r\nModule m=current;\r\nstring myView;\r\n\r\nfor myView in views m do \r\n{\r\n   print myView "\\t";\r\n   View v=view(myView);\r\n   load(m,v);\r\n   Filter f=current;\r\n\r\n   if(null f)\r\n   {\r\n\tprint "no filter\\n"\r\n   }\r\n   else\r\n   {\r\n      string filterString=stringOf(m,f);\r\n      print filterString "\\n";\r\n   }\r\n}\r\n<\/pre>\n
Loop all attributes on module<\/h1>\n
\r\nModule m=current;\r\nstring attribute;\r\nfor attribute in m do {\r\n\tprint attribute "\\n";\r\n}\r\n<\/pre>\n
Loop through all In-Links (with Baselines) of an Object<\/h1>\n
\r\nObject obj=current;\r\n\r\nLink lnk;\r\nLinkRef lnkRef;\r\nModName_ otherMod = null;\r\nstring linkModuleString;\r\n\r\n\/\/ I.e. for different Projects with different\r\n\/\/ Link-Module Locations\r\nstring projName = name(current Project);\t\r\nif(projName=="VarCo")\r\n{\r\n  \/\/ Links zu Change Request\r\n  linkModuleString = "\/VarCo\/20 Sample Project\/22 Links\/Changes"; \r\n}\r\nelse\r\n{\r\n  \/\/ Links zu Change Request\r\n  linkModuleString = "\/Project\/90 Administration\/Changes"; \r\n}\r\n\t\r\nint lnkCount=0;\r\n\t\r\nItem linkModItem = itemFromID(uniqueID(item(linkModuleString)));\r\nlinkModName = fullName(linkModItem);\r\n\t\r\nfor lnkRef in all(obj<-linkModName) do \r\n{\r\n  otherMod = module (sourceVersion lnkRef);\r\n  if (!null otherMod) \r\n  {\r\n    if ((!isDeleted otherMod) && (null data(sourceVersion lnkRef))) \r\n    {\r\n      load((sourceVersion lnkRef),false);\r\n    }\r\n  }\r\n}\r\n\t\r\nfor lnk in all(obj<-linkModName) do \r\n{\r\n  \/\/ Get In-Link Object\r\n  Object src = source lnk;\r\n  if ( isDeleted(src) || null(src) ) continue;\r\n\t\r\n  identifierCC =  identifier(src) "";\r\n  lnkCount++;\r\n}\r\n<\/pre>\n
Loop through out-links of an object<\/h1>\n
\r\n\r\nObject obj=current;\r\n\r\nLink lnk;\r\n\r\nfor lnk in obj->"*" do\r\n{\r\n  string tmn=fullName target(lnk);\r\n\r\n  if(!open module tmn)\r\n  {\r\n    read(tmn,false);\r\n  }\r\n\r\n  Object tgt = target(lnk);\r\n  print identifier(tgt) "\\n";\r\n}\r\n\r\n<\/pre>\n
Loop through all (with baselines) out-links of an object<\/h1>\n
First Approach<\/h2>\n
\r\nModule baselineModul=current;                                         \r\n\r\nstring satisfiesModuleString = "\/NDS\/90 Administration\/Satisfies";\r\nint object_count=0;\r\nint link_count=0;\r\n\r\nObject blObject;    \r\nfor blObject in baselineModul do \r\n{\r\n\t\/\/ Laufe durch die gebaselinten Outlinks\r\n\tLink lnk;\r\n\tfor lnk in all(blObject->satisfiesModuleString) do\r\n\t{\r\n\t\tModuleVersion mvTarget=targetVersion(lnk);\r\n\t\tif(null data(mvTarget)) \r\n\t\t{\r\n\t\t\tload(mvTarget,false);\t\t\t\r\n\t\t}\r\n\t\t\r\n\t\tObject tgt=target(lnk);\r\n\t\tlink_count++;\r\n    }\r\n\t \r\n\t object_count++;\r\n}\r\n\r\nprint "Link Count: " link_count "\\nObject Count: "  object_count "";\r\n<\/pre>\n
Second Approach<\/h2>\n
\r\nModule baselineModul=current;\r\n\r\nModName_ otherMod=null;                                                \r\n\r\nstring satisfiesModuleString = "\/NDS\/90 Administration\/Satisfies";\r\nint object_count=0;\r\nint link_count=0;\r\n\r\nObject blObject;    \r\nfor blObject in baselineModul do \r\n{\r\n    \t\r\n\t\/\/ Laufe durch die gebaselinten Outlinks\r\n\tLink lnk;\r\n\tfor lnk in all(blObject->satisfiesModuleString) do\r\n\t{\r\n\t  \tstring tmn=fullName target(lnk);\r\n\t  \r\n\t  \totherMod = module (targetVersion lnk);\r\n\t  \tif (!null otherMod) \r\n\t  \t{\r\n\t   \t\tif ((!isDeleted otherMod) &amp;&amp; (null data(targetVersion lnk))) \r\n\t\t\t{\r\n\t\t\t\r\n\t\t\t\tload((targetVersion lnk),false);\r\n\t\t\t}\r\n\t  \t}\t\t\t  \r\n\t\r\n\t  \tObject tgt = target(lnk);\r\n\t  \t\r\n\t  \tif(null tgt)\r\n\t  \t{\r\n\t\t  \tprint "Is null das Teil!\\n";\r\n\t  \t}\r\n\t  \telse\r\n\t  \t{\r\n\t\t  \tBaseline blI= baselineInfo(module tgt);\r\n\t\t  \tprint major(blI) " " minor (blI) "\\n";\r\n\t  \t}\r\n\t  \t\r\n  \t\tlink_count++;\r\n\t }\r\n\t \r\n\t object_count++;\r\n}\r\n\r\nprint "Link Count: " link_count "\\nObject Count: "  object_count "";\r\n<\/pre>\n
Loop through all (with baselines) out-links without opening the target module<\/h1>\n
\r\nObject obj=current;\r\n\r\nLink lnk;\r\nfor lnk in all(obj->"*") do\r\n{\r\n\tModuleVersion mvTarget=targetVersion(lnk);\r\n\tBaseline b = baseline(mvTarget);\r\n\tif(!null b)\r\n      {\r\n\t\t\/\/ Wenn der Link nicht auf Current geht\r\n\t\tprint major(b) "." minor(b) "\\n";\r\n      }\r\n\tprint fullName(mvTarget) " " targetAbsNo(lnk) "\\n";\r\n}\r\n<\/pre>\n