搜索
人大经济论坛 附件下载

附件下载

所在主题:
文件名:  TommasoBelluzzo-BaselTools-ec79d17.zip
资料下载链接地址: https://bbs.pinggu.org/a-3477296.html
附件大小:
410.98 KB   举报本内容
<!-- markdown css tag --><div class="pinggu_markdown">
<div class="pinggu_markdown__html"><h1 id="欢迎使用markdown编辑器">欢迎使用Markdown编辑器</h1>
<blockquote>
<p>经管之家:Do the best economic and management education!<br>
Author @ <a href="https://bbs.pinggu.org">bbs.pinggu.org</a> : Daniel Tulpen Liu !<br>
Author @Mathwork Cop Inc :Copyright © Tommaso Belluzzo ,_意大利_语:Italia</p>
</blockquote>
<p>你好! 这是你第一次使用 <strong>Markdown编辑器</strong> 所展示的欢迎页。如果你想学习如何使用Markdown编辑器, 可以仔细阅读这篇文章,了解一下Markdown的基本语法知识。</p>
<p>今天要分享的是 MATLAB 的程序;</p>
<p>作者是国际上特别牛的人, 程序的实现的话, 我认为没有十年的 MATLAB 使用经验的话,是做不到的。<br>
所以呢,只有好好的学习。这个代码的分享是为了大家的学习。</p>
<p>2&#48;21年再次修改,因为 Markdown 格式的文件,在论坛如果开头部分不够长,那么这个程序代码部分的显示,就会出一些问题。所以增加几行废话。</p>
<p>作者应该是MATHWORK 官方软件工程师,不是软件工程师的,写不出如此强大的程序代码。 这个程序是面向对象编程 OOA 编写。</p>
<p>其中的 this 是一个对象。来自于 C++ 语言。在 C++ 语言里, this 对象是比较常见的。</p>
<ul>
<li>复杂的是,这个MATLAB 程序还调用了 JAVA 程序,可见作者的编程功底非常的霸道。</li>
<li><code>Enjoy</code></li>
</ul>
<h2 id="ooa-编程演示">OOA 编程演示</h2>
<pre class=" language-c"><code class="prismlanguage-c"><span class="token function">classdef</span> <span class="token punctuation">(</span>Sealed<span class="token punctuation">)</span> BaselOP <span class="token operator">&lt;</span> BaselInterface

<span class="token operator">%</span><span class="token operator">%</span> Properties<span class="token punctuation">:</span> Instance
<span class="token function">properties</span> <span class="token punctuation">(</span>Access <span class="token operator">=</span> private<span class="token punctuation">)</span>
Handles
Initialized
Modifiers
Transition
Year
end

