igor-public/doc/html/pearl-elog_8ipf_source.html

163 lines
249 KiB
HTML

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
<meta http-equiv="X-UA-Compatible" content="IE=9"/>
<meta name="generator" content="Doxygen 1.8.13"/>
<meta name="viewport" content="width=device-width, initial-scale=1"/>
<title>PEARL Procedures: pearl-elog.ipf Source File</title>
<link href="tabs.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="jquery.js"></script>
<script type="text/javascript" src="dynsections.js"></script>
<link href="navtree.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="resize.js"></script>
<script type="text/javascript" src="navtreedata.js"></script>
<script type="text/javascript" src="navtree.js"></script>
<script type="text/javascript">
$(document).ready(initResizable);
</script>
<link href="search/search.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="search/searchdata.js"></script>
<script type="text/javascript" src="search/search.js"></script>
<link href="doxygen.css" rel="stylesheet" type="text/css" />
</head>
<body>
<div id="top"><!-- do not remove this div, it is closed by doxygen! -->
<div id="titlearea">
<table cellspacing="0" cellpadding="0">
<tbody>
<tr style="height: 56px;">
<td id="projectalign" style="padding-left: 0.5em;">
<div id="projectname">PEARL Procedures
&#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
</div>
<div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
</td>
</tr>
</tbody>
</table>
</div>
<!-- end header part -->
<!-- Generated by Doxygen 1.8.13 -->
<script type="text/javascript">
var searchBox = new SearchBox("searchBox", "search",false,'Search');
</script>
<script type="text/javascript" src="menudata.js"></script>
<script type="text/javascript" src="menu.js"></script>
<script type="text/javascript">
$(function() {
initMenu('',true,false,'search.php','Search');
$(document).ready(function() { init_search(); });
});
</script>
<div id="main-nav"></div>
</div><!-- top -->
<div id="side-nav" class="ui-resizable side-nav-resizable">
<div id="nav-tree">
<div id="nav-tree-contents">
<div id="nav-sync" class="sync"></div>
</div>
</div>
<div id="splitbar" style="-moz-user-select:none;"
class="ui-resizable-handle">
</div>
</div>
<script type="text/javascript">
$(document).ready(function(){initNavTree('pearl-elog_8ipf_source.html','');});
</script>
<div id="doc-content">
<!-- window showing the filter options -->
<div id="MSearchSelectWindow"
onmouseover="return searchBox.OnSearchSelectShow()"
onmouseout="return searchBox.OnSearchSelectHide()"
onkeydown="return searchBox.OnSearchSelectKey(event)">
</div>
<!-- iframe showing the search results (closed by default) -->
<div id="MSearchResultsWindow">
<iframe src="javascript:void(0)" frameborder="0"
name="MSearchResults" id="MSearchResults">
</iframe>
</div>
<div class="header">
<div class="headertitle">
<div class="title">pearl-elog.ipf</div> </div>
</div><!--header-->
<div class="contents">
<a href="pearl-elog_8ipf.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a name="l00001"></a><span class="lineno"> 1</span>&#160;<span class="preprocessor">#pragma rtGlobals=3 // Use modern global access method and strict wave access.</span></div><div class="line"><a name="l00002"></a><span class="lineno"> 2</span>&#160;<span class="preprocessor">#pragma version = 1.41</span></div><div class="line"><a name="l00003"></a><span class="lineno"> 3</span>&#160;<span class="preprocessor">#pragma IgorVersion = 6.2</span></div><div class="line"><a name="l00004"></a><span class="lineno"> 4</span>&#160;<span class="preprocessor">#pragma ModuleName = PearlElog</span></div><div class="line"><a name="l00005"></a><span class="lineno"> 5</span>&#160;</div><div class="line"><a name="l00006"></a><span class="lineno"> 6</span>&#160;<span class="comment">// author: matthias.muntwiler@psi.ch</span></div><div class="line"><a name="l00007"></a><span class="lineno"> 7</span>&#160;<span class="comment">// Copyright (c) 2013-17 Paul Scherrer Institut</span></div><div class="line"><a name="l00008"></a><span class="lineno"> 8</span>&#160;</div><div class="line"><a name="l00009"></a><span class="lineno"> 9</span>&#160;<span class="comment">// Licensed under the Apache License, Version 2.0 (the &quot;License&quot;);</span></div><div class="line"><a name="l00010"></a><span class="lineno"> 10</span>&#160;<span class="comment">// you may not use this file except in compliance with the License.</span></div><div class="line"><a name="l00011"></a><span class="lineno"> 11</span>&#160;<span class="comment">// You may obtain a copy of the License at</span></div><div class="line"><a name="l00012"></a><span class="lineno"> 12</span>&#160;<span class="comment">// http://www.apache.org/licenses/LICENSE-2.0</span></div><div class="line"><a name="l00013"></a><span class="lineno"> 13</span>&#160;</div><div class="line"><a name="l00079"></a><span class="lineno"> 79</span>&#160;</div><div class="line"><a name="l00084"></a><span class="lineno"> 84</span>&#160;</div><div class="line"><a name="l00085"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#aca457d1f4414d20a911254b1de13ebbb"> 85</a></span>&#160;<span class="keyword">static</span> strconstant <a class="code" href="pearl-elog_8ipf.html#aca457d1f4414d20a911254b1de13ebbb">package_name</a> = <span class="stringliteral">&quot;pearl_elog&quot;</span></div><div class="line"><a name="l00086"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b"> 86</a></span>&#160;<span class="keyword">static</span> strconstant <a class="code" href="pearl-elog_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a> = <span class="stringliteral">&quot;root:packages:pearl_elog:&quot;</span></div><div class="line"><a name="l00087"></a><span class="lineno"> 87</span>&#160;</div><div class="line"><a name="l00097"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a4088a48a8428629f120c08a419af62d6"> 97</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-elog_8ipf.html#a4088a48a8428629f120c08a419af62d6">pearl_elog</a>(logbook)</div><div class="line"><a name="l00098"></a><span class="lineno"> 98</span>&#160; <span class="keywordtype">string</span> logbook</div><div class="line"><a name="l00099"></a><span class="lineno"> 99</span>&#160; </div><div class="line"><a name="l00100"></a><span class="lineno"> 100</span>&#160; <span class="keywordflow">if</span> (<a class="code" href="pearl-elog_8ipf.html#a7a4572f4f861f7eb46c932508d1164f9">init_package</a>() == 0)</div><div class="line"><a name="l00101"></a><span class="lineno"> 101</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a92c27964d49ab8bcd7afc858ebe214a3">load_prefs</a>()</div><div class="line"><a name="l00102"></a><span class="lineno"> 102</span>&#160; string templates = <a class="code" href="pearl-elog_8ipf.html#a356bebea8eb41c9ac3ea2148af22707f">list_logbooks</a>(templates=1)</div><div class="line"><a name="l00103"></a><span class="lineno"> 103</span>&#160; if (ItemsInList(templates) &lt; 1)</div><div class="line"><a name="l00104"></a><span class="lineno"> 104</span>&#160; <a class="code" href="pearl-elog_8ipf.html#aaca820a0149ce6a0e843ca72b9c9e7ab">elog_init_pearl_templates</a>()</div><div class="line"><a name="l00105"></a><span class="lineno"> 105</span>&#160; endif</div><div class="line"><a name="l00106"></a><span class="lineno"> 106</span>&#160; endif</div><div class="line"><a name="l00107"></a><span class="lineno"> 107</span>&#160; </div><div class="line"><a name="l00108"></a><span class="lineno"> 108</span>&#160; if (strlen(logbook) == 0)</div><div class="line"><a name="l00109"></a><span class="lineno"> 109</span>&#160; logbook = <a class="code" href="pearl-elog_8ipf.html#acedf0c8ae34e9ebadd6fa0d9d1353aa4">elog_prompt_logbook</a>()</div><div class="line"><a name="l00110"></a><span class="lineno"> 110</span>&#160; endif</div><div class="line"><a name="l00111"></a><span class="lineno"> 111</span>&#160; </div><div class="line"><a name="l00112"></a><span class="lineno"> 112</span>&#160; <span class="keywordtype">string</span> win_name = logbook + &quot;ElogPanel&quot;</div><div class="line"><a name="l00113"></a><span class="lineno"> 113</span>&#160; if (strlen(logbook) &gt; 0)</div><div class="line"><a name="l00114"></a><span class="lineno"> 114</span>&#160; if (strlen(WinList(win_name, &quot;;&quot;, &quot;&quot;)) &gt; 0)</div><div class="line"><a name="l00115"></a><span class="lineno"> 115</span>&#160; DoWindow /F $win_name</div><div class="line"><a name="l00116"></a><span class="lineno"> 116</span>&#160; else</div><div class="line"><a name="l00117"></a><span class="lineno"> 117</span>&#160; win_name = <a class="code" href="pearl-elog_8ipf.html#a6da33f1bb2639cb912e9b25af25bf663">PearlElogPanel</a>(logbook)</div><div class="line"><a name="l00118"></a><span class="lineno"> 118</span>&#160; STRUCT WMWinHookStruct s</div><div class="line"><a name="l00119"></a><span class="lineno"> 119</span>&#160; s.eventCode = 0</div><div class="line"><a name="l00120"></a><span class="lineno"> 120</span>&#160; s.winName = win_name</div><div class="line"><a name="l00121"></a><span class="lineno"> 121</span>&#160; <a class="code" href="pearl-elog_8ipf.html#af8b1ea711208bcc2cd1647abe04131dc">elog_panel_hook</a>(s)</div><div class="line"><a name="l00122"></a><span class="lineno"> 122</span>&#160; endif</div><div class="line"><a name="l00123"></a><span class="lineno"> 123</span>&#160; endif</div><div class="line"><a name="l00124"></a><span class="lineno"> 124</span>&#160;end</div><div class="line"><a name="l00125"></a><span class="lineno"> 125</span>&#160;</div><div class="line"><a name="l00127"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#ae824bbf81f8b7d16b36b53e3f3d85f69"> 127</a></span>&#160;static function <a class="code" href="pearl-elog_8ipf.html#ae824bbf81f8b7d16b36b53e3f3d85f69">IgorBeforeNewHook</a>(igorApplicationNameStr)</div><div class="line"><a name="l00128"></a><span class="lineno"> 128</span>&#160; <span class="keywordtype">string</span> igorApplicationNameStr</div><div class="line"><a name="l00129"></a><span class="lineno"> 129</span>&#160; <a class="code" href="pearl-elog_8ipf.html#ac729557a307bddd2f2ad298199976c01">save_prefs</a>()</div><div class="line"><a name="l00130"></a><span class="lineno"> 130</span>&#160; <a class="code" href="pearl-elog_8ipf.html#ad7640d06f004ecd4a8980ea29d24dcbe">cleanup_temp_files</a>()</div><div class="line"><a name="l00131"></a><span class="lineno"> 131</span>&#160; return 0</div><div class="line"><a name="l00132"></a><span class="lineno"> 132</span>&#160;end</div><div class="line"><a name="l00133"></a><span class="lineno"> 133</span>&#160;</div><div class="line"><a name="l00135"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a6fcae5eafc97bca9a637bd7800b13e25"> 135</a></span>&#160;static function <a class="code" href="pearl-elog_8ipf.html#a6fcae5eafc97bca9a637bd7800b13e25">IgorQuitHook</a>(igorApplicationNameStr)</div><div class="line"><a name="l00136"></a><span class="lineno"> 136</span>&#160; <span class="keywordtype">string</span> igorApplicationNameStr</div><div class="line"><a name="l00137"></a><span class="lineno"> 137</span>&#160; <a class="code" href="pearl-elog_8ipf.html#ac729557a307bddd2f2ad298199976c01">save_prefs</a>()</div><div class="line"><a name="l00138"></a><span class="lineno"> 138</span>&#160; <a class="code" href="pearl-elog_8ipf.html#ad7640d06f004ecd4a8980ea29d24dcbe">cleanup_temp_files</a>()</div><div class="line"><a name="l00139"></a><span class="lineno"> 139</span>&#160; return 0</div><div class="line"><a name="l00140"></a><span class="lineno"> 140</span>&#160;end</div><div class="line"><a name="l00141"></a><span class="lineno"> 141</span>&#160;</div><div class="line"><a name="l00143"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a3f524f5190341d2accc8cb8c3ed2ceb5"> 143</a></span>&#160;static function <a class="code" href="pearl-elog_8ipf.html#a3f524f5190341d2accc8cb8c3ed2ceb5">AfterFileOpenHook</a>(refNum,file,pathName,type,creator,kind)</div><div class="line"><a name="l00144"></a><span class="lineno"> 144</span>&#160; Variable refNum,kind</div><div class="line"><a name="l00145"></a><span class="lineno"> 145</span>&#160; String file,pathName,type,creator</div><div class="line"><a name="l00146"></a><span class="lineno"> 146</span>&#160; if( (kind &gt;= 1) &amp;&amp; (kind &lt;= 2))</div><div class="line"><a name="l00147"></a><span class="lineno"> 147</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a7a4572f4f861f7eb46c932508d1164f9">init_package</a>(clean=1)</div><div class="line"><a name="l00148"></a><span class="lineno"> 148</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a92c27964d49ab8bcd7afc858ebe214a3">load_prefs</a>()</div><div class="line"><a name="l00149"></a><span class="lineno"> 149</span>&#160; endif</div><div class="line"><a name="l00150"></a><span class="lineno"> 150</span>&#160; return 0</div><div class="line"><a name="l00151"></a><span class="lineno"> 151</span>&#160;end</div><div class="line"><a name="l00152"></a><span class="lineno"> 152</span>&#160;</div><div class="line"><a name="l00153"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#af34e46263aa50843f98f755988f9ab5c"> 153</a></span>&#160;static constant <a class="code" href="pearl-elog_8ipf.html#af34e46263aa50843f98f755988f9ab5c">kdfRoot</a> = 0</div><div class="line"><a name="l00154"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f"> 154</a></span>&#160;static constant <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a> = 1</div><div class="line"><a name="l00155"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6"> 155</a></span>&#160;static constant <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a> = 2</div><div class="line"><a name="l00156"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a28eb44739e7d5c7f9899a69afa231b8e"> 156</a></span>&#160;static constant <a class="code" href="pearl-elog_8ipf.html#a28eb44739e7d5c7f9899a69afa231b8e">kdfTemplates</a> = 3</div><div class="line"><a name="l00157"></a><span class="lineno"> 157</span>&#160;</div><div class="line"><a name="l00170"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#ac45196cb9ce8b43b76c9daf67689c49a"> 170</a></span>&#160;static function /df <a class="code" href="pearl-elog_8ipf.html#ac45196cb9ce8b43b76c9daf67689c49a">get_elog_df</a>(name, category)</div><div class="line"><a name="l00171"></a><span class="lineno"> 171</span>&#160; <span class="keywordtype">string</span> name</div><div class="line"><a name="l00172"></a><span class="lineno"> 172</span>&#160; variable category</div><div class="line"><a name="l00173"></a><span class="lineno"> 173</span>&#160; </div><div class="line"><a name="l00174"></a><span class="lineno"> 174</span>&#160; dfref df_package = $package_path</div><div class="line"><a name="l00175"></a><span class="lineno"> 175</span>&#160; dfref df_persistent = df_package:persistent</div><div class="line"><a name="l00176"></a><span class="lineno"> 176</span>&#160; dfref df_volatile = df_package:volatile</div><div class="line"><a name="l00177"></a><span class="lineno"> 177</span>&#160; </div><div class="line"><a name="l00178"></a><span class="lineno"> 178</span>&#160; switch(category)</div><div class="line"><a name="l00179"></a><span class="lineno"> 179</span>&#160; case <a class="code" href="pearl-elog_8ipf.html#af34e46263aa50843f98f755988f9ab5c">kdfRoot</a>:</div><div class="line"><a name="l00180"></a><span class="lineno"> 180</span>&#160; dfref df_parent = df_package</div><div class="line"><a name="l00181"></a><span class="lineno"> 181</span>&#160; break</div><div class="line"><a name="l00182"></a><span class="lineno"> 182</span>&#160; case <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>:</div><div class="line"><a name="l00183"></a><span class="lineno"> 183</span>&#160; dfref df_parent = df_persistent</div><div class="line"><a name="l00184"></a><span class="lineno"> 184</span>&#160; break</div><div class="line"><a name="l00185"></a><span class="lineno"> 185</span>&#160; case <a class="code" href="pearl-elog_8ipf.html#a28eb44739e7d5c7f9899a69afa231b8e">kdfTemplates</a>:</div><div class="line"><a name="l00186"></a><span class="lineno"> 186</span>&#160; dfref df_parent = df_persistent:templates</div><div class="line"><a name="l00187"></a><span class="lineno"> 187</span>&#160; break</div><div class="line"><a name="l00188"></a><span class="lineno"> 188</span>&#160; case <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>:</div><div class="line"><a name="l00189"></a><span class="lineno"> 189</span>&#160; dfref df_parent = df_volatile</div><div class="line"><a name="l00190"></a><span class="lineno"> 190</span>&#160; break</div><div class="line"><a name="l00191"></a><span class="lineno"> 191</span>&#160; default:</div><div class="line"><a name="l00192"></a><span class="lineno"> 192</span>&#160; Abort &quot;<a class="code" href="pearl-elog_8ipf.html#ac45196cb9ce8b43b76c9daf67689c49a">get_elog_df</a>: undefined data folder category.&quot;</div><div class="line"><a name="l00193"></a><span class="lineno"> 193</span>&#160; endswitch</div><div class="line"><a name="l00194"></a><span class="lineno"> 194</span>&#160; </div><div class="line"><a name="l00195"></a><span class="lineno"> 195</span>&#160; if ((strlen(name) &gt; 0) &amp;&amp; (category &gt;= 1))</div><div class="line"><a name="l00196"></a><span class="lineno"> 196</span>&#160; if (category == <a class="code" href="pearl-elog_8ipf.html#a28eb44739e7d5c7f9899a69afa231b8e">kdfTemplates</a>)</div><div class="line"><a name="l00197"></a><span class="lineno"> 197</span>&#160; dfref df_logbooks = df_parent</div><div class="line"><a name="l00198"></a><span class="lineno"> 198</span>&#160; else</div><div class="line"><a name="l00199"></a><span class="lineno"> 199</span>&#160; dfref df_logbooks = df_parent:logbooks</div><div class="line"><a name="l00200"></a><span class="lineno"> 200</span>&#160; endif</div><div class="line"><a name="l00201"></a><span class="lineno"> 201</span>&#160; dfref df_logbook = df_logbooks:$name</div><div class="line"><a name="l00202"></a><span class="lineno"> 202</span>&#160; return df_logbook</div><div class="line"><a name="l00203"></a><span class="lineno"> 203</span>&#160; else</div><div class="line"><a name="l00204"></a><span class="lineno"> 204</span>&#160; return df_parent</div><div class="line"><a name="l00205"></a><span class="lineno"> 205</span>&#160; endif</div><div class="line"><a name="l00206"></a><span class="lineno"> 206</span>&#160;end</div><div class="line"><a name="l00207"></a><span class="lineno"> 207</span>&#160;</div><div class="line"><a name="l00217"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a7a4572f4f861f7eb46c932508d1164f9"> 217</a></span>&#160;static function <a class="code" href="pearl-elog_8ipf.html#a7a4572f4f861f7eb46c932508d1164f9">init_package</a>([clean])</div><div class="line"><a name="l00218"></a><span class="lineno"> 218</span>&#160; variable clean</div><div class="line"><a name="l00219"></a><span class="lineno"> 219</span>&#160; </div><div class="line"><a name="l00220"></a><span class="lineno"> 220</span>&#160; if (ParamIsDefault(clean))</div><div class="line"><a name="l00221"></a><span class="lineno"> 221</span>&#160; clean = 0</div><div class="line"><a name="l00222"></a><span class="lineno"> 222</span>&#160; endif</div><div class="line"><a name="l00223"></a><span class="lineno"> 223</span>&#160; </div><div class="line"><a name="l00224"></a><span class="lineno"> 224</span>&#160; dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l00225"></a><span class="lineno"> 225</span>&#160; dfref df_root = <a class="code" href="pearl-elog_8ipf.html#ac45196cb9ce8b43b76c9daf67689c49a">get_elog_df</a>(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#af34e46263aa50843f98f755988f9ab5c">kdfRoot</a>)</div><div class="line"><a name="l00226"></a><span class="lineno"> 226</span>&#160; if ((clean == 0) &amp;&amp; (DataFolderRefStatus(df_root) == 1))</div><div class="line"><a name="l00227"></a><span class="lineno"> 227</span>&#160; return 1</div><div class="line"><a name="l00228"></a><span class="lineno"> 228</span>&#160; endif</div><div class="line"><a name="l00229"></a><span class="lineno"> 229</span>&#160; </div><div class="line"><a name="l00230"></a><span class="lineno"> 230</span>&#160; setdatafolder root:</div><div class="line"><a name="l00231"></a><span class="lineno"> 231</span>&#160; newdatafolder /o/s packages</div><div class="line"><a name="l00232"></a><span class="lineno"> 232</span>&#160; newdatafolder /o/s $package_name</div><div class="line"><a name="l00233"></a><span class="lineno"> 233</span>&#160; dfref df_package_root = getdatafolderdfr()</div><div class="line"><a name="l00234"></a><span class="lineno"> 234</span>&#160; newdatafolder /o/s volatile</div><div class="line"><a name="l00235"></a><span class="lineno"> 235</span>&#160; dfref df_volatile = getdatafolderdfr()</div><div class="line"><a name="l00236"></a><span class="lineno"> 236</span>&#160; newdatafolder /o logbooks</div><div class="line"><a name="l00237"></a><span class="lineno"> 237</span>&#160; setdatafolder df_package_root</div><div class="line"><a name="l00238"></a><span class="lineno"> 238</span>&#160; newdatafolder /o/s persistent</div><div class="line"><a name="l00239"></a><span class="lineno"> 239</span>&#160; dfref df_persistent = getdatafolderdfr()</div><div class="line"><a name="l00240"></a><span class="lineno"> 240</span>&#160; newdatafolder /o logbooks</div><div class="line"><a name="l00241"></a><span class="lineno"> 241</span>&#160; newdatafolder /o templates</div><div class="line"><a name="l00242"></a><span class="lineno"> 242</span>&#160; </div><div class="line"><a name="l00243"></a><span class="lineno"> 243</span>&#160; <span class="comment">// common configuration</span></div><div class="line"><a name="l00244"></a><span class="lineno"> 244</span>&#160; setdatafolder df_persistent</div><div class="line"><a name="l00245"></a><span class="lineno"> 245</span>&#160; <span class="keywordtype">string</span> /g elog_path = &quot;c:\\program files (x86)\\ELOG\\elog.exe&quot;</div><div class="line"><a name="l00246"></a><span class="lineno"> 246</span>&#160; <span class="keywordtype">string</span> /g hostname = &quot;localhost&quot;</div><div class="line"><a name="l00247"></a><span class="lineno"> 247</span>&#160; variable /g port = 0 <span class="comment">// 0 = unspecified (default)</span></div><div class="line"><a name="l00248"></a><span class="lineno"> 248</span>&#160; variable /g ssl = 0 <span class="comment">// 0 = plain text (incl. passwords), 1 = secure connection</span></div><div class="line"><a name="l00249"></a><span class="lineno"> 249</span>&#160; <span class="keywordtype">string</span> /g subdir = &quot;&quot;</div><div class="line"><a name="l00250"></a><span class="lineno"> 250</span>&#160; variable /g loglevel = 4</div><div class="line"><a name="l00251"></a><span class="lineno"> 251</span>&#160;</div><div class="line"><a name="l00252"></a><span class="lineno"> 252</span>&#160; setdatafolder savedf</div><div class="line"><a name="l00253"></a><span class="lineno"> 253</span>&#160; return 0</div><div class="line"><a name="l00254"></a><span class="lineno"> 254</span>&#160;end</div><div class="line"><a name="l00255"></a><span class="lineno"> 255</span>&#160;</div><div class="line"><a name="l00262"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#aaca820a0149ce6a0e843ca72b9c9e7ab"> 262</a></span>&#160;function <a class="code" href="pearl-elog_8ipf.html#aaca820a0149ce6a0e843ca72b9c9e7ab">elog_init_pearl_templates</a>()</div><div class="line"><a name="l00263"></a><span class="lineno"> 263</span>&#160; dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l00264"></a><span class="lineno"> 264</span>&#160;</div><div class="line"><a name="l00265"></a><span class="lineno"> 265</span>&#160; dfref df_root = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#af34e46263aa50843f98f755988f9ab5c">kdfRoot</a>)</div><div class="line"><a name="l00266"></a><span class="lineno"> 266</span>&#160; dfref df_persistent = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l00267"></a><span class="lineno"> 267</span>&#160; dfref df_templates = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a28eb44739e7d5c7f9899a69afa231b8e">kdfTemplates</a>)</div><div class="line"><a name="l00268"></a><span class="lineno"> 268</span>&#160; </div><div class="line"><a name="l00269"></a><span class="lineno"> 269</span>&#160; <span class="comment">// Experiments template</span></div><div class="line"><a name="l00270"></a><span class="lineno"> 270</span>&#160; setdatafolder df_templates</div><div class="line"><a name="l00271"></a><span class="lineno"> 271</span>&#160; newdatafolder /o/s Experiments</div><div class="line"><a name="l00272"></a><span class="lineno"> 272</span>&#160; </div><div class="line"><a name="l00273"></a><span class="lineno"> 273</span>&#160; <span class="comment">// attributes (persistent)</span></div><div class="line"><a name="l00274"></a><span class="lineno"> 274</span>&#160; <span class="comment">// available attributes</span></div><div class="line"><a name="l00275"></a><span class="lineno"> 275</span>&#160; <span class="keywordtype">string</span> /g attributes = &quot;author;project;p-group;sample;source;task;technique;file;valid;&quot;</div><div class="line"><a name="l00276"></a><span class="lineno"> 276</span>&#160; <span class="comment">// controls corresponding to attributes</span></div><div class="line"><a name="l00277"></a><span class="lineno"> 277</span>&#160; <span class="comment">// prefix determines the control type: sv_ = setvariable (string), pm_ = popup menu, cb = check box</span></div><div class="line"><a name="l00278"></a><span class="lineno"> 278</span>&#160; <span class="keywordtype">string</span> /g controls = &quot;sv_author;sv_project;sv_pgroup;sv_sample;pm_source;pm_task;pm_technique;sv_file;cb_valid;&quot;</div><div class="line"><a name="l00279"></a><span class="lineno"> 279</span>&#160; <span class="comment">// attributes with fixed options, value item declares the options string</span></div><div class="line"><a name="l00280"></a><span class="lineno"> 280</span>&#160; <span class="keywordtype">string</span> /g options = &quot;source=sources;task=tasks;technique=techniques&quot;</div><div class="line"><a name="l00281"></a><span class="lineno"> 281</span>&#160; <span class="comment">// attributes which must be defined</span></div><div class="line"><a name="l00282"></a><span class="lineno"> 282</span>&#160; <span class="keywordtype">string</span> /g required_attributes = &quot;author;project;p-group;sample;source;task;technique;valid&quot;</div><div class="line"><a name="l00283"></a><span class="lineno"> 283</span>&#160;</div><div class="line"><a name="l00284"></a><span class="lineno"> 284</span>&#160; <span class="comment">// option lists</span></div><div class="line"><a name="l00285"></a><span class="lineno"> 285</span>&#160; <span class="keywordtype">string</span> /g sources = &quot;Manual Entry;PShell;Scienta Data;SScan Data;Prosilica Data;OTF Data;Beamline Status;LEED Data;QMS Data;Matrix Data;Igor Pro;Other&quot;</div><div class="line"><a name="l00286"></a><span class="lineno"> 286</span>&#160; <span class="keywordtype">string</span> /g tasks = &quot;Measurement;Optimization;Analysis;Sample Preparation;Sample Storage;Comment;Development;Maintenance;Test;Other&quot;</div><div class="line"><a name="l00287"></a><span class="lineno"> 287</span>&#160; <span class="keywordtype">string</span> /g techniques = &quot;XPS;UPS;XPD;XAS;XMCD;PhD;ARUPS;STM;STS;LEED;AES;QMS;MBE;Sputter/Anneal;Test;Other&quot;</div><div class="line"><a name="l00288"></a><span class="lineno"> 288</span>&#160;</div><div class="line"><a name="l00289"></a><span class="lineno"> 289</span>&#160; <span class="comment">// Calculations template</span></div><div class="line"><a name="l00290"></a><span class="lineno"> 290</span>&#160; setdatafolder df_templates</div><div class="line"><a name="l00291"></a><span class="lineno"> 291</span>&#160; newdatafolder /o/s Calculations</div><div class="line"><a name="l00292"></a><span class="lineno"> 292</span>&#160; </div><div class="line"><a name="l00293"></a><span class="lineno"> 293</span>&#160; <span class="comment">// attributes (persistent)</span></div><div class="line"><a name="l00294"></a><span class="lineno"> 294</span>&#160; <span class="comment">// available attributes</span></div><div class="line"><a name="l00295"></a><span class="lineno"> 295</span>&#160; <span class="keywordtype">string</span> /g attributes = &quot;author;project;p-group;sample;program;revision;machine;job;experiment;source path;result path;valid&quot;</div><div class="line"><a name="l00296"></a><span class="lineno"> 296</span>&#160; <span class="comment">// controls corresponding to attributes</span></div><div class="line"><a name="l00297"></a><span class="lineno"> 297</span>&#160; <span class="comment">// prefix determines the control type: sv_ = setvariable (string), pm_ = popup menu, cb = check box</span></div><div class="line"><a name="l00298"></a><span class="lineno"> 298</span>&#160; <span class="keywordtype">string</span> /g controls = &quot;sv_author;sv_project;sv_pgroup;sv_sample;pm_program;sv_revision;pm_machine;sv_job;sv_experiment;sv_sourcepath;sv_resultpath;cb_valid&quot;</div><div class="line"><a name="l00299"></a><span class="lineno"> 299</span>&#160; <span class="comment">// attributes with fixed options, value item declares the options string</span></div><div class="line"><a name="l00300"></a><span class="lineno"> 300</span>&#160; <span class="keywordtype">string</span> /g options = &quot;program=programs;machine=machines&quot;</div><div class="line"><a name="l00301"></a><span class="lineno"> 301</span>&#160; <span class="comment">// attributes which must be defined</span></div><div class="line"><a name="l00302"></a><span class="lineno"> 302</span>&#160; <span class="keywordtype">string</span> /g required_attributes = &quot;author;project;sample&quot;</div><div class="line"><a name="l00303"></a><span class="lineno"> 303</span>&#160;</div><div class="line"><a name="l00304"></a><span class="lineno"> 304</span>&#160; <span class="comment">// option lists</span></div><div class="line"><a name="l00305"></a><span class="lineno"> 305</span>&#160; <span class="keywordtype">string</span> /g programs = &quot;PMSCO;EDAC;MSC;SSC;MUFPOT;DMSUP;Other&quot;</div><div class="line"><a name="l00306"></a><span class="lineno"> 306</span>&#160; <span class="keywordtype">string</span> /g machines = &quot;PC;VM;Ra;Merlin;llcx;Other&quot;</div><div class="line"><a name="l00307"></a><span class="lineno"> 307</span>&#160;</div><div class="line"><a name="l00308"></a><span class="lineno"> 308</span>&#160; <span class="comment">// System template</span></div><div class="line"><a name="l00309"></a><span class="lineno"> 309</span>&#160; setdatafolder df_templates</div><div class="line"><a name="l00310"></a><span class="lineno"> 310</span>&#160; newdatafolder /o/s System</div><div class="line"><a name="l00311"></a><span class="lineno"> 311</span>&#160; </div><div class="line"><a name="l00312"></a><span class="lineno"> 312</span>&#160; <span class="comment">// attributes (persistent)</span></div><div class="line"><a name="l00313"></a><span class="lineno"> 313</span>&#160; <span class="comment">// available attributes</span></div><div class="line"><a name="l00314"></a><span class="lineno"> 314</span>&#160; <span class="keywordtype">string</span> /g attributes = &quot;author;type;system;source;file&quot;</div><div class="line"><a name="l00315"></a><span class="lineno"> 315</span>&#160; <span class="comment">// controls corresponding to attributes</span></div><div class="line"><a name="l00316"></a><span class="lineno"> 316</span>&#160; <span class="comment">// prefix determines the control type: sv_ = setvariable (string), pm_ = popup menu, cb = check box</span></div><div class="line"><a name="l00317"></a><span class="lineno"> 317</span>&#160; <span class="keywordtype">string</span> /g controls = &quot;sv_author;pm_type;pm_system;pm_source;sv_file&quot;</div><div class="line"><a name="l00318"></a><span class="lineno"> 318</span>&#160; <span class="comment">// attributes with fixed options, value item declares the options string</span></div><div class="line"><a name="l00319"></a><span class="lineno"> 319</span>&#160; <span class="keywordtype">string</span> /g options = &quot;type=types;system=systems;source=sources&quot;</div><div class="line"><a name="l00320"></a><span class="lineno"> 320</span>&#160; <span class="comment">// attributes which must be defined</span></div><div class="line"><a name="l00321"></a><span class="lineno"> 321</span>&#160; <span class="keywordtype">string</span> /g required_attributes = &quot;author;type;system&quot;</div><div class="line"><a name="l00322"></a><span class="lineno"> 322</span>&#160;</div><div class="line"><a name="l00323"></a><span class="lineno"> 323</span>&#160; <span class="comment">// option lists</span></div><div class="line"><a name="l00324"></a><span class="lineno"> 324</span>&#160; <span class="keywordtype">string</span> /g types = &quot;Installation;Repair;Maintenance;Test;Commissioning;Bakeout;Incident;Cool-down;Warm-up;Storage;Other&quot;</div><div class="line"><a name="l00325"></a><span class="lineno"> 325</span>&#160; <span class="keywordtype">string</span> /g systems = &quot;Vacuum;Control System;BL;XA;XP;SA;SP;T;LL;Monochromator;Carving;Scienta;STM;PC-Scienta;PC-Matrix;PC-Console;PC-Console-Win;PC-XP;EPS;LAC;Desiccator;Other&quot;</div><div class="line"><a name="l00326"></a><span class="lineno"> 326</span>&#160; <span class="keywordtype">string</span> /g sources = &quot;Manual Entry;PShell;Scienta Data;SScan Data;Prosilica Data;OTF Data;Beamline Status;LEED Data;QMS Data;Matrix Data;Igor Pro;Other&quot;</div><div class="line"><a name="l00327"></a><span class="lineno"> 327</span>&#160;</div><div class="line"><a name="l00328"></a><span class="lineno"> 328</span>&#160; setdatafolder savedf</div><div class="line"><a name="l00329"></a><span class="lineno"> 329</span>&#160; return 0</div><div class="line"><a name="l00330"></a><span class="lineno"> 330</span>&#160;end</div><div class="line"><a name="l00331"></a><span class="lineno"> 331</span>&#160;</div><div class="line"><a name="l00340"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a85cf9d39ea917860b463b1b4111705f2"> 340</a></span>&#160;static function <a class="code" href="pearl-elog_8ipf.html#a85cf9d39ea917860b463b1b4111705f2">init_volatile_vars</a>()</div><div class="line"><a name="l00341"></a><span class="lineno"> 341</span>&#160; dfref savedf = GetDataFolderDFR()</div><div class="line"><a name="l00342"></a><span class="lineno"> 342</span>&#160; </div><div class="line"><a name="l00343"></a><span class="lineno"> 343</span>&#160; dfref df_volatile_root = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>)</div><div class="line"><a name="l00344"></a><span class="lineno"> 344</span>&#160; dfref df_volatile_parent = df_volatile_root:logbooks</div><div class="line"><a name="l00345"></a><span class="lineno"> 345</span>&#160;</div><div class="line"><a name="l00346"></a><span class="lineno"> 346</span>&#160; <span class="keywordtype">string</span> logbooks = <a class="code" href="pearl-elog_8ipf.html#a356bebea8eb41c9ac3ea2148af22707f">list_logbooks</a>()</div><div class="line"><a name="l00347"></a><span class="lineno"> 347</span>&#160; <span class="keywordtype">string</span> logbook</div><div class="line"><a name="l00348"></a><span class="lineno"> 348</span>&#160; variable nlb = ItemsInList(logbooks)</div><div class="line"><a name="l00349"></a><span class="lineno"> 349</span>&#160; variable ilb</div><div class="line"><a name="l00350"></a><span class="lineno"> 350</span>&#160; </div><div class="line"><a name="l00351"></a><span class="lineno"> 351</span>&#160; SetDataFolder df_volatile_root</div><div class="line"><a name="l00352"></a><span class="lineno"> 352</span>&#160; if (exists(&quot;temp_graph_files&quot;) != 2)</div><div class="line"><a name="l00353"></a><span class="lineno"> 353</span>&#160; <span class="keywordtype">string</span> /g temp_graph_files = &quot;&quot;</div><div class="line"><a name="l00354"></a><span class="lineno"> 354</span>&#160; endif</div><div class="line"><a name="l00355"></a><span class="lineno"> 355</span>&#160;</div><div class="line"><a name="l00356"></a><span class="lineno"> 356</span>&#160; for (ilb = 0; ilb &lt; nlb; ilb += 1)</div><div class="line"><a name="l00357"></a><span class="lineno"> 357</span>&#160; logbook = StringFromList(ilb, logbooks)</div><div class="line"><a name="l00358"></a><span class="lineno"> 358</span>&#160; </div><div class="line"><a name="l00359"></a><span class="lineno"> 359</span>&#160; SetDataFolder df_volatile_parent</div><div class="line"><a name="l00360"></a><span class="lineno"> 360</span>&#160; if (DataFolderExists(logbook))</div><div class="line"><a name="l00361"></a><span class="lineno"> 361</span>&#160; SetDataFolder $logbook</div><div class="line"><a name="l00362"></a><span class="lineno"> 362</span>&#160; else</div><div class="line"><a name="l00363"></a><span class="lineno"> 363</span>&#160; NewDataFolder /o/s $logbook</div><div class="line"><a name="l00364"></a><span class="lineno"> 364</span>&#160; endif</div><div class="line"><a name="l00365"></a><span class="lineno"> 365</span>&#160; </div><div class="line"><a name="l00366"></a><span class="lineno"> 366</span>&#160; if (exists(&quot;username&quot;) != 2)</div><div class="line"><a name="l00367"></a><span class="lineno"> 367</span>&#160; <span class="keywordtype">string</span> /g username = &quot;&quot;</div><div class="line"><a name="l00368"></a><span class="lineno"> 368</span>&#160; endif</div><div class="line"><a name="l00369"></a><span class="lineno"> 369</span>&#160; if (exists(&quot;password&quot;) != 2)</div><div class="line"><a name="l00370"></a><span class="lineno"> 370</span>&#160; <span class="keywordtype">string</span> /g password = &quot;&quot;</div><div class="line"><a name="l00371"></a><span class="lineno"> 371</span>&#160; endif</div><div class="line"><a name="l00372"></a><span class="lineno"> 372</span>&#160; if (exists(&quot;msg_id&quot;) != 2)</div><div class="line"><a name="l00373"></a><span class="lineno"> 373</span>&#160; variable /g msg_id = 0</div><div class="line"><a name="l00374"></a><span class="lineno"> 374</span>&#160; endif</div><div class="line"><a name="l00375"></a><span class="lineno"> 375</span>&#160; if (exists(&quot;att_list&quot;) != 1)</div><div class="line"><a name="l00376"></a><span class="lineno"> 376</span>&#160; make /n=(0,3) /t /o attach_list</div><div class="line"><a name="l00377"></a><span class="lineno"> 377</span>&#160; make /n=(0,3) /i /o attach_sel</div><div class="line"><a name="l00378"></a><span class="lineno"> 378</span>&#160; endif</div><div class="line"><a name="l00379"></a><span class="lineno"> 379</span>&#160; if (exists(&quot;url&quot;) != 2)</div><div class="line"><a name="l00380"></a><span class="lineno"> 380</span>&#160; <span class="keywordtype">string</span> /g url = &quot;&quot;</div><div class="line"><a name="l00381"></a><span class="lineno"> 381</span>&#160; endif</div><div class="line"><a name="l00382"></a><span class="lineno"> 382</span>&#160; endfor</div><div class="line"><a name="l00383"></a><span class="lineno"> 383</span>&#160; </div><div class="line"><a name="l00384"></a><span class="lineno"> 384</span>&#160; SetDataFolder savedf</div><div class="line"><a name="l00385"></a><span class="lineno"> 385</span>&#160; return 0</div><div class="line"><a name="l00386"></a><span class="lineno"> 386</span>&#160;end</div><div class="line"><a name="l00387"></a><span class="lineno"> 387</span>&#160;</div><div class="line"><a name="l00401"></a><span class="lineno"> 401</span>&#160;</div><div class="line"><a name="l00414"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#ab6d97edbf33e8ec039b34ff756e7ab93"> 414</a></span>&#160;function <a class="code" href="pearl-elog_8ipf.html#ab6d97edbf33e8ec039b34ff756e7ab93">elog_create_logbook</a>(name, [template])</div><div class="line"><a name="l00415"></a><span class="lineno"> 415</span>&#160; <span class="keywordtype">string</span> name</div><div class="line"><a name="l00416"></a><span class="lineno"> 416</span>&#160; <span class="keywordtype">string</span> template</div><div class="line"><a name="l00417"></a><span class="lineno"> 417</span>&#160;</div><div class="line"><a name="l00418"></a><span class="lineno"> 418</span>&#160; if (ParamIsDefault(template))</div><div class="line"><a name="l00419"></a><span class="lineno"> 419</span>&#160; template = &quot;&quot;</div><div class="line"><a name="l00420"></a><span class="lineno"> 420</span>&#160; endif</div><div class="line"><a name="l00421"></a><span class="lineno"> 421</span>&#160;</div><div class="line"><a name="l00422"></a><span class="lineno"> 422</span>&#160; dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l00423"></a><span class="lineno"> 423</span>&#160; dfref df_root = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#af34e46263aa50843f98f755988f9ab5c">kdfRoot</a>)</div><div class="line"><a name="l00424"></a><span class="lineno"> 424</span>&#160; dfref df_persistent_root = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l00425"></a><span class="lineno"> 425</span>&#160; dfref df_persistent_parent = df_persistent_root:logbooks</div><div class="line"><a name="l00426"></a><span class="lineno"> 426</span>&#160; dfref df_volatile_root = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>)</div><div class="line"><a name="l00427"></a><span class="lineno"> 427</span>&#160; dfref df_volatile_parent = df_volatile_root:logbooks</div><div class="line"><a name="l00428"></a><span class="lineno"> 428</span>&#160;</div><div class="line"><a name="l00429"></a><span class="lineno"> 429</span>&#160; setdatafolder df_persistent_parent</div><div class="line"><a name="l00430"></a><span class="lineno"> 430</span>&#160; if (CheckName(name, 11) != 0)</div><div class="line"><a name="l00431"></a><span class="lineno"> 431</span>&#160; setdatafolder savedf</div><div class="line"><a name="l00432"></a><span class="lineno"> 432</span>&#160; Abort &quot;invalid logbook name&quot;</div><div class="line"><a name="l00433"></a><span class="lineno"> 433</span>&#160; return -1</div><div class="line"><a name="l00434"></a><span class="lineno"> 434</span>&#160; endif</div><div class="line"><a name="l00435"></a><span class="lineno"> 435</span>&#160; </div><div class="line"><a name="l00436"></a><span class="lineno"> 436</span>&#160; if (strlen(template) &gt; 0)</div><div class="line"><a name="l00437"></a><span class="lineno"> 437</span>&#160; dfref df_template = get_elog_df(template, <a class="code" href="pearl-elog_8ipf.html#a28eb44739e7d5c7f9899a69afa231b8e">kdfTemplates</a>)</div><div class="line"><a name="l00438"></a><span class="lineno"> 438</span>&#160; dfref df_existing = get_elog_df(name, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l00439"></a><span class="lineno"> 439</span>&#160; if (DataFolderRefStatus(df_existing))</div><div class="line"><a name="l00440"></a><span class="lineno"> 440</span>&#160; KillDataFolder /Z df_existing</div><div class="line"><a name="l00441"></a><span class="lineno"> 441</span>&#160; endif</div><div class="line"><a name="l00442"></a><span class="lineno"> 442</span>&#160; DuplicateDataFolder df_template, df_persistent_parent:$name</div><div class="line"><a name="l00443"></a><span class="lineno"> 443</span>&#160; else</div><div class="line"><a name="l00444"></a><span class="lineno"> 444</span>&#160; NewDataFolder /o/s df_persistent_parent:$name</div><div class="line"><a name="l00445"></a><span class="lineno"> 445</span>&#160; </div><div class="line"><a name="l00446"></a><span class="lineno"> 446</span>&#160; <span class="comment">// ELOG logbook name</span></div><div class="line"><a name="l00447"></a><span class="lineno"> 447</span>&#160; <span class="keywordtype">string</span> /g logbook = name</div><div class="line"><a name="l00448"></a><span class="lineno"> 448</span>&#160; <span class="comment">// attributes (persistent)</span></div><div class="line"><a name="l00449"></a><span class="lineno"> 449</span>&#160; <span class="comment">// available attributes</span></div><div class="line"><a name="l00450"></a><span class="lineno"> 450</span>&#160; <span class="keywordtype">string</span> /g attributes = &quot;&quot;</div><div class="line"><a name="l00451"></a><span class="lineno"> 451</span>&#160; <span class="comment">// controls corresponding to attributes</span></div><div class="line"><a name="l00452"></a><span class="lineno"> 452</span>&#160; <span class="comment">// prefix determines the control type: sv_ = setvariable (string), pm_ = popup menu, cb = check box</span></div><div class="line"><a name="l00453"></a><span class="lineno"> 453</span>&#160; <span class="keywordtype">string</span> /g controls = &quot;&quot;</div><div class="line"><a name="l00454"></a><span class="lineno"> 454</span>&#160; <span class="comment">// attributes with fixed options, value item declares the options string</span></div><div class="line"><a name="l00455"></a><span class="lineno"> 455</span>&#160; <span class="keywordtype">string</span> /g options = &quot;&quot;</div><div class="line"><a name="l00456"></a><span class="lineno"> 456</span>&#160; <span class="comment">// attributes which must be defined</span></div><div class="line"><a name="l00457"></a><span class="lineno"> 457</span>&#160; <span class="keywordtype">string</span> /g required_attributes = &quot;&quot;</div><div class="line"><a name="l00458"></a><span class="lineno"> 458</span>&#160; endif</div><div class="line"><a name="l00459"></a><span class="lineno"> 459</span>&#160;</div><div class="line"><a name="l00460"></a><span class="lineno"> 460</span>&#160; <span class="comment">// usage data (persistent)</span></div><div class="line"><a name="l00461"></a><span class="lineno"> 461</span>&#160; setdatafolder get_elog_df(name, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l00462"></a><span class="lineno"> 462</span>&#160; <span class="keywordtype">string</span> /g recent = &quot;&quot;</div><div class="line"><a name="l00463"></a><span class="lineno"> 463</span>&#160; <span class="keywordtype">string</span> /g recent_message = &quot;&quot;</div><div class="line"><a name="l00464"></a><span class="lineno"> 464</span>&#160;</div><div class="line"><a name="l00465"></a><span class="lineno"> 465</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a85cf9d39ea917860b463b1b4111705f2">init_volatile_vars</a>()</div><div class="line"><a name="l00466"></a><span class="lineno"> 466</span>&#160; </div><div class="line"><a name="l00467"></a><span class="lineno"> 467</span>&#160; setdatafolder savedf</div><div class="line"><a name="l00468"></a><span class="lineno"> 468</span>&#160; return 0</div><div class="line"><a name="l00469"></a><span class="lineno"> 469</span>&#160;end</div><div class="line"><a name="l00470"></a><span class="lineno"> 470</span>&#160;</div><div class="line"><a name="l00473"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a424460442afd5f6f853e68cd665ed785"> 473</a></span>&#160;function <a class="code" href="pearl-elog_8ipf.html#a424460442afd5f6f853e68cd665ed785">elog_config</a>([elog_path, hostname, port, subdir])</div><div class="line"><a name="l00474"></a><span class="lineno"> 474</span>&#160; <span class="keywordtype">string</span> elog_path</div><div class="line"><a name="l00475"></a><span class="lineno"> 475</span>&#160; <span class="keywordtype">string</span> hostname</div><div class="line"><a name="l00476"></a><span class="lineno"> 476</span>&#160; variable port</div><div class="line"><a name="l00477"></a><span class="lineno"> 477</span>&#160; <span class="keywordtype">string</span> subdir</div><div class="line"><a name="l00478"></a><span class="lineno"> 478</span>&#160; </div><div class="line"><a name="l00479"></a><span class="lineno"> 479</span>&#160; dfref df = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l00480"></a><span class="lineno"> 480</span>&#160; </div><div class="line"><a name="l00481"></a><span class="lineno"> 481</span>&#160; if (!ParamIsDefault(elog_path))</div><div class="line"><a name="l00482"></a><span class="lineno"> 482</span>&#160; svar /sdfr=df g_elog_path = elog_path</div><div class="line"><a name="l00483"></a><span class="lineno"> 483</span>&#160; g_elog_path = elog_path</div><div class="line"><a name="l00484"></a><span class="lineno"> 484</span>&#160; endif</div><div class="line"><a name="l00485"></a><span class="lineno"> 485</span>&#160; if (!ParamIsDefault(hostname))</div><div class="line"><a name="l00486"></a><span class="lineno"> 486</span>&#160; svar /sdfr=df g_hostname = hostname</div><div class="line"><a name="l00487"></a><span class="lineno"> 487</span>&#160; g_hostname = hostname</div><div class="line"><a name="l00488"></a><span class="lineno"> 488</span>&#160; endif</div><div class="line"><a name="l00489"></a><span class="lineno"> 489</span>&#160; if (!ParamIsDefault(port))</div><div class="line"><a name="l00490"></a><span class="lineno"> 490</span>&#160; nvar /sdfr=df g_port = port</div><div class="line"><a name="l00491"></a><span class="lineno"> 491</span>&#160; g_port = port</div><div class="line"><a name="l00492"></a><span class="lineno"> 492</span>&#160; endif</div><div class="line"><a name="l00493"></a><span class="lineno"> 493</span>&#160; if (!ParamIsDefault(subdir))</div><div class="line"><a name="l00494"></a><span class="lineno"> 494</span>&#160; svar /sdfr=df g_subdir = subdir</div><div class="line"><a name="l00495"></a><span class="lineno"> 495</span>&#160; g_subdir = subdir</div><div class="line"><a name="l00496"></a><span class="lineno"> 496</span>&#160; endif</div><div class="line"><a name="l00497"></a><span class="lineno"> 497</span>&#160;end</div><div class="line"><a name="l00498"></a><span class="lineno"> 498</span>&#160;</div><div class="line"><a name="l00513"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a3eac4012891c2813e401aee2c1134763"> 513</a></span>&#160;function <a class="code" href="pearl-elog_8ipf.html#a3eac4012891c2813e401aee2c1134763">elog_login</a>(logbook, username, password)</div><div class="line"><a name="l00514"></a><span class="lineno"> 514</span>&#160; <span class="keywordtype">string</span> logbook</div><div class="line"><a name="l00515"></a><span class="lineno"> 515</span>&#160; <span class="keywordtype">string</span> username</div><div class="line"><a name="l00516"></a><span class="lineno"> 516</span>&#160; <span class="keywordtype">string</span> password</div><div class="line"><a name="l00517"></a><span class="lineno"> 517</span>&#160;</div><div class="line"><a name="l00518"></a><span class="lineno"> 518</span>&#160; dfref df = get_elog_df(logbook, <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>)</div><div class="line"><a name="l00519"></a><span class="lineno"> 519</span>&#160; svar /sdfr=df g_username=username</div><div class="line"><a name="l00520"></a><span class="lineno"> 520</span>&#160; svar /sdfr=df g_password=password</div><div class="line"><a name="l00521"></a><span class="lineno"> 521</span>&#160; g_username = username</div><div class="line"><a name="l00522"></a><span class="lineno"> 522</span>&#160; g_password = password</div><div class="line"><a name="l00523"></a><span class="lineno"> 523</span>&#160;end</div><div class="line"><a name="l00524"></a><span class="lineno"> 524</span>&#160;</div><div class="line"><a name="l00533"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a96e4cbbdb0fd8c58d87b502dc1883664"> 533</a></span>&#160;function <a class="code" href="pearl-elog_8ipf.html#a96e4cbbdb0fd8c58d87b502dc1883664">elog_logout</a>(logbook)</div><div class="line"><a name="l00534"></a><span class="lineno"> 534</span>&#160; <span class="keywordtype">string</span> logbook</div><div class="line"><a name="l00535"></a><span class="lineno"> 535</span>&#160;</div><div class="line"><a name="l00536"></a><span class="lineno"> 536</span>&#160; dfref df = get_elog_df(logbook, <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>)</div><div class="line"><a name="l00537"></a><span class="lineno"> 537</span>&#160; if (strlen(logbook) &gt; 0)</div><div class="line"><a name="l00538"></a><span class="lineno"> 538</span>&#160; svar /z /sdfr=df g_username=username</div><div class="line"><a name="l00539"></a><span class="lineno"> 539</span>&#160; svar /z /sdfr=df g_password=password</div><div class="line"><a name="l00540"></a><span class="lineno"> 540</span>&#160; if (svar_exists(g_username))</div><div class="line"><a name="l00541"></a><span class="lineno"> 541</span>&#160; g_username = &quot;&quot;</div><div class="line"><a name="l00542"></a><span class="lineno"> 542</span>&#160; endif</div><div class="line"><a name="l00543"></a><span class="lineno"> 543</span>&#160; if (svar_exists(g_password))</div><div class="line"><a name="l00544"></a><span class="lineno"> 544</span>&#160; g_password = &quot;&quot;</div><div class="line"><a name="l00545"></a><span class="lineno"> 545</span>&#160; endif</div><div class="line"><a name="l00546"></a><span class="lineno"> 546</span>&#160; else</div><div class="line"><a name="l00547"></a><span class="lineno"> 547</span>&#160; dfref df2 = df:logbooks</div><div class="line"><a name="l00548"></a><span class="lineno"> 548</span>&#160; variable nlb = CountObjectsDFR(df2, 4)</div><div class="line"><a name="l00549"></a><span class="lineno"> 549</span>&#160; variable ilb</div><div class="line"><a name="l00550"></a><span class="lineno"> 550</span>&#160; <span class="keywordtype">string</span> slb</div><div class="line"><a name="l00551"></a><span class="lineno"> 551</span>&#160; for (ilb = 0; ilb &lt; nlb; ilb += 1)</div><div class="line"><a name="l00552"></a><span class="lineno"> 552</span>&#160; slb = GetIndexedObjNameDFR(df2, 4, ilb)</div><div class="line"><a name="l00553"></a><span class="lineno"> 553</span>&#160; if (strlen(slb) &gt; 0)</div><div class="line"><a name="l00554"></a><span class="lineno"> 554</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a96e4cbbdb0fd8c58d87b502dc1883664">elog_logout</a>(slb)</div><div class="line"><a name="l00555"></a><span class="lineno"> 555</span>&#160; endif</div><div class="line"><a name="l00556"></a><span class="lineno"> 556</span>&#160; endfor</div><div class="line"><a name="l00557"></a><span class="lineno"> 557</span>&#160; endif</div><div class="line"><a name="l00558"></a><span class="lineno"> 558</span>&#160;end</div><div class="line"><a name="l00559"></a><span class="lineno"> 559</span>&#160;</div><div class="line"><a name="l00564"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#ac729557a307bddd2f2ad298199976c01"> 564</a></span>&#160;static function <a class="code" href="pearl-elog_8ipf.html#ac729557a307bddd2f2ad298199976c01">save_prefs</a>()</div><div class="line"><a name="l00565"></a><span class="lineno"> 565</span>&#160; dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00566"></a><span class="lineno"> 566</span>&#160;</div><div class="line"><a name="l00567"></a><span class="lineno"> 567</span>&#160; dfref df = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l00568"></a><span class="lineno"> 568</span>&#160; if (DataFolderRefStatus(df) == 1)</div><div class="line"><a name="l00569"></a><span class="lineno"> 569</span>&#160; <span class="keywordtype">string</span> fullPath = SpecialDirPath(&quot;Packages&quot;, 0, 0, 0)</div><div class="line"><a name="l00570"></a><span class="lineno"> 570</span>&#160; fullPath += <a class="code" href="pearl-elog_8ipf.html#aca457d1f4414d20a911254b1de13ebbb">package_name</a></div><div class="line"><a name="l00571"></a><span class="lineno"> 571</span>&#160; NewPath/O/C/Q tempPackagePrefsPath, fullPath</div><div class="line"><a name="l00572"></a><span class="lineno"> 572</span>&#160; fullPath += &quot;:preferences.pxp&quot;</div><div class="line"><a name="l00573"></a><span class="lineno"> 573</span>&#160; SetDataFolder df</div><div class="line"><a name="l00574"></a><span class="lineno"> 574</span>&#160; SaveData /O /Q /R fullPath</div><div class="line"><a name="l00575"></a><span class="lineno"> 575</span>&#160; KillPath/Z tempPackagePrefsPath</div><div class="line"><a name="l00576"></a><span class="lineno"> 576</span>&#160; endif</div><div class="line"><a name="l00577"></a><span class="lineno"> 577</span>&#160; </div><div class="line"><a name="l00578"></a><span class="lineno"> 578</span>&#160; SetDataFolder saveDF</div><div class="line"><a name="l00579"></a><span class="lineno"> 579</span>&#160;end</div><div class="line"><a name="l00580"></a><span class="lineno"> 580</span>&#160;</div><div class="line"><a name="l00584"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a92c27964d49ab8bcd7afc858ebe214a3"> 584</a></span>&#160;static function <a class="code" href="pearl-elog_8ipf.html#a92c27964d49ab8bcd7afc858ebe214a3">load_prefs</a>()</div><div class="line"><a name="l00585"></a><span class="lineno"> 585</span>&#160; dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00586"></a><span class="lineno"> 586</span>&#160;</div><div class="line"><a name="l00587"></a><span class="lineno"> 587</span>&#160; variable result = -1</div><div class="line"><a name="l00588"></a><span class="lineno"> 588</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a7a4572f4f861f7eb46c932508d1164f9">init_package</a>()</div><div class="line"><a name="l00589"></a><span class="lineno"> 589</span>&#160; setdatafolder get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l00590"></a><span class="lineno"> 590</span>&#160; </div><div class="line"><a name="l00591"></a><span class="lineno"> 591</span>&#160; <span class="keywordtype">string</span> fullPath = SpecialDirPath(&quot;Packages&quot;, 0, 0, 0)</div><div class="line"><a name="l00592"></a><span class="lineno"> 592</span>&#160; fullPath += <a class="code" href="pearl-elog_8ipf.html#aca457d1f4414d20a911254b1de13ebbb">package_name</a></div><div class="line"><a name="l00593"></a><span class="lineno"> 593</span>&#160;</div><div class="line"><a name="l00594"></a><span class="lineno"> 594</span>&#160; GetFileFolderInfo /Q /Z fullPath</div><div class="line"><a name="l00595"></a><span class="lineno"> 595</span>&#160; if (V_Flag == 0) <span class="comment">// Disk directory exists?</span></div><div class="line"><a name="l00596"></a><span class="lineno"> 596</span>&#160; fullPath += &quot;:preferences.pxp&quot;</div><div class="line"><a name="l00597"></a><span class="lineno"> 597</span>&#160; GetFileFolderInfo /Q /Z fullPath</div><div class="line"><a name="l00598"></a><span class="lineno"> 598</span>&#160; if (V_Flag == 0) <span class="comment">// Preference file exist?</span></div><div class="line"><a name="l00599"></a><span class="lineno"> 599</span>&#160; LoadData /O /R /Q fullPath</div><div class="line"><a name="l00600"></a><span class="lineno"> 600</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a85cf9d39ea917860b463b1b4111705f2">init_volatile_vars</a>()</div><div class="line"><a name="l00601"></a><span class="lineno"> 601</span>&#160; result = 0</div><div class="line"><a name="l00602"></a><span class="lineno"> 602</span>&#160; endif</div><div class="line"><a name="l00603"></a><span class="lineno"> 603</span>&#160; endif</div><div class="line"><a name="l00604"></a><span class="lineno"> 604</span>&#160; </div><div class="line"><a name="l00605"></a><span class="lineno"> 605</span>&#160; SetDataFolder saveDF</div><div class="line"><a name="l00606"></a><span class="lineno"> 606</span>&#160; return result</div><div class="line"><a name="l00607"></a><span class="lineno"> 607</span>&#160;end</div><div class="line"><a name="l00608"></a><span class="lineno"> 608</span>&#160;</div><div class="line"><a name="l00618"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a356bebea8eb41c9ac3ea2148af22707f"> 618</a></span>&#160;static function /s <a class="code" href="pearl-elog_8ipf.html#a356bebea8eb41c9ac3ea2148af22707f">list_logbooks</a>([templates])</div><div class="line"><a name="l00619"></a><span class="lineno"> 619</span>&#160; variable templates</div><div class="line"><a name="l00620"></a><span class="lineno"> 620</span>&#160; </div><div class="line"><a name="l00621"></a><span class="lineno"> 621</span>&#160; if (ParamIsDefault(templates))</div><div class="line"><a name="l00622"></a><span class="lineno"> 622</span>&#160; templates = 0</div><div class="line"><a name="l00623"></a><span class="lineno"> 623</span>&#160; endif</div><div class="line"><a name="l00624"></a><span class="lineno"> 624</span>&#160; </div><div class="line"><a name="l00625"></a><span class="lineno"> 625</span>&#160; dfref df_persistent = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l00626"></a><span class="lineno"> 626</span>&#160; if (templates)</div><div class="line"><a name="l00627"></a><span class="lineno"> 627</span>&#160; dfref df_logbooks = df_persistent:templates</div><div class="line"><a name="l00628"></a><span class="lineno"> 628</span>&#160; else</div><div class="line"><a name="l00629"></a><span class="lineno"> 629</span>&#160; dfref df_logbooks = df_persistent:logbooks</div><div class="line"><a name="l00630"></a><span class="lineno"> 630</span>&#160; endif</div><div class="line"><a name="l00631"></a><span class="lineno"> 631</span>&#160; <span class="keywordtype">string</span> logbooks = &quot;&quot;</div><div class="line"><a name="l00632"></a><span class="lineno"> 632</span>&#160; </div><div class="line"><a name="l00633"></a><span class="lineno"> 633</span>&#160; variable nlb = CountObjectsDFR(df_logbooks, 4)</div><div class="line"><a name="l00634"></a><span class="lineno"> 634</span>&#160; variable ilb</div><div class="line"><a name="l00635"></a><span class="lineno"> 635</span>&#160; <span class="keywordtype">string</span> slb</div><div class="line"><a name="l00636"></a><span class="lineno"> 636</span>&#160; for (ilb = 0; ilb &lt; nlb; ilb += 1)</div><div class="line"><a name="l00637"></a><span class="lineno"> 637</span>&#160; slb = GetIndexedObjNameDFR(df_logbooks, 4, ilb)</div><div class="line"><a name="l00638"></a><span class="lineno"> 638</span>&#160; if (strlen(slb) &gt; 0)</div><div class="line"><a name="l00639"></a><span class="lineno"> 639</span>&#160; logbooks = AddListItem(slb, logbooks)</div><div class="line"><a name="l00640"></a><span class="lineno"> 640</span>&#160; endif</div><div class="line"><a name="l00641"></a><span class="lineno"> 641</span>&#160; endfor</div><div class="line"><a name="l00642"></a><span class="lineno"> 642</span>&#160; </div><div class="line"><a name="l00643"></a><span class="lineno"> 643</span>&#160; return SortList(logbooks, &quot;;&quot;, 16)</div><div class="line"><a name="l00644"></a><span class="lineno"> 644</span>&#160;end</div><div class="line"><a name="l00645"></a><span class="lineno"> 645</span>&#160;</div><div class="line"><a name="l00653"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#ab2558ef5cd5e5dfba410bd58ed258b64"> 653</a></span>&#160;function <a class="code" href="pearl-elog_8ipf.html#ab2558ef5cd5e5dfba410bd58ed258b64">elog_validate_attributes</a>(logbook, attributes)</div><div class="line"><a name="l00654"></a><span class="lineno"> 654</span>&#160; </div><div class="line"><a name="l00655"></a><span class="lineno"> 655</span>&#160; <span class="keywordtype">string</span> logbook <span class="comment">// name of the logbook (as in igor folder name)</span></div><div class="line"><a name="l00656"></a><span class="lineno"> 656</span>&#160; <span class="keywordtype">string</span> attributes <span class="comment">// key=value list of attributes, semicolon separated</span></div><div class="line"><a name="l00657"></a><span class="lineno"> 657</span>&#160; </div><div class="line"><a name="l00658"></a><span class="lineno"> 658</span>&#160; variable result = 0</div><div class="line"><a name="l00659"></a><span class="lineno"> 659</span>&#160; return result</div><div class="line"><a name="l00660"></a><span class="lineno"> 660</span>&#160;end</div><div class="line"><a name="l00661"></a><span class="lineno"> 661</span>&#160;</div><div class="line"><a name="l00685"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a05301d497e4796e5fb5adde3728ba971"> 685</a></span>&#160;function <a class="code" href="pearl-elog_8ipf.html#a05301d497e4796e5fb5adde3728ba971">elog_create_entry</a>(logbook, attributes, message, [encoding, graphs, replyto])</div><div class="line"><a name="l00686"></a><span class="lineno"> 686</span>&#160; <span class="keywordtype">string</span> logbook</div><div class="line"><a name="l00687"></a><span class="lineno"> 687</span>&#160; <span class="keywordtype">string</span> attributes</div><div class="line"><a name="l00688"></a><span class="lineno"> 688</span>&#160; <span class="keywordtype">string</span> message</div><div class="line"><a name="l00689"></a><span class="lineno"> 689</span>&#160; variable encoding</div><div class="line"><a name="l00690"></a><span class="lineno"> 690</span>&#160; <span class="keywordtype">string</span> graphs</div><div class="line"><a name="l00691"></a><span class="lineno"> 691</span>&#160; variable replyto</div><div class="line"><a name="l00692"></a><span class="lineno"> 692</span>&#160; </div><div class="line"><a name="l00693"></a><span class="lineno"> 693</span>&#160; if (ParamIsDefault(encoding))</div><div class="line"><a name="l00694"></a><span class="lineno"> 694</span>&#160; encoding = 1</div><div class="line"><a name="l00695"></a><span class="lineno"> 695</span>&#160; endif</div><div class="line"><a name="l00696"></a><span class="lineno"> 696</span>&#160; if (ParamIsDefault(graphs))</div><div class="line"><a name="l00697"></a><span class="lineno"> 697</span>&#160; graphs = &quot;&quot;</div><div class="line"><a name="l00698"></a><span class="lineno"> 698</span>&#160; endif</div><div class="line"><a name="l00699"></a><span class="lineno"> 699</span>&#160; if (ParamIsDefault(replyto))</div><div class="line"><a name="l00700"></a><span class="lineno"> 700</span>&#160; replyto = 0</div><div class="line"><a name="l00701"></a><span class="lineno"> 701</span>&#160; endif</div><div class="line"><a name="l00702"></a><span class="lineno"> 702</span>&#160; </div><div class="line"><a name="l00703"></a><span class="lineno"> 703</span>&#160; dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l00704"></a><span class="lineno"> 704</span>&#160; dfref df_general = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l00705"></a><span class="lineno"> 705</span>&#160; dfref df_volatile = get_elog_df(logbook, <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>)</div><div class="line"><a name="l00706"></a><span class="lineno"> 706</span>&#160; </div><div class="line"><a name="l00707"></a><span class="lineno"> 707</span>&#160; variable result = 0</div><div class="line"><a name="l00708"></a><span class="lineno"> 708</span>&#160; nvar /sdfr=df_volatile msg_id</div><div class="line"><a name="l00709"></a><span class="lineno"> 709</span>&#160; nvar /sdfr=df_general loglevel</div><div class="line"><a name="l00710"></a><span class="lineno"> 710</span>&#160; </div><div class="line"><a name="l00711"></a><span class="lineno"> 711</span>&#160; if (<a class="code" href="pearl-elog_8ipf.html#ab2558ef5cd5e5dfba410bd58ed258b64">elog_validate_attributes</a>(logbook,attributes) != 0)</div><div class="line"><a name="l00712"></a><span class="lineno"> 712</span>&#160; if (loglevel &gt;= 2)</div><div class="line"><a name="l00713"></a><span class="lineno"> 713</span>&#160; print &quot;ELOG: failed to validate attributes.&quot;</div><div class="line"><a name="l00714"></a><span class="lineno"> 714</span>&#160; endif</div><div class="line"><a name="l00715"></a><span class="lineno"> 715</span>&#160; result = -3</div><div class="line"><a name="l00716"></a><span class="lineno"> 716</span>&#160; endif</div><div class="line"><a name="l00717"></a><span class="lineno"> 717</span>&#160;</div><div class="line"><a name="l00718"></a><span class="lineno"> 718</span>&#160; <span class="keywordtype">string</span> cmd = <a class="code" href="pearl-elog_8ipf.html#abd15431defaec6d770cc8cab2a40e6b0">prepare_command_line</a>(logbook)</div><div class="line"><a name="l00719"></a><span class="lineno"> 719</span>&#160; if (strlen(cmd) == 0)</div><div class="line"><a name="l00720"></a><span class="lineno"> 720</span>&#160; if (loglevel &gt;= 2)</div><div class="line"><a name="l00721"></a><span class="lineno"> 721</span>&#160; print &quot;ELOG: failed to prepare command line.&quot;</div><div class="line"><a name="l00722"></a><span class="lineno"> 722</span>&#160; endif</div><div class="line"><a name="l00723"></a><span class="lineno"> 723</span>&#160; result = -2</div><div class="line"><a name="l00724"></a><span class="lineno"> 724</span>&#160; endif</div><div class="line"><a name="l00725"></a><span class="lineno"> 725</span>&#160;</div><div class="line"><a name="l00726"></a><span class="lineno"> 726</span>&#160; if (replyto &gt;= 1)</div><div class="line"><a name="l00727"></a><span class="lineno"> 727</span>&#160; cmd += &quot; -r &quot; + num2str(replyto)</div><div class="line"><a name="l00728"></a><span class="lineno"> 728</span>&#160; endif</div><div class="line"><a name="l00729"></a><span class="lineno"> 729</span>&#160; cmd += &quot; -n &quot; + num2str(encoding)</div><div class="line"><a name="l00730"></a><span class="lineno"> 730</span>&#160;</div><div class="line"><a name="l00731"></a><span class="lineno"> 731</span>&#160; variable nattr = ItemsInList(attributes, &quot;;&quot;)</div><div class="line"><a name="l00732"></a><span class="lineno"> 732</span>&#160; variable iattr</div><div class="line"><a name="l00733"></a><span class="lineno"> 733</span>&#160; <span class="keywordtype">string</span> sattr</div><div class="line"><a name="l00734"></a><span class="lineno"> 734</span>&#160; for (iattr = 0; (iattr &lt; nattr) &amp;&amp; (result == 0); iattr += 1)</div><div class="line"><a name="l00735"></a><span class="lineno"> 735</span>&#160; sattr = StringFromList(iattr, attributes, &quot;;&quot;)</div><div class="line"><a name="l00736"></a><span class="lineno"> 736</span>&#160; if (strlen(StringFromList(1, sattr, &quot;=&quot;)) &gt; 0)</div><div class="line"><a name="l00737"></a><span class="lineno"> 737</span>&#160; sattr = ReplaceString(&quot;%&quot;, sattr, &quot;&quot;)</div><div class="line"><a name="l00738"></a><span class="lineno"> 738</span>&#160; cmd += &quot; -a \&quot;&quot; + sattr + &quot;\&quot;&quot;</div><div class="line"><a name="l00739"></a><span class="lineno"> 739</span>&#160; endif</div><div class="line"><a name="l00740"></a><span class="lineno"> 740</span>&#160; endfor</div><div class="line"><a name="l00741"></a><span class="lineno"> 741</span>&#160;</div><div class="line"><a name="l00742"></a><span class="lineno"> 742</span>&#160; if (result == 0)</div><div class="line"><a name="l00743"></a><span class="lineno"> 743</span>&#160; <span class="keywordtype">string</span> cmd_graphs = <a class="code" href="pearl-elog_8ipf.html#a4986de01085dc5481500240ef7667419">prepare_graph_attachments</a>(graphs)</div><div class="line"><a name="l00744"></a><span class="lineno"> 744</span>&#160; cmd += &quot; &quot; + cmd_graphs</div><div class="line"><a name="l00745"></a><span class="lineno"> 745</span>&#160; endif</div><div class="line"><a name="l00746"></a><span class="lineno"> 746</span>&#160; </div><div class="line"><a name="l00747"></a><span class="lineno"> 747</span>&#160; if ((result == 0) &amp;&amp; (strlen(message) &gt; 0))</div><div class="line"><a name="l00748"></a><span class="lineno"> 748</span>&#160; <span class="keywordtype">string</span> messagefile = <a class="code" href="pearl-elog_8ipf.html#af652f6f257be1ee749fe788d1b03f75f">create_message_file</a>(message)</div><div class="line"><a name="l00749"></a><span class="lineno"> 749</span>&#160; if (strlen(messagefile) &gt; 0)</div><div class="line"><a name="l00750"></a><span class="lineno"> 750</span>&#160; cmd += &quot; -m \&quot;&quot; + messagefile + &quot;\&quot;&quot;</div><div class="line"><a name="l00751"></a><span class="lineno"> 751</span>&#160; cmd += &quot; &gt; elog.log&quot;</div><div class="line"><a name="l00752"></a><span class="lineno"> 752</span>&#160; if (loglevel &gt;= 5)</div><div class="line"><a name="l00753"></a><span class="lineno"> 753</span>&#160; print cmd</div><div class="line"><a name="l00754"></a><span class="lineno"> 754</span>&#160; endif</div><div class="line"><a name="l00755"></a><span class="lineno"> 755</span>&#160; <span class="keywordtype">string</span> cmd_file_path = <a class="code" href="pearl-elog_8ipf.html#ac8b61eefed231018cc36d47e95bd8c22">create_cmd_file</a>(cmd)</div><div class="line"><a name="l00756"></a><span class="lineno"> 756</span>&#160; if (strlen(cmd_file_path) &gt; 0)</div><div class="line"><a name="l00757"></a><span class="lineno"> 757</span>&#160; ExecuteScriptText cmd_file_path</div><div class="line"><a name="l00758"></a><span class="lineno"> 758</span>&#160; variable <span class="keywordtype">id</span> = <a class="code" href="pearl-elog_8ipf.html#a5306514bf7d1a582aec146256ae45a12">parse_result</a>()</div><div class="line"><a name="l00759"></a><span class="lineno"> 759</span>&#160; if (<span class="keywordtype">id</span> &gt; 0)</div><div class="line"><a name="l00760"></a><span class="lineno"> 760</span>&#160; msg_id = <span class="keywordtype">id</span></div><div class="line"><a name="l00761"></a><span class="lineno"> 761</span>&#160; if (loglevel &gt;= 4)</div><div class="line"><a name="l00762"></a><span class="lineno"> 762</span>&#160; print &quot;ELOG: sent message &quot; + num2str(<span class="keywordtype">id</span>)</div><div class="line"><a name="l00763"></a><span class="lineno"> 763</span>&#160; endif</div><div class="line"><a name="l00764"></a><span class="lineno"> 764</span>&#160; else</div><div class="line"><a name="l00765"></a><span class="lineno"> 765</span>&#160; if (loglevel &gt;= 2)</div><div class="line"><a name="l00766"></a><span class="lineno"> 766</span>&#160; print &quot;ELOG: sending message failed.&quot;</div><div class="line"><a name="l00767"></a><span class="lineno"> 767</span>&#160; endif</div><div class="line"><a name="l00768"></a><span class="lineno"> 768</span>&#160; result = -4</div><div class="line"><a name="l00769"></a><span class="lineno"> 769</span>&#160; endif</div><div class="line"><a name="l00770"></a><span class="lineno"> 770</span>&#160; else</div><div class="line"><a name="l00771"></a><span class="lineno"> 771</span>&#160; result = -2</div><div class="line"><a name="l00772"></a><span class="lineno"> 772</span>&#160; endif</div><div class="line"><a name="l00773"></a><span class="lineno"> 773</span>&#160; else</div><div class="line"><a name="l00774"></a><span class="lineno"> 774</span>&#160; if (loglevel &gt;= 2)</div><div class="line"><a name="l00775"></a><span class="lineno"> 775</span>&#160; print &quot;ELOG: failed to create temporary message file.&quot;</div><div class="line"><a name="l00776"></a><span class="lineno"> 776</span>&#160; endif</div><div class="line"><a name="l00777"></a><span class="lineno"> 777</span>&#160; result = -1</div><div class="line"><a name="l00778"></a><span class="lineno"> 778</span>&#160; endif</div><div class="line"><a name="l00779"></a><span class="lineno"> 779</span>&#160; endif</div><div class="line"><a name="l00780"></a><span class="lineno"> 780</span>&#160; </div><div class="line"><a name="l00781"></a><span class="lineno"> 781</span>&#160; setdatafolder savedf</div><div class="line"><a name="l00782"></a><span class="lineno"> 782</span>&#160; return result</div><div class="line"><a name="l00783"></a><span class="lineno"> 783</span>&#160;end</div><div class="line"><a name="l00784"></a><span class="lineno"> 784</span>&#160;</div><div class="line"><a name="l00792"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#ac2f76abed8cfaa7ac02a46c0b89004f0"> 792</a></span>&#160;function <a class="code" href="pearl-elog_8ipf.html#ac2f76abed8cfaa7ac02a46c0b89004f0">elog_add_attachment</a>(logbook, <span class="keywordtype">id</span>, graphs)</div><div class="line"><a name="l00793"></a><span class="lineno"> 793</span>&#160; <span class="keywordtype">string</span> logbook</div><div class="line"><a name="l00794"></a><span class="lineno"> 794</span>&#160; variable <span class="keywordtype">id</span> <span class="comment">// existing entry ID</span></div><div class="line"><a name="l00795"></a><span class="lineno"> 795</span>&#160; <span class="keywordtype">string</span> graphs <span class="comment">// names of graph windows to be added as attachments, semicolon separated</span></div><div class="line"><a name="l00796"></a><span class="lineno"> 796</span>&#160; </div><div class="line"><a name="l00797"></a><span class="lineno"> 797</span>&#160; dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l00798"></a><span class="lineno"> 798</span>&#160; dfref df_general = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l00799"></a><span class="lineno"> 799</span>&#160; dfref df_volatile = get_elog_df(logbook, <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>)</div><div class="line"><a name="l00800"></a><span class="lineno"> 800</span>&#160; </div><div class="line"><a name="l00801"></a><span class="lineno"> 801</span>&#160; variable result = 0</div><div class="line"><a name="l00802"></a><span class="lineno"> 802</span>&#160; nvar /sdfr=df_volatile msg_id</div><div class="line"><a name="l00803"></a><span class="lineno"> 803</span>&#160; nvar /sdfr=df_general loglevel</div><div class="line"><a name="l00804"></a><span class="lineno"> 804</span>&#160; </div><div class="line"><a name="l00805"></a><span class="lineno"> 805</span>&#160; <span class="keywordtype">string</span> cmd = <a class="code" href="pearl-elog_8ipf.html#abd15431defaec6d770cc8cab2a40e6b0">prepare_command_line</a>(logbook)</div><div class="line"><a name="l00806"></a><span class="lineno"> 806</span>&#160; if (strlen(cmd) == 0)</div><div class="line"><a name="l00807"></a><span class="lineno"> 807</span>&#160; result = -2 <span class="comment">// error: invalid/missing command line</span></div><div class="line"><a name="l00808"></a><span class="lineno"> 808</span>&#160; endif</div><div class="line"><a name="l00809"></a><span class="lineno"> 809</span>&#160;</div><div class="line"><a name="l00810"></a><span class="lineno"> 810</span>&#160; cmd += &quot; -e &quot; + num2str(<span class="keywordtype">id</span>)</div><div class="line"><a name="l00811"></a><span class="lineno"> 811</span>&#160;</div><div class="line"><a name="l00812"></a><span class="lineno"> 812</span>&#160; if (result == 0)</div><div class="line"><a name="l00813"></a><span class="lineno"> 813</span>&#160; <span class="keywordtype">string</span> cmd_graphs = <a class="code" href="pearl-elog_8ipf.html#a4986de01085dc5481500240ef7667419">prepare_graph_attachments</a>(graphs)</div><div class="line"><a name="l00814"></a><span class="lineno"> 814</span>&#160; if (strlen(cmd_graphs) == 0)</div><div class="line"><a name="l00815"></a><span class="lineno"> 815</span>&#160; result = -3 <span class="comment">// error: invalid/missing graphs</span></div><div class="line"><a name="l00816"></a><span class="lineno"> 816</span>&#160; endif</div><div class="line"><a name="l00817"></a><span class="lineno"> 817</span>&#160; endif</div><div class="line"><a name="l00818"></a><span class="lineno"> 818</span>&#160; </div><div class="line"><a name="l00819"></a><span class="lineno"> 819</span>&#160; if (result == 0)</div><div class="line"><a name="l00820"></a><span class="lineno"> 820</span>&#160; cmd += &quot; &quot; + cmd_graphs</div><div class="line"><a name="l00821"></a><span class="lineno"> 821</span>&#160; cmd += &quot; &gt; elog.log&quot;</div><div class="line"><a name="l00822"></a><span class="lineno"> 822</span>&#160; <span class="keywordtype">string</span> cmd_file_path = <a class="code" href="pearl-elog_8ipf.html#ac8b61eefed231018cc36d47e95bd8c22">create_cmd_file</a>(cmd)</div><div class="line"><a name="l00823"></a><span class="lineno"> 823</span>&#160; if (strlen(cmd_file_path) &gt; 0)</div><div class="line"><a name="l00824"></a><span class="lineno"> 824</span>&#160; ExecuteScriptText cmd_file_path</div><div class="line"><a name="l00825"></a><span class="lineno"> 825</span>&#160; <span class="keywordtype">id</span> = <a class="code" href="pearl-elog_8ipf.html#a5306514bf7d1a582aec146256ae45a12">parse_result</a>()</div><div class="line"><a name="l00826"></a><span class="lineno"> 826</span>&#160; if (<span class="keywordtype">id</span> &gt; 0)</div><div class="line"><a name="l00827"></a><span class="lineno"> 827</span>&#160; msg_id = <span class="keywordtype">id</span></div><div class="line"><a name="l00828"></a><span class="lineno"> 828</span>&#160; if (loglevel &gt;= 4)</div><div class="line"><a name="l00829"></a><span class="lineno"> 829</span>&#160; print &quot;ELOG: attached graphs to message &quot; + num2str(<span class="keywordtype">id</span>)</div><div class="line"><a name="l00830"></a><span class="lineno"> 830</span>&#160; endif</div><div class="line"><a name="l00831"></a><span class="lineno"> 831</span>&#160; else</div><div class="line"><a name="l00832"></a><span class="lineno"> 832</span>&#160; if (loglevel &gt;= 2)</div><div class="line"><a name="l00833"></a><span class="lineno"> 833</span>&#160; print &quot;ELOG: failed to attach graphs.&quot;</div><div class="line"><a name="l00834"></a><span class="lineno"> 834</span>&#160; endif</div><div class="line"><a name="l00835"></a><span class="lineno"> 835</span>&#160; result = -4 <span class="comment">// error: elog returned error</span></div><div class="line"><a name="l00836"></a><span class="lineno"> 836</span>&#160; endif</div><div class="line"><a name="l00837"></a><span class="lineno"> 837</span>&#160; else</div><div class="line"><a name="l00838"></a><span class="lineno"> 838</span>&#160; result = -2 <span class="comment">// error: invalid command line</span></div><div class="line"><a name="l00839"></a><span class="lineno"> 839</span>&#160; endif</div><div class="line"><a name="l00840"></a><span class="lineno"> 840</span>&#160; endif</div><div class="line"><a name="l00841"></a><span class="lineno"> 841</span>&#160; </div><div class="line"><a name="l00842"></a><span class="lineno"> 842</span>&#160; setdatafolder savedf</div><div class="line"><a name="l00843"></a><span class="lineno"> 843</span>&#160; return result</div><div class="line"><a name="l00844"></a><span class="lineno"> 844</span>&#160;end</div><div class="line"><a name="l00845"></a><span class="lineno"> 845</span>&#160;</div><div class="line"><a name="l00853"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#abd15431defaec6d770cc8cab2a40e6b0"> 853</a></span>&#160;static function /s <a class="code" href="pearl-elog_8ipf.html#abd15431defaec6d770cc8cab2a40e6b0">prepare_command_line</a>(logbook)</div><div class="line"><a name="l00854"></a><span class="lineno"> 854</span>&#160; <span class="keywordtype">string</span> logbook</div><div class="line"><a name="l00855"></a><span class="lineno"> 855</span>&#160; </div><div class="line"><a name="l00856"></a><span class="lineno"> 856</span>&#160; dfref df_general = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l00857"></a><span class="lineno"> 857</span>&#160; dfref df_persistent = get_elog_df(logbook, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l00858"></a><span class="lineno"> 858</span>&#160; dfref df_volatile = get_elog_df(logbook, <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>)</div><div class="line"><a name="l00859"></a><span class="lineno"> 859</span>&#160; </div><div class="line"><a name="l00860"></a><span class="lineno"> 860</span>&#160; svar /sdfr=df_general elog_path</div><div class="line"><a name="l00861"></a><span class="lineno"> 861</span>&#160; svar /sdfr=df_general hostname</div><div class="line"><a name="l00862"></a><span class="lineno"> 862</span>&#160; nvar /sdfr=df_general port</div><div class="line"><a name="l00863"></a><span class="lineno"> 863</span>&#160; nvar /sdfr=df_general ssl</div><div class="line"><a name="l00864"></a><span class="lineno"> 864</span>&#160; svar /sdfr=df_general subdir</div><div class="line"><a name="l00865"></a><span class="lineno"> 865</span>&#160; nvar /sdfr=df_general loglevel</div><div class="line"><a name="l00866"></a><span class="lineno"> 866</span>&#160; svar /sdfr=df_volatile username</div><div class="line"><a name="l00867"></a><span class="lineno"> 867</span>&#160; svar /sdfr=df_volatile password</div><div class="line"><a name="l00868"></a><span class="lineno"> 868</span>&#160;</div><div class="line"><a name="l00869"></a><span class="lineno"> 869</span>&#160; <span class="keywordtype">string</span> cmd</div><div class="line"><a name="l00870"></a><span class="lineno"> 870</span>&#160; cmd = &quot;\&quot;&quot; + elog_path + &quot;\&quot;&quot;</div><div class="line"><a name="l00871"></a><span class="lineno"> 871</span>&#160; if (loglevel &gt;= 5)</div><div class="line"><a name="l00872"></a><span class="lineno"> 872</span>&#160; cmd += &quot; -v&quot;</div><div class="line"><a name="l00873"></a><span class="lineno"> 873</span>&#160; endif</div><div class="line"><a name="l00874"></a><span class="lineno"> 874</span>&#160; cmd += &quot; -h &quot; + hostname</div><div class="line"><a name="l00875"></a><span class="lineno"> 875</span>&#160; if ((nvar_exists(port)) &amp;&amp; (port &gt; 0))</div><div class="line"><a name="l00876"></a><span class="lineno"> 876</span>&#160; cmd += &quot; -p &quot; + num2str(port)</div><div class="line"><a name="l00877"></a><span class="lineno"> 877</span>&#160; endif</div><div class="line"><a name="l00878"></a><span class="lineno"> 878</span>&#160; if ((svar_exists(subdir)) &amp;&amp; (strlen(subdir) &gt; 0))</div><div class="line"><a name="l00879"></a><span class="lineno"> 879</span>&#160; cmd += &quot; -d &quot; + subdir</div><div class="line"><a name="l00880"></a><span class="lineno"> 880</span>&#160; endif</div><div class="line"><a name="l00881"></a><span class="lineno"> 881</span>&#160; cmd += &quot; -l \&quot;&quot; + logbook + &quot;\&quot;&quot;</div><div class="line"><a name="l00882"></a><span class="lineno"> 882</span>&#160; if ((nvar_exists(ssl)) &amp;&amp; (ssl != 0))</div><div class="line"><a name="l00883"></a><span class="lineno"> 883</span>&#160; cmd += &quot; -s&quot;</div><div class="line"><a name="l00884"></a><span class="lineno"> 884</span>&#160; endif</div><div class="line"><a name="l00885"></a><span class="lineno"> 885</span>&#160; <span class="comment">//cmd += &quot; -w &quot; + password</span></div><div class="line"><a name="l00886"></a><span class="lineno"> 886</span>&#160; if (svar_exists(username) &amp;&amp; svar_exists(password) &amp;&amp; (strlen(username) &gt; 0) &amp;&amp; (strlen(password) &gt; 0))</div><div class="line"><a name="l00887"></a><span class="lineno"> 887</span>&#160; cmd += &quot; -u &quot; + username + &quot; &quot; + password</div><div class="line"><a name="l00888"></a><span class="lineno"> 888</span>&#160; endif</div><div class="line"><a name="l00889"></a><span class="lineno"> 889</span>&#160; </div><div class="line"><a name="l00890"></a><span class="lineno"> 890</span>&#160; if (loglevel &gt;= 5)</div><div class="line"><a name="l00891"></a><span class="lineno"> 891</span>&#160; print cmd</div><div class="line"><a name="l00892"></a><span class="lineno"> 892</span>&#160; endif</div><div class="line"><a name="l00893"></a><span class="lineno"> 893</span>&#160; </div><div class="line"><a name="l00894"></a><span class="lineno"> 894</span>&#160; return cmd</div><div class="line"><a name="l00895"></a><span class="lineno"> 895</span>&#160;end</div><div class="line"><a name="l00896"></a><span class="lineno"> 896</span>&#160;</div><div class="line"><a name="l00902"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a3cc9074c84d684d207dfdf2045755df4"> 902</a></span>&#160;static function /s <a class="code" href="pearl-elog_8ipf.html#a3cc9074c84d684d207dfdf2045755df4">format_url</a>(logbook)</div><div class="line"><a name="l00903"></a><span class="lineno"> 903</span>&#160; <span class="keywordtype">string</span> logbook</div><div class="line"><a name="l00904"></a><span class="lineno"> 904</span>&#160; </div><div class="line"><a name="l00905"></a><span class="lineno"> 905</span>&#160; dfref df_general = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l00906"></a><span class="lineno"> 906</span>&#160; </div><div class="line"><a name="l00907"></a><span class="lineno"> 907</span>&#160; svar /sdfr=df_general hostname</div><div class="line"><a name="l00908"></a><span class="lineno"> 908</span>&#160; nvar /sdfr=df_general port</div><div class="line"><a name="l00909"></a><span class="lineno"> 909</span>&#160; nvar /sdfr=df_general ssl</div><div class="line"><a name="l00910"></a><span class="lineno"> 910</span>&#160; svar /sdfr=df_general subdir</div><div class="line"><a name="l00911"></a><span class="lineno"> 911</span>&#160;</div><div class="line"><a name="l00912"></a><span class="lineno"> 912</span>&#160; <span class="keywordtype">string</span> cmd = &quot;&quot;</div><div class="line"><a name="l00913"></a><span class="lineno"> 913</span>&#160; if ((nvar_exists(ssl)) &amp;&amp; (ssl != 0))</div><div class="line"><a name="l00914"></a><span class="lineno"> 914</span>&#160; cmd += &quot;https:<span class="comment">//&quot;</span></div><div class="line"><a name="l00915"></a><span class="lineno"> 915</span>&#160; else</div><div class="line"><a name="l00916"></a><span class="lineno"> 916</span>&#160; cmd += &quot;http:<span class="comment">//&quot;</span></div><div class="line"><a name="l00917"></a><span class="lineno"> 917</span>&#160; endif</div><div class="line"><a name="l00918"></a><span class="lineno"> 918</span>&#160; cmd += hostname</div><div class="line"><a name="l00919"></a><span class="lineno"> 919</span>&#160; if ((nvar_exists(port)) &amp;&amp; (port &gt; 0))</div><div class="line"><a name="l00920"></a><span class="lineno"> 920</span>&#160; cmd += &quot;:&quot; + num2str(port)</div><div class="line"><a name="l00921"></a><span class="lineno"> 921</span>&#160; endif</div><div class="line"><a name="l00922"></a><span class="lineno"> 922</span>&#160; if ((svar_exists(subdir)) &amp;&amp; (strlen(subdir) &gt; 0))</div><div class="line"><a name="l00923"></a><span class="lineno"> 923</span>&#160; cmd += &quot;/&quot; + subdir</div><div class="line"><a name="l00924"></a><span class="lineno"> 924</span>&#160; endif</div><div class="line"><a name="l00925"></a><span class="lineno"> 925</span>&#160; cmd += &quot;/&quot; + logbook</div><div class="line"><a name="l00926"></a><span class="lineno"> 926</span>&#160; </div><div class="line"><a name="l00927"></a><span class="lineno"> 927</span>&#160; return cmd</div><div class="line"><a name="l00928"></a><span class="lineno"> 928</span>&#160;end</div><div class="line"><a name="l00929"></a><span class="lineno"> 929</span>&#160;</div><div class="line"><a name="l00939"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a4986de01085dc5481500240ef7667419"> 939</a></span>&#160;static function /s <a class="code" href="pearl-elog_8ipf.html#a4986de01085dc5481500240ef7667419">prepare_graph_attachments</a>(graphs)</div><div class="line"><a name="l00940"></a><span class="lineno"> 940</span>&#160; <span class="keywordtype">string</span> graphs <span class="comment">// names of graph windows to be added as attachments, semicolon separated</span></div><div class="line"><a name="l00941"></a><span class="lineno"> 941</span>&#160; </div><div class="line"><a name="l00942"></a><span class="lineno"> 942</span>&#160; <span class="keywordtype">string</span> cmd = &quot;&quot;</div><div class="line"><a name="l00943"></a><span class="lineno"> 943</span>&#160; variable ngraphs = ItemsInList(graphs, &quot;;&quot;)</div><div class="line"><a name="l00944"></a><span class="lineno"> 944</span>&#160; variable igraph</div><div class="line"><a name="l00945"></a><span class="lineno"> 945</span>&#160; <span class="keywordtype">string</span> sgraph</div><div class="line"><a name="l00946"></a><span class="lineno"> 946</span>&#160; <span class="keywordtype">string</span> graph_path</div><div class="line"><a name="l00947"></a><span class="lineno"> 947</span>&#160; for (igraph = 0; igraph &lt; ngraphs; igraph += 1)</div><div class="line"><a name="l00948"></a><span class="lineno"> 948</span>&#160; sgraph = StringFromList(igraph, graphs, &quot;;&quot;)</div><div class="line"><a name="l00949"></a><span class="lineno"> 949</span>&#160; graph_path = <a class="code" href="pearl-elog_8ipf.html#a2417d079483f773f8231c5f2caba6cf0">create_graph_file</a>(sgraph, igraph)</div><div class="line"><a name="l00950"></a><span class="lineno"> 950</span>&#160; if (strlen(graph_path) &gt; 0)</div><div class="line"><a name="l00951"></a><span class="lineno"> 951</span>&#160; cmd += &quot; -f \&quot;&quot; + graph_path + &quot;\&quot;&quot;</div><div class="line"><a name="l00952"></a><span class="lineno"> 952</span>&#160; endif</div><div class="line"><a name="l00953"></a><span class="lineno"> 953</span>&#160; endfor</div><div class="line"><a name="l00954"></a><span class="lineno"> 954</span>&#160; </div><div class="line"><a name="l00955"></a><span class="lineno"> 955</span>&#160; return cmd</div><div class="line"><a name="l00956"></a><span class="lineno"> 956</span>&#160;end</div><div class="line"><a name="l00957"></a><span class="lineno"> 957</span>&#160;</div><div class="line"><a name="l00958"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a6b2d6cf641c61120332ac1983b2f3846"> 958</a></span>&#160;static function /s <a class="code" href="pearl-elog_8ipf.html#a6b2d6cf641c61120332ac1983b2f3846">get_timestamp</a>(sep)</div><div class="line"><a name="l00959"></a><span class="lineno"> 959</span>&#160; <span class="keywordtype">string</span> sep</div><div class="line"><a name="l00960"></a><span class="lineno"> 960</span>&#160; Variable now = DateTime</div><div class="line"><a name="l00961"></a><span class="lineno"> 961</span>&#160; <span class="keywordtype">string</span> dat = ReplaceString(&quot;-&quot;, Secs2Date(DateTime, -2), &quot;&quot;)</div><div class="line"><a name="l00962"></a><span class="lineno"> 962</span>&#160; <span class="keywordtype">string</span> tim = ReplaceString(&quot;:&quot;, Secs2Time(DateTime, 3), &quot;&quot;)</div><div class="line"><a name="l00963"></a><span class="lineno"> 963</span>&#160; return dat + sep + tim</div><div class="line"><a name="l00964"></a><span class="lineno"> 964</span>&#160;end</div><div class="line"><a name="l00965"></a><span class="lineno"> 965</span>&#160;</div><div class="line"><a name="l00982"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#af652f6f257be1ee749fe788d1b03f75f"> 982</a></span>&#160;static function /s <a class="code" href="pearl-elog_8ipf.html#af652f6f257be1ee749fe788d1b03f75f">create_message_file</a>(message)</div><div class="line"><a name="l00983"></a><span class="lineno"> 983</span>&#160; <span class="keywordtype">string</span> message</div><div class="line"><a name="l00984"></a><span class="lineno"> 984</span>&#160; </div><div class="line"><a name="l00985"></a><span class="lineno"> 985</span>&#160; message = ReplaceString(&quot;%&quot;, message, &quot;&quot;)</div><div class="line"><a name="l00986"></a><span class="lineno"> 986</span>&#160; <span class="keywordtype">string</span> path = SpecialDirPath(&quot;Temporary&quot;, 0, 1, 0)</div><div class="line"><a name="l00987"></a><span class="lineno"> 987</span>&#160; variable len = strlen(path)</div><div class="line"><a name="l00988"></a><span class="lineno"> 988</span>&#160; <span class="keywordtype">string</span> filename</div><div class="line"><a name="l00989"></a><span class="lineno"> 989</span>&#160; </div><div class="line"><a name="l00990"></a><span class="lineno"> 990</span>&#160; if (numtype(len) == 0)</div><div class="line"><a name="l00991"></a><span class="lineno"> 991</span>&#160; filename = &quot;elog_temp_message.txt&quot;</div><div class="line"><a name="l00992"></a><span class="lineno"> 992</span>&#160; path += filename</div><div class="line"><a name="l00993"></a><span class="lineno"> 993</span>&#160; variable f1</div><div class="line"><a name="l00994"></a><span class="lineno"> 994</span>&#160; Open f1 as path</div><div class="line"><a name="l00995"></a><span class="lineno"> 995</span>&#160; fprintf f1, message</div><div class="line"><a name="l00996"></a><span class="lineno"> 996</span>&#160; Close f1</div><div class="line"><a name="l00997"></a><span class="lineno"> 997</span>&#160; else</div><div class="line"><a name="l00998"></a><span class="lineno"> 998</span>&#160; filename = &quot;&quot;</div><div class="line"><a name="l00999"></a><span class="lineno"> 999</span>&#160; endif</div><div class="line"><a name="l01000"></a><span class="lineno"> 1000</span>&#160; </div><div class="line"><a name="l01001"></a><span class="lineno"> 1001</span>&#160; return filename</div><div class="line"><a name="l01002"></a><span class="lineno"> 1002</span>&#160;end</div><div class="line"><a name="l01003"></a><span class="lineno"> 1003</span>&#160;</div><div class="line"><a name="l01023"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a2417d079483f773f8231c5f2caba6cf0"> 1023</a></span>&#160;static function /s <a class="code" href="pearl-elog_8ipf.html#a2417d079483f773f8231c5f2caba6cf0">create_graph_file</a>(graphname, fileindex)</div><div class="line"><a name="l01024"></a><span class="lineno"> 1024</span>&#160; <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l01025"></a><span class="lineno"> 1025</span>&#160; variable fileindex</div><div class="line"><a name="l01026"></a><span class="lineno"> 1026</span>&#160; </div><div class="line"><a name="l01027"></a><span class="lineno"> 1027</span>&#160; dfref df_volatile_root = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>)</div><div class="line"><a name="l01028"></a><span class="lineno"> 1028</span>&#160; svar /sdfr=df_volatile_root temp_graph_files</div><div class="line"><a name="l01029"></a><span class="lineno"> 1029</span>&#160;</div><div class="line"><a name="l01030"></a><span class="lineno"> 1030</span>&#160; <span class="keywordtype">string</span> path = SpecialDirPath(&quot;Temporary&quot;, 0, 1, 0)</div><div class="line"><a name="l01031"></a><span class="lineno"> 1031</span>&#160; <span class="keywordtype">string</span> ts = <a class="code" href="pearl-elog_8ipf.html#a6b2d6cf641c61120332ac1983b2f3846">get_timestamp</a>(&quot;_&quot;)</div><div class="line"><a name="l01032"></a><span class="lineno"> 1032</span>&#160; variable len = strlen(path)</div><div class="line"><a name="l01033"></a><span class="lineno"> 1033</span>&#160; <span class="keywordtype">string</span> filename</div><div class="line"><a name="l01034"></a><span class="lineno"> 1034</span>&#160;</div><div class="line"><a name="l01035"></a><span class="lineno"> 1035</span>&#160; if (numtype(len) == 0)</div><div class="line"><a name="l01036"></a><span class="lineno"> 1036</span>&#160; filename = &quot;elog_&quot; + ts + &quot;_&quot; + num2str(fileindex) + &quot;.png&quot;</div><div class="line"><a name="l01037"></a><span class="lineno"> 1037</span>&#160; path += filename</div><div class="line"><a name="l01038"></a><span class="lineno"> 1038</span>&#160; SavePICT /B=72 /E=-5 /M /O /W=(0,0,8,6) /WIN=$graphname /Z as path</div><div class="line"><a name="l01039"></a><span class="lineno"> 1039</span>&#160; if (v_flag == 0)</div><div class="line"><a name="l01040"></a><span class="lineno"> 1040</span>&#160; temp_graph_files = AddListItem(path, temp_graph_files, &quot;;&quot;, inf)</div><div class="line"><a name="l01041"></a><span class="lineno"> 1041</span>&#160; else</div><div class="line"><a name="l01042"></a><span class="lineno"> 1042</span>&#160; filename = &quot;&quot;</div><div class="line"><a name="l01043"></a><span class="lineno"> 1043</span>&#160; endif</div><div class="line"><a name="l01044"></a><span class="lineno"> 1044</span>&#160; else</div><div class="line"><a name="l01045"></a><span class="lineno"> 1045</span>&#160; filename = &quot;&quot;</div><div class="line"><a name="l01046"></a><span class="lineno"> 1046</span>&#160; endif</div><div class="line"><a name="l01047"></a><span class="lineno"> 1047</span>&#160; </div><div class="line"><a name="l01048"></a><span class="lineno"> 1048</span>&#160; return filename</div><div class="line"><a name="l01049"></a><span class="lineno"> 1049</span>&#160;end</div><div class="line"><a name="l01050"></a><span class="lineno"> 1050</span>&#160;</div><div class="line"><a name="l01059"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#ac8b61eefed231018cc36d47e95bd8c22"> 1059</a></span>&#160;static function /s <a class="code" href="pearl-elog_8ipf.html#ac8b61eefed231018cc36d47e95bd8c22">create_cmd_file</a>(cmd)</div><div class="line"><a name="l01060"></a><span class="lineno"> 1060</span>&#160; <span class="keywordtype">string</span> cmd</div><div class="line"><a name="l01061"></a><span class="lineno"> 1061</span>&#160; </div><div class="line"><a name="l01062"></a><span class="lineno"> 1062</span>&#160; dfref df_general = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l01063"></a><span class="lineno"> 1063</span>&#160; nvar /sdfr=df_general loglevel</div><div class="line"><a name="l01064"></a><span class="lineno"> 1064</span>&#160;</div><div class="line"><a name="l01065"></a><span class="lineno"> 1065</span>&#160; if (strlen(cmd) &gt;= 1024)</div><div class="line"><a name="l01066"></a><span class="lineno"> 1066</span>&#160; if (loglevel &gt;= 2)</div><div class="line"><a name="l01067"></a><span class="lineno"> 1067</span>&#160; print &quot;ELOG: command line too <span class="keywordtype">long</span> (add fewer attachments).&quot;</div><div class="line"><a name="l01068"></a><span class="lineno"> 1068</span>&#160; endif</div><div class="line"><a name="l01069"></a><span class="lineno"> 1069</span>&#160; return &quot;&quot;</div><div class="line"><a name="l01070"></a><span class="lineno"> 1070</span>&#160; endif</div><div class="line"><a name="l01071"></a><span class="lineno"> 1071</span>&#160; </div><div class="line"><a name="l01072"></a><span class="lineno"> 1072</span>&#160; <span class="keywordtype">string</span> work_path = SpecialDirPath(&quot;Temporary&quot;, 0, 1, 0)</div><div class="line"><a name="l01073"></a><span class="lineno"> 1073</span>&#160; variable len = strlen(work_path)</div><div class="line"><a name="l01074"></a><span class="lineno"> 1074</span>&#160; if (numtype(len) == 0)</div><div class="line"><a name="l01075"></a><span class="lineno"> 1075</span>&#160; <span class="keywordtype">string</span> cmdx</div><div class="line"><a name="l01076"></a><span class="lineno"> 1076</span>&#160; <span class="keywordtype">string</span> cmd_path = work_path + &quot;elog_temp_cmd.bat&quot;</div><div class="line"><a name="l01077"></a><span class="lineno"> 1077</span>&#160; </div><div class="line"><a name="l01078"></a><span class="lineno"> 1078</span>&#160; variable f1</div><div class="line"><a name="l01079"></a><span class="lineno"> 1079</span>&#160; Open f1 as cmd_path</div><div class="line"><a name="l01080"></a><span class="lineno"> 1080</span>&#160; cmdx = &quot;c:\r\n&quot;</div><div class="line"><a name="l01081"></a><span class="lineno"> 1081</span>&#160; fprintf f1, cmdx</div><div class="line"><a name="l01082"></a><span class="lineno"> 1082</span>&#160; cmdx = &quot;cd \&quot;&quot; + work_path + &quot;\&quot;\r\n&quot;</div><div class="line"><a name="l01083"></a><span class="lineno"> 1083</span>&#160; fprintf f1, cmdx</div><div class="line"><a name="l01084"></a><span class="lineno"> 1084</span>&#160; cmdx = &quot;del elog.log&quot;</div><div class="line"><a name="l01085"></a><span class="lineno"> 1085</span>&#160; fprintf f1, cmdx + &quot;\r\n&quot;</div><div class="line"><a name="l01086"></a><span class="lineno"> 1086</span>&#160; fprintf f1, cmd</div><div class="line"><a name="l01087"></a><span class="lineno"> 1087</span>&#160; Close f1</div><div class="line"><a name="l01088"></a><span class="lineno"> 1088</span>&#160; else</div><div class="line"><a name="l01089"></a><span class="lineno"> 1089</span>&#160; cmd_path = &quot;&quot;</div><div class="line"><a name="l01090"></a><span class="lineno"> 1090</span>&#160; endif</div><div class="line"><a name="l01091"></a><span class="lineno"> 1091</span>&#160; </div><div class="line"><a name="l01092"></a><span class="lineno"> 1092</span>&#160; return cmd_path</div><div class="line"><a name="l01093"></a><span class="lineno"> 1093</span>&#160;end</div><div class="line"><a name="l01094"></a><span class="lineno"> 1094</span>&#160;</div><div class="line"><a name="l01095"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#ad1a72c63f269b2e22b21a72d1ef3b279"> 1095</a></span>&#160;static function /s <a class="code" href="pearl-elog_8ipf.html#ad1a72c63f269b2e22b21a72d1ef3b279">get_log_path</a>()</div><div class="line"><a name="l01096"></a><span class="lineno"> 1096</span>&#160; <span class="keywordtype">string</span> path = SpecialDirPath(&quot;Temporary&quot;, 0, 1, 0)</div><div class="line"><a name="l01097"></a><span class="lineno"> 1097</span>&#160; variable len = strlen(path)</div><div class="line"><a name="l01098"></a><span class="lineno"> 1098</span>&#160; if (numtype(len) == 0)</div><div class="line"><a name="l01099"></a><span class="lineno"> 1099</span>&#160; path += &quot;elog.log&quot;</div><div class="line"><a name="l01100"></a><span class="lineno"> 1100</span>&#160; else</div><div class="line"><a name="l01101"></a><span class="lineno"> 1101</span>&#160; path = &quot;&quot;</div><div class="line"><a name="l01102"></a><span class="lineno"> 1102</span>&#160; endif</div><div class="line"><a name="l01103"></a><span class="lineno"> 1103</span>&#160; </div><div class="line"><a name="l01104"></a><span class="lineno"> 1104</span>&#160; return path</div><div class="line"><a name="l01105"></a><span class="lineno"> 1105</span>&#160;end</div><div class="line"><a name="l01106"></a><span class="lineno"> 1106</span>&#160;</div><div class="line"><a name="l01115"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#ad7640d06f004ecd4a8980ea29d24dcbe"> 1115</a></span>&#160;static function <a class="code" href="pearl-elog_8ipf.html#ad7640d06f004ecd4a8980ea29d24dcbe">cleanup_temp_files</a>()</div><div class="line"><a name="l01116"></a><span class="lineno"> 1116</span>&#160; dfref df_volatile_root = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>)</div><div class="line"><a name="l01117"></a><span class="lineno"> 1117</span>&#160; if (DataFolderRefStatus(df_volatile_root))</div><div class="line"><a name="l01118"></a><span class="lineno"> 1118</span>&#160; svar /sdfr=df_volatile_root /z temp_graph_files</div><div class="line"><a name="l01119"></a><span class="lineno"> 1119</span>&#160; if (SVAR_Exists(temp_graph_files))</div><div class="line"><a name="l01120"></a><span class="lineno"> 1120</span>&#160; variable nfi = ItemsInList(temp_graph_files)</div><div class="line"><a name="l01121"></a><span class="lineno"> 1121</span>&#160; variable ifi</div><div class="line"><a name="l01122"></a><span class="lineno"> 1122</span>&#160; <span class="keywordtype">string</span> sfi</div><div class="line"><a name="l01123"></a><span class="lineno"> 1123</span>&#160; for (ifi = 0; ifi &lt; nfi; ifi += 1)</div><div class="line"><a name="l01124"></a><span class="lineno"> 1124</span>&#160; sfi = StringFromList(ifi, temp_graph_files)</div><div class="line"><a name="l01125"></a><span class="lineno"> 1125</span>&#160; DeleteFile /Z sfi</div><div class="line"><a name="l01126"></a><span class="lineno"> 1126</span>&#160; endfor</div><div class="line"><a name="l01127"></a><span class="lineno"> 1127</span>&#160; temp_graph_files = &quot;&quot;</div><div class="line"><a name="l01128"></a><span class="lineno"> 1128</span>&#160; endif</div><div class="line"><a name="l01129"></a><span class="lineno"> 1129</span>&#160; endif</div><div class="line"><a name="l01130"></a><span class="lineno"> 1130</span>&#160; return 0</div><div class="line"><a name="l01131"></a><span class="lineno"> 1131</span>&#160;end</div><div class="line"><a name="l01132"></a><span class="lineno"> 1132</span>&#160;</div><div class="line"><a name="l01133"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a63aa38b624b66fe502505040c25bc0c3"> 1133</a></span>&#160;static strconstant <a class="code" href="pearl-elog_8ipf.html#a63aa38b624b66fe502505040c25bc0c3">elog_success_msg</a> = &quot;Message successfully transmitted&quot;</div><div class="line"><a name="l01134"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a6a9923c6465c91b1f9d1d97b090f424b"> 1134</a></span>&#160;static strconstant <a class="code" href="pearl-elog_8ipf.html#a6a9923c6465c91b1f9d1d97b090f424b">elog_parse_id</a> = &quot;ID=%u&quot;</div><div class="line"><a name="l01135"></a><span class="lineno"> 1135</span>&#160;</div><div class="line"><a name="l01141"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a5306514bf7d1a582aec146256ae45a12"> 1141</a></span>&#160;static function <a class="code" href="pearl-elog_8ipf.html#a5306514bf7d1a582aec146256ae45a12">parse_result</a>()</div><div class="line"><a name="l01142"></a><span class="lineno"> 1142</span>&#160; dfref df_general = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l01143"></a><span class="lineno"> 1143</span>&#160; nvar /sdfr=df_general loglevel</div><div class="line"><a name="l01144"></a><span class="lineno"> 1144</span>&#160;</div><div class="line"><a name="l01145"></a><span class="lineno"> 1145</span>&#160; <span class="keywordtype">string</span> path = <a class="code" href="pearl-elog_8ipf.html#ad1a72c63f269b2e22b21a72d1ef3b279">get_log_path</a>()</div><div class="line"><a name="l01146"></a><span class="lineno"> 1146</span>&#160; <span class="keywordtype">string</span> line = &quot;&quot;</div><div class="line"><a name="l01147"></a><span class="lineno"> 1147</span>&#160; <span class="keywordtype">string</span> output = &quot;&quot;</div><div class="line"><a name="l01148"></a><span class="lineno"> 1148</span>&#160; variable success = 0</div><div class="line"><a name="l01149"></a><span class="lineno"> 1149</span>&#160; variable <span class="keywordtype">id</span> = -1</div><div class="line"><a name="l01150"></a><span class="lineno"> 1150</span>&#160; <span class="keywordtype">string</span> part1 = &quot;&quot;</div><div class="line"><a name="l01151"></a><span class="lineno"> 1151</span>&#160; <span class="keywordtype">string</span> part2 = &quot;&quot;</div><div class="line"><a name="l01152"></a><span class="lineno"> 1152</span>&#160; </div><div class="line"><a name="l01153"></a><span class="lineno"> 1153</span>&#160; variable len = strlen(path)</div><div class="line"><a name="l01154"></a><span class="lineno"> 1154</span>&#160; if (numtype(len) == 0)</div><div class="line"><a name="l01155"></a><span class="lineno"> 1155</span>&#160; variable f1</div><div class="line"><a name="l01156"></a><span class="lineno"> 1156</span>&#160; Open /R/Z f1 as path</div><div class="line"><a name="l01157"></a><span class="lineno"> 1157</span>&#160; if (v_flag == 0)</div><div class="line"><a name="l01158"></a><span class="lineno"> 1158</span>&#160; do</div><div class="line"><a name="l01159"></a><span class="lineno"> 1159</span>&#160; FReadLine f1, line</div><div class="line"><a name="l01160"></a><span class="lineno"> 1160</span>&#160; if (strlen(line) &gt; 0)</div><div class="line"><a name="l01161"></a><span class="lineno"> 1161</span>&#160; part1 = StringFromList(0, line, &quot;,&quot;)</div><div class="line"><a name="l01162"></a><span class="lineno"> 1162</span>&#160; part2 = ReplaceString(&quot; &quot;, StringFromList(1, line, &quot;,&quot;), &quot;&quot;)</div><div class="line"><a name="l01163"></a><span class="lineno"> 1163</span>&#160; success = cmpstr(part1, <a class="code" href="pearl-elog_8ipf.html#a63aa38b624b66fe502505040c25bc0c3">elog_success_msg</a>) == 0</div><div class="line"><a name="l01164"></a><span class="lineno"> 1164</span>&#160; if (success)</div><div class="line"><a name="l01165"></a><span class="lineno"> 1165</span>&#160; sscanf part2, <a class="code" href="pearl-elog_8ipf.html#a6a9923c6465c91b1f9d1d97b090f424b">elog_parse_id</a>, <span class="keywordtype">id</span></div><div class="line"><a name="l01166"></a><span class="lineno"> 1166</span>&#160; endif</div><div class="line"><a name="l01167"></a><span class="lineno"> 1167</span>&#160; else</div><div class="line"><a name="l01168"></a><span class="lineno"> 1168</span>&#160; break</div><div class="line"><a name="l01169"></a><span class="lineno"> 1169</span>&#160; endif</div><div class="line"><a name="l01170"></a><span class="lineno"> 1170</span>&#160; output += line</div><div class="line"><a name="l01171"></a><span class="lineno"> 1171</span>&#160; while(!success)</div><div class="line"><a name="l01172"></a><span class="lineno"> 1172</span>&#160; Close f1</div><div class="line"><a name="l01173"></a><span class="lineno"> 1173</span>&#160; endif</div><div class="line"><a name="l01174"></a><span class="lineno"> 1174</span>&#160; endif</div><div class="line"><a name="l01175"></a><span class="lineno"> 1175</span>&#160; if (loglevel &gt;= 5)</div><div class="line"><a name="l01176"></a><span class="lineno"> 1176</span>&#160; print output</div><div class="line"><a name="l01177"></a><span class="lineno"> 1177</span>&#160; endif</div><div class="line"><a name="l01178"></a><span class="lineno"> 1178</span>&#160; </div><div class="line"><a name="l01179"></a><span class="lineno"> 1179</span>&#160; return <span class="keywordtype">id</span></div><div class="line"><a name="l01180"></a><span class="lineno"> 1180</span>&#160;end</div><div class="line"><a name="l01181"></a><span class="lineno"> 1181</span>&#160;</div><div class="line"><a name="l01184"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#acedf0c8ae34e9ebadd6fa0d9d1353aa4"> 1184</a></span>&#160;function /s <a class="code" href="pearl-elog_8ipf.html#acedf0c8ae34e9ebadd6fa0d9d1353aa4">elog_prompt_logbook</a>()</div><div class="line"><a name="l01185"></a><span class="lineno"> 1185</span>&#160; <span class="keywordtype">string</span> logbooks = <a class="code" href="pearl-elog_8ipf.html#a356bebea8eb41c9ac3ea2148af22707f">list_logbooks</a>(templates=0)</div><div class="line"><a name="l01186"></a><span class="lineno"> 1186</span>&#160; logbooks = AddListItem(&quot;(new)&quot;, logbooks)</div><div class="line"><a name="l01187"></a><span class="lineno"> 1187</span>&#160; <span class="keywordtype">string</span> templates = <a class="code" href="pearl-elog_8ipf.html#a356bebea8eb41c9ac3ea2148af22707f">list_logbooks</a>(templates=1)</div><div class="line"><a name="l01188"></a><span class="lineno"> 1188</span>&#160; templates = AddListItem(&quot;(none)&quot;, templates)</div><div class="line"><a name="l01189"></a><span class="lineno"> 1189</span>&#160; </div><div class="line"><a name="l01190"></a><span class="lineno"> 1190</span>&#160; <span class="keywordtype">string</span> logbook = StringFromList(0, logbooks)</div><div class="line"><a name="l01191"></a><span class="lineno"> 1191</span>&#160; <span class="keywordtype">string</span> template = StringFromList(0, logbooks)</div><div class="line"><a name="l01192"></a><span class="lineno"> 1192</span>&#160; <span class="keywordtype">string</span> name = &quot;&quot;</div><div class="line"><a name="l01193"></a><span class="lineno"> 1193</span>&#160; <span class="keywordtype">string</span> username = &quot;&quot;</div><div class="line"><a name="l01194"></a><span class="lineno"> 1194</span>&#160; <span class="keywordtype">string</span> password = &quot;&quot;</div><div class="line"><a name="l01195"></a><span class="lineno"> 1195</span>&#160; </div><div class="line"><a name="l01196"></a><span class="lineno"> 1196</span>&#160; prompt logbook, &quot;logbook&quot;, popup logbooks</div><div class="line"><a name="l01197"></a><span class="lineno"> 1197</span>&#160; prompt template, &quot;template&quot;, popup templates</div><div class="line"><a name="l01198"></a><span class="lineno"> 1198</span>&#160; prompt name, &quot;new logbook name&quot;</div><div class="line"><a name="l01199"></a><span class="lineno"> 1199</span>&#160;</div><div class="line"><a name="l01200"></a><span class="lineno"> 1200</span>&#160; doprompt &quot;select logbook&quot;, logbook, template, name</div><div class="line"><a name="l01201"></a><span class="lineno"> 1201</span>&#160; if (!v_flag)</div><div class="line"><a name="l01202"></a><span class="lineno"> 1202</span>&#160; if (cmpstr(logbook, &quot;(new)&quot;) == 0)</div><div class="line"><a name="l01203"></a><span class="lineno"> 1203</span>&#160; <a class="code" href="pearl-elog_8ipf.html#ab6d97edbf33e8ec039b34ff756e7ab93">elog_create_logbook</a>(name, template=template)</div><div class="line"><a name="l01204"></a><span class="lineno"> 1204</span>&#160; logbook = name</div><div class="line"><a name="l01205"></a><span class="lineno"> 1205</span>&#160; endif</div><div class="line"><a name="l01206"></a><span class="lineno"> 1206</span>&#160; else</div><div class="line"><a name="l01207"></a><span class="lineno"> 1207</span>&#160; logbook = &quot;&quot;</div><div class="line"><a name="l01208"></a><span class="lineno"> 1208</span>&#160; endif</div><div class="line"><a name="l01209"></a><span class="lineno"> 1209</span>&#160; return logbook</div><div class="line"><a name="l01210"></a><span class="lineno"> 1210</span>&#160;end</div><div class="line"><a name="l01211"></a><span class="lineno"> 1211</span>&#160;</div><div class="line"><a name="l01214"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#afbace5ffc3167b42b09657ce6cc854ca"> 1214</a></span>&#160;function <a class="code" href="pearl-elog_8ipf.html#afbace5ffc3167b42b09657ce6cc854ca">elog_prompt_login</a>(logbook)</div><div class="line"><a name="l01215"></a><span class="lineno"> 1215</span>&#160; <span class="keywordtype">string</span> logbook</div><div class="line"><a name="l01216"></a><span class="lineno"> 1216</span>&#160; </div><div class="line"><a name="l01217"></a><span class="lineno"> 1217</span>&#160; <span class="keywordtype">string</span> logbooks = <a class="code" href="pearl-elog_8ipf.html#a356bebea8eb41c9ac3ea2148af22707f">list_logbooks</a>(templates=0)</div><div class="line"><a name="l01218"></a><span class="lineno"> 1218</span>&#160;</div><div class="line"><a name="l01219"></a><span class="lineno"> 1219</span>&#160; <span class="keywordtype">string</span> username = &quot;&quot;</div><div class="line"><a name="l01220"></a><span class="lineno"> 1220</span>&#160; <span class="keywordtype">string</span> password = &quot;&quot;</div><div class="line"><a name="l01221"></a><span class="lineno"> 1221</span>&#160; </div><div class="line"><a name="l01222"></a><span class="lineno"> 1222</span>&#160; prompt logbook, &quot;logbook&quot;, popup logbooks</div><div class="line"><a name="l01223"></a><span class="lineno"> 1223</span>&#160; prompt username, &quot;user name&quot;</div><div class="line"><a name="l01224"></a><span class="lineno"> 1224</span>&#160; prompt password, &quot;password (blank to log out)&quot;</div><div class="line"><a name="l01225"></a><span class="lineno"> 1225</span>&#160;</div><div class="line"><a name="l01226"></a><span class="lineno"> 1226</span>&#160; doprompt &quot;log in to logbook&quot;, logbook, username, password</div><div class="line"><a name="l01227"></a><span class="lineno"> 1227</span>&#160; if (!v_flag)</div><div class="line"><a name="l01228"></a><span class="lineno"> 1228</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a3eac4012891c2813e401aee2c1134763">elog_login</a>(logbook, username, password)</div><div class="line"><a name="l01229"></a><span class="lineno"> 1229</span>&#160; endif</div><div class="line"><a name="l01230"></a><span class="lineno"> 1230</span>&#160; </div><div class="line"><a name="l01231"></a><span class="lineno"> 1231</span>&#160; return v_flag</div><div class="line"><a name="l01232"></a><span class="lineno"> 1232</span>&#160;end</div><div class="line"><a name="l01233"></a><span class="lineno"> 1233</span>&#160;</div><div class="line"><a name="l01241"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a6da33f1bb2639cb912e9b25af25bf663"> 1241</a></span>&#160;function /s <a class="code" href="pearl-elog_8ipf.html#a6da33f1bb2639cb912e9b25af25bf663">PearlElogPanel</a>(logbook)</div><div class="line"><a name="l01242"></a><span class="lineno"> 1242</span>&#160; <span class="keywordtype">string</span> logbook</div><div class="line"><a name="l01243"></a><span class="lineno"> 1243</span>&#160;</div><div class="line"><a name="l01244"></a><span class="lineno"> 1244</span>&#160; dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l01245"></a><span class="lineno"> 1245</span>&#160; dfref df_general = get_elog_df(&quot;&quot;, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l01246"></a><span class="lineno"> 1246</span>&#160; dfref df_persistent = get_elog_df(logbook, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l01247"></a><span class="lineno"> 1247</span>&#160; dfref df_volatile = get_elog_df(logbook, <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>)</div><div class="line"><a name="l01248"></a><span class="lineno"> 1248</span>&#160;</div><div class="line"><a name="l01249"></a><span class="lineno"> 1249</span>&#160; <span class="keywordtype">string</span> win_name = logbook + &quot;ElogPanel&quot;</div><div class="line"><a name="l01250"></a><span class="lineno"> 1250</span>&#160; <span class="keywordtype">string</span> win_title = &quot;ELOG &quot; + logbook</div><div class="line"><a name="l01251"></a><span class="lineno"> 1251</span>&#160; </div><div class="line"><a name="l01252"></a><span class="lineno"> 1252</span>&#160; NewPanel /K=1 /N=$win_name /W=(600,200,1200,700) as win_title</div><div class="line"><a name="l01253"></a><span class="lineno"> 1253</span>&#160; win_name = s_name</div><div class="line"><a name="l01254"></a><span class="lineno"> 1254</span>&#160; ModifyPanel /w=$win_name cbRGB=(52224,52224,65280)</div><div class="line"><a name="l01255"></a><span class="lineno"> 1255</span>&#160;</div><div class="line"><a name="l01256"></a><span class="lineno"> 1256</span>&#160; svar /sdfr=df_persistent attributes</div><div class="line"><a name="l01257"></a><span class="lineno"> 1257</span>&#160; svar /sdfr=df_persistent controls</div><div class="line"><a name="l01258"></a><span class="lineno"> 1258</span>&#160; svar /sdfr=df_persistent options</div><div class="line"><a name="l01259"></a><span class="lineno"> 1259</span>&#160; wave /t /sdfr=df_volatile attach_list</div><div class="line"><a name="l01260"></a><span class="lineno"> 1260</span>&#160; wave /sdfr=df_volatile attach_sel</div><div class="line"><a name="l01261"></a><span class="lineno"> 1261</span>&#160; svar /sdfr=df_volatile url</div><div class="line"><a name="l01262"></a><span class="lineno"> 1262</span>&#160; </div><div class="line"><a name="l01263"></a><span class="lineno"> 1263</span>&#160; variable iattr</div><div class="line"><a name="l01264"></a><span class="lineno"> 1264</span>&#160; variable nattr = ItemsInList(attributes, &quot;;&quot;)</div><div class="line"><a name="l01265"></a><span class="lineno"> 1265</span>&#160; <span class="keywordtype">string</span> s_attr</div><div class="line"><a name="l01266"></a><span class="lineno"> 1266</span>&#160; <span class="keywordtype">string</span> s_control</div><div class="line"><a name="l01267"></a><span class="lineno"> 1267</span>&#160; <span class="keywordtype">string</span> s_option</div><div class="line"><a name="l01268"></a><span class="lineno"> 1268</span>&#160; <span class="keywordtype">string</span> persistent_path = GetDataFolder(1, df_persistent)</div><div class="line"><a name="l01269"></a><span class="lineno"> 1269</span>&#160; <span class="keywordtype">string</span> volatile_path = GetDataFolder(1, df_volatile)</div><div class="line"><a name="l01270"></a><span class="lineno"> 1270</span>&#160; <span class="keywordtype">string</span> options_path</div><div class="line"><a name="l01271"></a><span class="lineno"> 1271</span>&#160; <span class="keywordtype">string</span> variable_path</div><div class="line"><a name="l01272"></a><span class="lineno"> 1272</span>&#160; variable ypos = 2</div><div class="line"><a name="l01273"></a><span class="lineno"> 1273</span>&#160; variable height = 0</div><div class="line"><a name="l01274"></a><span class="lineno"> 1274</span>&#160; </div><div class="line"><a name="l01275"></a><span class="lineno"> 1275</span>&#160; for (iattr = 0; iattr &lt; nattr; iattr += 1)</div><div class="line"><a name="l01276"></a><span class="lineno"> 1276</span>&#160; s_attr = StringFromList(iattr, attributes, &quot;;&quot;)</div><div class="line"><a name="l01277"></a><span class="lineno"> 1277</span>&#160; s_control = StringFromList(iattr, controls, &quot;;&quot;)</div><div class="line"><a name="l01278"></a><span class="lineno"> 1278</span>&#160; strswitch(s_control[0,1])</div><div class="line"><a name="l01279"></a><span class="lineno"> 1279</span>&#160; case &quot;sv&quot;:</div><div class="line"><a name="l01280"></a><span class="lineno"> 1280</span>&#160; SetVariable $s_control, win=$win_name, pos={0,ypos}, size={300,16}, bodyWidth=230</div><div class="line"><a name="l01281"></a><span class="lineno"> 1281</span>&#160; SetVariable $s_control, win=$win_name, title=s_attr, value= _STR:<span class="stringliteral">&quot;&quot;</span></div><div class="line"><a name="l01282"></a><span class="lineno"> 1282</span>&#160; SetVariable $s_control, win=$win_name, userdata(attribute)=s_attr</div><div class="line"><a name="l01283"></a><span class="lineno"> 1283</span>&#160; ypos += 18</div><div class="line"><a name="l01284"></a><span class="lineno"> 1284</span>&#160; <span class="keywordflow">break</span></div><div class="line"><a name="l01285"></a><span class="lineno"> 1285</span>&#160; <span class="keywordflow">case</span> <span class="stringliteral">&quot;pm&quot;</span>:</div><div class="line"><a name="l01286"></a><span class="lineno"> 1286</span>&#160; options_path = persistent_path + StringByKey(s_attr, options, <span class="stringliteral">&quot;=&quot;</span>, <span class="stringliteral">&quot;;&quot;</span>)</div><div class="line"><a name="l01287"></a><span class="lineno"> 1287</span>&#160; PopupMenu $s_control, win=$win_name, pos={0,ypos}, size={300,21}, bodyWidth=230</div><div class="line"><a name="l01288"></a><span class="lineno"> 1288</span>&#160; PopupMenu $s_control, win=$win_name, title=s_attr</div><div class="line"><a name="l01289"></a><span class="lineno"> 1289</span>&#160; PopupMenu $s_control, win=$win_name, mode=1, popvalue=<span class="stringliteral">&quot;Test&quot;</span>, value= #options_path</div><div class="line"><a name="l01290"></a><span class="lineno"> 1290</span>&#160; PopupMenu $s_control, win=$win_name, userdata(attribute)=s_attr</div><div class="line"><a name="l01291"></a><span class="lineno"> 1291</span>&#160; ypos += 23</div><div class="line"><a name="l01292"></a><span class="lineno"> 1292</span>&#160; <span class="keywordflow">break</span></div><div class="line"><a name="l01293"></a><span class="lineno"> 1293</span>&#160; <span class="keywordflow">case</span> <span class="stringliteral">&quot;cb&quot;</span>:</div><div class="line"><a name="l01294"></a><span class="lineno"> 1294</span>&#160; CheckBox $s_control, win=$win_name, pos={70,ypos}, size={300,14}</div><div class="line"><a name="l01295"></a><span class="lineno"> 1295</span>&#160; CheckBox $s_control, win=$win_name, title=s_attr, value= 1</div><div class="line"><a name="l01296"></a><span class="lineno"> 1296</span>&#160; CheckBox $s_control, win=$win_name, userdata(attribute)=s_attr</div><div class="line"><a name="l01297"></a><span class="lineno"> 1297</span>&#160; ypos += 17</div><div class="line"><a name="l01298"></a><span class="lineno"> 1298</span>&#160; <span class="keywordflow">break</span></div><div class="line"><a name="l01299"></a><span class="lineno"> 1299</span>&#160; endswitch</div><div class="line"><a name="l01300"></a><span class="lineno"> 1300</span>&#160; endfor</div><div class="line"><a name="l01301"></a><span class="lineno"> 1301</span>&#160; ypos = max(ypos, 80)</div><div class="line"><a name="l01302"></a><span class="lineno"> 1302</span>&#160; </div><div class="line"><a name="l01303"></a><span class="lineno"> 1303</span>&#160; TitleBox t_attach, win=$win_name, pos={308,5}, size={70,14}, title=<span class="stringliteral">&quot;Attachments&quot;</span>, frame=0</div><div class="line"><a name="l01304"></a><span class="lineno"> 1304</span>&#160; height = ypos - 21 - 4</div><div class="line"><a name="l01305"></a><span class="lineno"> 1305</span>&#160; ListBox lb_attach, win=$win_name, pos={308,21}, size={264,height}</div><div class="line"><a name="l01306"></a><span class="lineno"> 1306</span>&#160; ListBox lb_attach, win=$win_name, listWave=attach_list</div><div class="line"><a name="l01307"></a><span class="lineno"> 1307</span>&#160; ListBox lb_attach, win=$win_name, mode=1, selWave=attach_sel, selRow=-1</div><div class="line"><a name="l01308"></a><span class="lineno"> 1308</span>&#160; ListBox lb_attach, win=$win_name, widths={20,160,80}</div><div class="line"><a name="l01309"></a><span class="lineno"> 1309</span>&#160; ListBox lb_attach, win=$win_name, help={<span class="stringliteral">&quot;Choose graphs to attach to the message.&quot;</span>}</div><div class="line"><a name="l01310"></a><span class="lineno"> 1310</span>&#160;</div><div class="line"><a name="l01311"></a><span class="lineno"> 1311</span>&#160; Button b_attach_top, win=$win_name, pos={420,2}, size={40,18}, title=<span class="stringliteral">&quot;top&quot;</span></div><div class="line"><a name="l01312"></a><span class="lineno"> 1312</span>&#160; Button b_attach_top, win=$win_name, fcolor=(56576,60928,47872)</div><div class="line"><a name="l01313"></a><span class="lineno"> 1313</span>&#160; Button b_attach_top, win=$win_name, proc=<a class="code" href="namespace_pearl_elog.html">PearlElog</a>#<a class="code" href="pearl-elog_8ipf.html#a91b5f51982d23a36d1760b8874b5736a">bp_attach_top</a></div><div class="line"><a name="l01314"></a><span class="lineno"> 1314</span>&#160; Button b_attach_top, win=$win_name, help={<span class="stringliteral">&quot;Select top graph for attachment.&quot;</span>}</div><div class="line"><a name="l01315"></a><span class="lineno"> 1315</span>&#160; Button b_attach_all, win=$win_name, pos={460,2}, size={40,18}, title=<span class="stringliteral">&quot;all&quot;</span></div><div class="line"><a name="l01316"></a><span class="lineno"> 1316</span>&#160; Button b_attach_all, win=$win_name, fcolor=(56576,60928,47872)</div><div class="line"><a name="l01317"></a><span class="lineno"> 1317</span>&#160; Button b_attach_all, win=$win_name, proc=<a class="code" href="namespace_pearl_elog.html">PearlElog</a>#<a class="code" href="pearl-elog_8ipf.html#a4040736819edadf4b26982bcfdb9c7b9">bp_attach_allnone</a></div><div class="line"><a name="l01318"></a><span class="lineno"> 1318</span>&#160; Button b_attach_all, win=$win_name, help={<span class="stringliteral">&quot;Select all graphs for attachment.&quot;</span>}</div><div class="line"><a name="l01319"></a><span class="lineno"> 1319</span>&#160; Button b_attach_none, win=$win_name, pos={500,2}, size={40,18}, title=<span class="stringliteral">&quot;none&quot;</span></div><div class="line"><a name="l01320"></a><span class="lineno"> 1320</span>&#160; Button b_attach_none, win=$win_name, fcolor=(56576,60928,47872)</div><div class="line"><a name="l01321"></a><span class="lineno"> 1321</span>&#160; Button b_attach_none, win=$win_name, proc=<a class="code" href="namespace_pearl_elog.html">PearlElog</a>#<a class="code" href="pearl-elog_8ipf.html#a4040736819edadf4b26982bcfdb9c7b9">bp_attach_allnone</a></div><div class="line"><a name="l01322"></a><span class="lineno"> 1322</span>&#160; Button b_attach_none, win=$win_name, help={<span class="stringliteral">&quot;Deselect all attachments.&quot;</span>}</div><div class="line"><a name="l01323"></a><span class="lineno"> 1323</span>&#160; Button b_save_graphs, win=$win_name, pos={540,2}, size={40,18}, title=<span class="stringliteral">&quot;save&quot;</span></div><div class="line"><a name="l01324"></a><span class="lineno"> 1324</span>&#160; Button b_save_graphs, win=$win_name, fcolor=(56576,60928,47872)</div><div class="line"><a name="l01325"></a><span class="lineno"> 1325</span>&#160; Button b_save_graphs, win=$win_name, proc=<a class="code" href="namespace_pearl_elog.html">PearlElog</a>#<a class="code" href="pearl-elog_8ipf.html#a8251cea45c8d1f1993a4051a6d0760c4">bp_save_graphs</a></div><div class="line"><a name="l01326"></a><span class="lineno"> 1326</span>&#160; Button b_save_graphs, win=$win_name, help={<span class="stringliteral">&quot;Save selected graphs as PNG bitmap files.&quot;</span>}</div><div class="line"><a name="l01327"></a><span class="lineno"> 1327</span>&#160; Button b_attach_up, win=$win_name, pos={576,20}, size={20,20}, title=<span class="stringliteral">&quot;\\W517&quot;</span></div><div class="line"><a name="l01328"></a><span class="lineno"> 1328</span>&#160; Button b_attach_up, win=$win_name, fcolor=(56576,60928,47872)</div><div class="line"><a name="l01329"></a><span class="lineno"> 1329</span>&#160; Button b_attach_up, win=$win_name, proc=<a class="code" href="namespace_pearl_elog.html">PearlElog</a>#<a class="code" href="pearl-elog_8ipf.html#aa1dfae6d78a367d50ee8fc1ffe9cb69b">bp_attach_updown</a></div><div class="line"><a name="l01330"></a><span class="lineno"> 1330</span>&#160; Button b_attach_up, win=$win_name, help={<span class="stringliteral">&quot;Move selected graph up.&quot;</span>}</div><div class="line"><a name="l01331"></a><span class="lineno"> 1331</span>&#160; Button b_attach_dw, win=$win_name, pos={576,40}, size={20,20}, title=<span class="stringliteral">&quot;\\W523&quot;</span></div><div class="line"><a name="l01332"></a><span class="lineno"> 1332</span>&#160; Button b_attach_dw, win=$win_name, fcolor=(56576,60928,47872)</div><div class="line"><a name="l01333"></a><span class="lineno"> 1333</span>&#160; Button b_attach_dw, win=$win_name, proc=<a class="code" href="namespace_pearl_elog.html">PearlElog</a>#<a class="code" href="pearl-elog_8ipf.html#aa1dfae6d78a367d50ee8fc1ffe9cb69b">bp_attach_updown</a></div><div class="line"><a name="l01334"></a><span class="lineno"> 1334</span>&#160; Button b_attach_dw, win=$win_name, help={<span class="stringliteral">&quot;Move selected graph down.&quot;</span>}</div><div class="line"><a name="l01335"></a><span class="lineno"> 1335</span>&#160;</div><div class="line"><a name="l01336"></a><span class="lineno"> 1336</span>&#160; ypos += 246-160</div><div class="line"><a name="l01337"></a><span class="lineno"> 1337</span>&#160; Button b_submit,win=$win_name, pos={70,ypos},size={46,20},proc=<a class="code" href="namespace_pearl_elog.html">PearlElog</a>#<a class="code" href="pearl-elog_8ipf.html#adeff6678e57313cb218824f06d32b5ec">bp_submit</a>,title=<span class="stringliteral">&quot;Submit&quot;</span></div><div class="line"><a name="l01338"></a><span class="lineno"> 1338</span>&#160; Button b_submit,win=$win_name, help={<span class="stringliteral">&quot;Submit form data to ELOG (new entry).&quot;</span>}</div><div class="line"><a name="l01339"></a><span class="lineno"> 1339</span>&#160; Button b_submit,win=$win_name, fcolor=(56576,60928,47872)</div><div class="line"><a name="l01340"></a><span class="lineno"> 1340</span>&#160; Button b_clear,win=$win_name, pos={120,ypos},size={46,20},proc=<a class="code" href="namespace_pearl_elog.html">PearlElog</a>#<a class="code" href="pearl-elog_8ipf.html#ab39637298c93b7aefd67febf3a4e7672">bp_clear</a>,title=<span class="stringliteral">&quot;Clear&quot;</span></div><div class="line"><a name="l01341"></a><span class="lineno"> 1341</span>&#160; Button b_clear,win=$win_name, help={<span class="stringliteral">&quot;Clear the form fields&quot;</span>}</div><div class="line"><a name="l01342"></a><span class="lineno"> 1342</span>&#160; Button b_clear,win=$win_name, fcolor=(56576,60928,47872)</div><div class="line"><a name="l01343"></a><span class="lineno"> 1343</span>&#160;</div><div class="line"><a name="l01344"></a><span class="lineno"> 1344</span>&#160; ypos += 272-246</div><div class="line"><a name="l01345"></a><span class="lineno"> 1345</span>&#160; variable_path = volatile_path + <span class="stringliteral">&quot;msg_id&quot;</span></div><div class="line"><a name="l01346"></a><span class="lineno"> 1346</span>&#160; SetVariable sv_id,win=$win_name, pos={51,ypos},size={119,16},bodyWidth=77</div><div class="line"><a name="l01347"></a><span class="lineno"> 1347</span>&#160; SetVariable sv_id,win=$win_name, title=<span class="stringliteral">&quot;ID&quot;</span>,value=$variable_path</div><div class="line"><a name="l01348"></a><span class="lineno"> 1348</span>&#160; SetVariable sv_id,win=$win_name, help={<span class="stringliteral">&quot;ID of last submitted message, or message to attach or reply to.&quot;</span>}</div><div class="line"><a name="l01349"></a><span class="lineno"> 1349</span>&#160;</div><div class="line"><a name="l01350"></a><span class="lineno"> 1350</span>&#160; TitleBox t_host, win=$win_name, pos={170,ypos+4}, size={112.00,14.00}, frame=0</div><div class="line"><a name="l01351"></a><span class="lineno"> 1351</span>&#160; TitleBox t_host, win=$win_name, variable=url</div><div class="line"><a name="l01352"></a><span class="lineno"> 1352</span>&#160;</div><div class="line"><a name="l01353"></a><span class="lineno"> 1353</span>&#160; ypos += 270-272</div><div class="line"><a name="l01354"></a><span class="lineno"> 1354</span>&#160; Button b_attach,win=$win_name, pos={170,ypos},size={48,20},proc=<a class="code" href="namespace_pearl_elog.html">PearlElog</a>#<a class="code" href="pearl-elog_8ipf.html#acbba78d869a543edf7c2b80d7a8d2344">bp_attach</a>,title=<span class="stringliteral">&quot;Attach&quot;</span></div><div class="line"><a name="l01355"></a><span class="lineno"> 1355</span>&#160; Button b_attach,win=$win_name, help={<span class="stringliteral">&quot;Attach the selected graph to an existing ELOG entry (correct ID required).&quot;</span>}</div><div class="line"><a name="l01356"></a><span class="lineno"> 1356</span>&#160; Button b_attach,win=$win_name, fcolor=(56576,60928,47872)</div><div class="line"><a name="l01357"></a><span class="lineno"> 1357</span>&#160; Button b_reply,win=$win_name, pos={220,ypos},size={48,20},proc=<a class="code" href="namespace_pearl_elog.html">PearlElog</a>#<a class="code" href="pearl-elog_8ipf.html#adeff6678e57313cb218824f06d32b5ec">bp_submit</a>,title=<span class="stringliteral">&quot;Reply&quot;</span></div><div class="line"><a name="l01358"></a><span class="lineno"> 1358</span>&#160; Button b_reply,win=$win_name, help={<span class="stringliteral">&quot;Submit form data to ELOG as a reply to an existing message (correct ID required).&quot;</span>}</div><div class="line"><a name="l01359"></a><span class="lineno"> 1359</span>&#160; Button b_reply,win=$win_name, fcolor=(56576,60928,47872)</div><div class="line"><a name="l01360"></a><span class="lineno"> 1360</span>&#160; Button b_login,win=$win_name, pos={550,ypos},size={46,20},proc=<a class="code" href="namespace_pearl_elog.html">PearlElog</a>#<a class="code" href="pearl-elog_8ipf.html#a14f8376a0485aa654ccf3d2f30ab4d01">bp_login</a>,title=<span class="stringliteral">&quot;Login&quot;</span></div><div class="line"><a name="l01361"></a><span class="lineno"> 1361</span>&#160; Button b_login,win=$win_name, help={<span class="stringliteral">&quot;Enter user name and password.&quot;</span>}</div><div class="line"><a name="l01362"></a><span class="lineno"> 1362</span>&#160; Button b_login,win=$win_name, fcolor=(56576,60928,47872)</div><div class="line"><a name="l01363"></a><span class="lineno"> 1363</span>&#160; Button b_logout,win=$win_name, pos={550,ypos},size={46,20},proc=<a class="code" href="namespace_pearl_elog.html">PearlElog</a>#<a class="code" href="pearl-elog_8ipf.html#ad4472ea917691c41ad0b4ea6f36010a5">bp_logout</a>,title=<span class="stringliteral">&quot;Logout&quot;</span></div><div class="line"><a name="l01364"></a><span class="lineno"> 1364</span>&#160; Button b_logout,win=$win_name, help={<span class="stringliteral">&quot;Clear user name and password.&quot;</span>}</div><div class="line"><a name="l01365"></a><span class="lineno"> 1365</span>&#160; Button b_logout,win=$win_name, fcolor=(56576,60928,47872), disable=3</div><div class="line"><a name="l01366"></a><span class="lineno"> 1366</span>&#160;</div><div class="line"><a name="l01367"></a><span class="lineno"> 1367</span>&#160; SetWindow $win_name, hook(elogPanelHook)=<a class="code" href="namespace_pearl_elog.html">PearlElog</a>#<a class="code" href="pearl-elog_8ipf.html#af8b1ea711208bcc2cd1647abe04131dc">elog_panel_hook</a></div><div class="line"><a name="l01368"></a><span class="lineno"> 1368</span>&#160; SetWindow $win_name, userdata(logbook)=logbook</div><div class="line"><a name="l01369"></a><span class="lineno"> 1369</span>&#160;</div><div class="line"><a name="l01370"></a><span class="lineno"> 1370</span>&#160; ypos += 160-270</div><div class="line"><a name="l01371"></a><span class="lineno"> 1371</span>&#160; TitleBox t_message,win=$win_name, pos={10,ypos},size={58,16},fixedSize=1,frame=0,anchor=RT,title=<span class="stringliteral">&quot;Message&quot;</span></div><div class="line"><a name="l01372"></a><span class="lineno"> 1372</span>&#160; DefineGuide UGH0={FT,ypos},UGV0={FL,70},UGH1={FB,-52},UGV1={FR,-2}</div><div class="line"><a name="l01373"></a><span class="lineno"> 1373</span>&#160; NewNotebook /F=0 /N=Message /OPTS=3 /W=(115,404,345,341)/FG=(UGV0,UGH0,UGV1,UGH1) /HOST=# </div><div class="line"><a name="l01374"></a><span class="lineno"> 1374</span>&#160; Notebook kwTopWin, defaultTab=20, statusWidth=0, autoSave=0</div><div class="line"><a name="l01375"></a><span class="lineno"> 1375</span>&#160; Notebook kwTopWin fSize=10, fStyle=0, textRGB=(0,0,0)</div><div class="line"><a name="l01376"></a><span class="lineno"> 1376</span>&#160; RenameWindow #,Message</div><div class="line"><a name="l01377"></a><span class="lineno"> 1377</span>&#160; <span class="keywordtype">string</span> nb_name = win_name + <span class="stringliteral">&quot;#Message&quot;</span></div><div class="line"><a name="l01378"></a><span class="lineno"> 1378</span>&#160; SetActiveSubwindow ##</div><div class="line"><a name="l01379"></a><span class="lineno"> 1379</span>&#160;</div><div class="line"><a name="l01380"></a><span class="lineno"> 1380</span>&#160; <span class="comment">// restore recently used attributes and message</span></div><div class="line"><a name="l01381"></a><span class="lineno"> 1381</span>&#160; svar /z /sdfr=df_persistent recent</div><div class="line"><a name="l01382"></a><span class="lineno"> 1382</span>&#160; <span class="keywordflow">if</span> (svar_exists(recent) &amp;&amp; (strlen(recent) &gt; 0))</div><div class="line"><a name="l01383"></a><span class="lineno"> 1383</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a39a1f418c8a2f9a5e4ab976827d8efca">set_panel_attributes</a>(win_name, recent)</div><div class="line"><a name="l01384"></a><span class="lineno"> 1384</span>&#160; endif</div><div class="line"><a name="l01385"></a><span class="lineno"> 1385</span>&#160; svar /z /sdfr=df_persistent recent_message</div><div class="line"><a name="l01386"></a><span class="lineno"> 1386</span>&#160; <span class="keywordflow">if</span> (svar_exists(recent_message) &amp;&amp; (strlen(recent_message) &gt; 0))</div><div class="line"><a name="l01387"></a><span class="lineno"> 1387</span>&#160; <a class="code" href="pearl-elog_8ipf.html#aa7a3988440bb6d73573b50a4698a0e75">set_panel_message</a>(win_name, recent_message)</div><div class="line"><a name="l01388"></a><span class="lineno"> 1388</span>&#160; endif</div><div class="line"><a name="l01389"></a><span class="lineno"> 1389</span>&#160; Notebook $nb_name selection={startOfFile,startOfFile}, findText={<span class="stringliteral">&quot;&quot;</span>,1}</div><div class="line"><a name="l01390"></a><span class="lineno"> 1390</span>&#160; </div><div class="line"><a name="l01391"></a><span class="lineno"> 1391</span>&#160; setdatafolder savedf</div><div class="line"><a name="l01392"></a><span class="lineno"> 1392</span>&#160; <span class="keywordflow">return</span> win_name</div><div class="line"><a name="l01393"></a><span class="lineno"> 1393</span>&#160;end</div><div class="line"><a name="l01394"></a><span class="lineno"> 1394</span>&#160;</div><div class="line"><a name="l01395"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#af8b1ea711208bcc2cd1647abe04131dc"> 1395</a></span>&#160;<span class="keyword">static</span> <span class="keyword">function</span> <a class="code" href="pearl-elog_8ipf.html#af8b1ea711208bcc2cd1647abe04131dc">elog_panel_hook</a>(s)</div><div class="line"><a name="l01396"></a><span class="lineno"> 1396</span>&#160; STRUCT WMWinHookStruct &amp;s</div><div class="line"><a name="l01397"></a><span class="lineno"> 1397</span>&#160;</div><div class="line"><a name="l01398"></a><span class="lineno"> 1398</span>&#160; Variable hookResult = 0</div><div class="line"><a name="l01399"></a><span class="lineno"> 1399</span>&#160;</div><div class="line"><a name="l01400"></a><span class="lineno"> 1400</span>&#160; <span class="keywordflow">switch</span>(s.eventCode)</div><div class="line"><a name="l01401"></a><span class="lineno"> 1401</span>&#160; <span class="keywordflow">case</span> 0: <span class="comment">// activate</span></div><div class="line"><a name="l01402"></a><span class="lineno"> 1402</span>&#160; <span class="keywordtype">string</span> logbook = GetUserData(s.winName, <span class="stringliteral">&quot;&quot;</span>, <span class="stringliteral">&quot;logbook&quot;</span>)</div><div class="line"><a name="l01403"></a><span class="lineno"> 1403</span>&#160; if (strlen(logbook) &gt; 0)</div><div class="line"><a name="l01404"></a><span class="lineno"> 1404</span>&#160; dfref df_volatile = <a class="code" href="pearl-elog_8ipf.html#ac45196cb9ce8b43b76c9daf67689c49a">get_elog_df</a>(logbook, <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>)</div><div class="line"><a name="l01405"></a><span class="lineno"> 1405</span>&#160; svar /sdfr=df_volatile url</div><div class="line"><a name="l01406"></a><span class="lineno"> 1406</span>&#160; url = <a class="code" href="pearl-elog_8ipf.html#a3cc9074c84d684d207dfdf2045755df4">format_url</a>(logbook)</div><div class="line"><a name="l01407"></a><span class="lineno"> 1407</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a9c1cfd320e88e84dcf4f84bbcf3f46a5">update_attach_items</a>(logbook)</div><div class="line"><a name="l01408"></a><span class="lineno"> 1408</span>&#160; endif</div><div class="line"><a name="l01409"></a><span class="lineno"> 1409</span>&#160; break</div><div class="line"><a name="l01410"></a><span class="lineno"> 1410</span>&#160; case 6: <span class="comment">// resize</span></div><div class="line"><a name="l01411"></a><span class="lineno"> 1411</span>&#160; <span class="comment">// move bottom-aligned controls when the window is resized</span></div><div class="line"><a name="l01412"></a><span class="lineno"> 1412</span>&#160; variable b_top = s.winRect.bottom + 4</div><div class="line"><a name="l01413"></a><span class="lineno"> 1413</span>&#160; Button b_submit,pos={70,b_top}</div><div class="line"><a name="l01414"></a><span class="lineno"> 1414</span>&#160; Button b_clear,pos={120,b_top}</div><div class="line"><a name="l01415"></a><span class="lineno"> 1415</span>&#160; TitleBox t_host, pos={170,b_top+4}</div><div class="line"><a name="l01416"></a><span class="lineno"> 1416</span>&#160; b_top += 24</div><div class="line"><a name="l01417"></a><span class="lineno"> 1417</span>&#160; Button b_attach,pos={170,b_top}</div><div class="line"><a name="l01418"></a><span class="lineno"> 1418</span>&#160; Button b_reply,pos={220,b_top}</div><div class="line"><a name="l01419"></a><span class="lineno"> 1419</span>&#160; Button b_login, pos={550,b_top}</div><div class="line"><a name="l01420"></a><span class="lineno"> 1420</span>&#160; Button b_logout, pos={550,b_top}</div><div class="line"><a name="l01421"></a><span class="lineno"> 1421</span>&#160; b_top += 2</div><div class="line"><a name="l01422"></a><span class="lineno"> 1422</span>&#160; SetVariable sv_id,pos={51,b_top}</div><div class="line"><a name="l01423"></a><span class="lineno"> 1423</span>&#160; <span class="keywordflow">break</span></div><div class="line"><a name="l01424"></a><span class="lineno"> 1424</span>&#160; endswitch</div><div class="line"><a name="l01425"></a><span class="lineno"> 1425</span>&#160;</div><div class="line"><a name="l01426"></a><span class="lineno"> 1426</span>&#160; <span class="keywordflow">return</span> hookResult <span class="comment">// 0 if nothing done, else 1</span></div><div class="line"><a name="l01427"></a><span class="lineno"> 1427</span>&#160;end</div><div class="line"><a name="l01428"></a><span class="lineno"> 1428</span>&#160;</div><div class="line"><a name="l01429"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#aae61ff4d4a4d83dfc55af45d9ed1cbc3"> 1429</a></span>&#160;<span class="keyword">static</span> constant <a class="code" href="pearl-elog_8ipf.html#aae61ff4d4a4d83dfc55af45d9ed1cbc3">kAttachColSel</a> = 0</div><div class="line"><a name="l01430"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a5afeb893f92034532341ae51471dc2d2"> 1430</a></span>&#160;<span class="keyword">static</span> constant <a class="code" href="pearl-elog_8ipf.html#a5afeb893f92034532341ae51471dc2d2">kAttachColTitle</a> = 1</div><div class="line"><a name="l01431"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#addbdec64930e9c1e417b16b25df8c723"> 1431</a></span>&#160;<span class="keyword">static</span> constant <a class="code" href="pearl-elog_8ipf.html#addbdec64930e9c1e417b16b25df8c723">kAttachColName</a> = 2</div><div class="line"><a name="l01432"></a><span class="lineno"> 1432</span>&#160;</div><div class="line"><a name="l01434"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a9c1cfd320e88e84dcf4f84bbcf3f46a5"> 1434</a></span>&#160;<span class="keyword">static</span> <span class="keyword">function</span> <a class="code" href="pearl-elog_8ipf.html#a9c1cfd320e88e84dcf4f84bbcf3f46a5">update_attach_items</a>(logbook)</div><div class="line"><a name="l01435"></a><span class="lineno"> 1435</span>&#160; <span class="keywordtype">string</span> logbook</div><div class="line"><a name="l01436"></a><span class="lineno"> 1436</span>&#160;</div><div class="line"><a name="l01437"></a><span class="lineno"> 1437</span>&#160; dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l01438"></a><span class="lineno"> 1438</span>&#160; dfref df_volatile = <a class="code" href="pearl-elog_8ipf.html#ac45196cb9ce8b43b76c9daf67689c49a">get_elog_df</a>(logbook, <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>)</div><div class="line"><a name="l01439"></a><span class="lineno"> 1439</span>&#160; wave /t /sdfr=df_volatile attach_list</div><div class="line"><a name="l01440"></a><span class="lineno"> 1440</span>&#160; wave /sdfr=df_volatile attach_sel</div><div class="line"><a name="l01441"></a><span class="lineno"> 1441</span>&#160;</div><div class="line"><a name="l01442"></a><span class="lineno"> 1442</span>&#160; if (!waveexists(attach_list))</div><div class="line"><a name="l01443"></a><span class="lineno"> 1443</span>&#160; return -1</div><div class="line"><a name="l01444"></a><span class="lineno"> 1444</span>&#160; endif</div><div class="line"><a name="l01445"></a><span class="lineno"> 1445</span>&#160; <span class="keywordtype">string</span> names = WinList(&quot;*&quot;, &quot;;&quot;, &quot;WIN:1;VISIBLE:1&quot;)</div><div class="line"><a name="l01446"></a><span class="lineno"> 1446</span>&#160; names = SortList(names, &quot;;&quot;, 16)</div><div class="line"><a name="l01447"></a><span class="lineno"> 1447</span>&#160;</div><div class="line"><a name="l01448"></a><span class="lineno"> 1448</span>&#160; <span class="comment">// remove closed graphs</span></div><div class="line"><a name="l01449"></a><span class="lineno"> 1449</span>&#160; variable i</div><div class="line"><a name="l01450"></a><span class="lineno"> 1450</span>&#160; variable k</div><div class="line"><a name="l01451"></a><span class="lineno"> 1451</span>&#160; variable n = DimSize(attach_list, 0)</div><div class="line"><a name="l01452"></a><span class="lineno"> 1452</span>&#160; <span class="keywordtype">string</span> s</div><div class="line"><a name="l01453"></a><span class="lineno"> 1453</span>&#160; for (i = n-1; i &gt;= 0; i -= 1)</div><div class="line"><a name="l01454"></a><span class="lineno"> 1454</span>&#160; s = attach_list[i][kAttachColName]</div><div class="line"><a name="l01455"></a><span class="lineno"> 1455</span>&#160; if (WhichListItem(s, names) &lt; 0)</div><div class="line"><a name="l01456"></a><span class="lineno"> 1456</span>&#160; DeletePoints /M=0 i, 1, attach_list, attach_sel</div><div class="line"><a name="l01457"></a><span class="lineno"> 1457</span>&#160; endif</div><div class="line"><a name="l01458"></a><span class="lineno"> 1458</span>&#160; endfor</div><div class="line"><a name="l01459"></a><span class="lineno"> 1459</span>&#160; </div><div class="line"><a name="l01460"></a><span class="lineno"> 1460</span>&#160; <span class="comment">// add new graphs</span></div><div class="line"><a name="l01461"></a><span class="lineno"> 1461</span>&#160; n = ItemsInList(names)</div><div class="line"><a name="l01462"></a><span class="lineno"> 1462</span>&#160; for (i = 0; i &lt; n; i += 1)</div><div class="line"><a name="l01463"></a><span class="lineno"> 1463</span>&#160; s = StringFromList(i, names)</div><div class="line"><a name="l01464"></a><span class="lineno"> 1464</span>&#160; FindValue /text=s /txop=4 /z attach_list</div><div class="line"><a name="l01465"></a><span class="lineno"> 1465</span>&#160; if (v_value &lt; 0)</div><div class="line"><a name="l01466"></a><span class="lineno"> 1466</span>&#160; k = DimSize(attach_list, 0)</div><div class="line"><a name="l01467"></a><span class="lineno"> 1467</span>&#160; Redimension /n=(k+1,3) attach_list, attach_sel</div><div class="line"><a name="l01468"></a><span class="lineno"> 1468</span>&#160; <span class="comment">//InsertPoints /M=0 k, 1, attach_list, attach_sel</span></div><div class="line"><a name="l01469"></a><span class="lineno"> 1469</span>&#160; attach_list[k][kAttachColSel] = &quot;&quot;</div><div class="line"><a name="l01470"></a><span class="lineno"> 1470</span>&#160; attach_list[k][kAttachColTitle] = &quot;&quot;</div><div class="line"><a name="l01471"></a><span class="lineno"> 1471</span>&#160; attach_list[k][kAttachColName] = s</div><div class="line"><a name="l01472"></a><span class="lineno"> 1472</span>&#160; attach_sel[k][kAttachColSel] = 32</div><div class="line"><a name="l01473"></a><span class="lineno"> 1473</span>&#160; attach_sel[k][kAttachColTitle] = 0</div><div class="line"><a name="l01474"></a><span class="lineno"> 1474</span>&#160; attach_sel[k][kAttachColName] = 0</div><div class="line"><a name="l01475"></a><span class="lineno"> 1475</span>&#160; endif</div><div class="line"><a name="l01476"></a><span class="lineno"> 1476</span>&#160; endfor</div><div class="line"><a name="l01477"></a><span class="lineno"> 1477</span>&#160;</div><div class="line"><a name="l01478"></a><span class="lineno"> 1478</span>&#160; <span class="comment">// update titles</span></div><div class="line"><a name="l01479"></a><span class="lineno"> 1479</span>&#160; n = DimSize(attach_list, 0)</div><div class="line"><a name="l01480"></a><span class="lineno"> 1480</span>&#160; for (i = n-1; i &gt;= 0; i -= 1)</div><div class="line"><a name="l01481"></a><span class="lineno"> 1481</span>&#160; s = attach_list[i][kAttachColName]</div><div class="line"><a name="l01482"></a><span class="lineno"> 1482</span>&#160; getwindow /z $s, wtitle</div><div class="line"><a name="l01483"></a><span class="lineno"> 1483</span>&#160; if (v_flag == 0)</div><div class="line"><a name="l01484"></a><span class="lineno"> 1484</span>&#160; attach_list[i][kAttachColTitle] = s_value</div><div class="line"><a name="l01485"></a><span class="lineno"> 1485</span>&#160; else</div><div class="line"><a name="l01486"></a><span class="lineno"> 1486</span>&#160; attach_list[i][kAttachColTitle] = s</div><div class="line"><a name="l01487"></a><span class="lineno"> 1487</span>&#160; endif</div><div class="line"><a name="l01488"></a><span class="lineno"> 1488</span>&#160; endfor</div><div class="line"><a name="l01489"></a><span class="lineno"> 1489</span>&#160; </div><div class="line"><a name="l01490"></a><span class="lineno"> 1490</span>&#160; setdatafolder savedf</div><div class="line"><a name="l01491"></a><span class="lineno"> 1491</span>&#160; return 0</div><div class="line"><a name="l01492"></a><span class="lineno"> 1492</span>&#160;end</div><div class="line"><a name="l01493"></a><span class="lineno"> 1493</span>&#160;</div><div class="line"><a name="l01495"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a7990f2948d48aefe990271d1961df833"> 1495</a></span>&#160;static function <a class="code" href="pearl-elog_8ipf.html#a7990f2948d48aefe990271d1961df833">move_attach_item</a>(logbook, item, distance)</div><div class="line"><a name="l01496"></a><span class="lineno"> 1496</span>&#160; <span class="keywordtype">string</span> logbook</div><div class="line"><a name="l01497"></a><span class="lineno"> 1497</span>&#160; variable item</div><div class="line"><a name="l01498"></a><span class="lineno"> 1498</span>&#160; variable distance</div><div class="line"><a name="l01499"></a><span class="lineno"> 1499</span>&#160; </div><div class="line"><a name="l01500"></a><span class="lineno"> 1500</span>&#160; dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l01501"></a><span class="lineno"> 1501</span>&#160; dfref df_volatile = <a class="code" href="pearl-elog_8ipf.html#ac45196cb9ce8b43b76c9daf67689c49a">get_elog_df</a>(logbook, <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>)</div><div class="line"><a name="l01502"></a><span class="lineno"> 1502</span>&#160; wave /t /sdfr=df_volatile attach_list</div><div class="line"><a name="l01503"></a><span class="lineno"> 1503</span>&#160; wave /sdfr=df_volatile attach_sel</div><div class="line"><a name="l01504"></a><span class="lineno"> 1504</span>&#160; variable n = DimSize(attach_list, 0)</div><div class="line"><a name="l01505"></a><span class="lineno"> 1505</span>&#160; variable dest = item + distance</div><div class="line"><a name="l01506"></a><span class="lineno"> 1506</span>&#160; </div><div class="line"><a name="l01507"></a><span class="lineno"> 1507</span>&#160; if ((item &gt;= 0) &amp;&amp; (item &lt; n) &amp;&amp; (dest &gt;= 0) &amp;&amp; (dest &lt; n))</div><div class="line"><a name="l01508"></a><span class="lineno"> 1508</span>&#160; <span class="keywordtype">string</span> name = attach_list[item][kAttachColName]</div><div class="line"><a name="l01509"></a><span class="lineno"> 1509</span>&#160; variable sel = attach_sel[item][kAttachColSel]</div><div class="line"><a name="l01510"></a><span class="lineno"> 1510</span>&#160; DeletePoints /M=0 item, 1, attach_list, attach_sel</div><div class="line"><a name="l01511"></a><span class="lineno"> 1511</span>&#160; InsertPoints /M=0 dest, 1, attach_list, attach_sel</div><div class="line"><a name="l01512"></a><span class="lineno"> 1512</span>&#160; attach_list[dest][kAttachColName] = name</div><div class="line"><a name="l01513"></a><span class="lineno"> 1513</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a9c1cfd320e88e84dcf4f84bbcf3f46a5">update_attach_items</a>(logbook)</div><div class="line"><a name="l01514"></a><span class="lineno"> 1514</span>&#160; attach_sel[dest][kAttachColSel] = sel</div><div class="line"><a name="l01515"></a><span class="lineno"> 1515</span>&#160; endif</div><div class="line"><a name="l01516"></a><span class="lineno"> 1516</span>&#160;end</div><div class="line"><a name="l01517"></a><span class="lineno"> 1517</span>&#160;</div><div class="line"><a name="l01519"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#aa1dfae6d78a367d50ee8fc1ffe9cb69b"> 1519</a></span>&#160;static function <a class="code" href="pearl-elog_8ipf.html#aa1dfae6d78a367d50ee8fc1ffe9cb69b">bp_attach_updown</a>(ba) : ButtonControl</div><div class="line"><a name="l01520"></a><span class="lineno"> 1520</span>&#160; STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01521"></a><span class="lineno"> 1521</span>&#160;</div><div class="line"><a name="l01522"></a><span class="lineno"> 1522</span>&#160; switch( ba.eventCode )</div><div class="line"><a name="l01523"></a><span class="lineno"> 1523</span>&#160; case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01524"></a><span class="lineno"> 1524</span>&#160; <span class="keywordtype">string</span> logbook = GetUserData(ba.win, &quot;&quot;, &quot;logbook&quot;)</div><div class="line"><a name="l01525"></a><span class="lineno"> 1525</span>&#160; ControlInfo /w=$ba.win lb_attach</div><div class="line"><a name="l01526"></a><span class="lineno"> 1526</span>&#160; variable row = v_value</div><div class="line"><a name="l01527"></a><span class="lineno"> 1527</span>&#160; dfref df = $s_datafolder</div><div class="line"><a name="l01528"></a><span class="lineno"> 1528</span>&#160; wave /t /sdfr=df attach_list = $s_value</div><div class="line"><a name="l01529"></a><span class="lineno"> 1529</span>&#160; if (cmpstr(ba.ctrlName, &quot;b_attach_up&quot;) == 0)</div><div class="line"><a name="l01530"></a><span class="lineno"> 1530</span>&#160; <span class="comment">// up button</span></div><div class="line"><a name="l01531"></a><span class="lineno"> 1531</span>&#160; if (row &gt;= 1)</div><div class="line"><a name="l01532"></a><span class="lineno"> 1532</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a7990f2948d48aefe990271d1961df833">move_attach_item</a>(logbook, row, -1)</div><div class="line"><a name="l01533"></a><span class="lineno"> 1533</span>&#160; ListBox lb_attach, win=$ba.win, selRow=(row-1)</div><div class="line"><a name="l01534"></a><span class="lineno"> 1534</span>&#160; endif</div><div class="line"><a name="l01535"></a><span class="lineno"> 1535</span>&#160; else</div><div class="line"><a name="l01536"></a><span class="lineno"> 1536</span>&#160; <span class="comment">// down button</span></div><div class="line"><a name="l01537"></a><span class="lineno"> 1537</span>&#160; if (row &lt; DimSize(attach_list, 0) - 1)</div><div class="line"><a name="l01538"></a><span class="lineno"> 1538</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a7990f2948d48aefe990271d1961df833">move_attach_item</a>(logbook, row, +1)</div><div class="line"><a name="l01539"></a><span class="lineno"> 1539</span>&#160; ListBox lb_attach, win=$ba.win, selRow=(row+1)</div><div class="line"><a name="l01540"></a><span class="lineno"> 1540</span>&#160; endif</div><div class="line"><a name="l01541"></a><span class="lineno"> 1541</span>&#160; endif</div><div class="line"><a name="l01542"></a><span class="lineno"> 1542</span>&#160; break</div><div class="line"><a name="l01543"></a><span class="lineno"> 1543</span>&#160; case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01544"></a><span class="lineno"> 1544</span>&#160; break</div><div class="line"><a name="l01545"></a><span class="lineno"> 1545</span>&#160; endswitch</div><div class="line"><a name="l01546"></a><span class="lineno"> 1546</span>&#160;</div><div class="line"><a name="l01547"></a><span class="lineno"> 1547</span>&#160; return 0</div><div class="line"><a name="l01548"></a><span class="lineno"> 1548</span>&#160;end</div><div class="line"><a name="l01549"></a><span class="lineno"> 1549</span>&#160;</div><div class="line"><a name="l01551"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#adeff6678e57313cb218824f06d32b5ec"> 1551</a></span>&#160;static function bp_submit(ba) : ButtonControl</div><div class="line"><a name="l01552"></a><span class="lineno"> 1552</span>&#160; STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01553"></a><span class="lineno"> 1553</span>&#160;</div><div class="line"><a name="l01554"></a><span class="lineno"> 1554</span>&#160; switch( ba.eventCode )</div><div class="line"><a name="l01555"></a><span class="lineno"> 1555</span>&#160; case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01556"></a><span class="lineno"> 1556</span>&#160; <span class="keywordtype">string</span> logbook = GetUserData(ba.win, &quot;&quot;, &quot;logbook&quot;)</div><div class="line"><a name="l01557"></a><span class="lineno"> 1557</span>&#160; <span class="keywordtype">string</span> attributes</div><div class="line"><a name="l01558"></a><span class="lineno"> 1558</span>&#160; <span class="keywordtype">string</span> message</div><div class="line"><a name="l01559"></a><span class="lineno"> 1559</span>&#160; <span class="keywordtype">string</span> graphs</div><div class="line"><a name="l01560"></a><span class="lineno"> 1560</span>&#160; attributes = <a class="code" href="pearl-elog_8ipf.html#a66e1200515eff8cd5c961572eccd7220">get_panel_attributes</a>(ba.win)</div><div class="line"><a name="l01561"></a><span class="lineno"> 1561</span>&#160; message = <a class="code" href="pearl-elog_8ipf.html#a7ce92b03b6a786129959d44bf1112efa">get_panel_message</a>(ba.win)</div><div class="line"><a name="l01562"></a><span class="lineno"> 1562</span>&#160; graphs = <a class="code" href="pearl-elog_8ipf.html#ace94356f691cbe343761aabd67ced23c">get_panel_graphs</a>(ba.win)</div><div class="line"><a name="l01563"></a><span class="lineno"> 1563</span>&#160;</div><div class="line"><a name="l01564"></a><span class="lineno"> 1564</span>&#160; variable <span class="keywordtype">id</span></div><div class="line"><a name="l01565"></a><span class="lineno"> 1565</span>&#160; if (cmpstr(ba.ctrlName, &quot;b_reply&quot;) == 0)</div><div class="line"><a name="l01566"></a><span class="lineno"> 1566</span>&#160; <span class="comment">// Reply button</span></div><div class="line"><a name="l01567"></a><span class="lineno"> 1567</span>&#160; ControlInfo /w=$ba.win sv_id</div><div class="line"><a name="l01568"></a><span class="lineno"> 1568</span>&#160; <span class="keywordtype">id</span> = v_value</div><div class="line"><a name="l01569"></a><span class="lineno"> 1569</span>&#160; else</div><div class="line"><a name="l01570"></a><span class="lineno"> 1570</span>&#160; <span class="comment">// Submit button</span></div><div class="line"><a name="l01571"></a><span class="lineno"> 1571</span>&#160; <span class="keywordtype">id</span> = 0</div><div class="line"><a name="l01572"></a><span class="lineno"> 1572</span>&#160; endif</div><div class="line"><a name="l01573"></a><span class="lineno"> 1573</span>&#160;</div><div class="line"><a name="l01574"></a><span class="lineno"> 1574</span>&#160; if ((<a class="code" href="pearl-elog_8ipf.html#ab2558ef5cd5e5dfba410bd58ed258b64">elog_validate_attributes</a>(logbook, attributes) == 0) &amp;&amp; (strlen(message) &gt; 0))</div><div class="line"><a name="l01575"></a><span class="lineno"> 1575</span>&#160; variable result</div><div class="line"><a name="l01576"></a><span class="lineno"> 1576</span>&#160; result = <a class="code" href="pearl-elog_8ipf.html#a05301d497e4796e5fb5adde3728ba971">elog_create_entry</a>(logbook, attributes, message, graphs=graphs, replyto=<span class="keywordtype">id</span>)</div><div class="line"><a name="l01577"></a><span class="lineno"> 1577</span>&#160; if (result == 0)</div><div class="line"><a name="l01578"></a><span class="lineno"> 1578</span>&#160; dfref df = <a class="code" href="pearl-elog_8ipf.html#ac45196cb9ce8b43b76c9daf67689c49a">get_elog_df</a>(logbook, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l01579"></a><span class="lineno"> 1579</span>&#160; svar /sdfr=df recent</div><div class="line"><a name="l01580"></a><span class="lineno"> 1580</span>&#160; recent = attributes</div><div class="line"><a name="l01581"></a><span class="lineno"> 1581</span>&#160; svar /sdfr=df recent_message</div><div class="line"><a name="l01582"></a><span class="lineno"> 1582</span>&#160; recent_message = message</div><div class="line"><a name="l01583"></a><span class="lineno"> 1583</span>&#160; else</div><div class="line"><a name="l01584"></a><span class="lineno"> 1584</span>&#160; abort &quot;Submission failed. Error code &quot; + num2str(result) + &quot;.&quot;</div><div class="line"><a name="l01585"></a><span class="lineno"> 1585</span>&#160; endif</div><div class="line"><a name="l01586"></a><span class="lineno"> 1586</span>&#160; else</div><div class="line"><a name="l01587"></a><span class="lineno"> 1587</span>&#160; abort &quot;Submission failed due to missing/invalid attribute.&quot;</div><div class="line"><a name="l01588"></a><span class="lineno"> 1588</span>&#160; endif</div><div class="line"><a name="l01589"></a><span class="lineno"> 1589</span>&#160; break</div><div class="line"><a name="l01590"></a><span class="lineno"> 1590</span>&#160; case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01591"></a><span class="lineno"> 1591</span>&#160; break</div><div class="line"><a name="l01592"></a><span class="lineno"> 1592</span>&#160; endswitch</div><div class="line"><a name="l01593"></a><span class="lineno"> 1593</span>&#160;</div><div class="line"><a name="l01594"></a><span class="lineno"> 1594</span>&#160; return 0</div><div class="line"><a name="l01595"></a><span class="lineno"> 1595</span>&#160;end</div><div class="line"><a name="l01596"></a><span class="lineno"> 1596</span>&#160;</div><div class="line"><a name="l01598"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a91b5f51982d23a36d1760b8874b5736a"> 1598</a></span>&#160;static function <a class="code" href="pearl-elog_8ipf.html#a91b5f51982d23a36d1760b8874b5736a">bp_attach_top</a>(ba) : ButtonControl</div><div class="line"><a name="l01599"></a><span class="lineno"> 1599</span>&#160; STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01600"></a><span class="lineno"> 1600</span>&#160;</div><div class="line"><a name="l01601"></a><span class="lineno"> 1601</span>&#160; switch( ba.eventCode )</div><div class="line"><a name="l01602"></a><span class="lineno"> 1602</span>&#160; case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01603"></a><span class="lineno"> 1603</span>&#160; <span class="keywordtype">string</span> graphs = WinName(0, 1, 1)</div><div class="line"><a name="l01604"></a><span class="lineno"> 1604</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a6eca5f4fab999984df32b50dd669c0b1">set_panel_graphs</a>(ba.win, graphs)</div><div class="line"><a name="l01605"></a><span class="lineno"> 1605</span>&#160; break</div><div class="line"><a name="l01606"></a><span class="lineno"> 1606</span>&#160; case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01607"></a><span class="lineno"> 1607</span>&#160; break</div><div class="line"><a name="l01608"></a><span class="lineno"> 1608</span>&#160; endswitch</div><div class="line"><a name="l01609"></a><span class="lineno"> 1609</span>&#160;</div><div class="line"><a name="l01610"></a><span class="lineno"> 1610</span>&#160; return 0</div><div class="line"><a name="l01611"></a><span class="lineno"> 1611</span>&#160;end</div><div class="line"><a name="l01612"></a><span class="lineno"> 1612</span>&#160;</div><div class="line"><a name="l01614"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a4040736819edadf4b26982bcfdb9c7b9"> 1614</a></span>&#160;static function <a class="code" href="pearl-elog_8ipf.html#a4040736819edadf4b26982bcfdb9c7b9">bp_attach_allnone</a>(ba) : ButtonControl</div><div class="line"><a name="l01615"></a><span class="lineno"> 1615</span>&#160; STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01616"></a><span class="lineno"> 1616</span>&#160;</div><div class="line"><a name="l01617"></a><span class="lineno"> 1617</span>&#160; switch( ba.eventCode )</div><div class="line"><a name="l01618"></a><span class="lineno"> 1618</span>&#160; case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01619"></a><span class="lineno"> 1619</span>&#160; <span class="keywordtype">string</span> logbook = GetUserData(ba.win, &quot;&quot;, &quot;logbook&quot;)</div><div class="line"><a name="l01620"></a><span class="lineno"> 1620</span>&#160; dfref df_volatile = <a class="code" href="pearl-elog_8ipf.html#ac45196cb9ce8b43b76c9daf67689c49a">get_elog_df</a>(logbook, <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>)</div><div class="line"><a name="l01621"></a><span class="lineno"> 1621</span>&#160; wave /sdfr=df_volatile attach_sel</div><div class="line"><a name="l01622"></a><span class="lineno"> 1622</span>&#160; if (cmpstr(ba.ctrlName, &quot;b_attach_all&quot;) == 0)</div><div class="line"><a name="l01623"></a><span class="lineno"> 1623</span>&#160; attach_sel[][kAttachColSel] = attach_sel[p][kAttachColSel] | 16</div><div class="line"><a name="l01624"></a><span class="lineno"> 1624</span>&#160; else</div><div class="line"><a name="l01625"></a><span class="lineno"> 1625</span>&#160; attach_sel[][kAttachColSel] = attach_sel[p][kAttachColSel] &amp; ~16</div><div class="line"><a name="l01626"></a><span class="lineno"> 1626</span>&#160; endif</div><div class="line"><a name="l01627"></a><span class="lineno"> 1627</span>&#160; break</div><div class="line"><a name="l01628"></a><span class="lineno"> 1628</span>&#160; case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01629"></a><span class="lineno"> 1629</span>&#160; break</div><div class="line"><a name="l01630"></a><span class="lineno"> 1630</span>&#160; endswitch</div><div class="line"><a name="l01631"></a><span class="lineno"> 1631</span>&#160;</div><div class="line"><a name="l01632"></a><span class="lineno"> 1632</span>&#160; return 0</div><div class="line"><a name="l01633"></a><span class="lineno"> 1633</span>&#160;end</div><div class="line"><a name="l01634"></a><span class="lineno"> 1634</span>&#160;</div><div class="line"><a name="l01635"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#acbba78d869a543edf7c2b80d7a8d2344"> 1635</a></span>&#160;static function bp_attach(ba) : ButtonControl</div><div class="line"><a name="l01636"></a><span class="lineno"> 1636</span>&#160; STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01637"></a><span class="lineno"> 1637</span>&#160;</div><div class="line"><a name="l01638"></a><span class="lineno"> 1638</span>&#160; switch( ba.eventCode )</div><div class="line"><a name="l01639"></a><span class="lineno"> 1639</span>&#160; case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01640"></a><span class="lineno"> 1640</span>&#160; <span class="keywordtype">string</span> logbook = GetUserData(ba.win, &quot;&quot;, &quot;logbook&quot;)</div><div class="line"><a name="l01641"></a><span class="lineno"> 1641</span>&#160; <span class="keywordtype">string</span> graphs</div><div class="line"><a name="l01642"></a><span class="lineno"> 1642</span>&#160; graphs = <a class="code" href="pearl-elog_8ipf.html#ace94356f691cbe343761aabd67ced23c">get_panel_graphs</a>(ba.win)</div><div class="line"><a name="l01643"></a><span class="lineno"> 1643</span>&#160; </div><div class="line"><a name="l01644"></a><span class="lineno"> 1644</span>&#160; variable <span class="keywordtype">id</span></div><div class="line"><a name="l01645"></a><span class="lineno"> 1645</span>&#160; ControlInfo /w=$ba.win sv_id</div><div class="line"><a name="l01646"></a><span class="lineno"> 1646</span>&#160; <span class="keywordtype">id</span> = v_value</div><div class="line"><a name="l01647"></a><span class="lineno"> 1647</span>&#160;</div><div class="line"><a name="l01648"></a><span class="lineno"> 1648</span>&#160; <span class="comment">// TODO : is there a way around this restriction?</span></div><div class="line"><a name="l01649"></a><span class="lineno"> 1649</span>&#160; DoAlert /T=&quot;ELOG&quot; 1, &quot;This operation will replace all existing attachments. Do you want to continue?&quot;</div><div class="line"><a name="l01650"></a><span class="lineno"> 1650</span>&#160;</div><div class="line"><a name="l01651"></a><span class="lineno"> 1651</span>&#160; if ((<span class="keywordtype">id</span> &gt; 0) &amp;&amp; (v_flag == 1))</div><div class="line"><a name="l01652"></a><span class="lineno"> 1652</span>&#160; variable result</div><div class="line"><a name="l01653"></a><span class="lineno"> 1653</span>&#160; result = <a class="code" href="pearl-elog_8ipf.html#ac2f76abed8cfaa7ac02a46c0b89004f0">elog_add_attachment</a>(logbook, <span class="keywordtype">id</span>, graphs)</div><div class="line"><a name="l01654"></a><span class="lineno"> 1654</span>&#160; if (result != 0)</div><div class="line"><a name="l01655"></a><span class="lineno"> 1655</span>&#160; abort &quot;Submission failed. Error code &quot; + num2str(result) + &quot;.&quot;</div><div class="line"><a name="l01656"></a><span class="lineno"> 1656</span>&#160; endif</div><div class="line"><a name="l01657"></a><span class="lineno"> 1657</span>&#160; else</div><div class="line"><a name="l01658"></a><span class="lineno"> 1658</span>&#160; abort &quot;Submission failed due to missing/invalid attribute.&quot;</div><div class="line"><a name="l01659"></a><span class="lineno"> 1659</span>&#160; endif</div><div class="line"><a name="l01660"></a><span class="lineno"> 1660</span>&#160; break</div><div class="line"><a name="l01661"></a><span class="lineno"> 1661</span>&#160; case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01662"></a><span class="lineno"> 1662</span>&#160; break</div><div class="line"><a name="l01663"></a><span class="lineno"> 1663</span>&#160; endswitch</div><div class="line"><a name="l01664"></a><span class="lineno"> 1664</span>&#160;</div><div class="line"><a name="l01665"></a><span class="lineno"> 1665</span>&#160; return 0</div><div class="line"><a name="l01666"></a><span class="lineno"> 1666</span>&#160;end</div><div class="line"><a name="l01667"></a><span class="lineno"> 1667</span>&#160;</div><div class="line"><a name="l01668"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a8251cea45c8d1f1993a4051a6d0760c4"> 1668</a></span>&#160;static function <a class="code" href="pearl-elog_8ipf.html#a8251cea45c8d1f1993a4051a6d0760c4">bp_save_graphs</a>(ba) : ButtonControl</div><div class="line"><a name="l01669"></a><span class="lineno"> 1669</span>&#160; STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01670"></a><span class="lineno"> 1670</span>&#160;</div><div class="line"><a name="l01671"></a><span class="lineno"> 1671</span>&#160; switch( ba.eventCode )</div><div class="line"><a name="l01672"></a><span class="lineno"> 1672</span>&#160; case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01673"></a><span class="lineno"> 1673</span>&#160; <span class="keywordtype">string</span> logbook = GetUserData(ba.win, &quot;&quot;, &quot;logbook&quot;)</div><div class="line"><a name="l01674"></a><span class="lineno"> 1674</span>&#160; <span class="keywordtype">string</span> graphs = <a class="code" href="pearl-elog_8ipf.html#ace94356f691cbe343761aabd67ced23c">get_panel_graphs</a>(ba.win)</div><div class="line"><a name="l01675"></a><span class="lineno"> 1675</span>&#160; variable ngraphs = ItemsInList(graphs, &quot;;&quot;)</div><div class="line"><a name="l01676"></a><span class="lineno"> 1676</span>&#160;</div><div class="line"><a name="l01677"></a><span class="lineno"> 1677</span>&#160; variable igraph</div><div class="line"><a name="l01678"></a><span class="lineno"> 1678</span>&#160; <span class="keywordtype">string</span> sgraph</div><div class="line"><a name="l01679"></a><span class="lineno"> 1679</span>&#160; <span class="keywordtype">string</span> graph_path</div><div class="line"><a name="l01680"></a><span class="lineno"> 1680</span>&#160; for (igraph = 0; igraph &lt; ngraphs; igraph += 1)</div><div class="line"><a name="l01681"></a><span class="lineno"> 1681</span>&#160; sgraph = StringFromList(igraph, graphs, &quot;;&quot;)</div><div class="line"><a name="l01682"></a><span class="lineno"> 1682</span>&#160; graph_path = <a class="code" href="pearl-elog_8ipf.html#a2417d079483f773f8231c5f2caba6cf0">create_graph_file</a>(sgraph, igraph)</div><div class="line"><a name="l01683"></a><span class="lineno"> 1683</span>&#160; if (strlen(graph_path) &gt; 0)</div><div class="line"><a name="l01684"></a><span class="lineno"> 1684</span>&#160; print graph_path</div><div class="line"><a name="l01685"></a><span class="lineno"> 1685</span>&#160; endif</div><div class="line"><a name="l01686"></a><span class="lineno"> 1686</span>&#160; endfor</div><div class="line"><a name="l01687"></a><span class="lineno"> 1687</span>&#160; </div><div class="line"><a name="l01688"></a><span class="lineno"> 1688</span>&#160; break</div><div class="line"><a name="l01689"></a><span class="lineno"> 1689</span>&#160; case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01690"></a><span class="lineno"> 1690</span>&#160; break</div><div class="line"><a name="l01691"></a><span class="lineno"> 1691</span>&#160; endswitch</div><div class="line"><a name="l01692"></a><span class="lineno"> 1692</span>&#160;</div><div class="line"><a name="l01693"></a><span class="lineno"> 1693</span>&#160; return 0</div><div class="line"><a name="l01694"></a><span class="lineno"> 1694</span>&#160;end</div><div class="line"><a name="l01695"></a><span class="lineno"> 1695</span>&#160;</div><div class="line"><a name="l01696"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#ab39637298c93b7aefd67febf3a4e7672"> 1696</a></span>&#160;static function bp_clear(ba) : ButtonControl</div><div class="line"><a name="l01697"></a><span class="lineno"> 1697</span>&#160; STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01698"></a><span class="lineno"> 1698</span>&#160; </div><div class="line"><a name="l01699"></a><span class="lineno"> 1699</span>&#160; switch( ba.eventCode )</div><div class="line"><a name="l01700"></a><span class="lineno"> 1700</span>&#160; case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01701"></a><span class="lineno"> 1701</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a39a1f418c8a2f9a5e4ab976827d8efca">set_panel_attributes</a>(ba.win, &quot;&quot;, clear=1)</div><div class="line"><a name="l01702"></a><span class="lineno"> 1702</span>&#160; <a class="code" href="pearl-elog_8ipf.html#aa7a3988440bb6d73573b50a4698a0e75">set_panel_message</a>(ba.win, &quot;&quot;)</div><div class="line"><a name="l01703"></a><span class="lineno"> 1703</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a6eca5f4fab999984df32b50dd669c0b1">set_panel_graphs</a>(ba.win, &quot;&quot;)</div><div class="line"><a name="l01704"></a><span class="lineno"> 1704</span>&#160; break</div><div class="line"><a name="l01705"></a><span class="lineno"> 1705</span>&#160; case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01706"></a><span class="lineno"> 1706</span>&#160; break</div><div class="line"><a name="l01707"></a><span class="lineno"> 1707</span>&#160; endswitch</div><div class="line"><a name="l01708"></a><span class="lineno"> 1708</span>&#160;</div><div class="line"><a name="l01709"></a><span class="lineno"> 1709</span>&#160; return 0</div><div class="line"><a name="l01710"></a><span class="lineno"> 1710</span>&#160;end</div><div class="line"><a name="l01711"></a><span class="lineno"> 1711</span>&#160;</div><div class="line"><a name="l01712"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a14f8376a0485aa654ccf3d2f30ab4d01"> 1712</a></span>&#160;static function bp_login(ba) : ButtonControl</div><div class="line"><a name="l01713"></a><span class="lineno"> 1713</span>&#160; STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01714"></a><span class="lineno"> 1714</span>&#160; </div><div class="line"><a name="l01715"></a><span class="lineno"> 1715</span>&#160; switch( ba.eventCode )</div><div class="line"><a name="l01716"></a><span class="lineno"> 1716</span>&#160; case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01717"></a><span class="lineno"> 1717</span>&#160; <span class="keywordtype">string</span> logbook = GetUserData(ba.win, &quot;&quot;, &quot;logbook&quot;)</div><div class="line"><a name="l01718"></a><span class="lineno"> 1718</span>&#160; if (<a class="code" href="pearl-elog_8ipf.html#afbace5ffc3167b42b09657ce6cc854ca">elog_prompt_login</a>(logbook) == 0)</div><div class="line"><a name="l01719"></a><span class="lineno"> 1719</span>&#160; Button b_login, win=$ba.win, disable=3</div><div class="line"><a name="l01720"></a><span class="lineno"> 1720</span>&#160; Button b_logout, win=$ba.win, disable=0</div><div class="line"><a name="l01721"></a><span class="lineno"> 1721</span>&#160; endif</div><div class="line"><a name="l01722"></a><span class="lineno"> 1722</span>&#160; break</div><div class="line"><a name="l01723"></a><span class="lineno"> 1723</span>&#160; case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01724"></a><span class="lineno"> 1724</span>&#160; break</div><div class="line"><a name="l01725"></a><span class="lineno"> 1725</span>&#160; endswitch</div><div class="line"><a name="l01726"></a><span class="lineno"> 1726</span>&#160;</div><div class="line"><a name="l01727"></a><span class="lineno"> 1727</span>&#160; return 0</div><div class="line"><a name="l01728"></a><span class="lineno"> 1728</span>&#160;end</div><div class="line"><a name="l01729"></a><span class="lineno"> 1729</span>&#160;</div><div class="line"><a name="l01730"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#ad4472ea917691c41ad0b4ea6f36010a5"> 1730</a></span>&#160;static function bp_logout(ba) : ButtonControl</div><div class="line"><a name="l01731"></a><span class="lineno"> 1731</span>&#160; STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01732"></a><span class="lineno"> 1732</span>&#160; </div><div class="line"><a name="l01733"></a><span class="lineno"> 1733</span>&#160; switch( ba.eventCode )</div><div class="line"><a name="l01734"></a><span class="lineno"> 1734</span>&#160; case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01735"></a><span class="lineno"> 1735</span>&#160; <span class="keywordtype">string</span> logbook = GetUserData(ba.win, &quot;&quot;, &quot;logbook&quot;)</div><div class="line"><a name="l01736"></a><span class="lineno"> 1736</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a96e4cbbdb0fd8c58d87b502dc1883664">elog_logout</a>(logbook)</div><div class="line"><a name="l01737"></a><span class="lineno"> 1737</span>&#160; Button b_login, win=$ba.win, disable=0</div><div class="line"><a name="l01738"></a><span class="lineno"> 1738</span>&#160; Button b_logout, win=$ba.win, disable=3</div><div class="line"><a name="l01739"></a><span class="lineno"> 1739</span>&#160; break</div><div class="line"><a name="l01740"></a><span class="lineno"> 1740</span>&#160; case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01741"></a><span class="lineno"> 1741</span>&#160; break</div><div class="line"><a name="l01742"></a><span class="lineno"> 1742</span>&#160; endswitch</div><div class="line"><a name="l01743"></a><span class="lineno"> 1743</span>&#160;</div><div class="line"><a name="l01744"></a><span class="lineno"> 1744</span>&#160; return 0</div><div class="line"><a name="l01745"></a><span class="lineno"> 1745</span>&#160;end</div><div class="line"><a name="l01746"></a><span class="lineno"> 1746</span>&#160;</div><div class="line"><a name="l01747"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a1376b5c9e6b1180a09961bc3296849ae"> 1747</a></span>&#160;static function /s <a class="code" href="pearl-elog_8ipf.html#a1376b5c9e6b1180a09961bc3296849ae">get_default_panel_name</a>()</div><div class="line"><a name="l01748"></a><span class="lineno"> 1748</span>&#160; <span class="keywordtype">string</span> windowname</div><div class="line"><a name="l01749"></a><span class="lineno"> 1749</span>&#160; windowname = StringFromList(0, WinList(&quot;*ElogPanel*&quot;, &quot;;&quot;, &quot;WIN:64&quot;), &quot;;&quot;)</div><div class="line"><a name="l01750"></a><span class="lineno"> 1750</span>&#160; return windowname</div><div class="line"><a name="l01751"></a><span class="lineno"> 1751</span>&#160;end</div><div class="line"><a name="l01752"></a><span class="lineno"> 1752</span>&#160;</div><div class="line"><a name="l01760"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a66e1200515eff8cd5c961572eccd7220"> 1760</a></span>&#160;static function /s <a class="code" href="pearl-elog_8ipf.html#a66e1200515eff8cd5c961572eccd7220">get_panel_attributes</a>(windowname)</div><div class="line"><a name="l01761"></a><span class="lineno"> 1761</span>&#160; <span class="keywordtype">string</span> windowname</div><div class="line"><a name="l01762"></a><span class="lineno"> 1762</span>&#160; </div><div class="line"><a name="l01763"></a><span class="lineno"> 1763</span>&#160; if (strlen(windowname) == 0)</div><div class="line"><a name="l01764"></a><span class="lineno"> 1764</span>&#160; windowname = <a class="code" href="pearl-elog_8ipf.html#a1376b5c9e6b1180a09961bc3296849ae">get_default_panel_name</a>()</div><div class="line"><a name="l01765"></a><span class="lineno"> 1765</span>&#160; endif</div><div class="line"><a name="l01766"></a><span class="lineno"> 1766</span>&#160; if (strlen(windowname) == 0)</div><div class="line"><a name="l01767"></a><span class="lineno"> 1767</span>&#160; return &quot;&quot;</div><div class="line"><a name="l01768"></a><span class="lineno"> 1768</span>&#160; endif</div><div class="line"><a name="l01769"></a><span class="lineno"> 1769</span>&#160;</div><div class="line"><a name="l01770"></a><span class="lineno"> 1770</span>&#160; <span class="keywordtype">string</span> controls = ControlNameList(windowname, &quot;;&quot;)</div><div class="line"><a name="l01771"></a><span class="lineno"> 1771</span>&#160; <span class="keywordtype">string</span> attributes = &quot;&quot;</div><div class="line"><a name="l01772"></a><span class="lineno"> 1772</span>&#160; <span class="keywordtype">string</span> control</div><div class="line"><a name="l01773"></a><span class="lineno"> 1773</span>&#160; <span class="keywordtype">string</span> attribute</div><div class="line"><a name="l01774"></a><span class="lineno"> 1774</span>&#160; variable ico</div><div class="line"><a name="l01775"></a><span class="lineno"> 1775</span>&#160; variable nco = ItemsInList(controls, &quot;;&quot;)</div><div class="line"><a name="l01776"></a><span class="lineno"> 1776</span>&#160; for (ico = 0; ico &lt; nco; ico += 1)</div><div class="line"><a name="l01777"></a><span class="lineno"> 1777</span>&#160; control = StringFromList(ico, controls, &quot;;&quot;)</div><div class="line"><a name="l01778"></a><span class="lineno"> 1778</span>&#160; attribute = GetUserData(windowname, control, &quot;attribute&quot;)</div><div class="line"><a name="l01779"></a><span class="lineno"> 1779</span>&#160; if (strlen(attribute) &gt; 0)</div><div class="line"><a name="l01780"></a><span class="lineno"> 1780</span>&#160; ControlInfo /w=$windowname $control</div><div class="line"><a name="l01781"></a><span class="lineno"> 1781</span>&#160; switch(v_flag)</div><div class="line"><a name="l01782"></a><span class="lineno"> 1782</span>&#160; case 2: <span class="comment">// checkbox</span></div><div class="line"><a name="l01783"></a><span class="lineno"> 1783</span>&#160; attributes = ReplaceNumberByKey(attribute, attributes, v_value, &quot;=&quot;, &quot;;&quot;)</div><div class="line"><a name="l01784"></a><span class="lineno"> 1784</span>&#160; break</div><div class="line"><a name="l01785"></a><span class="lineno"> 1785</span>&#160; case 3: <span class="comment">// popupmenu</span></div><div class="line"><a name="l01786"></a><span class="lineno"> 1786</span>&#160; case 5: <span class="comment">// setvariable</span></div><div class="line"><a name="l01787"></a><span class="lineno"> 1787</span>&#160; attributes = ReplaceStringByKey(attribute, attributes, s_value, &quot;=&quot;, &quot;;&quot;)</div><div class="line"><a name="l01788"></a><span class="lineno"> 1788</span>&#160; break</div><div class="line"><a name="l01789"></a><span class="lineno"> 1789</span>&#160; endswitch</div><div class="line"><a name="l01790"></a><span class="lineno"> 1790</span>&#160; endif</div><div class="line"><a name="l01791"></a><span class="lineno"> 1791</span>&#160; endfor</div><div class="line"><a name="l01792"></a><span class="lineno"> 1792</span>&#160; </div><div class="line"><a name="l01793"></a><span class="lineno"> 1793</span>&#160; return attributes</div><div class="line"><a name="l01794"></a><span class="lineno"> 1794</span>&#160;end</div><div class="line"><a name="l01795"></a><span class="lineno"> 1795</span>&#160;</div><div class="line"><a name="l01807"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a39a1f418c8a2f9a5e4ab976827d8efca"> 1807</a></span>&#160;static function /s <a class="code" href="pearl-elog_8ipf.html#a39a1f418c8a2f9a5e4ab976827d8efca">set_panel_attributes</a>(windowname, attributes, [clear])</div><div class="line"><a name="l01808"></a><span class="lineno"> 1808</span>&#160; <span class="keywordtype">string</span> windowname</div><div class="line"><a name="l01809"></a><span class="lineno"> 1809</span>&#160; <span class="keywordtype">string</span> attributes</div><div class="line"><a name="l01810"></a><span class="lineno"> 1810</span>&#160; variable clear</div><div class="line"><a name="l01811"></a><span class="lineno"> 1811</span>&#160; </div><div class="line"><a name="l01812"></a><span class="lineno"> 1812</span>&#160; if (strlen(windowname) == 0)</div><div class="line"><a name="l01813"></a><span class="lineno"> 1813</span>&#160; windowname = <a class="code" href="pearl-elog_8ipf.html#a1376b5c9e6b1180a09961bc3296849ae">get_default_panel_name</a>()</div><div class="line"><a name="l01814"></a><span class="lineno"> 1814</span>&#160; endif</div><div class="line"><a name="l01815"></a><span class="lineno"> 1815</span>&#160; if (strlen(windowname) == 0)</div><div class="line"><a name="l01816"></a><span class="lineno"> 1816</span>&#160; return &quot;&quot;</div><div class="line"><a name="l01817"></a><span class="lineno"> 1817</span>&#160; endif</div><div class="line"><a name="l01818"></a><span class="lineno"> 1818</span>&#160; if (ParamIsDefault(clear))</div><div class="line"><a name="l01819"></a><span class="lineno"> 1819</span>&#160; clear = 0</div><div class="line"><a name="l01820"></a><span class="lineno"> 1820</span>&#160; endif</div><div class="line"><a name="l01821"></a><span class="lineno"> 1821</span>&#160; </div><div class="line"><a name="l01822"></a><span class="lineno"> 1822</span>&#160; <span class="keywordtype">string</span> path</div><div class="line"><a name="l01823"></a><span class="lineno"> 1823</span>&#160; </div><div class="line"><a name="l01824"></a><span class="lineno"> 1824</span>&#160; <span class="keywordtype">string</span> logbook = GetUserData(windowname, &quot;&quot;, &quot;logbook&quot;)</div><div class="line"><a name="l01825"></a><span class="lineno"> 1825</span>&#160; dfref df_persistent = <a class="code" href="pearl-elog_8ipf.html#ac45196cb9ce8b43b76c9daf67689c49a">get_elog_df</a>(logbook, <a class="code" href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a>)</div><div class="line"><a name="l01826"></a><span class="lineno"> 1826</span>&#160; <span class="keywordtype">string</span> persistent_path = GetDataFolder(1, df_persistent)</div><div class="line"><a name="l01827"></a><span class="lineno"> 1827</span>&#160; svar /sdfr=df_persistent options</div><div class="line"><a name="l01828"></a><span class="lineno"> 1828</span>&#160; <span class="keywordtype">string</span> options_path</div><div class="line"><a name="l01829"></a><span class="lineno"> 1829</span>&#160;</div><div class="line"><a name="l01830"></a><span class="lineno"> 1830</span>&#160; <span class="keywordtype">string</span> controls = ControlNameList(windowname, &quot;;&quot;)</div><div class="line"><a name="l01831"></a><span class="lineno"> 1831</span>&#160; <span class="keywordtype">string</span> control</div><div class="line"><a name="l01832"></a><span class="lineno"> 1832</span>&#160; <span class="keywordtype">string</span> attribute</div><div class="line"><a name="l01833"></a><span class="lineno"> 1833</span>&#160; <span class="keywordtype">string</span> value</div><div class="line"><a name="l01834"></a><span class="lineno"> 1834</span>&#160; variable numval</div><div class="line"><a name="l01835"></a><span class="lineno"> 1835</span>&#160; variable ico</div><div class="line"><a name="l01836"></a><span class="lineno"> 1836</span>&#160; variable nco = ItemsInList(controls, &quot;;&quot;)</div><div class="line"><a name="l01837"></a><span class="lineno"> 1837</span>&#160; for (ico = 0; ico &lt; nco; ico += 1)</div><div class="line"><a name="l01838"></a><span class="lineno"> 1838</span>&#160; control = StringFromList(ico, controls, &quot;;&quot;)</div><div class="line"><a name="l01839"></a><span class="lineno"> 1839</span>&#160; attribute = GetUserData(windowname, control, &quot;attribute&quot;)</div><div class="line"><a name="l01840"></a><span class="lineno"> 1840</span>&#160; if (strlen(attribute))</div><div class="line"><a name="l01841"></a><span class="lineno"> 1841</span>&#160; value = StringByKey(attribute, attributes, &quot;=&quot;, &quot;;&quot;)</div><div class="line"><a name="l01842"></a><span class="lineno"> 1842</span>&#160; if (strlen(value) || clear)</div><div class="line"><a name="l01843"></a><span class="lineno"> 1843</span>&#160; ControlInfo /w=$windowname $control</div><div class="line"><a name="l01844"></a><span class="lineno"> 1844</span>&#160; switch(v_flag)</div><div class="line"><a name="l01845"></a><span class="lineno"> 1845</span>&#160; case 2: <span class="comment">// checkbox</span></div><div class="line"><a name="l01846"></a><span class="lineno"> 1846</span>&#160; numval = NumberByKey(attribute, attributes, &quot;=&quot;, &quot;;&quot;)</div><div class="line"><a name="l01847"></a><span class="lineno"> 1847</span>&#160; if ((numtype(numval) != 0) &amp;&amp; clear)</div><div class="line"><a name="l01848"></a><span class="lineno"> 1848</span>&#160; numval = 0</div><div class="line"><a name="l01849"></a><span class="lineno"> 1849</span>&#160; endif</div><div class="line"><a name="l01850"></a><span class="lineno"> 1850</span>&#160; if (numtype(numval) == 0)</div><div class="line"><a name="l01851"></a><span class="lineno"> 1851</span>&#160; CheckBox $control, value=numval, win=$windowname</div><div class="line"><a name="l01852"></a><span class="lineno"> 1852</span>&#160; endif</div><div class="line"><a name="l01853"></a><span class="lineno"> 1853</span>&#160; break</div><div class="line"><a name="l01854"></a><span class="lineno"> 1854</span>&#160; case 3: <span class="comment">// popupmenu</span></div><div class="line"><a name="l01855"></a><span class="lineno"> 1855</span>&#160; options_path = persistent_path + StringByKey(attribute, options, &quot;=&quot;, &quot;;&quot;)</div><div class="line"><a name="l01856"></a><span class="lineno"> 1856</span>&#160; svar values = $options_path</div><div class="line"><a name="l01857"></a><span class="lineno"> 1857</span>&#160; numval = WhichListItem(value, values, &quot;;&quot;) + 1</div><div class="line"><a name="l01858"></a><span class="lineno"> 1858</span>&#160; if (numval &gt;= 1)</div><div class="line"><a name="l01859"></a><span class="lineno"> 1859</span>&#160; PopupMenu $control, mode=numval, win=$windowname</div><div class="line"><a name="l01860"></a><span class="lineno"> 1860</span>&#160; endif</div><div class="line"><a name="l01861"></a><span class="lineno"> 1861</span>&#160; break</div><div class="line"><a name="l01862"></a><span class="lineno"> 1862</span>&#160; case 5: <span class="comment">// setvariable</span></div><div class="line"><a name="l01863"></a><span class="lineno"> 1863</span>&#160; SetVariable /z $control, value= _STR:value, win=$windowname</div><div class="line"><a name="l01864"></a><span class="lineno"> 1864</span>&#160; break</div><div class="line"><a name="l01865"></a><span class="lineno"> 1865</span>&#160; endswitch</div><div class="line"><a name="l01866"></a><span class="lineno"> 1866</span>&#160; endif</div><div class="line"><a name="l01867"></a><span class="lineno"> 1867</span>&#160; endif</div><div class="line"><a name="l01868"></a><span class="lineno"> 1868</span>&#160; endfor</div><div class="line"><a name="l01869"></a><span class="lineno"> 1869</span>&#160; </div><div class="line"><a name="l01870"></a><span class="lineno"> 1870</span>&#160; return attributes</div><div class="line"><a name="l01871"></a><span class="lineno"> 1871</span>&#160;end</div><div class="line"><a name="l01872"></a><span class="lineno"> 1872</span>&#160;</div><div class="line"><a name="l01880"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a7ce92b03b6a786129959d44bf1112efa"> 1880</a></span>&#160;static function /s <a class="code" href="pearl-elog_8ipf.html#a7ce92b03b6a786129959d44bf1112efa">get_panel_message</a>(windowname)</div><div class="line"><a name="l01881"></a><span class="lineno"> 1881</span>&#160; <span class="keywordtype">string</span> windowname</div><div class="line"><a name="l01882"></a><span class="lineno"> 1882</span>&#160; </div><div class="line"><a name="l01883"></a><span class="lineno"> 1883</span>&#160; if (strlen(windowname) == 0)</div><div class="line"><a name="l01884"></a><span class="lineno"> 1884</span>&#160; windowname = <a class="code" href="pearl-elog_8ipf.html#a1376b5c9e6b1180a09961bc3296849ae">get_default_panel_name</a>()</div><div class="line"><a name="l01885"></a><span class="lineno"> 1885</span>&#160; endif</div><div class="line"><a name="l01886"></a><span class="lineno"> 1886</span>&#160; if (strlen(windowname) == 0)</div><div class="line"><a name="l01887"></a><span class="lineno"> 1887</span>&#160; return &quot;&quot;</div><div class="line"><a name="l01888"></a><span class="lineno"> 1888</span>&#160; endif</div><div class="line"><a name="l01889"></a><span class="lineno"> 1889</span>&#160;</div><div class="line"><a name="l01890"></a><span class="lineno"> 1890</span>&#160; <span class="keywordtype">string</span> nb = windowname + &quot;<span class="preprocessor">#Message&quot;</span></div><div class="line"><a name="l01891"></a><span class="lineno"> 1891</span>&#160; notebook $nb selection={startOfFile, endOfFile}</div><div class="line"><a name="l01892"></a><span class="lineno"> 1892</span>&#160; getselection notebook, $nb, 2</div><div class="line"><a name="l01893"></a><span class="lineno"> 1893</span>&#160; </div><div class="line"><a name="l01894"></a><span class="lineno"> 1894</span>&#160; <span class="keywordflow">return</span> s_selection</div><div class="line"><a name="l01895"></a><span class="lineno"> 1895</span>&#160;end</div><div class="line"><a name="l01896"></a><span class="lineno"> 1896</span>&#160;</div><div class="line"><a name="l01906"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#aa7a3988440bb6d73573b50a4698a0e75"> 1906</a></span>&#160;<span class="keyword">static</span> <span class="keyword">function</span> /s <a class="code" href="pearl-elog_8ipf.html#aa7a3988440bb6d73573b50a4698a0e75">set_panel_message</a>(windowname, message)</div><div class="line"><a name="l01907"></a><span class="lineno"> 1907</span>&#160; <span class="keywordtype">string</span> windowname</div><div class="line"><a name="l01908"></a><span class="lineno"> 1908</span>&#160; <span class="keywordtype">string</span> message</div><div class="line"><a name="l01909"></a><span class="lineno"> 1909</span>&#160; </div><div class="line"><a name="l01910"></a><span class="lineno"> 1910</span>&#160; <span class="keywordflow">if</span> (strlen(windowname) == 0)</div><div class="line"><a name="l01911"></a><span class="lineno"> 1911</span>&#160; windowname = <a class="code" href="pearl-elog_8ipf.html#a1376b5c9e6b1180a09961bc3296849ae">get_default_panel_name</a>()</div><div class="line"><a name="l01912"></a><span class="lineno"> 1912</span>&#160; endif</div><div class="line"><a name="l01913"></a><span class="lineno"> 1913</span>&#160;</div><div class="line"><a name="l01914"></a><span class="lineno"> 1914</span>&#160; <span class="keywordtype">string</span> nb = windowname + &quot;<span class="preprocessor">#Message&quot;</span></div><div class="line"><a name="l01915"></a><span class="lineno"> 1915</span>&#160; notebook $nb selection={startOfFile, endOfFile},text=message</div><div class="line"><a name="l01916"></a><span class="lineno"> 1916</span>&#160; </div><div class="line"><a name="l01917"></a><span class="lineno"> 1917</span>&#160; <span class="keywordflow">return</span> message</div><div class="line"><a name="l01918"></a><span class="lineno"> 1918</span>&#160;end</div><div class="line"><a name="l01919"></a><span class="lineno"> 1919</span>&#160;</div><div class="line"><a name="l01926"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#ace94356f691cbe343761aabd67ced23c"> 1926</a></span>&#160;<span class="keyword">static</span> <span class="keyword">function</span> /s <a class="code" href="pearl-elog_8ipf.html#ace94356f691cbe343761aabd67ced23c">get_panel_graphs</a>(windowname)</div><div class="line"><a name="l01927"></a><span class="lineno"> 1927</span>&#160; <span class="keywordtype">string</span> windowname <span class="comment">// panel window name</span></div><div class="line"><a name="l01928"></a><span class="lineno"> 1928</span>&#160; </div><div class="line"><a name="l01929"></a><span class="lineno"> 1929</span>&#160; dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l01930"></a><span class="lineno"> 1930</span>&#160; if (strlen(windowname) == 0)</div><div class="line"><a name="l01931"></a><span class="lineno"> 1931</span>&#160; windowname = <a class="code" href="pearl-elog_8ipf.html#a1376b5c9e6b1180a09961bc3296849ae">get_default_panel_name</a>()</div><div class="line"><a name="l01932"></a><span class="lineno"> 1932</span>&#160; endif</div><div class="line"><a name="l01933"></a><span class="lineno"> 1933</span>&#160; if (strlen(windowname) == 0)</div><div class="line"><a name="l01934"></a><span class="lineno"> 1934</span>&#160; return &quot;&quot;</div><div class="line"><a name="l01935"></a><span class="lineno"> 1935</span>&#160; endif</div><div class="line"><a name="l01936"></a><span class="lineno"> 1936</span>&#160;</div><div class="line"><a name="l01937"></a><span class="lineno"> 1937</span>&#160; <span class="keywordtype">string</span> logbook = GetUserData(windowname, &quot;&quot;, &quot;logbook&quot;)</div><div class="line"><a name="l01938"></a><span class="lineno"> 1938</span>&#160; dfref df_volatile = <a class="code" href="pearl-elog_8ipf.html#ac45196cb9ce8b43b76c9daf67689c49a">get_elog_df</a>(logbook, <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>)</div><div class="line"><a name="l01939"></a><span class="lineno"> 1939</span>&#160; wave /t /sdfr=df_volatile attach_list</div><div class="line"><a name="l01940"></a><span class="lineno"> 1940</span>&#160; wave /sdfr=df_volatile attach_sel</div><div class="line"><a name="l01941"></a><span class="lineno"> 1941</span>&#160; <span class="keywordtype">string</span> graphs = &quot;&quot;</div><div class="line"><a name="l01942"></a><span class="lineno"> 1942</span>&#160; <span class="keywordtype">string</span> windows = &quot;&quot;</div><div class="line"><a name="l01943"></a><span class="lineno"> 1943</span>&#160; <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l01944"></a><span class="lineno"> 1944</span>&#160;</div><div class="line"><a name="l01945"></a><span class="lineno"> 1945</span>&#160; variable n = DimSize(attach_sel, 0)</div><div class="line"><a name="l01946"></a><span class="lineno"> 1946</span>&#160; variable i</div><div class="line"><a name="l01947"></a><span class="lineno"> 1947</span>&#160; for (i = 0; i &lt; n; i += 1)</div><div class="line"><a name="l01948"></a><span class="lineno"> 1948</span>&#160; if (attach_sel[i][kAttachColSel] &amp; 16)</div><div class="line"><a name="l01949"></a><span class="lineno"> 1949</span>&#160; graphname = attach_list[i][kAttachColName]</div><div class="line"><a name="l01950"></a><span class="lineno"> 1950</span>&#160; windows = WinList(graphname, &quot;;&quot;, &quot;WIN:1&quot;)</div><div class="line"><a name="l01951"></a><span class="lineno"> 1951</span>&#160; if (ItemsInList(windows) == 1)</div><div class="line"><a name="l01952"></a><span class="lineno"> 1952</span>&#160; graphs = AddListItem(graphname, graphs, &quot;;&quot;, inf)</div><div class="line"><a name="l01953"></a><span class="lineno"> 1953</span>&#160; endif</div><div class="line"><a name="l01954"></a><span class="lineno"> 1954</span>&#160; endif</div><div class="line"><a name="l01955"></a><span class="lineno"> 1955</span>&#160; endfor</div><div class="line"><a name="l01956"></a><span class="lineno"> 1956</span>&#160; </div><div class="line"><a name="l01957"></a><span class="lineno"> 1957</span>&#160; return graphs</div><div class="line"><a name="l01958"></a><span class="lineno"> 1958</span>&#160;end</div><div class="line"><a name="l01959"></a><span class="lineno"> 1959</span>&#160;</div><div class="line"><a name="l01966"></a><span class="lineno"><a class="line" href="pearl-elog_8ipf.html#a6eca5f4fab999984df32b50dd669c0b1"> 1966</a></span>&#160;static function /s <a class="code" href="pearl-elog_8ipf.html#a6eca5f4fab999984df32b50dd669c0b1">set_panel_graphs</a>(windowname, graphs)</div><div class="line"><a name="l01967"></a><span class="lineno"> 1967</span>&#160; <span class="keywordtype">string</span> windowname</div><div class="line"><a name="l01968"></a><span class="lineno"> 1968</span>&#160; <span class="keywordtype">string</span> graphs</div><div class="line"><a name="l01969"></a><span class="lineno"> 1969</span>&#160;</div><div class="line"><a name="l01970"></a><span class="lineno"> 1970</span>&#160; if (strlen(windowname) == 0)</div><div class="line"><a name="l01971"></a><span class="lineno"> 1971</span>&#160; windowname = <a class="code" href="pearl-elog_8ipf.html#a1376b5c9e6b1180a09961bc3296849ae">get_default_panel_name</a>()</div><div class="line"><a name="l01972"></a><span class="lineno"> 1972</span>&#160; endif</div><div class="line"><a name="l01973"></a><span class="lineno"> 1973</span>&#160; if (strlen(windowname) == 0)</div><div class="line"><a name="l01974"></a><span class="lineno"> 1974</span>&#160; return &quot;&quot;</div><div class="line"><a name="l01975"></a><span class="lineno"> 1975</span>&#160; endif</div><div class="line"><a name="l01976"></a><span class="lineno"> 1976</span>&#160;</div><div class="line"><a name="l01977"></a><span class="lineno"> 1977</span>&#160; <span class="keywordtype">string</span> logbook = GetUserData(windowname, &quot;&quot;, &quot;logbook&quot;)</div><div class="line"><a name="l01978"></a><span class="lineno"> 1978</span>&#160; <a class="code" href="pearl-elog_8ipf.html#a9c1cfd320e88e84dcf4f84bbcf3f46a5">update_attach_items</a>(logbook)</div><div class="line"><a name="l01979"></a><span class="lineno"> 1979</span>&#160; dfref df_volatile = <a class="code" href="pearl-elog_8ipf.html#ac45196cb9ce8b43b76c9daf67689c49a">get_elog_df</a>(logbook, <a class="code" href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a>)</div><div class="line"><a name="l01980"></a><span class="lineno"> 1980</span>&#160; wave /t /sdfr=df_volatile attach_list</div><div class="line"><a name="l01981"></a><span class="lineno"> 1981</span>&#160; wave /sdfr=df_volatile attach_sel</div><div class="line"><a name="l01982"></a><span class="lineno"> 1982</span>&#160;</div><div class="line"><a name="l01983"></a><span class="lineno"> 1983</span>&#160; variable n = DimSize(attach_sel, 0)</div><div class="line"><a name="l01984"></a><span class="lineno"> 1984</span>&#160; variable i</div><div class="line"><a name="l01985"></a><span class="lineno"> 1985</span>&#160; <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l01986"></a><span class="lineno"> 1986</span>&#160; for (i = 0; i &lt; n; i += 1)</div><div class="line"><a name="l01987"></a><span class="lineno"> 1987</span>&#160; graphname = attach_list[i][kAttachColName]</div><div class="line"><a name="l01988"></a><span class="lineno"> 1988</span>&#160; if (WhichListItem(graphname, graphs)&gt;= 0)</div><div class="line"><a name="l01989"></a><span class="lineno"> 1989</span>&#160; attach_sel[i][kAttachColSel] = 48</div><div class="line"><a name="l01990"></a><span class="lineno"> 1990</span>&#160; else</div><div class="line"><a name="l01991"></a><span class="lineno"> 1991</span>&#160; attach_sel[i][kAttachColSel] = 32</div><div class="line"><a name="l01992"></a><span class="lineno"> 1992</span>&#160; endif</div><div class="line"><a name="l01993"></a><span class="lineno"> 1993</span>&#160; endfor</div><div class="line"><a name="l01994"></a><span class="lineno"> 1994</span>&#160;end</div><div class="ttc" id="pearl-elog_8ipf_html_a05301d497e4796e5fb5adde3728ba971"><div class="ttname"><a href="pearl-elog_8ipf.html#a05301d497e4796e5fb5adde3728ba971">elog_create_entry</a></div><div class="ttdeci">variable elog_create_entry(string logbook, string attributes, string message, variable encoding=defaultValue, string graphs=defaultValue, variable replyto=defaultValue)</div><div class="ttdoc">create a new entry in ELOG </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00685">pearl-elog.ipf:685</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a3f524f5190341d2accc8cb8c3ed2ceb5"><div class="ttname"><a href="pearl-elog_8ipf.html#a3f524f5190341d2accc8cb8c3ed2ceb5">AfterFileOpenHook</a></div><div class="ttdeci">static variable AfterFileOpenHook(variable refNum, string file, string pathName, string type, string creator, variable kind)</div><div class="ttdoc">initialize the package and reload preferences after an experiment is loaded. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00143">pearl-elog.ipf:143</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_ac2f76abed8cfaa7ac02a46c0b89004f0"><div class="ttname"><a href="pearl-elog_8ipf.html#ac2f76abed8cfaa7ac02a46c0b89004f0">elog_add_attachment</a></div><div class="ttdeci">variable elog_add_attachment(string logbook, variable id, string graphs)</div><div class="ttdoc">add one or more graphs to an existing ELOG entry </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00792">pearl-elog.ipf:792</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a75bb92ef5f80843e66a7243bd958ef8b"><div class="ttname"><a href="pearl-elog_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a></div><div class="ttdeci">static const string package_path</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00086">pearl-elog.ipf:86</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_ace94356f691cbe343761aabd67ced23c"><div class="ttname"><a href="pearl-elog_8ipf.html#ace94356f691cbe343761aabd67ced23c">get_panel_graphs</a></div><div class="ttdeci">static string get_panel_graphs(string windowname)</div><div class="ttdoc">get the names of the graphs selected for attachment </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01926">pearl-elog.ipf:1926</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_aa1dfae6d78a367d50ee8fc1ffe9cb69b"><div class="ttname"><a href="pearl-elog_8ipf.html#aa1dfae6d78a367d50ee8fc1ffe9cb69b">bp_attach_updown</a></div><div class="ttdeci">static variable bp_attach_updown(WMButtonAction *ba)</div><div class="ttdoc">button procedure for the attachment up and down buttons </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01519">pearl-elog.ipf:1519</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_af652f6f257be1ee749fe788d1b03f75f"><div class="ttname"><a href="pearl-elog_8ipf.html#af652f6f257be1ee749fe788d1b03f75f">create_message_file</a></div><div class="ttdeci">static string create_message_file(string message)</div><div class="ttdoc">save the message to a temporary text file </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00982">pearl-elog.ipf:982</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a5306514bf7d1a582aec146256ae45a12"><div class="ttname"><a href="pearl-elog_8ipf.html#a5306514bf7d1a582aec146256ae45a12">parse_result</a></div><div class="ttdeci">static variable parse_result()</div><div class="ttdoc">parse the result file from an elog invokation. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01141">pearl-elog.ipf:1141</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_ab6d97edbf33e8ec039b34ff756e7ab93"><div class="ttname"><a href="pearl-elog_8ipf.html#ab6d97edbf33e8ec039b34ff756e7ab93">elog_create_logbook</a></div><div class="ttdeci">variable elog_create_logbook(string name, string template=defaultValue)</div><div class="ttdoc">create a new logbook. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00414">pearl-elog.ipf:414</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a39a1f418c8a2f9a5e4ab976827d8efca"><div class="ttname"><a href="pearl-elog_8ipf.html#a39a1f418c8a2f9a5e4ab976827d8efca">set_panel_attributes</a></div><div class="ttdeci">static string set_panel_attributes(string windowname, string attributes, variable clear=defaultValue)</div><div class="ttdoc">set the fields of the ELOG panel </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01807">pearl-elog.ipf:1807</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_ad4472ea917691c41ad0b4ea6f36010a5"><div class="ttname"><a href="pearl-elog_8ipf.html#ad4472ea917691c41ad0b4ea6f36010a5">bp_logout</a></div><div class="ttdeci">static variable bp_logout(WMButtonAction *ba)</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01730">pearl-elog.ipf:1730</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a1376b5c9e6b1180a09961bc3296849ae"><div class="ttname"><a href="pearl-elog_8ipf.html#a1376b5c9e6b1180a09961bc3296849ae">get_default_panel_name</a></div><div class="ttdeci">static string get_default_panel_name()</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01747">pearl-elog.ipf:1747</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_af8b1ea711208bcc2cd1647abe04131dc"><div class="ttname"><a href="pearl-elog_8ipf.html#af8b1ea711208bcc2cd1647abe04131dc">elog_panel_hook</a></div><div class="ttdeci">static variable elog_panel_hook(WMWinHookStruct *s)</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01395">pearl-elog.ipf:1395</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a424460442afd5f6f853e68cd665ed785"><div class="ttname"><a href="pearl-elog_8ipf.html#a424460442afd5f6f853e68cd665ed785">elog_config</a></div><div class="ttdeci">variable elog_config(string elog_path=defaultValue, string hostname=defaultValue, variable port=defaultValue, string subdir=defaultValue)</div><div class="ttdoc">set global module configuration parameters </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00473">pearl-elog.ipf:473</a></div></div>
<div class="ttc" id="namespace_pearl_elog_html"><div class="ttname"><a href="namespace_pearl_elog.html">PearlElog</a></div><div class="ttdoc">interface for writing ELOG entries with Igor graphs as attachment. </div></div>
<div class="ttc" id="pearl-elog_8ipf_html_ae824bbf81f8b7d16b36b53e3f3d85f69"><div class="ttname"><a href="pearl-elog_8ipf.html#ae824bbf81f8b7d16b36b53e3f3d85f69">IgorBeforeNewHook</a></div><div class="ttdeci">static variable IgorBeforeNewHook(string igorApplicationNameStr)</div><div class="ttdoc">save preferences and recent values before Igor opens a new experiment. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00127">pearl-elog.ipf:127</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a6eca5f4fab999984df32b50dd669c0b1"><div class="ttname"><a href="pearl-elog_8ipf.html#a6eca5f4fab999984df32b50dd669c0b1">set_panel_graphs</a></div><div class="ttdeci">static string set_panel_graphs(string windowname, string graphs)</div><div class="ttdoc">update selection of graphs for attachment </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01966">pearl-elog.ipf:1966</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_aaca820a0149ce6a0e843ca72b9c9e7ab"><div class="ttname"><a href="pearl-elog_8ipf.html#aaca820a0149ce6a0e843ca72b9c9e7ab">elog_init_pearl_templates</a></div><div class="ttdeci">variable elog_init_pearl_templates()</div><div class="ttdoc">setup PEARL template logbooks. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00262">pearl-elog.ipf:262</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a2417d079483f773f8231c5f2caba6cf0"><div class="ttname"><a href="pearl-elog_8ipf.html#a2417d079483f773f8231c5f2caba6cf0">create_graph_file</a></div><div class="ttdeci">static string create_graph_file(string graphname, variable fileindex)</div><div class="ttdoc">save a graph to a temporary graphics file </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01023">pearl-elog.ipf:1023</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_addbdec64930e9c1e417b16b25df8c723"><div class="ttname"><a href="pearl-elog_8ipf.html#addbdec64930e9c1e417b16b25df8c723">kAttachColName</a></div><div class="ttdeci">static const variable kAttachColName</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01431">pearl-elog.ipf:1431</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_ab39637298c93b7aefd67febf3a4e7672"><div class="ttname"><a href="pearl-elog_8ipf.html#ab39637298c93b7aefd67febf3a4e7672">bp_clear</a></div><div class="ttdeci">static variable bp_clear(WMButtonAction *ba)</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01696">pearl-elog.ipf:1696</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a3eac4012891c2813e401aee2c1134763"><div class="ttname"><a href="pearl-elog_8ipf.html#a3eac4012891c2813e401aee2c1134763">elog_login</a></div><div class="ttdeci">variable elog_login(string logbook, string username, string password)</div><div class="ttdoc">set username and password for login to a logbook </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00513">pearl-elog.ipf:513</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a91b5f51982d23a36d1760b8874b5736a"><div class="ttname"><a href="pearl-elog_8ipf.html#a91b5f51982d23a36d1760b8874b5736a">bp_attach_top</a></div><div class="ttdeci">static variable bp_attach_top(WMButtonAction *ba)</div><div class="ttdoc">select top graph window for attachment </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01598">pearl-elog.ipf:1598</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_aae61ff4d4a4d83dfc55af45d9ed1cbc3"><div class="ttname"><a href="pearl-elog_8ipf.html#aae61ff4d4a4d83dfc55af45d9ed1cbc3">kAttachColSel</a></div><div class="ttdeci">static const variable kAttachColSel</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01429">pearl-elog.ipf:1429</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a6da33f1bb2639cb912e9b25af25bf663"><div class="ttname"><a href="pearl-elog_8ipf.html#a6da33f1bb2639cb912e9b25af25bf663">PearlElogPanel</a></div><div class="ttdeci">string PearlElogPanel(string logbook)</div><div class="ttdoc">open a new panel for submitting data to ELOG. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01241">pearl-elog.ipf:1241</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_ab2558ef5cd5e5dfba410bd58ed258b64"><div class="ttname"><a href="pearl-elog_8ipf.html#ab2558ef5cd5e5dfba410bd58ed258b64">elog_validate_attributes</a></div><div class="ttdeci">variable elog_validate_attributes(string logbook, string attributes)</div><div class="ttdoc">validate attributes </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00653">pearl-elog.ipf:653</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a4986de01085dc5481500240ef7667419"><div class="ttname"><a href="pearl-elog_8ipf.html#a4986de01085dc5481500240ef7667419">prepare_graph_attachments</a></div><div class="ttdeci">static string prepare_graph_attachments(string graphs)</div><div class="ttdoc">prepare screenshots of graph windows for attachments </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00939">pearl-elog.ipf:939</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a356bebea8eb41c9ac3ea2148af22707f"><div class="ttname"><a href="pearl-elog_8ipf.html#a356bebea8eb41c9ac3ea2148af22707f">list_logbooks</a></div><div class="ttdeci">static string list_logbooks(variable templates=defaultValue)</div><div class="ttdoc">get a list of configured logbooks or templates. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00618">pearl-elog.ipf:618</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_acbba78d869a543edf7c2b80d7a8d2344"><div class="ttname"><a href="pearl-elog_8ipf.html#acbba78d869a543edf7c2b80d7a8d2344">bp_attach</a></div><div class="ttdeci">static variable bp_attach(WMButtonAction *ba)</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01635">pearl-elog.ipf:1635</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a7990f2948d48aefe990271d1961df833"><div class="ttname"><a href="pearl-elog_8ipf.html#a7990f2948d48aefe990271d1961df833">move_attach_item</a></div><div class="ttdeci">static variable move_attach_item(string logbook, variable item, variable distance)</div><div class="ttdoc">move an attachment item in the list of attachments </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01495">pearl-elog.ipf:1495</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_ac45196cb9ce8b43b76c9daf67689c49a"><div class="ttname"><a href="pearl-elog_8ipf.html#ac45196cb9ce8b43b76c9daf67689c49a">get_elog_df</a></div><div class="ttdeci">static dfr get_elog_df(string name, variable category)</div><div class="ttdoc">get the package, logbook, or template datafolder. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00170">pearl-elog.ipf:170</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_acedf0c8ae34e9ebadd6fa0d9d1353aa4"><div class="ttname"><a href="pearl-elog_8ipf.html#acedf0c8ae34e9ebadd6fa0d9d1353aa4">elog_prompt_logbook</a></div><div class="ttdeci">string elog_prompt_logbook()</div><div class="ttdoc">prompt to open or create a logbook </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01184">pearl-elog.ipf:1184</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a8251cea45c8d1f1993a4051a6d0760c4"><div class="ttname"><a href="pearl-elog_8ipf.html#a8251cea45c8d1f1993a4051a6d0760c4">bp_save_graphs</a></div><div class="ttdeci">static variable bp_save_graphs(WMButtonAction *ba)</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01668">pearl-elog.ipf:1668</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a9c1cfd320e88e84dcf4f84bbcf3f46a5"><div class="ttname"><a href="pearl-elog_8ipf.html#a9c1cfd320e88e84dcf4f84bbcf3f46a5">update_attach_items</a></div><div class="ttdeci">static variable update_attach_items(string logbook)</div><div class="ttdoc">update the list of attachments </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01434">pearl-elog.ipf:1434</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a14f8376a0485aa654ccf3d2f30ab4d01"><div class="ttname"><a href="pearl-elog_8ipf.html#a14f8376a0485aa654ccf3d2f30ab4d01">bp_login</a></div><div class="ttdeci">static variable bp_login(WMButtonAction *ba)</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01712">pearl-elog.ipf:1712</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a915905f2e57d0d9a25c75f39fcce485f"><div class="ttname"><a href="pearl-elog_8ipf.html#a915905f2e57d0d9a25c75f39fcce485f">kdfVolatile</a></div><div class="ttdeci">static const variable kdfVolatile</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00154">pearl-elog.ipf:154</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a28eb44739e7d5c7f9899a69afa231b8e"><div class="ttname"><a href="pearl-elog_8ipf.html#a28eb44739e7d5c7f9899a69afa231b8e">kdfTemplates</a></div><div class="ttdeci">static const variable kdfTemplates</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00156">pearl-elog.ipf:156</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_abd15431defaec6d770cc8cab2a40e6b0"><div class="ttname"><a href="pearl-elog_8ipf.html#abd15431defaec6d770cc8cab2a40e6b0">prepare_command_line</a></div><div class="ttdeci">static string prepare_command_line(string logbook)</div><div class="ttdoc">format the ELOG command and essential address arguments. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00853">pearl-elog.ipf:853</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_ad7640d06f004ecd4a8980ea29d24dcbe"><div class="ttname"><a href="pearl-elog_8ipf.html#ad7640d06f004ecd4a8980ea29d24dcbe">cleanup_temp_files</a></div><div class="ttdeci">static variable cleanup_temp_files()</div><div class="ttdoc">delete temporary files created by the ELOG module. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01115">pearl-elog.ipf:1115</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_ad1a72c63f269b2e22b21a72d1ef3b279"><div class="ttname"><a href="pearl-elog_8ipf.html#ad1a72c63f269b2e22b21a72d1ef3b279">get_log_path</a></div><div class="ttdeci">static string get_log_path()</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01095">pearl-elog.ipf:1095</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a5afeb893f92034532341ae51471dc2d2"><div class="ttname"><a href="pearl-elog_8ipf.html#a5afeb893f92034532341ae51471dc2d2">kAttachColTitle</a></div><div class="ttdeci">static const variable kAttachColTitle</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01430">pearl-elog.ipf:1430</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a6a9923c6465c91b1f9d1d97b090f424b"><div class="ttname"><a href="pearl-elog_8ipf.html#a6a9923c6465c91b1f9d1d97b090f424b">elog_parse_id</a></div><div class="ttdeci">static const string elog_parse_id</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01134">pearl-elog.ipf:1134</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a7ce92b03b6a786129959d44bf1112efa"><div class="ttname"><a href="pearl-elog_8ipf.html#a7ce92b03b6a786129959d44bf1112efa">get_panel_message</a></div><div class="ttdeci">static string get_panel_message(string windowname)</div><div class="ttdoc">get the message field of the ELOG panel </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01880">pearl-elog.ipf:1880</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_ac8b61eefed231018cc36d47e95bd8c22"><div class="ttname"><a href="pearl-elog_8ipf.html#ac8b61eefed231018cc36d47e95bd8c22">create_cmd_file</a></div><div class="ttdeci">static string create_cmd_file(string cmd)</div><div class="ttdoc">write the command line to a file. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01059">pearl-elog.ipf:1059</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a85cf9d39ea917860b463b1b4111705f2"><div class="ttname"><a href="pearl-elog_8ipf.html#a85cf9d39ea917860b463b1b4111705f2">init_volatile_vars</a></div><div class="ttdeci">static variable init_volatile_vars()</div><div class="ttdoc">initialize volatile variables. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00340">pearl-elog.ipf:340</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a92c27964d49ab8bcd7afc858ebe214a3"><div class="ttname"><a href="pearl-elog_8ipf.html#a92c27964d49ab8bcd7afc858ebe214a3">load_prefs</a></div><div class="ttdeci">static variable load_prefs()</div><div class="ttdoc">load persistent package data from the preferences file. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00584">pearl-elog.ipf:584</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a3498e65d04de046481170b49d4e3d0d6"><div class="ttname"><a href="pearl-elog_8ipf.html#a3498e65d04de046481170b49d4e3d0d6">kdfPersistent</a></div><div class="ttdeci">static const variable kdfPersistent</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00155">pearl-elog.ipf:155</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a7a4572f4f861f7eb46c932508d1164f9"><div class="ttname"><a href="pearl-elog_8ipf.html#a7a4572f4f861f7eb46c932508d1164f9">init_package</a></div><div class="ttdeci">static variable init_package(variable clean=defaultValue)</div><div class="ttdoc">initialize the package data folder. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00217">pearl-elog.ipf:217</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_ac729557a307bddd2f2ad298199976c01"><div class="ttname"><a href="pearl-elog_8ipf.html#ac729557a307bddd2f2ad298199976c01">save_prefs</a></div><div class="ttdeci">static variable save_prefs()</div><div class="ttdoc">save persistent package data to the preferences file. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00564">pearl-elog.ipf:564</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_af34e46263aa50843f98f755988f9ab5c"><div class="ttname"><a href="pearl-elog_8ipf.html#af34e46263aa50843f98f755988f9ab5c">kdfRoot</a></div><div class="ttdeci">static const variable kdfRoot</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00153">pearl-elog.ipf:153</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_afbace5ffc3167b42b09657ce6cc854ca"><div class="ttname"><a href="pearl-elog_8ipf.html#afbace5ffc3167b42b09657ce6cc854ca">elog_prompt_login</a></div><div class="ttdeci">variable elog_prompt_login(string logbook)</div><div class="ttdoc">prompt the user for login to a logbook </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01214">pearl-elog.ipf:1214</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_aa7a3988440bb6d73573b50a4698a0e75"><div class="ttname"><a href="pearl-elog_8ipf.html#aa7a3988440bb6d73573b50a4698a0e75">set_panel_message</a></div><div class="ttdeci">static string set_panel_message(string windowname, string message)</div><div class="ttdoc">set the message field of the ELOG panel </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01906">pearl-elog.ipf:1906</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a6fcae5eafc97bca9a637bd7800b13e25"><div class="ttname"><a href="pearl-elog_8ipf.html#a6fcae5eafc97bca9a637bd7800b13e25">IgorQuitHook</a></div><div class="ttdeci">static variable IgorQuitHook(string igorApplicationNameStr)</div><div class="ttdoc">save preferences and recent values before Igor quits. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00135">pearl-elog.ipf:135</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_adeff6678e57313cb218824f06d32b5ec"><div class="ttname"><a href="pearl-elog_8ipf.html#adeff6678e57313cb218824f06d32b5ec">bp_submit</a></div><div class="ttdeci">static variable bp_submit(WMButtonAction *ba)</div><div class="ttdoc">button procedure for the Submit and Reply buttons </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01551">pearl-elog.ipf:1551</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a4040736819edadf4b26982bcfdb9c7b9"><div class="ttname"><a href="pearl-elog_8ipf.html#a4040736819edadf4b26982bcfdb9c7b9">bp_attach_allnone</a></div><div class="ttdeci">static variable bp_attach_allnone(WMButtonAction *ba)</div><div class="ttdoc">select/deselect all graph windows for attachment </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01614">pearl-elog.ipf:1614</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a66e1200515eff8cd5c961572eccd7220"><div class="ttname"><a href="pearl-elog_8ipf.html#a66e1200515eff8cd5c961572eccd7220">get_panel_attributes</a></div><div class="ttdeci">static string get_panel_attributes(string windowname)</div><div class="ttdoc">get a list of attributes from the fields of the ELOG panel. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01760">pearl-elog.ipf:1760</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a63aa38b624b66fe502505040c25bc0c3"><div class="ttname"><a href="pearl-elog_8ipf.html#a63aa38b624b66fe502505040c25bc0c3">elog_success_msg</a></div><div class="ttdeci">static const string elog_success_msg</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l01133">pearl-elog.ipf:1133</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a6b2d6cf641c61120332ac1983b2f3846"><div class="ttname"><a href="pearl-elog_8ipf.html#a6b2d6cf641c61120332ac1983b2f3846">get_timestamp</a></div><div class="ttdeci">static string get_timestamp(string sep)</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00958">pearl-elog.ipf:958</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a96e4cbbdb0fd8c58d87b502dc1883664"><div class="ttname"><a href="pearl-elog_8ipf.html#a96e4cbbdb0fd8c58d87b502dc1883664">elog_logout</a></div><div class="ttdeci">variable elog_logout(string logbook)</div><div class="ttdoc">clear username and password of a logbook or all logbooks. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00533">pearl-elog.ipf:533</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a4088a48a8428629f120c08a419af62d6"><div class="ttname"><a href="pearl-elog_8ipf.html#a4088a48a8428629f120c08a419af62d6">pearl_elog</a></div><div class="ttdeci">variable pearl_elog(string logbook)</div><div class="ttdoc">main function to initialize ELOG and to open an ELOG panel. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00097">pearl-elog.ipf:97</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_a3cc9074c84d684d207dfdf2045755df4"><div class="ttname"><a href="pearl-elog_8ipf.html#a3cc9074c84d684d207dfdf2045755df4">format_url</a></div><div class="ttdeci">static string format_url(string logbook)</div><div class="ttdoc">format the URL for display to the user </div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00902">pearl-elog.ipf:902</a></div></div>
<div class="ttc" id="pearl-elog_8ipf_html_aca457d1f4414d20a911254b1de13ebbb"><div class="ttname"><a href="pearl-elog_8ipf.html#aca457d1f4414d20a911254b1de13ebbb">package_name</a></div><div class="ttdeci">static const string package_name</div><div class="ttdef"><b>Definition:</b> <a href="pearl-elog_8ipf_source.html#l00085">pearl-elog.ipf:85</a></div></div>
</div><!-- fragment --></div><!-- contents -->
</div><!-- doc-content -->
<!-- start footer part -->
<div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
<ul>
<li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-elog_8ipf.html">pearl-elog.ipf</a></li>
<li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
<a href="http://www.doxygen.org/index.html">
<img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
</ul>
</div>
</body>
</html>