function clbBtnMatrixFilename

global BatchResults
global BatchResultsFile

[filename, pathname, filterindex] = uigetfile( ...
       {'*.txt','txt-files (*.txt)';...
        '*.*','All files'}, ...
        'Select a result file', BatchResultsFile);

if ~filterindex
    return
end    
    
if isstr(pathname) && isstr(filename)
   BatchResultsFile = [pathname filename]; 
   h=findobj('Tag','txtMatrixFileName');
   set(h,'String',BatchResultsFile);
   BatchResults = load(BatchResultsFile);
end   