Changeset 480 for sans/Dev/trunk/NCNR_User_Procedures/Common/Packages/Invariant/Invariant_v40.ipf

Timestamp:

Mar 6, 2009 5:11:44 PM (14 years ago)

Author:

srkline

Message:

minor bug fixes:
Schematic.ipf: fixed duplicate error, was incorrect folder path
Invariant.ipf: "Can't find dQv" error, now looks in proper data folder

File:

• sans/Dev/trunk/NCNR_User_Procedures/Common/Packages/Invariant/Invariant_v40.ipf (modified) (3 diffs)

sans/Dev/trunk/NCNR_User_Procedures/Common/Packages/Invariant/Invariant_v40.ipf

@@ -277 +277 @@
         PopupMenu ywave,pos={10,60},size={231,20},proc=Inv_FilePopMenuProc,title="Data File"
         PopupMenu ywave,help={"Select the experimental intensity values"}
-        PopupMenu ywave,mode=1,popvalue="DDAB_EMATF_1p_25C.absb",value= #"root:Packages:NIST:invariant:gDataPopList"
+        PopupMenu ywave,mode=1,value= #"root:Packages:NIST:invariant:gDataPopList"
         Button loadButton,pos={10,90},size={130,20},proc=Inv_Load_Proc,title="Load and Plot File"
         Button loadButton,help={"After choosing a file, load it into memory and plot it with this button."}
@@ -653 +653 @@
 
         NVAR isSlitSmeared=root:Packages:NIST:invariant:gIsSlitSmeared
-        SVAR fileStr=root:Packages:NIST:gLastFileName
+//      SVAR fileStr=root:Packages:NIST:gLastFileName
         
         //reset the global to the checkbox state
@@ -659 +659 @@
         
         if(checked)             //get the smearing info
-                String cleanLastFileName = "root:"+CleanupName(fileStr,0)
+                ControlInfo/W=Invariant_Panel ywave
+                String folderStr=CleanupName(S_value,0)
                 NVAR dQv=root:Packages:NIST:invariant:gDqv
-                String tempName = cleanLastFileName+"sq"
-                Wave/Z w=$tempName
-                if(WaveExists(w) && w[0] < 0)
-                        dQv = - w[0]
-                        Print "Data is slit-smeared, dqv = ",w[0]
+                NVAR/Z loaded_dQv = $("root:"+folderStr+":USANS_dQv")
+                if(NVAR_Exists(loaded_dQv))
+                        dQv = loaded_dQv
+                        Print "Data is slit-smeared, dqv = ",dQv
                 else
                         DoAlert 0,"Can't find the slit height from the data. Enter the value manually if the data is truly slit-smeared, or uncheck the box."