Changeset 947 for sans/Dev/trunk/NCNR_User_Procedures/Reduction/SANS/ILL_Utils.ipf

Timestamp:

Oct 16, 2014 10:59:26 AM (8 years ago)

Author:

srkline

Message:

Changes to VCALC files, moving detector information into sub-folders in anticipation of the possible folder structure that I will use for the actual data reduction. But purely speculative at this point.

Fixing some typos in other procedures.

File:

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

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

@@ -1052 +1052 @@
 End
 
+Function/S GetASCDataFileList()
+        
+        //make sure that path exists
+        PathInfo catPathName
+        if (V_flag == 0)
+                Abort "Folder path does not exist - use Pick Path button on Main Panel"
+        Endif
+        
+        String list=IndexedFile(catPathName,-1,"????")
+        String newList="",item=""
+        Variable num=ItemsInList(list,";"),ii
+        for(ii=0;ii<num;ii+=1)
+                item = StringFromList(ii, list  ,";")
+                if(stringmatch(item,"*.ASC") )
+                        newlist += item + ";"
+                endif
+        endfor
+        
+        newList = SortList(newList,";",0)
+        return(newList)
+End
+
+
+
 //**********************
 // 2D resolution function calculation - in terms of X and Y