<span class="token operator">%</span><span class="token operator">%</span> Constructor
<span class="token function">methods</span> <span class="token punctuation">(</span>Access <span class="token operator">=</span> public<span class="token punctuation">)</span>
function this <span class="token operator">=</span> <span class="token function">BaselOP</span><span class="token punctuation">(</span><span class="token punctuation">)</span>
fig <span class="token operator">=</span> <span class="token function">findall</span><span class="token punctuation">(</span><span class="token number">&#48;</span><span class="token punctuation">,</span><span class="token string">'Tag'</span><span class="token punctuation">,</span><span class="token string">'BaselOP'</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

<span class="token keyword">if</span> <span class="token punctuation">(</span><span class="token operator">~</span><span class="token function">isempty</span><span class="token punctuation">(</span>fig<span class="token punctuation">)</span><span class="token punctuation">)</span>
<span class="token keyword">if</span> <span class="token punctuation">(</span><span class="token function">isvalid</span><span class="token punctuation">(</span>fig<span class="token punctuation">)</span><span class="token punctuation">)</span>
<span class="token function">figure</span><span class="token punctuation">(</span>fig<span class="token punctuation">)</span><span class="token punctuation">;</span>
<span class="token keyword">return</span><span class="token punctuation">;</span>
<span class="token keyword">else</span>
<span class="token function">delete</span><span class="token punctuation">(</span>fig<span class="token punctuation">)</span><span class="token punctuation">;</span>
end
end

this<span class="token punctuation">.</span><span class="token function">Construct</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span>Initialized <span class="token operator">=</span> false<span class="token punctuation">;</span>
this<span class="token punctuation">.</span>Transition <span class="token operator">=</span> false<span class="token punctuation">;</span>
this<span class="token punctuation">.</span>Year <span class="token operator">=</span> <span class="token function">year</span><span class="token punctuation">(</span><span class="token function">now</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

gui <span class="token operator">=</span> <span class="token keyword">struct</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
gui<span class="token punctuation">.</span>gui_Name <span class="token operator">=</span> mfilename<span class="token punctuation">;</span>
gui<span class="token punctuation">.</span>gui_Singleton <span class="token operator">=</span> false<span class="token punctuation">;</span>
gui<span class="token punctuation">.</span>gui_Callback <span class="token operator">=</span> <span class="token punctuation">[</span><span class="token punctuation">]</span><span class="token punctuation">;</span>
gui<span class="token punctuation">.</span>gui_OpeningFcn <span class="token operator">=</span> @this<span class="token punctuation">.</span>Form_Load<span class="token punctuation">;</span>
gui<span class="token punctuation">.</span>gui_OutputFcn <span class="token operator">=</span> @this<span class="token punctuation">.</span>Form_Output<span class="token punctuation">;</span>
gui<span class="token punctuation">.</span>gui_LayoutFcn <span class="token operator">=</span> <span class="token punctuation">[</span><span class="token punctuation">]</span><span class="token punctuation">;</span>

<span class="token function">gui_mainfcn</span><span class="token punctuation">(</span>gui<span class="token punctuation">)</span><span class="token punctuation">;</span>
end
end

<span class="token operator">%</span><span class="token operator">%</span> Destructor
<span class="token function">methods</span> <span class="token punctuation">(</span>Access <span class="token operator">=</span> private<span class="token punctuation">)</span>
function <span class="token function">delete</span><span class="token punctuation">(</span>this<span class="token punctuation">)</span>
<span class="token keyword">if</span> <span class="token punctuation">(</span><span class="token operator">~</span><span class="token function">isempty</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">)</span><span class="token punctuation">)</span>
this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>BaselOP<span class="token punctuation">.</span>CloseRequestFcn <span class="token operator">=</span> <span class="token string">''</span><span class="token punctuation">;</span>
<span class="token function">delete</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>BaselOP<span class="token punctuation">)</span><span class="token punctuation">;</span>
end

this<span class="token punctuation">.</span>Handles <span class="token operator">=</span> <span class="token punctuation">[</span><span class="token punctuation">]</span><span class="token punctuation">;</span>
this<span class="token punctuation">.</span>Initialized <span class="token operator">=</span> <span class="token punctuation">[</span><span class="token punctuation">]</span><span class="token punctuation">;</span>
this<span class="token punctuation">.</span>Modifiers <span class="token operator">=</span> <span class="token punctuation">[</span><span class="token punctuation">]</span><span class="token punctuation">;</span>
this<span class="token punctuation">.</span>Transition <span class="token operator">=</span> <span class="token punctuation">[</span><span class="token punctuation">]</span><span class="token punctuation">;</span>
this<span class="token punctuation">.</span>Year <span class="token operator">=</span> <span class="token punctuation">[</span><span class="token punctuation">]</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span><span class="token function">Destruct</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
end
end

<span class="token operator">%</span><span class="token operator">%</span> Methods<span class="token punctuation">:</span> Events
<span class="token function">methods</span> <span class="token punctuation">(</span>Access <span class="token operator">=</span> private<span class="token punctuation">)</span>
function <span class="token function">Form_Close</span><span class="token punctuation">(</span>this<span class="token punctuation">,</span>obj<span class="token punctuation">,</span>evd<span class="token punctuation">)</span> <span class="token operator">%</span>#ok<span class="token operator">&lt;</span>INUSD<span class="token operator">&gt;</span>
<span class="token function">delete</span><span class="token punctuation">(</span>this<span class="token punctuation">)</span><span class="token punctuation">;</span>
end

function <span class="token function">Form_KeyModifiers</span><span class="token punctuation">(</span>this<span class="token punctuation">,</span>obj<span class="token punctuation">,</span>evd<span class="token punctuation">)</span> <span class="token operator">%</span>#ok<span class="token operator">&lt;</span>INUSL<span class="token operator">&gt;</span>
this<span class="token punctuation">.</span>Modifiers <span class="token operator">=</span> evd<span class="token punctuation">.</span>Modifier<span class="token punctuation">;</span>
end

function <span class="token function">Form_Load</span><span class="token punctuation">(</span>this<span class="token punctuation">,</span>obj<span class="token punctuation">,</span>evd<span class="token punctuation">,</span>han<span class="token punctuation">,</span>varargin<span class="token punctuation">)</span> <span class="token operator">%</span>#ok<span class="token operator">&lt;</span>INUSL<span class="token operator">&gt;</span>
obj<span class="token punctuation">.</span>CloseRequestFcn <span class="token operator">=</span> @this<span class="token punctuation">.</span>Form_Close<span class="token punctuation">;</span>
obj<span class="token punctuation">.</span>WindowKeyPressFcn <span class="token operator">=</span> @this<span class="token punctuation">.</span>Form_KeyModifiers<span class="token punctuation">;</span>
obj<span class="token punctuation">.</span>WindowKeyReleaseFcn <span class="token operator">=</span> @this<span class="token punctuation">.</span>Form_KeyModifiers<span class="token punctuation">;</span>

han<span class="token punctuation">.</span>LossButtonClear<span class="token punctuation">.</span>Callback <span class="token operator">=</span> @this<span class="token punctuation">.</span>LossButtonClear_Clicked<span class="token punctuation">;</span>
han<span class="token punctuation">.</span>LossButton load<span class="token punctuation">.</span>Callback <span class="token operator">=</span> @this<span class="token punctuation">.</span>LossButton load_Clicked<span class="token punctuation">;</span>
han<span class="token punctuation">.</span>LossButtonThresholdMinus<span class="token punctuation">.</span>Callback <span class="token operator">=</span> @this<span class="token punctuation">.</span>LossButtonThreshold_Clicked<span class="token punctuation">;</span>
han<span class="token punctuation">.</span>LossButtonThresholdPlus<span class="token punctuation">.</span>Callback <span class="token operator">=</span> @this<span class="token punctuation">.</span>LossButtonThreshold_Clicked<span class="token punctuation">;</span>
han<span class="token punctuation">.</span>LossButtonYearMinus<span class="token punctuation">.</span>Callback <span class="token operator">=</span> @this<span class="token punctuation">.</span>LossButtonYear_Clicked<span class="token punctuation">;</span>
han<span class="token punctuation">.</span>LossButtonYearPlus<span class="token punctuation">.</span>Callback <span class="token operator">=</span> @this<span class="token punctuation">.</span>LossButtonYear_Clicked<span class="token punctuation">;</span>
han<span class="token punctuation">.</span>LossCheckboxTransition<span class="token punctuation">.</span>Callback <span class="token operator">=</span> @this<span class="token punctuation">.</span>LossCheckboxTransition_CheckedChanged<span class="token punctuation">;</span>
han<span class="token punctuation">.</span>CapitalButtonDefault<span class="token punctuation">.</span>Callback <span class="token operator">=</span> @this<span class="token punctuation">.</span>CapitalButtonDefault_Clicked<span class="token punctuation">;</span>
han<span class="token punctuation">.</span>CapitalButtonExport<span class="token punctuation">.</span>Callback <span class="token operator">=</span> @this<span class="token punctuation">.</span>CapitalButtonExport_Clicked<span class="token punctuation">;</span>
han<span class="token punctuation">.</span>CapitalCheckboxCompact<span class="token punctuation">.</span>Callback <span class="token operator">=</span> @this<span class="token punctuation">.</span>CapitalCheckboxCompact_Clicked<span class="token punctuation">;</span>
han<span class="token punctuation">.</span>CapitalGroupApproach<span class="token punctuation">.</span>Selection changeFcn <span class="token operator">=</span> @this<span class="token punctuation">.</span>CapitalGroupApproach_Selection changed<span class="token punctuation">;</span>

han<span class="token punctuation">.</span>TabGroup <span class="token operator">=</span> <span class="token function">uitabgroup</span><span class="token punctuation">(</span><span class="token string">'Parent'</span><span class="token punctuation">,</span>obj<span class="token punctuation">)</span><span class="token punctuation">;</span>
han<span class="token punctuation">.</span>TabGroup<span class="token punctuation">.</span>Units <span class="token operator">=</span> <span class="token string">'pixels'</span><span class="token punctuation">;</span>
han<span class="token punctuation">.</span>TabGroup<span class="token punctuation">.</span>Position <span class="token operator">=</span> <span class="token punctuation">[</span><span class="token number">2</span> <span class="token number">1</span> <span class="token number">1&#48;24</span> <span class="token number">768</span><span class="token punctuation">]</span><span class="token punctuation">;</span>
han<span class="token punctuation">.</span>IntroductionTab <span class="token operator">=</span> <span class="token function">uitab</span><span class="token punctuation">(</span><span class="token string">'Parent'</span><span class="token punctuation">,</span>han<span class="token punctuation">.</span>TabGroup<span class="token punctuation">)</span><span class="token punctuation">;</span>
han<span class="token punctuation">.</span>IntroductionTab<span class="token punctuation">.</span>Tag <span class="token operator">=</span> <span class="token string">'IntroductionTab'</span><span class="token punctuation">;</span>
han<span class="token punctuation">.</span>IntroductionTab<span class="token punctuation">.</span>Title <span class="token operator">=</span> <span class="token string">'Introduction'</span><span class="token punctuation">;</span>
han<span class="token punctuation">.</span>IntroductionPanel<span class="token punctuation">.</span>Parent <span class="token operator">=</span> han<span class="token punctuation">.</span>IntroductionTab<span class="token punctuation">;</span>
han<span class="token punctuation">.</span>BusinessTab <span class="token operator">=</span> <span class="token function">uitab</span><span class="token punctuation">(</span><span class="token string">'Parent'</span><span class="token punctuation">,</span>han<span class="token punctuation">.</span>TabGroup<span class="token punctuation">)</span><span class="token punctuation">;</span>
han<span class="token punctuation">.</span>BusinessTab<span class="token punctuation">.</span>Tag <span class="token operator">=</span> <span class="token string">'BusinessTab'</span><span class="token punctuation">;</span>
han<span class="token punctuation">.</span>BusinessTab<span class="token punctuation">.</span>Title <span class="token operator">=</span> <span class="token string">'Business Indicator Component'</span><span class="token punctuation">;</span>
han<span class="token punctuation">.</span>BusinessPanel<span class="token punctuation">.</span>Parent <span class="token operator">=</span> han<span class="token punctuation">.</span>BusinessTab<span class="token punctuation">;</span>
han<span class="token punctuation">.</span>LossTab <span class="token operator">=</span> <span class="token function">uitab</span><span class="token punctuation">(</span><span class="token string">'Parent'</span><span class="token punctuation">,</span>han<span class="token punctuation">.</span>TabGroup<span class="token punctuation">)</span><span class="token punctuation">;</span>
han<span class="token punctuation">.</span>LossTab<span class="token punctuation">.</span>Tag <span class="token operator">=</span> <span class="token string">'LossTab'</span><span class="token punctuation">;</span>
han<span class="token punctuation">.</span>LossTab<span class="token punctuation">.</span>Title <span class="token operator">=</span> <span class="token string">'Loss Component'</span><span class="token punctuation">;</span>
han<span class="token punctuation">.</span>LossPanel<span class="token punctuation">.</span>Parent <span class="token operator">=</span> han<span class="token punctuation">.</span>LossTab<span class="token punctuation">;</span>
han<span class="token punctuation">.</span>CapitalTab <span class="token operator">=</span> <span class="token function">uitab</span><span class="token punctuation">(</span><span class="token string">'Parent'</span><span class="token punctuation">,</span>han<span class="token punctuation">.</span>TabGroup<span class="token punctuation">)</span><span class="token punctuation">;</span>
han<span class="token punctuation">.</span>CapitalTab<span class="token punctuation">.</span>Tag <span class="token operator">=</span> <span class="token string">'CapitalTab'</span><span class="token punctuation">;</span>
han<span class="token punctuation">.</span>CapitalTab<span class="token punctuation">.</span>Title <span class="token operator">=</span> <span class="token string">'Capital Requirement'</span><span class="token punctuation">;</span>
han<span class="token punctuation">.</span>CapitalPanel<span class="token punctuation">.</span>Parent <span class="token operator">=</span> han<span class="token punctuation">.</span>CapitalTab<span class="token punctuation">;</span>

<span class="token function">guidata</span><span class="token punctuation">(</span>obj<span class="token punctuation">,</span>han<span class="token punctuation">)</span><span class="token punctuation">;</span>
this<span class="token punctuation">.</span>Handles <span class="token operator">=</span> <span class="token function">guidata</span><span class="token punctuation">(</span>obj<span class="token punctuation">)</span><span class="token punctuation">;</span>

<span class="token function">uistack</span><span class="token punctuation">(</span>han<span class="token punctuation">.</span>Blank<span class="token punctuation">,</span><span class="token string">'top'</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

scr <span class="token operator">=</span> groot<span class="token punctuation">;</span>
scr<span class="token punctuation">.</span>Units <span class="token operator">=</span> <span class="token string">'pixels'</span><span class="token punctuation">;</span>
scr_siz <span class="token operator">=</span> scr<span class="token punctuation">.</span>ScreenSize<span class="token punctuation">;</span>
obj<span class="token punctuation">.</span>Position <span class="token operator">=</span> <span class="token punctuation">[</span><span class="token punctuation">(</span><span class="token punctuation">(</span><span class="token function">scr_siz</span><span class="token punctuation">(</span><span class="token number">3</span><span class="token punctuation">)</span> <span class="token operator">-</span> <span class="token number">1&#48;24</span><span class="token punctuation">)</span> <span class="token operator">/</span> <span class="token number">2</span><span class="token punctuation">)</span> <span class="token punctuation">(</span><span class="token punctuation">(</span><span class="token function">scr_siz</span><span class="token punctuation">(</span><span class="token number">4</span><span class="token punctuation">)</span> <span class="token operator">-</span> <span class="token number">768</span><span class="token punctuation">)</span> <span class="token operator">/</span> <span class="token number">2</span><span class="token punctuation">)</span> <span class="token number">1&#48;24</span> <span class="token number">768</span><span class="token punctuation">]</span><span class="token punctuation">;</span>
end

function varargout <span class="token operator">=</span> <span class="token function">Form_Output</span><span class="token punctuation">(</span>this<span class="token punctuation">,</span>obj<span class="token punctuation">,</span>evd<span class="token punctuation">,</span>han<span class="token punctuation">)</span> <span class="token operator">%</span>#ok<span class="token operator">&lt;</span>INUSD<span class="token operator">&gt;</span>
varargout <span class="token operator">=</span> <span class="token punctuation">{</span><span class="token punctuation">}</span><span class="token punctuation">;</span>

<span class="token function">import</span><span class="token punctuation">(</span><span class="token string">'java.awt.*'</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

bar <span class="token operator">=</span> <span class="token function">waitbar</span><span class="token punctuation">(</span><span class="token number">&#48;</span><span class="token punctuation">,</span><span class="token string">'Initializing...'</span><span class="token punctuation">,</span><span class="token string">'CloseRequestFcn'</span><span class="token punctuation">,</span><span class="token string">''</span><span class="token punctuation">,</span><span class="token string">'WindowStyle'</span><span class="token punctuation">,</span><span class="token string">'modal'</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
frm <span class="token operator">=</span> fr ame<span class="token punctuation">.</span><span class="token function">getfr ames</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
<span class="token function">frm</span><span class="token punctuation">(</span>end<span class="token punctuation">)</span><span class="token punctuation">.</span><span class="token function">setAlwaysOnTop</span><span class="token punctuation">(</span>true<span class="token punctuation">)</span><span class="token punctuation">;</span>

yea <span class="token operator">=</span> this<span class="token punctuation">.</span>Year <span class="token operator">-</span> <span class="token number">1&#48;</span><span class="token punctuation">;</span>

tab_bus_data_col <span class="token operator">=</span> this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>BusinessTableData<span class="token punctuation">.</span>ColumnName<span class="token punctuation">;</span>
tab_bus_data_col<span class="token punctuation">{</span><span class="token number">2</span><span class="token punctuation">}</span> <span class="token operator">=</span> <span class="token function">sprintf</span><span class="token punctuation">(</span><span class="token string">'Value %d'</span><span class="token punctuation">,</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Year <span class="token operator">-</span> <span class="token number">3</span><span class="token punctuation">)</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
tab_bus_data_col<span class="token punctuation">{</span><span class="token number">3</span><span class="token punctuation">}</span> <span class="token operator">=</span> <span class="token function">sprintf</span><span class="token punctuation">(</span><span class="token string">'Value %d'</span><span class="token punctuation">,</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Year <span class="token operator">-</span> <span class="token number">2</span><span class="token punctuation">)</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
tab_bus_data_col<span class="token punctuation">{</span><span class="token number">4</span><span class="token punctuation">}</span> <span class="token operator">=</span> <span class="token function">sprintf</span><span class="token punctuation">(</span><span class="token string">'Value %d'</span><span class="token punctuation">,</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Year <span class="token operator">-</span> <span class="token number">1</span><span class="token punctuation">)</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

tab_bus_data <span class="token operator">=</span> <span class="token function">cell</span><span class="token punctuation">(</span><span class="token number">15</span><span class="token punctuation">,</span><span class="token number">5</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
<span class="token function">tab_bus_data</span><span class="token punctuation">(</span><span class="token punctuation">[</span><span class="token number">2</span><span class="token punctuation">:</span><span class="token number">7</span> <span class="token number">9</span><span class="token punctuation">:</span><span class="token number">1&#48;</span> <span class="token number">12</span><span class="token punctuation">:</span><span class="token number">15</span><span class="token punctuation">]</span><span class="token punctuation">,</span><span class="token number">2</span><span class="token punctuation">:</span><span class="token number">5</span><span class="token punctuation">)</span> <span class="token operator">=</span> <span class="token punctuation">{</span><span class="token number">&#48;</span><span class="token punctuation">}</span><span class="token punctuation">;</span>
<span class="token function">tab_bus_data</span><span class="token punctuation">(</span><span class="token number">1</span><span class="token punctuation">:</span><span class="token number">7</span><span class="token punctuation">,</span><span class="token number">1</span><span class="token punctuation">)</span> <span class="token operator">=</span> <span class="token punctuation">{</span><span class="token string">'Interest, Lease &amp; Dividend Component'</span> <span class="token string">'II'</span> <span class="token string">'IE'</span> <span class="token string">'IEA'</span> <span class="token string">'LI'</span> <span class="token string">'LE'</span> <span class="token string">'DI'</span><span class="token punctuation">}</span><span class="token punctuation">;</span>
<span class="token function">tab_bus_data</span><span class="token punctuation">(</span><span class="token number">8</span><span class="token punctuation">:</span><span class="token number">1&#48;</span><span class="token punctuation">,</span><span class="token number">1</span><span class="token punctuation">)</span> <span class="token operator">=</span> <span class="token punctuation">{</span><span class="token string">'Financial Component'</span> <span class="token string">'BB'</span> <span class="token string">'TB'</span><span class="token punctuation">}</span><span class="token punctuation">;</span>
<span class="token function">tab_bus_data</span><span class="token punctuation">(</span><span class="token number">11</span><span class="token punctuation">:</span><span class="token number">15</span><span class="token punctuation">,</span><span class="token number">1</span><span class="token punctuation">)</span> <span class="token operator">=</span> <span class="token punctuation">{</span><span class="token string">'Services Component'</span> <span class="token string">'FI'</span> <span class="token string">'FE'</span> <span class="token string">'OOI'</span> <span class="token string">'OOE'</span><span class="token punctuation">}</span><span class="token punctuation">;</span>

tab_bus_agg <span class="token operator">=</span> <span class="token function">cell</span><span class="token punctuation">(</span><span class="token number">5</span><span class="token punctuation">,</span><span class="token number">2</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
<span class="token function">tab_bus_agg</span><span class="token punctuation">(</span><span class="token punctuation">:</span><span class="token punctuation">,</span><span class="token number">1</span><span class="token punctuation">)</span> <span class="token operator">=</span> <span class="token punctuation">{</span><span class="token string">'ILDC'</span> <span class="token string">'FC'</span> <span class="token string">'SC'</span> <span class="token string">'UBI'</span> <span class="token string">'BI'</span><span class="token punctuation">}</span><span class="token punctuation">;</span>
<span class="token function">tab_bus_agg</span><span class="token punctuation">(</span><span class="token punctuation">:</span><span class="token punctuation">,</span><span class="token number">2</span><span class="token punctuation">)</span> <span class="token operator">=</span> <span class="token punctuation">{</span><span class="token number">&#48;</span><span class="token punctuation">}</span><span class="token punctuation">;</span>

tab_bus_com <span class="token operator">=</span> <span class="token function">cell</span><span class="token punctuation">(</span><span class="token number">5</span><span class="token punctuation">,</span><span class="token number">3</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
<span class="token function">tab_bus_com</span><span class="token punctuation">(</span><span class="token punctuation">:</span><span class="token punctuation">,</span><span class="token number">1</span><span class="token punctuation">)</span> <span class="token operator">=</span> <span class="token punctuation">{</span><span class="token string">'1'</span> <span class="token string">'2'</span> <span class="token string">'3'</span> <span class="token string">'4'</span> <span class="token string">'5'</span><span class="token punctuation">}</span><span class="token punctuation">;</span>
<span class="token function">tab_bus_com</span><span class="token punctuation">(</span><span class="token punctuation">:</span><span class="token punctuation">,</span><span class="token number">2</span><span class="token punctuation">)</span> <span class="token operator">=</span> <span class="token punctuation">{</span><span class="token string">'&#48; - 1bn'</span> <span class="token string">'1bn - 3bn'</span> <span class="token string">'3bn - 1&#48;bn'</span> <span class="token string">'1&#48;bn - 3&#48;bn'</span> <span class="token string">'3&#48;bn - INF'</span><span class="token punctuation">}</span><span class="token punctuation">;</span>
<span class="token function">tab_bus_com</span><span class="token punctuation">(</span><span class="token punctuation">:</span><span class="token punctuation">,</span><span class="token number">3</span><span class="token punctuation">)</span> <span class="token operator">=</span> <span class="token punctuation">{</span><span class="token number">&#48;</span> <span class="token string">'-'</span> <span class="token string">'-'</span> <span class="token string">'-'</span> <span class="token string">'-'</span><span class="token punctuation">}</span><span class="token punctuation">;</span>

tab_capi_data_col <span class="token operator">=</span> this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>CapitalTableComparison<span class="token punctuation">.</span>ColumnName<span class="token punctuation">;</span>
tab_capi_data_col<span class="token punctuation">{</span><span class="token number">2</span><span class="token punctuation">}</span> <span class="token operator">=</span> <span class="token function">sprintf</span><span class="token punctuation">(</span><span class="token string">'Value %d'</span><span class="token punctuation">,</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Year <span class="token operator">-</span> <span class="token number">3</span><span class="token punctuation">)</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
tab_capi_data_col<span class="token punctuation">{</span><span class="token number">3</span><span class="token punctuation">}</span> <span class="token operator">=</span> <span class="token function">sprintf</span><span class="token punctuation">(</span><span class="token string">'Value %d'</span><span class="token punctuation">,</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Year <span class="token operator">-</span> <span class="token number">2</span><span class="token punctuation">)</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
tab_capi_data_col<span class="token punctuation">{</span><span class="token number">4</span><span class="token punctuation">}</span> <span class="token operator">=</span> <span class="token function">sprintf</span><span class="token punctuation">(</span><span class="token string">'Value %d'</span><span class="token punctuation">,</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Year <span class="token operator">-</span> <span class="token number">1</span><span class="token punctuation">)</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

tab_capi_res <span class="token operator">=</span> <span class="token function">cell</span><span class="token punctuation">(</span><span class="token number">7</span><span class="token punctuation">,</span><span class="token number">2</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
<span class="token function">tab_capi_res</span><span class="token punctuation">(</span><span class="token punctuation">:</span><span class="token punctuation">,</span><span class="token number">1</span><span class="token punctuation">)</span> <span class="token operator">=</span> <span class="token punctuation">{</span><span class="token string">'BIC'</span> <span class="token string">'LC'</span> <span class="token string">'ILM'</span> <span class="token string">'K SMA'</span> <span class="token string">'RWA SMA'</span> <span class="token string">'K BII'</span> <span class="token string">'RWA BII'</span><span class="token punctuation">}</span><span class="token punctuation">;</span>
<span class="token function">tab_capi_res</span><span class="token punctuation">(</span><span class="token punctuation">[</span><span class="token number">1</span> <span class="token number">4</span><span class="token punctuation">:</span><span class="token number">7</span><span class="token punctuation">]</span><span class="token punctuation">,</span><span class="token number">2</span><span class="token punctuation">)</span> <span class="token operator">=</span> <span class="token punctuation">{</span><span class="token number">&#48;</span><span class="token punctuation">}</span><span class="token punctuation">;</span>
<span class="token function">tab_capi_res</span><span class="token punctuation">(</span><span class="token punctuation">[</span><span class="token number">2</span> <span class="token number">3</span><span class="token punctuation">]</span><span class="token punctuation">,</span><span class="token number">2</span><span class="token punctuation">)</span> <span class="token operator">=</span> <span class="token punctuation">{</span><span class="token string">'-'</span><span class="token punctuation">}</span><span class="token punctuation">;</span>

tab_capi_com <span class="token operator">=</span> <span class="token function">cell</span><span class="token punctuation">(</span><span class="token number">8</span><span class="token punctuation">,</span><span class="token number">4</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
<span class="token function">tab_capi_com</span><span class="token punctuation">(</span><span class="token punctuation">:</span><span class="token punctuation">,</span><span class="token number">1</span><span class="token punctuation">)</span> <span class="token operator">=</span> <span class="token punctuation">{</span><span class="token string">'AG'</span> <span class="token string">'AM'</span> <span class="token string">'CB'</span> <span class="token string">'CF'</span> <span class="token string">'PS'</span> <span class="token string">'RBA'</span> <span class="token string">'RBR'</span> <span class="token string">'TS'</span><span class="token punctuation">}</span><span class="token punctuation">;</span>
<span class="token function">tab_capi_com</span><span class="token punctuation">(</span><span class="token punctuation">:</span><span class="token punctuation">,</span><span class="token number">2</span><span class="token punctuation">:</span><span class="token number">4</span><span class="token punctuation">)</span> <span class="token operator">=</span> <span class="token punctuation">{</span><span class="token number">&#48;</span><span class="token punctuation">}</span><span class="token punctuation">;</span>

try
<span class="token function">uistack</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>Blank<span class="token punctuation">,</span><span class="token string">'bottom'</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span><span class="token function">SetupBox</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>IntroductionBox<span class="token punctuation">)</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>BusinessTableData<span class="token punctuation">.</span>ColumnName <span class="token operator">=</span> tab_bus_data_col<span class="token punctuation">;</span>
this<span class="token punctuation">.</span><span class="token function">SetupTable</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>BusinessTableData<span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'Data'</span><span class="token punctuation">,</span> tab_bus_data<span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'DataChanged'</span><span class="token punctuation">,</span> @this<span class="token punctuation">.</span>BusinessTableData_DataChanged<span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'Editor'</span><span class="token punctuation">,</span> <span class="token punctuation">{</span><span class="token string">'EditorCurrency'</span> <span class="token number">&#48;</span> <span class="token number">1e12</span> <span class="token number">&#48;</span><span class="token punctuation">}</span><span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'Renderer'</span><span class="token punctuation">,</span> <span class="token punctuation">{</span><span class="token string">'RendererOpBusData'</span><span class="token punctuation">}</span><span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'Table'</span><span class="token punctuation">,</span> <span class="token punctuation">{</span><span class="token string">'TableOpBusData'</span><span class="token punctuation">}</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span><span class="token function">SetupTable</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>BusinessTableResult<span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'Data'</span><span class="token punctuation">,</span> tab_bus_agg<span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'Renderer'</span><span class="token punctuation">,</span> <span class="token punctuation">{</span><span class="token string">'RendererOpBusRslt'</span><span class="token punctuation">}</span><span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'RowsHeight'</span><span class="token punctuation">,</span><span class="token number">6&#48;</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span><span class="token function">SetupTable</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>BusinessTableComponent<span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'Data'</span><span class="token punctuation">,</span> tab_bus_com<span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'Renderer'</span><span class="token punctuation">,</span> <span class="token punctuation">{</span><span class="token string">'RendererOpBusComp'</span><span class="token punctuation">}</span><span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'RowsHeight'</span><span class="token punctuation">,</span><span class="token number">6&#48;</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span><span class="token function">SetupBox</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>BusinessBox<span class="token punctuation">)</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>LossTextboxYear<span class="token punctuation">.</span>String <span class="token operator">=</span> <span class="token function">num2str</span><span class="token punctuation">(</span>yea<span class="token punctuation">)</span><span class="token punctuation">;</span>
this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>LossTextboxYear<span class="token punctuation">.</span>UserData <span class="token operator">=</span> yea<span class="token punctuation">;</span>

this<span class="token punctuation">.</span><span class="token function">SetupTable</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>LossTableDataset<span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'RowHeaderWidth'</span><span class="token punctuation">,</span> <span class="token number">56</span><span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'Sorting'</span><span class="token punctuation">,</span> <span class="token number">2</span><span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'VerticalScrollbar'</span><span class="token punctuation">,</span> true<span class="token punctuation">)</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span><span class="token function">SetupTable</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>LossTableResult<span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'RowsHeight'</span><span class="token punctuation">,</span> <span class="token number">75</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span><span class="token function">SetupBox</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>LossBox<span class="token punctuation">)</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span><span class="token function">SetupTable</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>CapitalTableResult<span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'Data'</span><span class="token punctuation">,</span> tab_capi_res<span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'Renderer'</span><span class="token punctuation">,</span> <span class="token punctuation">{</span><span class="token string">'RendererOpCapRslt'</span><span class="token punctuation">}</span><span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'RowsHeight'</span><span class="token punctuation">,</span><span class="token number">42</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>CapitalTableComparison<span class="token punctuation">.</span>ColumnName <span class="token operator">=</span> tab_capi_data_col<span class="token punctuation">;</span>
this<span class="token punctuation">.</span><span class="token function">SetupTable</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>CapitalTableComparison<span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'Data'</span><span class="token punctuation">,</span> tab_capi_com<span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'DataChanged'</span><span class="token punctuation">,</span> @this<span class="token punctuation">.</span>CapitalTableComparison_DataChanged<span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'Editor'</span><span class="token punctuation">,</span> <span class="token punctuation">{</span><span class="token string">'EditorCurrency'</span> <span class="token operator">-</span><span class="token number">1e12</span> <span class="token number">1e12</span> <span class="token number">&#48;</span><span class="token punctuation">}</span><span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'Renderer'</span><span class="token punctuation">,</span> <span class="token punctuation">{</span><span class="token string">'RendererOpCapCmpr'</span><span class="token punctuation">}</span><span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'RowsHeight'</span><span class="token punctuation">,</span><span class="token number">37</span><span class="token punctuation">,</span> <span class="token punctuation">.</span><span class="token punctuation">.</span><span class="token punctuation">.</span>
<span class="token string">'Table'</span><span class="token punctuation">,</span> <span class="token punctuation">{</span><span class="token string">'TableOpCapCmpr'</span><span class="token punctuation">}</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span><span class="token function">SetupBox</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>CapitalBoxExport<span class="token punctuation">)</span><span class="token punctuation">;</span>
this<span class="token punctuation">.</span><span class="token function">SetupBox</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>CapitalBoxInformation<span class="token punctuation">)</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>CapitalButtonExport<span class="token punctuation">.</span>Enable <span class="token operator">=</span> <span class="token string">'on'</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span>Initialized <span class="token operator">=</span> true<span class="token punctuation">;</span>
catch e
<span class="token function">delete</span><span class="token punctuation">(</span>bar<span class="token punctuation">)</span><span class="token punctuation">;</span>

err <span class="token operator">=</span> this<span class="token punctuation">.</span><span class="token function">FormatException</span><span class="token punctuation">(</span><span class="token string">'The initialization process failed.'</span><span class="token punctuation">,</span>e<span class="token punctuation">)</span><span class="token punctuation">;</span>

dlg <span class="token operator">=</span> <span class="token function">errordlg</span><span class="token punctuation">(</span>err<span class="token punctuation">,</span><span class="token string">'Error'</span><span class="token punctuation">,</span><span class="token string">'modal'</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
<span class="token function">uiwait</span><span class="token punctuation">(</span>dlg<span class="token punctuation">)</span><span class="token punctuation">;</span>

<span class="token function">delete</span><span class="token punctuation">(</span>this<span class="token punctuation">)</span><span class="token punctuation">;</span>

<span class="token keyword">return</span><span class="token punctuation">;</span>
end

<span class="token function">drawnow</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
<span class="token function">pause</span><span class="token punctuation">(</span><span class="token number">&#48;.&#48;5</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

<span class="token function">waitbar</span><span class="token punctuation">(</span><span class="token number">1</span><span class="token punctuation">,</span>bar<span class="token punctuation">)</span><span class="token punctuation">;</span>
<span class="token function">delete</span><span class="token punctuation">(</span>bar<span class="token punctuation">)</span><span class="token punctuation">;</span>
end

function <span class="token function">BusinessTableData_DataChanged</span><span class="token punctuation">(</span>this<span class="token punctuation">,</span>obj<span class="token punctuation">,</span>evd<span class="token punctuation">)</span>
<span class="token keyword">if</span> <span class="token punctuation">(</span><span class="token operator">~</span>this<span class="token punctuation">.</span>Initialized<span class="token punctuation">)</span>
<span class="token keyword">return</span><span class="token punctuation">;</span>
end

col <span class="token operator">=</span> evd<span class="token punctuation">.</span><span class="token function">getColumn</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
row <span class="token operator">=</span> evd<span class="token punctuation">.</span><span class="token function">getFirstRow</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

<span class="token keyword">if</span> <span class="token punctuation">(</span><span class="token punctuation">(</span>col <span class="token operator">&lt;</span> <span class="token number">1</span><span class="token punctuation">)</span> <span class="token operator">||</span> <span class="token punctuation">(</span>col <span class="token operator">&gt;</span> <span class="token number">3</span><span class="token punctuation">)</span> <span class="token operator">||</span> <span class="token punctuation">(</span>row <span class="token operator">==</span> <span class="token number">&#48;</span><span class="token punctuation">)</span> <span class="token operator">||</span> <span class="token punctuation">(</span>row <span class="token operator">==</span> <span class="token number">7</span><span class="token punctuation">)</span> <span class="token operator">||</span> <span class="token punctuation">(</span>row <span class="token operator">==</span> <span class="token number">1&#48;</span><span class="token punctuation">)</span><span class="token punctuation">)</span>
<span class="token keyword">return</span><span class="token punctuation">;</span>
end

val_t2 <span class="token operator">=</span> obj<span class="token punctuation">.</span><span class="token function">getValueAt</span><span class="token punctuation">(</span>row<span class="token punctuation">,</span><span class="token number">1</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
val_t1 <span class="token operator">=</span> obj<span class="token punctuation">.</span><span class="token function">getValueAt</span><span class="token punctuation">(</span>row<span class="token punctuation">,</span><span class="token number">2</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
val_t&#48; <span class="token operator">=</span> obj<span class="token punctuation">.</span><span class="token function">getValueAt</span><span class="token punctuation">(</span>row<span class="token punctuation">,</span><span class="token number">3</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

obj<span class="token punctuation">.</span><span class="token function">setValueAt</span><span class="token punctuation">(</span><span class="token function">mean</span><span class="token punctuation">(</span><span class="token punctuation">[</span>val_t2 val_t1 val_t&#48;<span class="token punctuation">]</span><span class="token punctuation">)</span><span class="token punctuation">,</span>row<span class="token punctuation">,</span><span class="token number">4</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span><span class="token function">UpdateData</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
end

function <span class="token function">CapitalButtonDefault_Clicked</span><span class="token punctuation">(</span>this<span class="token punctuation">,</span>obj<span class="token punctuation">,</span>evd<span class="token punctuation">)</span> <span class="token operator">%</span>#ok<span class="token operator">&lt;</span>INUSD<span class="token operator">&gt;</span>
obj<span class="token punctuation">.</span>Enable <span class="token operator">=</span> <span class="token string">'off'</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>CapitalCheckboxCompact<span class="token punctuation">.</span>Value <span class="token operator">=</span> <span class="token number">&#48;</span><span class="token punctuation">;</span>
this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>CapitalCheckboxStyles<span class="token punctuation">.</span>Value <span class="token operator">=</span> <span class="token number">1</span><span class="token punctuation">;</span>
this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>CapitalCheckboxLoss<span class="token punctuation">.</span>Value <span class="token operator">=</span> <span class="token number">&#48;</span><span class="token punctuation">;</span>
this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>CapitalCheckboxComparison<span class="token punctuation">.</span>Value <span class="token operator">=</span> <span class="token number">&#48;</span><span class="token punctuation">;</span>

obj<span class="token punctuation">.</span>Enable <span class="token operator">=</span> <span class="token string">'on'</span><span class="token punctuation">;</span>
end

function <span class="token function">CapitalButtonExport_Clicked</span><span class="token punctuation">(</span>this<span class="token punctuation">,</span>obj<span class="token punctuation">,</span>evd<span class="token punctuation">)</span> <span class="token operator">%</span>#ok<span class="token operator">&lt;</span>INUSD<span class="token operator">&gt;</span>
obj<span class="token punctuation">.</span>Enable <span class="token operator">=</span> <span class="token string">'off'</span><span class="token punctuation">;</span>

rel_path <span class="token operator">=</span> <span class="token punctuation">[</span><span class="token string">'\Results\ResultOP-'</span> <span class="token function">datestr</span><span class="token punctuation">(</span><span class="token function">now</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">,</span><span class="token string">'ddmmyyyy'</span><span class="token punctuation">)</span> <span class="token string">'.xlsx'</span><span class="token punctuation">]</span><span class="token punctuation">;</span>
file <span class="token operator">=</span> <span class="token function">fullfile</span><span class="token punctuation">(</span><span class="token function">pwd</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">,</span>rel_path<span class="token punctuation">)</span><span class="token punctuation">;</span>

<span class="token keyword">if</span> <span class="token punctuation">(</span><span class="token function">exist</span><span class="token punctuation">(</span>file<span class="token punctuation">,</span><span class="token string">'file'</span><span class="token punctuation">)</span> <span class="token operator">==</span> <span class="token number">2</span><span class="token punctuation">)</span>
res <span class="token operator">=</span> <span class="token function">questdlg</span><span class="token punctuation">(</span><span class="token punctuation">[</span><span class="token string">'The destination file "'</span> file <span class="token string">'" already exist. Do you want to overwrite it?'</span><span class="token punctuation">]</span><span class="token punctuation">,</span><span class="token string">'Alert'</span><span class="token punctuation">,</span><span class="token string">'Yes'</span><span class="token punctuation">,</span><span class="token string">'No'</span><span class="token punctuation">,</span><span class="token string">'No'</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

<span class="token keyword">if</span> <span class="token punctuation">(</span><span class="token function">strcmp</span><span class="token punctuation">(</span>res<span class="token punctuation">,</span><span class="token string">'No'</span><span class="token punctuation">)</span><span class="token punctuation">)</span>
quit <span class="token operator">=</span> false<span class="token punctuation">;</span>

<span class="token keyword">while</span> <span class="token punctuation">(</span>true<span class="token punctuation">)</span>
res <span class="token operator">=</span> <span class="token function">inputdlg</span><span class="token punctuation">(</span><span class="token string">'Please, enter a valid file name or relative path:'</span><span class="token punctuation">,</span><span class="token string">'File'</span><span class="token punctuation">,</span><span class="token number">1</span><span class="token punctuation">,</span><span class="token punctuation">{</span>rel_path<span class="token punctuation">}</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

<span class="token keyword">if</span> <span class="token punctuation">(</span><span class="token function">isempty</span><span class="token punctuation">(</span>res<span class="token punctuation">)</span><span class="token punctuation">)</span>
quit <span class="token operator">=</span> true<span class="token punctuation">;</span>
<span class="token keyword">break</span><span class="token punctuation">;</span>
end

<span class="token keyword">if</span> <span class="token punctuation">(</span><span class="token operator">~</span><span class="token function">endsWith</span><span class="token punctuation">(</span>res<span class="token punctuation">,</span><span class="token string">'.xlsx'</span><span class="token punctuation">)</span><span class="token punctuation">)</span>
<span class="token keyword">continue</span><span class="token punctuation">;</span>
end

mat <span class="token operator">=</span> <span class="token function">regexpi</span><span class="token punctuation">(</span>res<span class="token punctuation">,</span><span class="token string">'^[a-z]:\\'</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

<span class="token keyword">if</span> <span class="token punctuation">(</span><span class="token function">size</span><span class="token punctuation">(</span>mat<span class="token punctuation">{</span><span class="token number">1</span><span class="token punctuation">}</span><span class="token punctuation">,</span><span class="token number">1</span><span class="token punctuation">)</span> <span class="token operator">&gt;</span> <span class="token number">&#48;</span><span class="token punctuation">)</span>
<span class="token keyword">continue</span><span class="token punctuation">;</span>
end

file <span class="token operator">=</span> <span class="token function">fullfile</span><span class="token punctuation">(</span><span class="token function">pwd</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">,</span>res<span class="token punctuation">)</span><span class="token punctuation">;</span>

<span class="token keyword">break</span><span class="token punctuation">;</span>
end

<span class="token keyword">if</span> <span class="token punctuation">(</span>quit<span class="token punctuation">)</span>
obj<span class="token punctuation">.</span>Enable <span class="token operator">=</span> <span class="token string">'on'</span><span class="token punctuation">;</span>
<span class="token keyword">return</span><span class="token punctuation">;</span>
end
end
end

<span class="token function">import</span><span class="token punctuation">(</span><span class="token string">'java.awt.*'</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

bar <span class="token operator">=</span> <span class="token function">waitbar</span><span class="token punctuation">(</span><span class="token number">&#48;</span><span class="token punctuation">,</span><span class="token string">'Expoting Data...'</span><span class="token punctuation">,</span><span class="token string">'CloseRequestFcn'</span><span class="token punctuation">,</span><span class="token string">''</span><span class="token punctuation">,</span><span class="token string">'WindowStyle'</span><span class="token punctuation">,</span><span class="token string">'modal'</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
frm <span class="token operator">=</span> fr ame<span class="token punctuation">.</span><span class="token function">getfr ames</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
<span class="token function">frm</span><span class="token punctuation">(</span>end<span class="token punctuation">)</span><span class="token punctuation">.</span><span class="token function">setAlwaysOnTop</span><span class="token punctuation">(</span>true<span class="token punctuation">)</span><span class="token punctuation">;</span>

err <span class="token operator">=</span> <span class="token string">''</span><span class="token punctuation">;</span>

try
this<span class="token punctuation">.</span><span class="token function">ExportData</span><span class="token punctuation">(</span>file<span class="token punctuation">)</span><span class="token punctuation">;</span>
catch e
err <span class="token operator">=</span> this<span class="token punctuation">.</span><span class="token function">FormatException</span><span class="token punctuation">(</span><span class="token string">'The exportation process failed.'</span><span class="token punctuation">,</span>e<span class="token punctuation">)</span><span class="token punctuation">;</span>
end

<span class="token keyword">if</span> <span class="token punctuation">(</span><span class="token operator">~</span><span class="token function">isempty</span><span class="token punctuation">(</span>err<span class="token punctuation">)</span><span class="token punctuation">)</span>
<span class="token function">delete</span><span class="token punctuation">(</span>bar<span class="token punctuation">)</span><span class="token punctuation">;</span>

dlg <span class="token operator">=</span> <span class="token function">errordlg</span><span class="token punctuation">(</span>err<span class="token punctuation">,</span><span class="token string">'Error'</span><span class="token punctuation">,</span><span class="token string">'modal'</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
<span class="token function">uiwait</span><span class="token punctuation">(</span>dlg<span class="token punctuation">)</span><span class="token punctuation">;</span>

obj<span class="token punctuation">.</span>Enable <span class="token operator">=</span> <span class="token string">'on'</span><span class="token punctuation">;</span>

<span class="token keyword">return</span><span class="token punctuation">;</span>
end

<span class="token function">waitbar</span><span class="token punctuation">(</span><span class="token number">1</span><span class="token punctuation">,</span>bar<span class="token punctuation">)</span><span class="token punctuation">;</span>
<span class="token function">delete</span><span class="token punctuation">(</span>bar<span class="token punctuation">)</span><span class="token punctuation">;</span>

obj<span class="token punctuation">.</span>Enable <span class="token operator">=</span> <span class="token string">'on'</span><span class="token punctuation">;</span>
end

function <span class="token function">CapitalCheckboxCompact_Clicked</span><span class="token punctuation">(</span>this<span class="token punctuation">,</span>obj<span class="token punctuation">,</span>evd<span class="token punctuation">)</span> <span class="token operator">%</span>#ok<span class="token operator">&lt;</span>INUSD<span class="token operator">&gt;</span>
<span class="token keyword">if</span> <span class="token punctuation">(</span>obj<span class="token punctuation">.</span>Value <span class="token operator">==</span> <span class="token number">&#48;</span><span class="token punctuation">)</span>
jpan_cap_rslt <span class="token operator">=</span> <span class="token function">javaob jectEDT</span><span class="token punctuation">(</span><span class="token function">findjobj</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>CapitalTableResult<span class="token punctuation">)</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
jtab_cap_rslt <span class="token operator">=</span> <span class="token function">javaob jectEDT</span><span class="token punctuation">(</span>jpan_cap_rslt<span class="token punctuation">.</span><span class="token function">getViewport</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">.</span><span class="token function">getView</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

<span class="token keyword">if</span> <span class="token punctuation">(</span><span class="token operator">~</span><span class="token function">ischar</span><span class="token punctuation">(</span>jtab_cap_rslt<span class="token punctuation">.</span><span class="token function">getValueAt</span><span class="token punctuation">(</span><span class="token number">1</span><span class="token punctuation">,</span><span class="token number">1</span><span class="token punctuation">)</span><span class="token punctuation">)</span><span class="token punctuation">)</span>
this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>CapitalCheckboxLoss<span class="token punctuation">.</span>Enable <span class="token operator">=</span> <span class="token string">'on'</span><span class="token punctuation">;</span>
end
<span class="token keyword">else</span>
this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>CapitalCheckboxLoss<span class="token punctuation">.</span>Value <span class="token operator">=</span> <span class="token number">&#48;</span><span class="token punctuation">;</span>
this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>CapitalCheckboxLoss<span class="token punctuation">.</span>Enable <span class="token operator">=</span> <span class="token string">'off'</span><span class="token punctuation">;</span>
end
end

function <span class="token function">CapitalGroupApproach_Selection changed</span><span class="token punctuation">(</span>this<span class="token punctuation">,</span>obj<span class="token punctuation">,</span>evd<span class="token punctuation">)</span> <span class="token operator">%</span>#ok<span class="token operator">&lt;</span>INUSL<span class="token operator">&gt;</span>
this<span class="token punctuation">.</span><span class="token function">UpdateComparison</span><span class="token punctuation">(</span>evd<span class="token punctuation">.</span>NewValue<span class="token punctuation">.</span>String<span class="token punctuation">)</span><span class="token punctuation">;</span>
end

function <span class="token function">CapitalTableComparison_DataChanged</span><span class="token punctuation">(</span>this<span class="token punctuation">,</span>obj<span class="token punctuation">,</span>evd<span class="token punctuation">)</span> <span class="token operator">%</span>#ok<span class="token operator">&lt;</span>INUSL<span class="token operator">&gt;</span>
<span class="token keyword">if</span> <span class="token punctuation">(</span><span class="token operator">~</span>this<span class="token punctuation">.</span>Initialized<span class="token punctuation">)</span>
<span class="token keyword">return</span><span class="token punctuation">;</span>
end

col <span class="token operator">=</span> evd<span class="token punctuation">.</span><span class="token function">getColumn</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

<span class="token keyword">if</span> <span class="token punctuation">(</span>col <span class="token operator">&lt;</span> <span class="token number">1</span><span class="token punctuation">)</span>
<span class="token keyword">return</span><span class="token punctuation">;</span>
end

this<span class="token punctuation">.</span><span class="token function">UpdateComparison</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
end

function <span class="token function">LossButtonClear_Clicked</span><span class="token punctuation">(</span>this<span class="token punctuation">,</span>obj<span class="token punctuation">,</span>evd<span class="token punctuation">)</span> <span class="token operator">%</span>#ok<span class="token operator">&lt;</span>INUSD<span class="token operator">&gt;</span>
obj<span class="token punctuation">.</span>Enable <span class="token operator">=</span> <span class="token string">'off'</span><span class="token punctuation">;</span>

jpan_cap_rslt <span class="token operator">=</span> <span class="token function">javaob jectEDT</span><span class="token punctuation">(</span><span class="token function">findjobj</span><span class="token punctuation">(</span>this<span class="token punctuation">.</span>Handles<span class="token punctuation">.</span>CapitalTableResult<span class="token punctuation">)</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
jtab_cap_rslt <span class="token operator">=</span> <span class="token function">javaob jectEDT</span><span class="token punctuation">(</span>jpan_cap_rslt<span class="token punctuation">.</span><span class="token function">getViewport</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">.</span><span class="token function">getView</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">)</span><span class="token punctuation">;</span>
jtab_cap_rslt<span class="token punctuation">.</span><span class="token function">setValueAt</span><span class="token punctuation">(</span><span class="token string">'-'</span><span class="token punctuation">,</span><span class="token number">1</span><span class="token punctuation">,</span><span class="token number">1</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span><span class="token function">UpdateCapital</span><span class="token punctuation">(</span><span class="token punctuation">)</span><span class="token punctuation">;</span>

this<span class="token punctuation">.</span><span class="token function">LossComponentEnable</span><span class="token punctuation">(</span>true<span class="token punctuation">)</span><span class="token punctuation">;</span>
end



</code></pre>
</div>
</div>


    熟悉论坛请点击新手指南
下载说明
1、论坛支持迅雷和网际快车等p2p多线程软件下载,请在上面选择下载通道单击右健下载即可。
2、论坛会定期自动批量更新下载地址,所以请不要浪费时间盗链论坛资源,盗链地址会很快失效。
3、本站为非盈利性质的学术交流网站,鼓励和保护原创作品,拒绝未经版权人许可的上传行为。本站如接到版权人发出的合格侵权通知,将积极的采取必要措施;同时,本站也将在技术手段和能力范围内,履行版权保护的注意义务。
(如有侵权,欢迎举报)
二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

GMT+8, 2026-1-28 23:29