http://wiki.standart-n.ru/wiki/index.php?action=history&feed=atom&title=%D0%9E%D0%B3%D1%80%D0%B0%D0%BD%D0%B8%D1%87%D0%B5%D0%BD%D0%B8%D0%B5_%D1%81%D0%BA%D0%B8%D0%B4%D0%BA%D0%B8_%D0%B2_%D0%BA%D0%B0%D1%81%D1%81%D0%B8%D1%80%D0%B5 Ограничение скидки в кассире - История изменений 2026-05-09T03:52:48Z История изменений этой страницы в вики MediaWiki 1.23.3 http://wiki.standart-n.ru/index.php?title=%D0%9E%D0%B3%D1%80%D0%B0%D0%BD%D0%B8%D1%87%D0%B5%D0%BD%D0%B8%D0%B5_%D1%81%D0%BA%D0%B8%D0%B4%D0%BA%D0%B8_%D0%B2_%D0%BA%D0%B0%D1%81%D1%81%D0%B8%D1%80%D0%B5&diff=5274&oldid=prev Olgav в 07:46, 4 января 2017 2017-01-04T07:46:12Z <p></p> <table class='diff diff-contentalign-left'> <col class='diff-marker' /> <col class='diff-content' /> <col class='diff-marker' /> <col class='diff-content' /> <tr style='vertical-align: top;'> <td colspan='2' style="background-color: white; color:black; text-align: center;">← Предыдущая</td> <td colspan='2' style="background-color: white; color:black; text-align: center;">Версия 07:46, 4 января 2017</td> </tr><tr><td colspan="2" class="diff-lineno">Строка 36:</td> <td colspan="2" class="diff-lineno">Строка 36:</td></tr> <tr><td class='diff-marker'>&#160;</td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td><td class='diff-marker'>&#160;</td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td></tr> <tr><td class='diff-marker'>&#160;</td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"><div>&lt;/pre&gt;</div></td><td class='diff-marker'>&#160;</td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"><div>&lt;/pre&gt;</div></td></tr> <tr><td colspan="2">&#160;</td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;"></ins></div></td></tr> <tr><td colspan="2">&#160;</td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">Строки</ins></div></td></tr> <tr><td colspan="2">&#160;</td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">&lt;pre&gt; </ins></div></td></tr> <tr><td colspan="2">&#160;</td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">iq.sql.text := 'select 100*iif(price_o=0,1,(price-price_o)/price_o) as nac from parts where id='+ inttostr(chequelist[i].P_id);</ins></div></td></tr> <tr><td colspan="2">&#160;</td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">&lt;/pre&gt;</ins></div></td></tr> <tr><td colspan="2">&#160;</td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">и</ins></div></td></tr> <tr><td colspan="2">&#160;</td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">&lt;pre&gt;</ins></div></td></tr> <tr><td colspan="2">&#160;</td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">if (chequelist[i].P_DscPrc&lt;-3) and (iq.FieldByName('nac').asFloat&lt;=20) then</ins></div></td></tr> <tr><td colspan="2">&#160;</td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">&#160; chequelist[i].P_SetDiscount(-chequelist[i].P_Price * chequelist[i].P_Quant*0.03);</ins></div></td></tr> <tr><td colspan="2">&#160;</td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">&lt;/pre&gt;</ins></div></td></tr> <tr><td colspan="2">&#160;</td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">меняем в зависимости от пожеланий клиента</ins></div></td></tr> </table> Olgav http://wiki.standart-n.ru/index.php?title=%D0%9E%D0%B3%D1%80%D0%B0%D0%BD%D0%B8%D1%87%D0%B5%D0%BD%D0%B8%D0%B5_%D1%81%D0%BA%D0%B8%D0%B4%D0%BA%D0%B8_%D0%B2_%D0%BA%D0%B0%D1%81%D1%81%D0%B8%D1%80%D0%B5&diff=5273&oldid=prev Olgav: Новая страница: «Вставить текст в тмс кассира "После сканирования ШК": <pre> uses Graphics, Controls, Forms, Dialogs, StdCtrls, ComC…» 2017-01-04T07:44:54Z <p>Новая страница: «Вставить текст в тмс кассира &quot;После сканирования ШК&quot;: &lt;pre&gt; uses Graphics, Controls, Forms, Dialogs, StdCtrls, ComC…»</p> <p><b>Новая страница</b></p><div>Вставить текст в тмс кассира &quot;После сканирования ШК&quot;:<br /> &lt;pre&gt;<br /> uses<br /> Graphics, Controls, Forms, Dialogs, StdCtrls,<br /> ComCtrls, ExtCtrls, ibquery, DB, ChequeList, FR, <br /> ScriptRes, Barcode,ZKassa, StrUtils, Windows, Classes,<br /> StrUtils, System,SysUtils,<br /> IBDataBase, Buttons;<br /> <br /> var iq: tibquery;<br /> i,j: Integer;<br /> <br /> procedure SetDsc;<br /> begin<br /> iq := tibquery.create(nil);<br /> iq.transaction := CreateRT(CurrDB);<br /> iq.transaction.starttransaction;<br /> <br /> for i := 0 to chequelist.count - 1 do<br /> for j := 0 to chequelist[i].count - 1 do<br /> begin<br /> chequelist[i].p_index := j;<br /> iq.active := False;<br /> iq.sql.text := 'select 100*iif(price_o=0,1,(price-price_o)/price_o) as nac from parts where id='+ inttostr(chequelist[i].P_id);<br /> iq.active := True;<br /> <br /> if (chequelist[i].P_DscPrc&lt;-3) and (iq.FieldByName('nac').asFloat&lt;=20) then<br /> chequelist[i].P_SetDiscount(-chequelist[i].P_Price * chequelist[i].P_Quant*0.03);<br /> end;<br /> iq.Free;<br /> end;<br /> <br /> begin<br /> SetDsc<br /> end;<br /> <br /> &lt;/pre&gt;</div> Olgav