Changeset 683 for sans/Dev/trunk/NCNR_User_Procedures/Reduction/SANS/FACILITY_Utils.ipf

Timestamp:

Apr 12, 2010 11:03:04 AM (13 years ago)

Author:

srkline

Message:

Updated version of HFIR_DataReadWrite.ipf from Jae Hie.

Updated the initialization of the templates from other facilities to remove the NCNR_Package_Loader.ipf since they are by definition incompatible.

Forward/Back? incrementing of the run number (as for the 2D display) has been moved to the Facility_Utils.ipf for all facilities and for the template.

File:

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

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

@@ -703 +703 @@
         return("Function Empty")
 End
+
+
+// Return the filename that represents the previous or next file.
+// Input is current filename and increment. 
+// Increment should be -1 or 1
+// -1 => previous file
+// 1 => next file
+Function/S GetPrevNextRawFile(curfilename, prevnext)
+        String curfilename
+        Variable prevnext
+
+        String filename
+        
+        //get the run number
+        Variable num = GetRunNumFromFile(curfilename)
+                
+        //find the next specified file by number
+        fileName = FindFileFromRunNumber(num+prevnext)
+
+        if(cmpstr(fileName,"")==0)
+                //null return, do nothing
+                fileName = FindFileFromRunNumber(num)
+        Endif
+
+//      print "in FU "+filename
+
+        Return filename
+End