Index: /issm/trunk/src/m/utils/Nightly/ArchiveName.m
===================================================================
--- /issm/trunk/src/m/utils/Nightly/ArchiveName.m	(revision 4022)
+++ /issm/trunk/src/m/utils/Nightly/ArchiveName.m	(revision 4022)
@@ -0,0 +1,30 @@
+function output=ArchiveName(sequence)
+
+%initialize string
+output='Archive';
+
+%loop over sequence
+for i=1:length(sequence),
+
+	%if string
+	if ischar(sequence{i}),
+		output=[output '_' sequence{i}];
+
+	%else, make it a string
+	else
+		%if first or second, it is an Enum to be converted and shortened
+		if (i<3),
+			string=EnumAsString(sequence{i});
+			string=string(1:end-8); %remove Analysis
+			output=[output '_' ];
+			for i=1:length(string),
+				%Keep only capital letters + 3 letters (no numbers! as Prognostic2)
+				if strcmp(string(i),upper(string(i)))
+					output=[output string(i:min(i+3,length(string)))];
+				end
+			end
+		else
+			output=[output '_' num2str(sequence{i})];
+		end
+	end
+end
Index: /issm/trunk/src/m/utils/Nightly/runme.m
===================================================================
--- /issm/trunk/src/m/utils/Nightly/runme.m	(revision 4021)
+++ /issm/trunk/src/m/utils/Nightly/runme.m	(revision 4022)
@@ -178,10 +178,5 @@
 
 		%get Archive name
-		archive_name='Archive';
-		for i=1:length(sequence),
-			if ischar(sequence{i}), archive_name=[archive_name '_' sequence{i}];
-			else archive_name=[archive_name '_' num2str(sequence{i})];
-			end
-		end
+		archive_name=ArchiveName(sequence);
 
 		%UPDATE ARCHIVE?