REQUISIS DXL-Bibliothek

Die größte DXL-Bibliothek im deutschsprachigen Raum

name:	SearchAllModulesAndBaselinesInFolder (Search using Filter)
Type:	Standalone
description:	This script searches all modules and their baselines within the current folders and prints out the result. - Using Filter for searching

Sourcecode:

//SearchAllModulesAndBaselinesInFolder (Search using Filter)
/********************************************************************************************************
   REQUISIS DXL-Bibliothek
   https://requisis.com/de/dxl-bibliothek.html

Die größte DXL-Bibliothek im deutschsprachigen Raum.

*********************************************************************************************************
  (c) 2009-2017 REQUISIS GmbH
      Walter-Benjamin-Platz 8
      D-10629 Berlin

https://requisis.com

*********************************************************************************************************
Beschreibung:
Dieses Script durchsucht alle Module und deren Baselines im aktuellen Ordner und Unterordnern nach einem Suchbegriff und gibt die Treffer aus.
- Verwendet einen Filter zum Suchen

description:
This script searches all modules and their baselines within the current folders and prints out the result.
- Using Filter for searching

*********************************************************************************************************
Nutzungsrechte:

Dieses Script darf frei für die tägliche Arbeit mit Doors verwendet werden. 
Es darf beliebig in eigene Scripte integriert werden, sofern diese 
nur für den Eigengebrauch bestimmt sind.
! Die Integration in andere Produkte oder Scripte, die nicht ausschließlich für den Eigengebrauch 
! bestimmt sind, erfordert die schriftliche Zustimmung der REQUISIS GmbH.
! Die Verbreitung und Veröffentlichung dieses Scripts ist nur der REQUISIS GmbH vorbehalten.

This script may be used for daily work with IBM Rational Doors. It is allowed to include this script
into own scripts if they are only intended to be used for own purposes.
! The integration into other products or scripts, which are not soley used for own purposes 
! is not permitted.
*********************************************************************************************************
*/
   
// ** Suche und Darstellung des Suchergebnisses für ein Modul **

// ** CONFIG ** //

string searchstring="needle"

// ** FUNCTIONS ** //

string suchErgebnis(string search, Module m) {
		
		Object o
		string ret=""
		Buffer buf=create
		string ostring=""
		int absno=0
		Baseline b=baselineInfo(m)
		string versioninfo="current"
		if (!null b) versioninfo=(major b) "." (minor b)(suffix b)
		
		// Filter setzen, um die Suche zu beschleunigen
		Filter finder=contents(search,false) // case-insensitive
		set finder
		filtering on
		
		for o in all m do {
			
			AttrDef ad
			absno=o."Absolute Number"
			for ad in m do {
				// für alle Attribute attr
				
				if (ad.object) {					
					//ostring=o.(ad.name)
					//buf=lower ostring
					 
					//if (contains(buf,lower search,0)!=-1) 
					ret=ret fullName(m) "\t" "Version" versioninfo "\t" "Object " absno ":\n" ad.name ":\n" ostring "\n"
				}
			}
		}
		
		return ret
	}

// ** Rekursives Vorgehen über alle Module im Ordner und Unterordner **

void rekursiv(Folder f) {
	    Item i
		Module m
		for i in f do {
		  // für alle Unterordner/Unterprojekte
		  if (type(i)=="Folder") { rekursiv(folder(i))}
		
		  if (type(i)=="Project") { rekursiv(folder(i))}
		  // für alle Module im Ordner/Projekt
		  if (type(i)=="Formal") {
		    Module m=read(fullName(i),false)
			// für alle Baselines des Moduls
				/*
				for b in m do { 
					Module mb=load(m,b,true)
					print suchErgebnis(searchstring,mb)
				}
				*/
				
			// für den current Stand
			print suchErgebnis(searchstring,m)
			//close(m)
			break
		 
		  } 
		}
	}
	
	
// ** Main Program ** //

rekursiv(current Folder)

Dieses Script darf frei für die tägliche Arbeit mit Doors verwendet werden.
Es darf beliebig in eigene Scripte integriert werden, sofern diese nur für den Eigengebrauch bestimmt sind.

Die Integration in andere Produkte oder Scripte, die nicht ausschließlich für den Eigengebrauch bestimmt sind, erfordern die schriftliche Zustimmung der REQUISIS GmbH.
Die Verbreitung und Veröffentlichung dieses Scripts ist nur der REQUISIS GmbH vorbehalten. Die REQUISIS GmbH übernimmt für die zur Verfügung gestellten Scripte keinerlei Verantwortung.
Jegliche Haftung ist ausgeschlossen.

DXL - Library