Changeset 174


Ignore:
Timestamp:
Oct 1, 2007 2:16:25 PM (15 years ago)
Author:
srkline
Message:

changed my mind - made the global fit report "auto-save". It picks up the save name from the history text - so if that changes, the file names will be quite unusual.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • sans/Analysis/branches/ajj_23APR07/IGOR_Package_Files/Put in User Procedures/SANS_Models_v3.00/Packages/GlobalFit/GlobalFit2_NCNR.ipf

    r173 r174  
    11071107//                      endif 
    11081108                         
    1109                         //SRK - generate a simple report 
    1110                          
    1111                         String topGraph= WinName(0,1) 
    1112                         Generate_GF_Report(topGraph,GF_resultStr) 
    1113                          
    1114                         //eSRK 
     1109 
    11151110                        SetDataFolder $saveDF    
    11161111                endfor 
    11171112        endif 
     1113         
     1114        //SRK - generate a simple report 
     1115                         
     1116        String topGraph= WinName(0,1) 
     1117        Generate_GF_Report(topGraph,GF_resultStr) 
     1118         
     1119        //eSRK 
    11181120         
    11191121        return 0 
     
    47674769        //save the notebook and the graphic file 
    47684770//      if(yesSave) 
     4771                String dataFileStr="",nameStr 
     4772                sscanf StringFromList(4,GF_ResultStr,"\r"),"Data Set:%s",dataFileStr            //reads the 5th line to find the data set name 
    47694773//              String nameStr=CleanupName(func,0) 
    47704774//              nameStr = nameStr[0,8]  //shorten the name 
    4771 //              nameStr += "_"+dataname 
    4772 //              //make sure the name is no more than 31 characters 
    4773 //              namestr = namestr[0,30]         //if shorter than 31, this will NOT pad to 31 characters 
    4774 //              Print "file saved as ",nameStr 
    4775 //              SaveNotebook /O/P=home/S=2 $nb as nameStr 
     4775                nameStr = "GF_"+dataFileStr 
     4776                //make sure the name is no more than 31 characters 
     4777                namestr = namestr[0,30]         //if shorter than 31, this will NOT pad to 31 characters 
     4778                Print "file saved as ",nameStr 
     4779                SaveNotebook /O/P=home/S=2 $nb as nameStr 
    47764780//              //save the graph separately as a PICT file, 2x screen 
    47774781//              pictStr += nameStr 
Note: See TracChangeset for help on using the changeset viewer.