Changeset 1069 for trunk/src/series.m


Ignore:
Timestamp:
Jul 10, 2019, 12:17:42 PM (20 months ago)
Author:
sommeria
Message:

browse_data updated

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/src/series.m

    r1068 r1069  
    16131613    for iexp=1:numel(ListExp)
    16141614        if ~isempty(regexp(ListExp{iexp},'^\+/'))% if it is a folder
    1615             for idevice=1:numel(ListDevices)
    1616                 if ~isempty(regexp(ListDevices{idevice},'^\+/'))% if it is a folder
    1617                     for isubdir=1:numel(ListDataSeries)
    1618                         if ~isempty(regexp(ListDataSeries{isubdir},'^\+/'))% if it is a folder
    1619                             lpath= fullfile(SourceDir,regexprep(ListExp{iexp},'^\+/',''),...
    1620                                 regexprep(ListDevices{idevice},'^\+/',''));
    1621                             ldir= regexprep(ListDataSeries{isubdir},'^\+/','');
    1622                             if exist(fullfile(lpath,ldir),'dir')
    1623                                 NbExp=NbExp+1;
    1624                                 ListPath{NbExp}=lpath;
    1625                                 ListSubdir{NbExp}=ldir;
    1626                                 ExpIndex{NbExp}=iexp;
     1615            if strcmp(get(BrowseData.DataSeries,'enable'),'off');%case of a multiple input line for series
     1616                NbExp=NbExp+1;
     1617                ExpIndex{NbExp}=iexp;
     1618                for idevice=1:numel(ListDevices)
     1619                    lpath= fullfile(SourceDir,regexprep(ListExp{iexp},'^\+/',''),...
     1620                        regexprep(ListDevices{idevice},'^\+/',''));
     1621                    ldir=regexprep(ListDataSeries{idevice},'^\+/','');
     1622                    ListPath{idevice,NbExp}=lpath;
     1623                    ListSubdir{idevice,NbExp}=ldir;
     1624                end
     1625            else
     1626                for idevice=1:numel(ListDevices)
     1627                    if ~isempty(regexp(ListDevices{idevice},'^\+/'))% if it is a folder
     1628                        for isubdir=1:numel(ListDataSeries)
     1629                            if ~isempty(regexp(ListDataSeries{isubdir},'^\+/'))% if it is a folder
     1630                                lpath= fullfile(SourceDir,regexprep(ListExp{iexp},'^\+/',''),...
     1631                                    regexprep(ListDevices{idevice},'^\+/',''));
     1632                                ldir= regexprep(ListDataSeries{isubdir},'^\+/','');
     1633                                if exist(fullfile(lpath,ldir),'dir')
     1634                                    NbExp=NbExp+1;
     1635                                    ExpIndex{NbExp}=iexp;
     1636                                    ListPath{NbExp}=lpath;
     1637                                    ListSubdir{NbExp}=ldir;
     1638                                end
    16271639                            end
    16281640                        end
     
    16471659        end
    16481660        set(BrowseData.ListExperiments,'Value',ExpIndex{iexp})
    1649         Param.InputTable{1,1}=ListPath{iexp};
    1650         Param.InputTable{1,2}=ListSubdir{iexp};
     1661        Param.InputTable(:,1)=ListPath(:,iexp);
     1662        Param.InputTable(:,2)=ListSubdir(:,iexp);
     1663        if size(Param.InputTable,1)==1% case of single input line
    16511664        Param.OutputSubDir=ListSubdir{iexp};
     1665        end
    16521666        set(handles.InputTable,'Data',Param.InputTable)
    16531667%         set(handles.OutputSubDir,'String',ListSubdir{iexp})
     
    38303844function Replicate_Callback(hObject, eventdata, handles)
    38313845if get(handles.Replicate,'Value')
    3832 InputTable=get(handles.InputTable,'Data');
    3833 browse_data(fullfile(InputTable{1,1},InputTable{1,2}))
     3846    InputTable=get(handles.InputTable,'Data');
     3847    for ilist=1:size(InputTable,1)
     3848        InputDir{ilist}=fullfile(InputTable{ilist,1},InputTable{ilist,2});
     3849    end
     3850    browse_data(InputDir)
    38343851else
    38353852    hh=findobj(allchild(0),'Tag','browse_data');
Note: See TracChangeset for help on using the changeset viewer.