Changeset 750 for sans/Dev/trunk/NCNR_User_Procedures/Reduction/SANS/ProtocolAsPanel.ipf

Timestamp:

Oct 4, 2010 10:15:08 AM (12 years ago)

Author:

srkline

Message:

Some utility procedures were moved from NSORT to NCNR_Utilities. These changes were previously propogated to ANSTO_Utils, and now are propagated to HFIR and ILL_Util files.

File:

• sans/Dev/trunk/NCNR_User_Procedures/Reduction/SANS/ProtocolAsPanel.ipf (modified) (1 diff)

sans/Dev/trunk/NCNR_User_Procedures/Reduction/SANS/ProtocolAsPanel.ipf

@@ -1880 +1880 @@
                         newFileName = ReplaceString(".nx.hdf", tempFilename, "")
 #elif (exists("HFIR")==6)
-                        newFileName = ReplaceString(".xml",textPath[0],"")              //removes 4 chars
-                        newFileName = ReplaceString("SANS",newFileName,"")              //removes 4 more chars = 8
-                        newFileName = ReplaceString("exp",newFileName,"")                       //removes 3 more chars = 11
-                        newFileName = ReplaceString("scan",newFileName,"")              //removes 4 more chars = 15, should be enough?
+//                      newFileName = ReplaceString(".xml",textPath[0],"")              //removes 4 chars
+//                      newFileName = ReplaceString("SANS",newFileName,"")              //removes 4 more chars = 8
+//                      newFileName = ReplaceString("exp",newFileName,"")                       //removes 3 more chars = 11
+//                      newFileName = ReplaceString("scan",newFileName,"")              //removes 4 more chars = 15, should be enough?
+                        newFileName = GetPrefixStrFromFile(textPath[0])+GetRunNumStrFromFile(textPath[0])
 #else
                         newFileName = UpperStr(GetNameFromHeader(textPath[0]))          //NCNR data drops here, trims to 8 chars