// fullName = Name von Pfad und Datei des aktiven Dokuments 
var myDocFullName = app.activeDocument.fullName; 
 
// Ordnername = Dateiname ohne '.indd' 
var myFolderName = String(myDocFullName).replace(/\.indd/,''); 
 
// Ordnerobjekt initialisieren 
var f  = new Folder (myFolderName);  
 
// Ordner anlegen 
f.create(); 

//  Backup_Verpacken 
// 
//  Teil 1: Öffnen 
// 
fileType = "*.indd";  
var topFolder = Folder.selectDialog ("Wähle einen Ordner aus");  
inputFileType = prompt("input file type like '*.indd'", fileType);  
if(inputFileType != null) { fileType = inputFileType; }  
 
scanSubFolders(topFolder);  
 
function scanSubFolders(tFolder)  
{  
var sFolders = new Array();  
var allFiles = new Array();  
 
sFolders[0] = tFolder;  
for (var j = 0; j < sFolders.length; j++) // loop through folders  
{  
var procFiles = sFolders[j].getFiles();  
for (var k=0;k<procFiles.length;k++) // loop through this folder contents  
{  
 
if (procFiles[k] instanceof File) allFiles.push(procFiles[k]);  
else if (procFiles[k] instanceof Folder) sFolders.push(procFiles[k]);  
var letzt = procFiles[k];  
var myArray = letzt.name.split(".");  
var myLast = myArray.pop();  
if (myLast == "indd") {app.open(letzt)};  
}  
}  
}  
//  Teil 2:  Verpacken 
 
do{ 
	if(app.documents.length !=0){ 
//  Name der aktiven Datei 
var myDocFullName = app.activeDocument.fullName; 
//  Ordnername 
var myFolderName = String(myDocFullName).replace(/\.indd/,' '); 
//  Ordner erstellen 
var f = new Folder (myFolderName); 
f.create(); 
//  Verpacken	 
app.activeDocument.packageForPrint (f , true, true, true, true, true, true, true); 
} 
app.activeDocument.close(SaveOptions.NO); 
} 
while(app.documents.length !=0); 

function InDesignFileFilterFunction( file ) 
{ 
	return file instanceof Folder // Nichts zurückgeben, wenn ein Verzeichnis erwischt wurde 
	||  
	(  
		!(file.hidden) //Etwas zurückgeben, wenn die Datei NICHT unsichtbar ist 
		&&  
		( 
			file.name.match(/\.indd$/i) // UND am Ende des Dateinamens ".indd" heißt 
			|| file.type == "INDD " // ODER vom Dateitype "INDD" ist, also keine Endung hat 
		)  
	); 
};