<!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"/>
<title>C++ API frePPLe: solverload.cpp Source File</title>
<link href="doxygen.css" rel="stylesheet" type="text/css">
<link href="tabs.css" rel="stylesheet" type="text/css">
<link href="../styles.css" rel="stylesheet" type="text/css">
</head>
<body>
<div id="container">
<div id="menubar">
<div id="logo" align="center">
<br/><img src='../frepple.bmp' alt="frepple" /><br/>
<a href='http://www.frepple.com/'>
<strong>a Free<br/>Production Planning<br/>Library</strong>
</a>
</div>
<div id="menu">
<br/>
<h3><a href='../Main/HomePage.html'>Main</a></h3>
<h3><a href='../UI/Main.html'>User Manual</a></h3>
<h3><a href='../Tutorial/Main.html'>Tutorial</a></h3>
<h3><a href='../Frepple/Main.html'>Reference Manual</a></h3>
<h3><a href='../Main/FAQ.html'>FAQ</a></h3>
<h3><a href='index.html'>C++ API</a></h3>
<br/>
</div>
</div>
<div id="content">
<br/>
<!-- Generated by Doxygen 1.6.1 -->
<div class="navigation" id="top">
<div class="tabs">
<ul>
<li><a href="index.html"><span>Main Page</span></a></li>
<li><a href="pages.html"><span>Related Pages</span></a></li>
<li><a href="namespaces.html"><span>Namespaces</span></a></li>
<li><a href="annotated.html"><span>Classes</span></a></li>
<li class="current"><a href="files.html"><span>Files</span></a></li>
<li><a href="dirs.html"><span>Directories</span></a></li>
</ul>
</div>
<div class="tabs">
<ul>
<li><a href="files.html"><span>File List</span></a></li>
<li><a href="globals.html"><span>File Members</span></a></li>
</ul>
</div>
<div class="navpath"><a class="el" href="dir_88117dff2735251a69c8eb9084477714.html">src</a> » <a class="el" href="dir_f53ab566a495928d11ba5681eabceaaf.html">solver</a>
</div>
</div>
<div class="contents">
<h1>solverload.cpp</h1><a href="a00243.html">Go to the documentation of this file.</a><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <span class="comment">/***************************************************************************</span>
<a name="l00002"></a>00002 <span class="comment"> file : $URL: https://frepple.svn.sourceforge.net/svnroot/frepple/trunk/src/solver/solverload.cpp $</span>
<a name="l00003"></a>00003 <span class="comment"> version : $LastChangedRevision: 1315 $ $LastChangedBy: jdetaeye $</span>
<a name="l00004"></a>00004 <span class="comment"> date : $LastChangedDate: 2010-07-17 18:08:53 +0200 (Sat, 17 Jul 2010) $</span>
<a name="l00005"></a>00005 <span class="comment"> ***************************************************************************/</span>
<a name="l00006"></a>00006
<a name="l00007"></a>00007 <span class="comment">/***************************************************************************</span>
<a name="l00008"></a>00008 <span class="comment"> * *</span>
<a name="l00009"></a>00009 <span class="comment"> * Copyright (C) 2007-2010 by Johan De Taeye *</span>
<a name="l00010"></a>00010 <span class="comment"> * *</span>
<a name="l00011"></a>00011 <span class="comment"> * This library is free software; you can redistribute it and/or modify it *</span>
<a name="l00012"></a>00012 <span class="comment"> * under the terms of the GNU Lesser General Public License as published *</span>
<a name="l00013"></a>00013 <span class="comment"> * by the Free Software Foundation; either version 2.1 of the License, or *</span>
<a name="l00014"></a>00014 <span class="comment"> * (at your option) any later version. *</span>
<a name="l00015"></a>00015 <span class="comment"> * *</span>
<a name="l00016"></a>00016 <span class="comment"> * This library is distributed in the hope that it will be useful, *</span>
<a name="l00017"></a>00017 <span class="comment"> * but WITHOUT ANY WARRANTY; without even the implied warranty of *</span>
<a name="l00018"></a>00018 <span class="comment"> * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser *</span>
<a name="l00019"></a>00019 <span class="comment"> * General Public License for more details. *</span>
<a name="l00020"></a>00020 <span class="comment"> * *</span>
<a name="l00021"></a>00021 <span class="comment"> * You should have received a copy of the GNU Lesser General Public *</span>
<a name="l00022"></a>00022 <span class="comment"> * License along with this library; if not, write to the Free Software *</span>
<a name="l00023"></a>00023 <span class="comment"> * Foundation Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 *</span>
<a name="l00024"></a>00024 <span class="comment"> * USA *</span>
<a name="l00025"></a>00025 <span class="comment"> * *</span>
<a name="l00026"></a>00026 <span class="comment"> ***************************************************************************/</span>
<a name="l00027"></a>00027
<a name="l00028"></a><a class="code" href="a00243.html#a342983a479ae7a921be5face83fdb029">00028</a> <span class="preprocessor">#define FREPPLE_CORE</span>
<a name="l00029"></a>00029 <span class="preprocessor"></span><span class="preprocessor">#include "<a class="code" href="a00239.html">frepple/solver.h</a>"</span>
<a name="l00030"></a>00030
<a name="l00031"></a>00031 <span class="keyword">namespace </span>frepple
<a name="l00032"></a>00032 {
<a name="l00033"></a>00033
<a name="l00034"></a>00034
<a name="l00035"></a><a class="code" href="a00256.html#a40eadb2ec140b60d3c4642bbea3c314e">00035</a> <span class="keywordtype">bool</span> <a class="code" href="a00256.html#a40eadb2ec140b60d3c4642bbea3c314e">sortLoad</a>(<span class="keyword">const</span> <a class="code" href="a00103.html" title="This class links a resource to a certain operation.">Load</a>* lhs, <span class="keyword">const</span> <a class="code" href="a00103.html" title="This class links a resource to a certain operation.">Load</a>* rhs)
<a name="l00036"></a>00036 {
<a name="l00037"></a>00037 <span class="keywordflow">return</span> lhs-><a class="code" href="a00103.html#a0d0ec833e41b3595901349ca17f66956">getPriority</a>() < rhs-><a class="code" href="a00103.html#a0d0ec833e41b3595901349ca17f66956">getPriority</a>();
<a name="l00038"></a>00038 }
<a name="l00039"></a>00039
<a name="l00040"></a>00040
<a name="l00041"></a><a class="code" href="a00173.html#a77fb02a5ece53f1af485196a572f473c">00041</a> <span class="keywordtype">void</span> <a class="code" href="a00173.html#aed1d08dd6ece530ed9229d463e31cca3">SolverMRP::solve</a>(<span class="keyword">const</span> <a class="code" href="a00103.html" title="This class links a resource to a certain operation.">Load</a>* l, <span class="keywordtype">void</span>* v)
<a name="l00042"></a>00042 {
<a name="l00043"></a>00043 <span class="comment">// Note: This method is only called for decrease loadplans and for the leading</span>
<a name="l00044"></a>00044 <span class="comment">// load of an alternate group. See SolverMRP::checkOperation</span>
<a name="l00045"></a>00045 <a class="code" href="a00174.html" title="This class is a helper class of the SolverMRP class.">SolverMRPdata</a>* data = <span class="keyword">static_cast<</span><a class="code" href="a00174.html" title="This class is a helper class of the SolverMRP class.">SolverMRPdata</a>*<span class="keyword">></span>(v);
<a name="l00046"></a>00046 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> loglevel = data-><a class="code" href="a00174.html#a1d6f62b1c53725b796ea1c4f8843b85d">getSolver</a>()-><a class="code" href="a00171.html#a7331226cd4ef515184dff2d118c43423">getLogLevel</a>();
<a name="l00047"></a>00047
<a name="l00048"></a>00048 <span class="keywordflow">if</span> (data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#adf7c858a404b725f2f2c67648300f89b">q_qty</a> >= 0.0)
<a name="l00049"></a>00049 {
<a name="l00050"></a>00050 <span class="comment">// The loadplan is an increase in size, and the resource solver only needs</span>
<a name="l00051"></a>00051 <span class="comment">// the decreases.</span>
<a name="l00052"></a>00052 <span class="comment">// Or, it's a zero quantity loadplan. E.g. because it is not effective.</span>
<a name="l00053"></a>00053 data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#af34ccc319ed0bd6bb387353e0968e622">a_qty</a> = data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#adf7c858a404b725f2f2c67648300f89b">q_qty</a>;
<a name="l00054"></a>00054 data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#ab56b3877ddc206e8817f04186c0e47a8">a_date</a> = data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#a658c5379af8ec535090a96dd969f1fc3">q_date</a>;
<a name="l00055"></a>00055 <span class="keywordflow">return</span>;
<a name="l00056"></a>00056 }
<a name="l00057"></a>00057
<a name="l00058"></a>00058 <span class="keywordflow">if</span> (!l-><a class="code" href="a00103.html#ac390d54e89b0a2903c092c5a6ec46571">hasAlternates</a>() && !l-><a class="code" href="a00103.html#aa2c9280733f439ea3766f8b2459f9151">getAlternate</a>())
<a name="l00059"></a>00059 {
<a name="l00060"></a>00060 <span class="comment">// CASE I: It is not an alternate load.</span>
<a name="l00061"></a>00061 <span class="comment">// Delegate the answer to the resource</span>
<a name="l00062"></a>00062 l-><a class="code" href="a00103.html#ab929aafe9c6085a216ad3084ec23c93b">getResource</a>()-><a class="code" href="a00156.html#a011b7e23bf1e0f89219c70738565e52d">solve</a>(*<span class="keyword">this</span>,v);
<a name="l00063"></a>00063 <span class="keywordflow">if</span> (data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#af34ccc319ed0bd6bb387353e0968e622">a_qty</a> == 0.0
<a name="l00064"></a>00064 && data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#add71467b24ef4e36294d582d0f1a08f8">q_operationplan</a>-><a class="code" href="a00125.html#aa32661a65b2309ba7c35576940274687">getQuantity</a>() != 0.0)
<a name="l00065"></a>00065 <span class="comment">// In case of a zero reply, we resize the operationplan to 0 right away.</span>
<a name="l00066"></a>00066 <span class="comment">// This is required to make sure that the buffer inventory profile also</span>
<a name="l00067"></a>00067 <span class="comment">// respects this answer.</span>
<a name="l00068"></a>00068 data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#add71467b24ef4e36294d582d0f1a08f8">q_operationplan</a>-><a class="code" href="a00125.html#aa33a70a23ad111e4b2a35ec96757a1fb">setQuantity</a>(0.0);
<a name="l00069"></a>00069 <span class="keywordflow">return</span>;
<a name="l00070"></a>00070 }
<a name="l00071"></a>00071
<a name="l00072"></a>00072 <span class="comment">// CASE II: It is an alternate load.</span>
<a name="l00073"></a>00073 <span class="comment">// We ask each alternate load in order of priority till we find a flow</span>
<a name="l00074"></a>00074 <span class="comment">// that has a non-zero reply.</span>
<a name="l00075"></a>00075
<a name="l00076"></a>00076 <span class="comment">// 1) collect a list of alternates</span>
<a name="l00077"></a>00077 list<const Load*> thealternates;
<a name="l00078"></a>00078 <span class="keyword">const</span> <a class="code" href="a00103.html" title="This class links a resource to a certain operation.">Load</a> *x = l-><a class="code" href="a00103.html#ac390d54e89b0a2903c092c5a6ec46571">hasAlternates</a>() ? l : l-><a class="code" href="a00103.html#aa2c9280733f439ea3766f8b2459f9151">getAlternate</a>();
<a name="l00079"></a>00079 <a class="code" href="a00256.html#aa439ebf4ddfb4983ac3d44abacb9b749">SearchMode</a> search = l-><a class="code" href="a00103.html#a71f05cf78bb1925c4af3dc8494641a57">getSearch</a>();
<a name="l00080"></a>00080 <span class="keywordflow">for</span> (Operation::loadlist::const_iterator i = l-><a class="code" href="a00103.html#a6cb533b9f893a9af0137bf78b07e3987">getOperation</a>()-><a class="code" href="a00121.html#a7b95131f687f60ec30165e14876dac7c">getLoads</a>().begin();
<a name="l00081"></a>00081 i != l-><a class="code" href="a00103.html#a6cb533b9f893a9af0137bf78b07e3987">getOperation</a>()-><a class="code" href="a00121.html#a7b95131f687f60ec30165e14876dac7c">getLoads</a>().end(); ++i)
<a name="l00082"></a>00082 <span class="keywordflow">if</span> ((i->getAlternate() == x || &*i == x)
<a name="l00083"></a>00083 && i->getEffective().within(data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#a0184b7e1575ac6c79333fcefa2baee5d">q_loadplan</a>-><a class="code" href="a00058.html#a965645e70dd9f99b0bd4f1325fb382aa">getDate</a>()))
<a name="l00084"></a>00084 thealternates.push_back(&*i);
<a name="l00085"></a>00085
<a name="l00086"></a>00086 <span class="comment">// 2) Sort the list</span>
<a name="l00087"></a>00087 thealternates.sort(<a class="code" href="a00256.html#a40eadb2ec140b60d3c4642bbea3c314e">sortLoad</a>); <span class="comment">// @todo cpu-intensive - better is to maintain the list in the correct order</span>
<a name="l00088"></a>00088
<a name="l00089"></a>00089 <span class="comment">// 3) Control the planning mode</span>
<a name="l00090"></a>00090 <span class="keywordtype">bool</span> originalPlanningMode = data->constrainedPlanning;
<a name="l00091"></a>00091 data->constrainedPlanning = <span class="keyword">true</span>;
<a name="l00092"></a>00092
<a name="l00093"></a>00093 <span class="comment">// Don't keep track of the constraints right now</span>
<a name="l00094"></a>00094 <span class="keywordtype">bool</span> originalLogConstraints = data->logConstraints;
<a name="l00095"></a>00095 data->logConstraints = <span class="keyword">false</span>;
<a name="l00096"></a>00096
<a name="l00097"></a>00097 <span class="comment">// 4) Loop through all alternates or till we find a non-zero </span>
<a name="l00098"></a>00098 <span class="comment">// reply (priority search)</span>
<a name="l00099"></a>00099 <a class="code" href="a00049.html" title="This class represents a date and time with an accuracy of one second.">Date</a> min_next_date(Date::infiniteFuture);
<a name="l00100"></a>00100 <a class="code" href="a00105.html" title="This class represents the resource capacity of an operationplan.">LoadPlan</a> *lplan = data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#a0184b7e1575ac6c79333fcefa2baee5d">q_loadplan</a>;
<a name="l00101"></a>00101 <span class="keywordtype">double</span> bestAlternateValue = DBL_MAX;
<a name="l00102"></a>00102 <span class="keywordtype">double</span> bestAlternateQuantity = DBL_MIN;
<a name="l00103"></a>00103 <span class="keyword">const</span> <a class="code" href="a00103.html" title="This class links a resource to a certain operation.">Load</a>* bestAlternateSelection = NULL;
<a name="l00104"></a>00104 <span class="keywordtype">double</span> beforeCost = data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#aa2e444a8091c86f71bbcd6d076c6c574">a_cost</a>;
<a name="l00105"></a>00105 <span class="keywordtype">double</span> beforePenalty = data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#ae007a7c0a1074c1fc1dfe9c5eeedcc0e">a_penalty</a>;
<a name="l00106"></a>00106 <a class="code" href="a00127.html" title="A simple class to easily remember the date and quantity of an operationplan.">OperationPlanState</a> originalOpplan(lplan-><a class="code" href="a00105.html#a0969aca89148ba44b97211d25177cbed">getOperationPlan</a>());
<a name="l00107"></a>00107 <span class="keywordtype">double</span> originalLoadplanQuantity = data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#a0184b7e1575ac6c79333fcefa2baee5d">q_loadplan</a>-><a class="code" href="a00059.html#a665af7bb916d05a8c9a06f1a8170090f">getQuantity</a>();
<a name="l00108"></a>00108 <span class="keywordflow">for</span> (list<const Load*>::const_iterator i = thealternates.begin();
<a name="l00109"></a>00109 i != thealternates.end();)
<a name="l00110"></a>00110 {
<a name="l00111"></a>00111 <span class="keyword">const</span> <a class="code" href="a00103.html" title="This class links a resource to a certain operation.">Load</a> *curload = *i;
<a name="l00112"></a>00112 data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#a0184b7e1575ac6c79333fcefa2baee5d">q_loadplan</a> = lplan; <span class="comment">// because q_loadplan can change!</span>
<a name="l00113"></a>00113
<a name="l00114"></a>00114 <span class="comment">// 4a) Switch to this load</span>
<a name="l00115"></a>00115 <span class="keywordflow">if</span> (lplan-><a class="code" href="a00105.html#aa62c4a262f2146c1f53f032314aebe97">getLoad</a>() != curload) lplan-><a class="code" href="a00105.html#af29285721b0f1da7828967fd751bf252">setLoad</a>(curload);
<a name="l00116"></a>00116 lplan-><a class="code" href="a00105.html#a0969aca89148ba44b97211d25177cbed">getOperationPlan</a>()-><a class="code" href="a00125.html#a74fda632de58936beb2adf31f0731d09">restore</a>(originalOpplan);
<a name="l00117"></a>00117 data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#adf7c858a404b725f2f2c67648300f89b">q_qty</a> = lplan-><a class="code" href="a00059.html#a665af7bb916d05a8c9a06f1a8170090f">getQuantity</a>();
<a name="l00118"></a>00118 data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#a658c5379af8ec535090a96dd969f1fc3">q_date</a> = lplan-><a class="code" href="a00058.html#a965645e70dd9f99b0bd4f1325fb382aa">getDate</a>();
<a name="l00119"></a>00119
<a name="l00120"></a>00120 <span class="comment">// 4b) Ask the resource</span>
<a name="l00121"></a>00121 <a class="code" href="a00025.html" title="Abstract base class for all commands.">Command</a>* topcommand = data-><a class="code" href="a00029.html#a392f247416814b845c086ff1f7196ad9">getLastCommand</a>();
<a name="l00122"></a>00122 <span class="keywordflow">if</span> (search == <a class="code" href="a00256.html#aa439ebf4ddfb4983ac3d44abacb9b749a20f9fef00fcbc3cd9fbd27a8a41c1d83">PRIORITY</a>)
<a name="l00123"></a>00123 curload-><a class="code" href="a00103.html#ab929aafe9c6085a216ad3084ec23c93b">getResource</a>()-><a class="code" href="a00156.html#a011b7e23bf1e0f89219c70738565e52d">solve</a>(*<span class="keyword">this</span>,data);
<a name="l00124"></a>00124 <span class="keywordflow">else</span>
<a name="l00125"></a>00125 {
<a name="l00126"></a>00126 data-><a class="code" href="a00174.html#a1d6f62b1c53725b796ea1c4f8843b85d">getSolver</a>()-><a class="code" href="a00171.html#a373dc4d480568344c336cb193ce3edc2">setLogLevel</a>(0);
<a name="l00127"></a>00127 <span class="keywordflow">try</span> {curload-><a class="code" href="a00103.html#ab929aafe9c6085a216ad3084ec23c93b">getResource</a>()-><a class="code" href="a00156.html#a011b7e23bf1e0f89219c70738565e52d">solve</a>(*<span class="keyword">this</span>,data);}
<a name="l00128"></a>00128 <span class="keywordflow">catch</span> (...)
<a name="l00129"></a>00129 {
<a name="l00130"></a>00130 data-><a class="code" href="a00174.html#a1d6f62b1c53725b796ea1c4f8843b85d">getSolver</a>()-><a class="code" href="a00171.html#a373dc4d480568344c336cb193ce3edc2">setLogLevel</a>(loglevel);
<a name="l00131"></a>00131 <span class="comment">// Restore the planning mode</span>
<a name="l00132"></a>00132 data->constrainedPlanning = originalPlanningMode;
<a name="l00133"></a>00133 data->logConstraints = originalLogConstraints;
<a name="l00134"></a>00134 <span class="keywordflow">throw</span>;
<a name="l00135"></a>00135 }
<a name="l00136"></a>00136 data-><a class="code" href="a00174.html#a1d6f62b1c53725b796ea1c4f8843b85d">getSolver</a>()-><a class="code" href="a00171.html#a373dc4d480568344c336cb193ce3edc2">setLogLevel</a>(loglevel);
<a name="l00137"></a>00137 }
<a name="l00138"></a>00138
<a name="l00139"></a>00139 <span class="comment">// 4c) Evaluate the result</span>
<a name="l00140"></a>00140 <span class="keywordflow">if</span> (data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#af34ccc319ed0bd6bb387353e0968e622">a_qty</a> > <a class="code" href="a00252.html#a42d90a6275119e1b4ce73c50f1867e60">ROUNDING_ERROR</a>
<a name="l00141"></a>00141 && lplan-><a class="code" href="a00105.html#a0969aca89148ba44b97211d25177cbed">getOperationPlan</a>()-><a class="code" href="a00125.html#aa32661a65b2309ba7c35576940274687">getQuantity</a>() > 0)
<a name="l00142"></a>00142 {
<a name="l00143"></a>00143 <span class="keywordflow">if</span> (search == <a class="code" href="a00256.html#aa439ebf4ddfb4983ac3d44abacb9b749a20f9fef00fcbc3cd9fbd27a8a41c1d83">PRIORITY</a>)
<a name="l00144"></a>00144 {
<a name="l00145"></a>00145 <span class="comment">// Priority search: accept any non-zero reply</span>
<a name="l00146"></a>00146 <span class="comment">// Restore the planning mode</span>
<a name="l00147"></a>00147 data->constrainedPlanning = originalPlanningMode;
<a name="l00148"></a>00148 data->logConstraints = originalLogConstraints;
<a name="l00149"></a>00149 <span class="keywordflow">return</span>;
<a name="l00150"></a>00150 }
<a name="l00151"></a>00151 <span class="keywordflow">else</span>
<a name="l00152"></a>00152 {
<a name="l00153"></a>00153 <span class="comment">// Other search modes: evaluate all</span>
<a name="l00154"></a>00154 <span class="keywordtype">double</span> deltaCost = data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#aa2e444a8091c86f71bbcd6d076c6c574">a_cost</a> - beforeCost;
<a name="l00155"></a>00155 <span class="keywordtype">double</span> deltaPenalty = data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#ae007a7c0a1074c1fc1dfe9c5eeedcc0e">a_penalty</a> - beforePenalty;
<a name="l00156"></a>00156 <span class="comment">// Message</span>
<a name="l00157"></a>00157 <span class="keywordflow">if</span> (loglevel>1 && search != <a class="code" href="a00256.html#aa439ebf4ddfb4983ac3d44abacb9b749a20f9fef00fcbc3cd9fbd27a8a41c1d83">PRIORITY</a>)
<a name="l00158"></a>00158 <a class="code" href="a00257.html#a4af9f241e955122820c5e81ceb33edb5">logger</a> << <a class="code" href="a00087.html">indent</a>(l-><a class="code" href="a00103.html#a6cb533b9f893a9af0137bf78b07e3987">getOperation</a>()-><a class="code" href="a00084.html#a44c879fcf3b6ae9193c393630e25fd13">getLevel</a>()) << <span class="stringliteral">" Operation '"</span>
<a name="l00159"></a>00159 << l-><a class="code" href="a00103.html#a6cb533b9f893a9af0137bf78b07e3987">getOperation</a>()-><a class="code" href="a00182.html#a7416ca220c55147bc1276becc5b9de01">getName</a>() << <span class="stringliteral">"' evaluates alternate '"</span>
<a name="l00160"></a>00160 << curload-><a class="code" href="a00103.html#ab929aafe9c6085a216ad3084ec23c93b">getResource</a>() << <span class="stringliteral">"': cost "</span> << deltaCost
<a name="l00161"></a>00161 << <span class="stringliteral">", penalty "</span> << deltaPenalty << endl;
<a name="l00162"></a>00162 <span class="keywordflow">if</span> (deltaCost < <a class="code" href="a00252.html#a42d90a6275119e1b4ce73c50f1867e60">ROUNDING_ERROR</a> && deltaPenalty < <a class="code" href="a00252.html#a42d90a6275119e1b4ce73c50f1867e60">ROUNDING_ERROR</a>)
<a name="l00163"></a>00163 {
<a name="l00164"></a>00164 <span class="comment">// Zero cost and zero penalty on this alternate. It won't get any better</span>
<a name="l00165"></a>00165 <span class="comment">// than this, so we accept this alternate.</span>
<a name="l00166"></a>00166 <span class="keywordflow">if</span> (loglevel)
<a name="l00167"></a>00167 <a class="code" href="a00257.html#a4af9f241e955122820c5e81ceb33edb5">logger</a> << <a class="code" href="a00087.html">indent</a>(l-><a class="code" href="a00103.html#a6cb533b9f893a9af0137bf78b07e3987">getOperation</a>()-><a class="code" href="a00084.html#a44c879fcf3b6ae9193c393630e25fd13">getLevel</a>()) << <span class="stringliteral">" Operation '"</span>
<a name="l00168"></a>00168 << l-><a class="code" href="a00103.html#a6cb533b9f893a9af0137bf78b07e3987">getOperation</a>()-><a class="code" href="a00182.html#a7416ca220c55147bc1276becc5b9de01">getName</a>() << <span class="stringliteral">"' chooses alternate '"</span>
<a name="l00169"></a>00169 << curload-><a class="code" href="a00103.html#ab929aafe9c6085a216ad3084ec23c93b">getResource</a>() << <span class="stringliteral">"' "</span> << search << endl;
<a name="l00170"></a>00170 <span class="comment">// Restore the planning mode</span>
<a name="l00171"></a>00171 data->constrainedPlanning = originalPlanningMode;
<a name="l00172"></a>00172 data->logConstraints = originalLogConstraints;
<a name="l00173"></a>00173 <span class="keywordflow">return</span>;
<a name="l00174"></a>00174 }
<a name="l00175"></a>00175 data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#aa2e444a8091c86f71bbcd6d076c6c574">a_cost</a> = beforeCost;
<a name="l00176"></a>00176 data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#ae007a7c0a1074c1fc1dfe9c5eeedcc0e">a_penalty</a> = beforePenalty;
<a name="l00177"></a>00177 <span class="keywordtype">double</span> val = 0.0;
<a name="l00178"></a>00178 <span class="keywordflow">switch</span> (search)
<a name="l00179"></a>00179 {
<a name="l00180"></a>00180 <span class="keywordflow">case</span> <a class="code" href="a00256.html#aa439ebf4ddfb4983ac3d44abacb9b749ad9914aabe4dd320523d45a0a647dec6e">MINCOST</a>:
<a name="l00181"></a>00181 val = deltaCost / lplan-><a class="code" href="a00105.html#a0969aca89148ba44b97211d25177cbed">getOperationPlan</a>()-><a class="code" href="a00125.html#aa32661a65b2309ba7c35576940274687">getQuantity</a>();
<a name="l00182"></a>00182 <span class="keywordflow">break</span>;
<a name="l00183"></a>00183 <span class="keywordflow">case</span> <a class="code" href="a00256.html#aa439ebf4ddfb4983ac3d44abacb9b749aa0b35fa57d0c5ce3728116ed47f06ca9">MINPENALTY</a>:
<a name="l00184"></a>00184 val = deltaPenalty / lplan-><a class="code" href="a00105.html#a0969aca89148ba44b97211d25177cbed">getOperationPlan</a>()-><a class="code" href="a00125.html#aa32661a65b2309ba7c35576940274687">getQuantity</a>();
<a name="l00185"></a>00185 <span class="keywordflow">break</span>;
<a name="l00186"></a>00186 <span class="keywordflow">case</span> <a class="code" href="a00256.html#aa439ebf4ddfb4983ac3d44abacb9b749acffaea7c05036f503a543806f02f51d1">MINCOSTPENALTY</a>:
<a name="l00187"></a>00187 val = (deltaCost + deltaPenalty) / lplan-><a class="code" href="a00105.html#a0969aca89148ba44b97211d25177cbed">getOperationPlan</a>()-><a class="code" href="a00125.html#aa32661a65b2309ba7c35576940274687">getQuantity</a>();
<a name="l00188"></a>00188 <span class="keywordflow">break</span>;
<a name="l00189"></a>00189 <span class="keywordflow">default</span>:
<a name="l00190"></a>00190 <a class="code" href="a00111.html" title="An exception of this type is thrown when the library gets in an inconsistent state...">LogicException</a>(<span class="stringliteral">"Unsupported search mode for alternate load"</span>);
<a name="l00191"></a>00191 }
<a name="l00192"></a>00192 <span class="keywordflow">if</span> (val + <a class="code" href="a00252.html#a42d90a6275119e1b4ce73c50f1867e60">ROUNDING_ERROR</a> < bestAlternateValue
<a name="l00193"></a>00193 || (fabs(val - bestAlternateValue) < <a class="code" href="a00252.html#a42d90a6275119e1b4ce73c50f1867e60">ROUNDING_ERROR</a>
<a name="l00194"></a>00194 && lplan-><a class="code" href="a00105.html#a0969aca89148ba44b97211d25177cbed">getOperationPlan</a>()-><a class="code" href="a00125.html#aa32661a65b2309ba7c35576940274687">getQuantity</a>() > bestAlternateQuantity))
<a name="l00195"></a>00195 {
<a name="l00196"></a>00196 <span class="comment">// Found a better alternate</span>
<a name="l00197"></a>00197 bestAlternateValue = val;
<a name="l00198"></a>00198 bestAlternateSelection = curload;
<a name="l00199"></a>00199 bestAlternateQuantity = lplan-><a class="code" href="a00105.html#a0969aca89148ba44b97211d25177cbed">getOperationPlan</a>()-><a class="code" href="a00125.html#aa32661a65b2309ba7c35576940274687">getQuantity</a>();
<a name="l00200"></a>00200 }
<a name="l00201"></a>00201 }
<a name="l00202"></a>00202 }
<a name="l00203"></a>00203 <span class="keywordflow">else</span> <span class="keywordflow">if</span> (loglevel>1 && search != <a class="code" href="a00256.html#aa439ebf4ddfb4983ac3d44abacb9b749a20f9fef00fcbc3cd9fbd27a8a41c1d83">PRIORITY</a>)
<a name="l00204"></a>00204 <a class="code" href="a00257.html#a4af9f241e955122820c5e81ceb33edb5">logger</a> << <a class="code" href="a00087.html">indent</a>(l-><a class="code" href="a00103.html#a6cb533b9f893a9af0137bf78b07e3987">getOperation</a>()-><a class="code" href="a00084.html#a44c879fcf3b6ae9193c393630e25fd13">getLevel</a>()) << <span class="stringliteral">" Operation '"</span>
<a name="l00205"></a>00205 << l-><a class="code" href="a00103.html#a6cb533b9f893a9af0137bf78b07e3987">getOperation</a>()-><a class="code" href="a00182.html#a7416ca220c55147bc1276becc5b9de01">getName</a>() << <span class="stringliteral">"' evaluates alternate '"</span>
<a name="l00206"></a>00206 << curload-><a class="code" href="a00103.html#ab929aafe9c6085a216ad3084ec23c93b">getResource</a>() << <span class="stringliteral">"': not available before "</span>
<a name="l00207"></a>00207 << data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#ab56b3877ddc206e8817f04186c0e47a8">a_date</a> << endl;
<a name="l00208"></a>00208
<a name="l00209"></a>00209 <span class="comment">// 4d) Undo the plan on the alternate</span>
<a name="l00210"></a>00210 data-><a class="code" href="a00029.html#a6f38f9a190b88a29f63b58a478cbe982">undo</a>(topcommand);
<a name="l00211"></a>00211
<a name="l00212"></a>00212 <span class="comment">// 4e) Prepare for the next alternate</span>
<a name="l00213"></a>00213 <span class="keywordflow">if</span> (data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#ab56b3877ddc206e8817f04186c0e47a8">a_date</a> < min_next_date)
<a name="l00214"></a>00214 min_next_date = data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#ab56b3877ddc206e8817f04186c0e47a8">a_date</a>;
<a name="l00215"></a>00215 <span class="keywordflow">if</span> (++i != thealternates.end() && loglevel>1 && search == <a class="code" href="a00256.html#aa439ebf4ddfb4983ac3d44abacb9b749a20f9fef00fcbc3cd9fbd27a8a41c1d83">PRIORITY</a>)
<a name="l00216"></a>00216 <a class="code" href="a00257.html#a4af9f241e955122820c5e81ceb33edb5">logger</a> << <a class="code" href="a00087.html">indent</a>(curload-><a class="code" href="a00103.html#a6cb533b9f893a9af0137bf78b07e3987">getOperation</a>()-><a class="code" href="a00084.html#a44c879fcf3b6ae9193c393630e25fd13">getLevel</a>()) << <span class="stringliteral">" Alternate load switches from '"</span>
<a name="l00217"></a>00217 << curload-><a class="code" href="a00103.html#ab929aafe9c6085a216ad3084ec23c93b">getResource</a>()-><a class="code" href="a00182.html#a7416ca220c55147bc1276becc5b9de01">getName</a>() << <span class="stringliteral">"' to '"</span>
<a name="l00218"></a>00218 << (*i)->getResource()->getName() << <span class="stringliteral">"'"</span> << endl;
<a name="l00219"></a>00219 }
<a name="l00220"></a>00220
<a name="l00221"></a>00221 <span class="comment">// 5) Unconstrained plan: plan on the first alternate</span>
<a name="l00222"></a>00222 <span class="keywordflow">if</span> (!originalPlanningMode && !(search != <a class="code" href="a00256.html#aa439ebf4ddfb4983ac3d44abacb9b749a20f9fef00fcbc3cd9fbd27a8a41c1d83">PRIORITY</a> && bestAlternateSelection))
<a name="l00223"></a>00223 {
<a name="l00224"></a>00224 <span class="comment">// Switch to unconstrained planning </span>
<a name="l00225"></a>00225 data->constrainedPlanning = <span class="keyword">false</span>;
<a name="l00226"></a>00226 bestAlternateSelection = *(thealternates.begin());
<a name="l00227"></a>00227 }
<a name="l00228"></a>00228
<a name="l00229"></a>00229 <span class="comment">// 6) Finally replan on the best alternate</span>
<a name="l00230"></a>00230 <span class="keywordflow">if</span> (!originalPlanningMode || (search != <a class="code" href="a00256.html#aa439ebf4ddfb4983ac3d44abacb9b749a20f9fef00fcbc3cd9fbd27a8a41c1d83">PRIORITY</a> && bestAlternateSelection))
<a name="l00231"></a>00231 {
<a name="l00232"></a>00232 <span class="comment">// Message</span>
<a name="l00233"></a>00233 <span class="keywordflow">if</span> (loglevel)
<a name="l00234"></a>00234 <a class="code" href="a00257.html#a4af9f241e955122820c5e81ceb33edb5">logger</a> << <a class="code" href="a00087.html">indent</a>(l-><a class="code" href="a00103.html#a6cb533b9f893a9af0137bf78b07e3987">getOperation</a>()-><a class="code" href="a00084.html#a44c879fcf3b6ae9193c393630e25fd13">getLevel</a>()) << <span class="stringliteral">" Operation '"</span>
<a name="l00235"></a>00235 << l-><a class="code" href="a00103.html#a6cb533b9f893a9af0137bf78b07e3987">getOperation</a>()-><a class="code" href="a00182.html#a7416ca220c55147bc1276becc5b9de01">getName</a>() << <span class="stringliteral">"' chooses alternate '"</span>
<a name="l00236"></a>00236 << bestAlternateSelection-><a class="code" href="a00103.html#ab929aafe9c6085a216ad3084ec23c93b">getResource</a>() << <span class="stringliteral">"' "</span> << search << endl;
<a name="l00237"></a>00237
<a name="l00238"></a>00238 <span class="comment">// Switch back</span>
<a name="l00239"></a>00239 data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#a0184b7e1575ac6c79333fcefa2baee5d">q_loadplan</a> = lplan; <span class="comment">// because q_loadplan can change!</span>
<a name="l00240"></a>00240 data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#aa2e444a8091c86f71bbcd6d076c6c574">a_cost</a> = beforeCost;
<a name="l00241"></a>00241 data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#ae007a7c0a1074c1fc1dfe9c5eeedcc0e">a_penalty</a> = beforePenalty;
<a name="l00242"></a>00242 <span class="keywordflow">if</span> (lplan-><a class="code" href="a00105.html#aa62c4a262f2146c1f53f032314aebe97">getLoad</a>() != bestAlternateSelection)
<a name="l00243"></a>00243 lplan-><a class="code" href="a00105.html#af29285721b0f1da7828967fd751bf252">setLoad</a>(bestAlternateSelection);
<a name="l00244"></a>00244 lplan-><a class="code" href="a00105.html#a0969aca89148ba44b97211d25177cbed">getOperationPlan</a>()-><a class="code" href="a00125.html#a74fda632de58936beb2adf31f0731d09">restore</a>(originalOpplan);
<a name="l00245"></a>00245 data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#adf7c858a404b725f2f2c67648300f89b">q_qty</a> = lplan-><a class="code" href="a00059.html#a665af7bb916d05a8c9a06f1a8170090f">getQuantity</a>();
<a name="l00246"></a>00246 data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#a658c5379af8ec535090a96dd969f1fc3">q_date</a> = lplan-><a class="code" href="a00058.html#a965645e70dd9f99b0bd4f1325fb382aa">getDate</a>();
<a name="l00247"></a>00247 bestAlternateSelection-><a class="code" href="a00103.html#ab929aafe9c6085a216ad3084ec23c93b">getResource</a>()-><a class="code" href="a00156.html#a011b7e23bf1e0f89219c70738565e52d">solve</a>(*<span class="keyword">this</span>,data);
<a name="l00248"></a>00248
<a name="l00249"></a>00249 <span class="comment">// Restore the planning mode</span>
<a name="l00250"></a>00250 data->constrainedPlanning = originalPlanningMode;
<a name="l00251"></a>00251 data->logConstraints = originalLogConstraints;
<a name="l00252"></a>00252 <span class="keywordflow">return</span>;
<a name="l00253"></a>00253 }
<a name="l00254"></a>00254
<a name="l00255"></a>00255 <span class="comment">// 7) No alternate gave a good result</span>
<a name="l00256"></a>00256 data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#ab56b3877ddc206e8817f04186c0e47a8">a_date</a> = min_next_date;
<a name="l00257"></a>00257 data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#af34ccc319ed0bd6bb387353e0968e622">a_qty</a> = 0;
<a name="l00258"></a>00258
<a name="l00259"></a>00259 <span class="comment">// Restore the planning mode</span>
<a name="l00260"></a>00260 data->constrainedPlanning = originalPlanningMode;
<a name="l00261"></a>00261
<a name="l00262"></a>00262 <span class="comment">// Maintain the constraint list</span>
<a name="l00263"></a>00263 <span class="keywordflow">if</span> (originalLogConstraints)
<a name="l00264"></a>00264 {
<a name="l00265"></a>00265 <span class="keyword">const</span> <a class="code" href="a00103.html" title="This class links a resource to a certain operation.">Load</a> *primary = *(thealternates.begin());
<a name="l00266"></a>00266 data->planningDemand-><a class="code" href="a00051.html#acd06be46dd32eb121e408c5b9e035965">getConstraints</a>().<a class="code" href="a00100.html#add9d396135451bf2efef6527cea7839a">push</a>(
<a name="l00267"></a>00267 <a class="code" href="a00137.html#ae943a0ede255ced55bc8ac355c50fff6">ProblemCapacityOverload::metadata</a>,
<a name="l00268"></a>00268 primary-><a class="code" href="a00103.html#ab929aafe9c6085a216ad3084ec23c93b">getResource</a>(), originalOpplan.start, originalOpplan.<a class="code" href="a00085.html#abb9d04973550ac71037718511358f2ff">end</a>,
<a name="l00269"></a>00269 -originalLoadplanQuantity);
<a name="l00270"></a>00270 }
<a name="l00271"></a>00271 data->logConstraints = originalLogConstraints;
<a name="l00272"></a>00272
<a name="l00273"></a>00273 <span class="keywordflow">if</span> (lplan-><a class="code" href="a00105.html#a0969aca89148ba44b97211d25177cbed">getOperationPlan</a>()-><a class="code" href="a00125.html#aa32661a65b2309ba7c35576940274687">getQuantity</a>() != 0.0)
<a name="l00274"></a>00274 <span class="comment">// In case of a zero reply, we resize the operationplan to 0 right away.</span>
<a name="l00275"></a>00275 <span class="comment">// This is required to make sure that the buffer inventory profile also</span>
<a name="l00276"></a>00276 <span class="comment">// respects this answer.</span>
<a name="l00277"></a>00277 lplan-><a class="code" href="a00105.html#a0969aca89148ba44b97211d25177cbed">getOperationPlan</a>()-><a class="code" href="a00125.html#aa33a70a23ad111e4b2a35ec96757a1fb">setQuantity</a>(0.0);
<a name="l00278"></a>00278 <span class="keywordflow">if</span> (loglevel>1)
<a name="l00279"></a>00279 <a class="code" href="a00257.html#a4af9f241e955122820c5e81ceb33edb5">logger</a> << <a class="code" href="a00087.html">indent</a>(lplan-><a class="code" href="a00105.html#a0969aca89148ba44b97211d25177cbed">getOperationPlan</a>()-><a class="code" href="a00125.html#a2f5ae1046cd50f98e59520ed8910c458">getOperation</a>()-><a class="code" href="a00084.html#a44c879fcf3b6ae9193c393630e25fd13">getLevel</a>()) <<
<a name="l00280"></a>00280 <span class="stringliteral">" Alternate load doesn't find supply on any alternate : "</span>
<a name="l00281"></a>00281 << data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#af34ccc319ed0bd6bb387353e0968e622">a_qty</a> << <span class="stringliteral">" "</span> << data-><a class="code" href="a00174.html#a592e60ca8e03a80e5460bfb1bf973b4e">state</a>-><a class="code" href="a00175.html#ab56b3877ddc206e8817f04186c0e47a8">a_date</a> << endl;
<a name="l00282"></a>00282 }
<a name="l00283"></a>00283
<a name="l00284"></a>00284
<a name="l00285"></a>00285 }
</pre></div></div>
<hr size="1"/><address style="align: right;"><small>Documentation generated for frePPLe by
<a href="http://www.doxygen.org/index.html">
<img src="doxygen.png" alt="doxygen" align="middle" border="0"/></a></small></address>
</div>
</div>
</body>
</html>
