void compareStrings(string string1, string string2)
{
	Buffer string1Buff = create;
	Buffer string2Buff = create;
	Buffer result = create;
	
	string1Buff+=string1;
	string2Buff+=string2;
	
	diff(result, string1Buff, string2Buff);
	
	displayRichWithColor(stringOf(result));
	
	delete string1Buff;
	delete string2Buff;
	delete result;	
}

string linkModuleString="/Product Lifecycle Management/10 Administration/Accords";

Link lnk;
LinkRef lnkRef;
ModName_ otherMod = null;
Item linkModItem = itemFromID(uniqueID(item(linkModuleString)));
linkModName = fullName(linkModItem);
     
for lnkRef in all(obj<-linkModName) do
{
  otherMod = module (sourceVersion lnkRef);
  if (!null otherMod) 
  {
    if ((!isDeleted otherMod) && (null data(sourceVersion lnkRef))) 
    {
      load((sourceVersion lnkRef),false);
    }
  }
}
     
for lnk in all(obj<-linkModName) do
{
  Object src = source lnk;
  if ( isDeleted(src) || null(src) ) continue;
     
	display src."Object Text" "";
}

// Stores the current opened module in m
Module m = current;

// Auf EDIT umschalten
if(!isEdit(m))
{
     m= edit(fullName(m),true);
}

// Get the current selected module
Module m = current;

// Create first object of module
Object firstObjectInModule = create(m);

// Create child object of firstObj
Object childObjOfFirst = create below(firstObj);

// Create last Object (this will generate an error
// if the object has no children present
Object lastChildObjOfFirst = create last(firstObj);

// Creates a new object on the same level as firstObj
Object newObjectOnSameLevel = create after(firstObj);

// Select the current Module
Module m = current; 

// Get first Object of Module
Object firstObject = first(m);

// Get last Object of Module
Object lastObject = last(m);

// Get current selected module (highlighted row in Module)
Object currObj = current

// Get first Child of the Object (which is below currObj - 
// i.e. whenn currObj is a Headline)
Object firstChild = first(currObj);

// Get last child of the objects below currObj
Object lastChild = last(currObj);

// Get the parent of currObj
Object parentObject = parent(currObj);

Object currObj = current;

// Select the previous object independent from the object hierarchy
Object previousObj = previous(lastChild);

// Select the next object independent from the object hierarchy
Object nextObj = next(lastChild);

Object currObj = current;

// Selection of the first sibling in the same hiararchy and hierarchy level
Object firstSibling = first sibling (currObj);

// Selection of the last sibling in the same hiararchy and hierarchy level
Object firstSibling = first sibling (currObj);