source: MML/trunk/mml/doc_html/mml/copydispersionfile.html @ 4

Last change on this file since 4 was 4, checked in by zhangj, 10 years ago

Initial import--MML version from SOLEIL@2013

File size: 9.4 KB
Line 
1<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
2                "http://www.w3.org/TR/REC-html40/loose.dtd">
3<html>
4<head>
5  <title>Description of copydispersionfile</title>
6  <meta name="keywords" content="copydispersionfile">
7  <meta name="description" content="COPYDISPERSIONFILE - Copies a dispersion file to golden file">
8  <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
9  <meta name="generator" content="m2html &copy; 2003 Guillaume Flandin">
10  <meta name="robots" content="index, follow">
11  <link type="text/css" rel="stylesheet" href="../m2html.css">
12</head>
13<body>
14<a name="_top"></a>
15<div><a href="../index.html">Home</a> &gt;  <a href="index.html">mml</a> &gt; copydispersionfile.m</div>
16
17<!--<table width="100%"><tr><td align="left"><a href="../index.html"><img alt="<" border="0" src="../left.png">&nbsp;Master index</a></td>
18<td align="right"><a href="index.html">Index for mml&nbsp;<img alt=">" border="0" src="../right.png"></a></td></tr></table>-->
19
20<h1>copydispersionfile
21</h1>
22
23<h2><a name="_name"></a>PURPOSE <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2>
24<div class="box"><strong>COPYDISPERSIONFILE - Copies a dispersion file to golden file</strong></div>
25
26<h2><a name="_synopsis"></a>SYNOPSIS <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2>
27<div class="box"><strong>function copydispersionfile(DataFileName, ToFileName) </strong></div>
28
29<h2><a name="_description"></a>DESCRIPTION <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2>
30<div class="fragment"><pre class="comment">COPYDISPERSIONFILE - Copies a dispersion file to golden file
31
32  INPUTS
33  1. DataFileName
34  2. toFileName - Default: Golden Filename
35
36  See Also <a href="copychrorespfile.html" class="code" title="function copychrorespfile(DataFileName, ToFileName)">copychrorespfile</a>, <a href="copybpmrespfile.html" class="code" title="function copybpmrespfile(DataFileName, ToFileName)">copybpmrespfile</a>, <a href="copybpmsigmafile.html" class="code" title="function copybpmsigmafile(DataFileName, ToFileName)">copybpmsigmafile</a>,
37  <a href="copydisprespfile.html" class="code" title="function copydisprespfile(DataFileName, ToFileName)">copydisprespfile</a>, <a href="copymachineconfigfile.html" class="code" title="function copymachineconfigfile(DataFileName, ToFileName)">copymachineconfigfile</a>, <a href="copytunerespfile.html" class="code" title="function copytunerespfile(DataFileName, ToFileName)">copytunerespfile</a></pre></div>
38
39<!-- crossreference -->
40<h2><a name="_cross"></a>CROSS-REFERENCE INFORMATION <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2>
41This function calls:
42<ul style="list-style-image:url(../matlabicon.gif)">
43<li><a href="getfamilydata.html" class="code" title="function [Data, ErrorFlag] = getfamilydata(Family, Field1, Field2, DeviceList)">getfamilydata</a>  GETFAMILYDATA - Gets data associated with the accelerator control</li></ul>
44This function is called by:
45<ul style="list-style-image:url(../matlabicon.gif)">
46<li><a href="buildopsdatafiles.html" class="code" title="function buildopsdatafiles">buildopsdatafiles</a>      BUILDOPSDATAFILES - Builds the files for the OpsData directory from the model</li></ul>
47<!-- crossreference -->
48
49
50<h2><a name="_source"></a>SOURCE CODE <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2>
51<div class="fragment"><pre>0001 <a name="_sub0" href="#_subfunctions" class="code">function copydispersionfile(DataFileName, ToFileName)</a>
520002 <span class="comment">%COPYDISPERSIONFILE - Copies a dispersion file to golden file</span>
530003 <span class="comment">%</span>
540004 <span class="comment">%  INPUTS</span>
550005 <span class="comment">%  1. DataFileName</span>
560006 <span class="comment">%  2. toFileName - Default: Golden Filename</span>
570007 <span class="comment">%</span>
580008 <span class="comment">%  See Also copychrorespfile, copybpmrespfile, copybpmsigmafile,</span>
590009 <span class="comment">%  copydisprespfile, copymachineconfigfile, copytunerespfile</span>
600010
610011 <span class="comment">%</span>
620012 <span class="comment">%  Written by Gregory J. Portmann</span>
630013
640014 <span class="keyword">if</span> nargin &lt; 1
650015     DataFileName = <span class="string">''</span>;
660016 <span class="keyword">end</span>
670017
680018 <span class="keyword">if</span> nargin &lt; 2
690019     ToFileName = <span class="string">'Golden'</span>;
700020 <span class="keyword">end</span>
710021
720022
730023 <span class="comment">% Get the file</span>
740024 <span class="keyword">if</span> isempty(DataFileName)
750025     DataDirectoryName = <a href="getfamilydata.html" class="code" title="function [Data, ErrorFlag] = getfamilydata(Family, Field1, Field2, DeviceList)">getfamilydata</a>(<span class="string">'Directory'</span>,<span class="string">'DispData'</span>);
760026     <span class="keyword">if</span> isempty(DataDirectoryName)
770027         DataDirectoryName = <a href="getfamilydata.html" class="code" title="function [Data, ErrorFlag] = getfamilydata(Family, Field1, Field2, DeviceList)">getfamilydata</a>(<span class="string">'Directory'</span>,<span class="string">'DataRoot'</span>);
780028     <span class="keyword">end</span>
790029     [DataFileName, DataDirectoryName, FilterIndex] = uigetfile(<span class="string">'*.mat'</span>,<span class="string">'Select the Dispersion Data File to Copy'</span>, DataDirectoryName);
800030     <span class="keyword">if</span> FilterIndex == 0
810031         fprintf(<span class="string">'   File not copied (copydispersionfile)\n'</span>);
820032         <span class="keyword">return</span>;
830033     <span class="keyword">end</span>
840034 <span class="keyword">else</span>
850035     [DataDirectoryName, DataFileName, ExtName] = fileparts(DataFileName);
860036     DataDirectoryName = [DataDirectoryName, filesep];
870037     DataFileName = [DataFileName, ExtName];
880038 <span class="keyword">end</span>
890039
900040
910041 <span class="comment">% Where is it going</span>
920042 <span class="keyword">if</span> strcmpi(ToFileName, <span class="string">'Golden'</span>)
930043     FileName = [<a href="getfamilydata.html" class="code" title="function [Data, ErrorFlag] = getfamilydata(Family, Field1, Field2, DeviceList)">getfamilydata</a>(<span class="string">'OpsData'</span>,<span class="string">'DispFile'</span>),<span class="string">'.mat'</span>];
940044     DirectoryName = <a href="getfamilydata.html" class="code" title="function [Data, ErrorFlag] = getfamilydata(Family, Field1, Field2, DeviceList)">getfamilydata</a>(<span class="string">'Directory'</span>,<span class="string">'OpsData'</span>);
950045
960046     <span class="keyword">if</span> exist([DirectoryName FileName],<span class="string">'file'</span>)
970047         AnswerString = questdlg(strvcat(strvcat(strvcat(<span class="string">'Are you sure you want to overwrite the default dispersion file?'</span>,sprintf(<span class="string">'%s'</span>,[DirectoryName FileName])),<span class="string">'With file:'</span>),[DataDirectoryName, DataFileName]),<span class="string">'Default Dispersion'</span>,<span class="string">'Yes'</span>,<span class="string">'No'</span>,<span class="string">'No'</span>);
980048     <span class="keyword">else</span>
990049         AnswerString = <span class="string">'Yes'</span>;
1000050     <span class="keyword">end</span>
1010051
1020052     <span class="keyword">if</span> strcmp(AnswerString,<span class="string">'Yes'</span>)
1030053         DirStart = pwd;
1040054         [DirectoryName, ErrorFlag] = gotodirectory(DirectoryName);
1050055         cd(DirStart);
1060056     <span class="keyword">else</span>
1070057         fprintf(<span class="string">'   File not copied (copydispersionfile)\n'</span>);
1080058         <span class="keyword">return</span>;
1090059     <span class="keyword">end</span>
1100060 <span class="keyword">end</span>
1110061
1120062
1130063 <span class="comment">% Backup first</span>
1140064 BackupDirectoryName = [<a href="getfamilydata.html" class="code" title="function [Data, ErrorFlag] = getfamilydata(Family, Field1, Field2, DeviceList)">getfamilydata</a>(<span class="string">'Directory'</span>,<span class="string">'DataRoot'</span>) <span class="string">'Backup'</span> filesep];
1150065 BackupDataFileName  = prependtimestamp(FileName);
1160066 <span class="keyword">if</span> exist([DirectoryName, FileName],<span class="string">'file'</span>)
1170067     DirStart = pwd;
1180068     [FinalDir, ErrorFlag] = gotodirectory(BackupDirectoryName);
1190069     <span class="keyword">if</span> ~ErrorFlag
1200070         copyfile([DirectoryName, FileName], [BackupDirectoryName, BackupDataFileName], <span class="string">'f'</span>);
1210071         fprintf(<span class="string">'   File %s backup to %s\n'</span>, [DirectoryName, FileName], [BackupDirectoryName, BackupDataFileName]);
1220072     <span class="keyword">else</span>
1230073         fprintf(<span class="string">'   Problem finding/creating backup directory, hence backup made to ops directory.\n'</span>);
1240074         copyfile([DirectoryName, FileName], [DirectoryName, BackupDataFileName], <span class="string">'f'</span>);
1250075     <span class="keyword">end</span>
1260076     cd(DirStart);
1270077 <span class="keyword">end</span>
1280078
1290079 <span class="comment">% Do the copy</span>
1300080 copyfile([DataDirectoryName, DataFileName], [DirectoryName, FileName], <span class="string">'f'</span>);
1310081 fprintf(<span class="string">'   File %s copied to %s\n'</span>, [DataDirectoryName, DataFileName], [DirectoryName, FileName]);</pre></div>
132<hr><address>Generated on Mon 21-May-2007 15:29:18 by <strong><a href="http://www.artefact.tk/software/matlab/m2html/">m2html</a></strong> &copy; 2003</address>
133</body>
134</html>
Note: See TracBrowser for help on using the repository browser.