REQUISIS DXL-Library

The biggest DXL Library in Europe

name:	CreateBaselineOnAllModulesInCurrentFolder
Type:	Standalone
description:	This script creates on all modules in current folder (selectable with subfolders) the same baseline (=same suffix).

Sourcecode:

//CreateBaselineOnAllModulesInCurrentFolder
/********************************************************************************************************
   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 erstellt auf allen Modulen im aktuellen Ordner (wahlweise mit Unterordnern) die selbe Baseline (=gleicher Suffix).

description:
This script creates on all modules in current folder (selectable with subfolders) the same baseline (=same suffix).

*********************************************************************************************************
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.
*********************************************************************************************************
*/
   
// Für alle Module im Ordner eine Baseline erstellen

// Globale Variablen
Folder f= current() 
DBE withSubfolders, kommentarbox

bool createBaselineForAllSubmodules(Folder f) {
print "" name(f)
Item i

for i in f do {
  if (get withSubfolders>0) {
  // Wenn ausgewählt, auch in Unterordner gehen
  if (type(i)=="Folder") { createBaselineForAllSubmodules(folder(i))}
  }
  if (type(i)=="Formal") {
  // Hier die Baseline erstellen
  create(edit(fullName(i)), nextMinor("2009-07-07"),get kommentarbox)
  print "" "" fullName(i) "\n"
  }
}

return true;
}

// GUI
void startDoing(DBE element) {
createBaselineForAllSubmodules(f)
}

DB parseBox = create("Baseline für alle Module im Ordner erstellen", styleCentered|styleFixed)

field(parseBox,"Ordner",fullName(f),100,true)
string choices[]={"mit Unterverzeichnissen"}
withSubfolders=checkBox(parseBox,"",choices,0)
label(parseBox, "Bitte geben Sie die Beschreibung ein, die für die Baseline verwendet werden soll:") 
kommentarbox=field(parseBox,"Kommentar","Verzeichnisweite Baseline:",100)
button(parseBox,"Start",startDoing)
show parseBox

// END GUI

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