006 interface improvements

This commit is contained in:
msyu 2025-06-20 18:29:06 +03:00
parent 0b30451d0e
commit def6e53cf2
7 changed files with 99 additions and 34 deletions

View File

@ -69,7 +69,7 @@
<!--- <cfset this.datasources["#this.datasource#"]=getDS("#this.datasource#","datasource_#this.datasource#")/> --->
<cfset request.RECORDS_PER_PAGE=500/>
<cfset request.APP_VERSION="0.00.005"/>
<cfset request.APP_VERSION="0.00.006"/>
<cflock scope="application" type="readonly" timeout=3>
<cfset request.APP_NAME=this.Name/>

View File

@ -69,6 +69,17 @@
where d.contract_id=<cfqueryparam cfsqltype="cf_sql_integer" value="#d.contract_id#"/>
</cfquery>
<cfquery name="qVersion" datasource="#request.DS#">
select
a.agreement
,a.dt_agreement
,a.agreement_version
,a.is_actual
from agreement a
where a.contract_id=<cfqueryparam cfsqltype="cf_sql_integer" value="#d.contract_id#"/>
order by a.agreement_version
</cfquery>
</m:silent><!---
------------------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------------
@ -172,6 +183,20 @@
#dateFormat(d.dt_updated,'DD.MM.YYYY')# #timeFormat(d.dt_updated,'HH:MM')#
#qDecoration.updater# <cfif len(qDecoration.updater_shortname)>(#qDecoration.updater_shortname#)</cfif>
</div>
</div>
<div class="tr">
<div class="th">Версии</div>
<div class="td">
<cfoutput query=#qVersion#>
<cfif qVersion.agreement_version EQ d.agreement_version>
<b>#agreement_version#</b>
<cfelse>
<a href="agreement.cfm?contract_id=#contract_id#&agreement_version=#agreement_version#&track=#tr.self#">#agreement_version#</a>
</cfif>
&nbsp;
</cfoutput>
</div>
</div>
</div>
Соглашение просто объединяет правки строк спецификации в пакет и оформляет их документом (в случае с допником). То есть версии строк существуют не сами по себе, а связаны с конкретным соглашением. Между прочим, это означает, что в рамках одного доп. соглашения мы не можем сделать 2 изменения строки, например 2 разные цены с разных дат - нужно оформлять отдельными допниками.
@ -193,7 +218,7 @@
<!--- для identity проверка существования записи простая, а тут как? В принципе, бин должен экспортировать флаг существования записи --->
<cfif d.agreement_version GE 0>
<cfquery name="qItem" datasource="#request.DS#">
select
select
iv.specification_item_uid
,iv.agreement_version /*лучше читается, когда все одинаково берется из резалтсета*/
,i.svc_id
@ -219,7 +244,11 @@
,ver.quantity as prev_quantity
,ver.dt_from as prev_dt_from
,ver.dt_to as prev_dt_to
,case when ver.agreement_version IS NULL then 'new' else 'change' end as change_type /*удалить услугу нельзя, можно только завершить ее оказание (после этого в более поздних версиях она должна стать незаметной)*/
,case
when ver.agreement_version = iv.agreement_version then ''
when ver.agreement_version IS NULL then 'new'
else 'changed'
end as change_type /*удалить услугу нельзя, можно только завершить ее оказание (после этого в более поздних версиях она должна стать незаметной)*/
,COALESCE(iv.price*iv.quantity,0) - COALESCE(ver.price*ver.quantity,0) as cost_diff
from specification_item_version iv
@ -229,7 +258,7 @@
join contract d on (s.contract_id=d.contract_id)
join contragent k on (d.contragent_id=k.contragent_id)
left outer join svc on (i.svc_id=svc.svc_id)
left outer join (select
left outer join (select /*предыдущая версия*/
siv.agreement_version
,siv.specification_item_uid
,a.agreement
@ -255,9 +284,17 @@
AND ia.is_actual
AND ia.agreement_version < <cfqueryparam cfsqltype="cf_sql_integer" value="#d.agreement_version#"/>
)
) ver on (iv.specification_item_uid=ver.specification_item_uid AND ver.specification_id=s.specification_id)
) ver on (iv.specification_item_uid=ver.specification_item_uid AND ver.specification_id=s.specification_id) /*а тут не будет замножения впр*/
where s.contract_id=<cfqueryparam cfsqltype="cf_sql_integer" value="#d.contract_id#"/>
AND iv.agreement_version=<cfqueryparam cfsqltype="cf_sql_integer" value="#d.agreement_version#"/>
AND iv.agreement_version=(select max(iiv.agreement_version)
from specification_item_version iiv
join specification_item ii on (iiv.specification_item_uid=ii.specification_item_uid)
join specification isp on (ii.specification_id=isp.specification_id)
join agreement ia on (isp.contract_id=ia.contract_id AND iiv.agreement_version=ia.agreement_version)
where iiv.specification_item_uid=i.specification_item_uid
AND ia.is_actual
AND iiv.agreement_version <=<cfqueryparam cfsqltype="cf_sql_integer" value="#d.agreement_version#"/>
)
order by i.specification_id
</cfquery>
@ -267,17 +304,19 @@
</p>
</cfoutput>
<table class="worktable">
<thead>
<cfoutput query="qItem" group="specification_id">
<!--- <thead> --->
<tr>
<th></th>
<th>Специф-я</th>
<th>Договор</th>
<th>Контрагент</th>
<th>Стабильный ключ строки</th>
<th>Услуга</th>
<th>Модель</th>
<th>Код услуги</th>
<th>Услуга</th>
<th>Имя для печати</th>
<th>Модель</th>
<th>Дата с</th>
<th>Дата по</th>
@ -299,8 +338,8 @@
<th></th>
</tr>
</thead>
<cfoutput query="qItem">
<!--- </thead> --->
<cfoutput group="specification_item_uid">
<tr>
<td>
<a href="specification_item_version.cfm?specification_item_uid=#specification_item_uid#&agreement_version=#agreement_version#&#tr.fwx#" class=<cfif pageInfo.writePermitted()>"edit"<cfelse>"view"</cfif>></a>
@ -312,13 +351,14 @@
<td>#contragent#</td>
<td>
<a href="specification_item.cfm?specification_item_uid=#specification_item_uid#&#tr.fwx#">#specification_item_uid#</a>
</td>
</td>
<td>#code#</td>
<td>
<a href="svc.cfm?svc_id=#svc_id#&#tr.fwx#">#svc#</a>
</td>
<td class="c">#pricing_model_short#</td>
<td>#code#</td>
</td>
<td>#specification_item_version#</td>
<td class="c">#pricing_model_short#</td>
<td class="c">#dateFormat(dt_from,'DD.MM.YYYY')#</td>
<td class="c">#dateFormat(dt_to,'DD.MM.YYYY')#</td>
@ -344,8 +384,8 @@
</td>
</tr>
</cfoutput>
</cfoutput>
</table>
Может быть, сюда для ясности добавить не измененые строки спецификаций?
</cfif>

View File

@ -149,9 +149,13 @@
,a.agreement
,a.dt_agreement
,a.is_actual
,(select count(*) from specification_item_version iv
join specification_item i on (iv.specification_item_uid=i.specification_item_uid AND iv.agreement_version=a.agreement_version)
join specification s on (i.specification_id=s.specification_id AND s.contract_id=a.contract_id)
) as items_changed
from agreement a
where a.contract_id=<cfqueryparam cfsqltype="cf_sql_integer" value="#d.contract_id#" null=#!isValid('integer', d.contract_id)#/>
order by 1
order by a.agreement_version
</cfquery>
<cfoutput>
@ -176,6 +180,7 @@
<th>Название</th>
<th>Дата</th>
<th>Действует</th>
<th>Строк изменено</th>
<th></th>
</tr>
</thead>
@ -188,6 +193,7 @@
<td>#agreement#</td>
<td>#dateFormat(dt_agreement,'DD.MM.YYYY')#</td>
<td class="c"><cfif is_actual GT 0><img src="img/ok.png"/></cfif></td>
<td class="c"><cfif items_changed GT 0>#items_changed#</cfif></td>
<td class="c">
<a href="agreement_del.cfm?contract_id=#contract_id#&agreement_version=#agreement_version#&#tr.fwx#"><img src="img/del.gif"/></a>
</td>

View File

@ -96,8 +96,9 @@
<div class="th">Договор</div>
<div class="td">
<cfquery name="qList" datasource="#request.DS#">
select c.contract_id, c.contract, c.dt_contract
from contract c
select d.contract_id, d.contract, d.dt_contract, k.contragent
from contract d
join contragent k on (d.contragent_id=k.contragent_id)
order by 1
</cfquery>
<c:combo
@ -106,7 +107,7 @@
id="contract_id"
key="contract_id"
selected="#d.contract_id#"
displayf="##contract## ##dateFormat(dt_contract,'DD.MM.YYYY')##"
displayf="##contragent## ##contract## ##dateFormat(dt_contract,'DD.MM.YYYY')##"
empty=""
class=""
<!---onchange="submit();"--->
@ -208,7 +209,7 @@
<cfoutput>
<p>
Фактура. Строки спецификации (#qItem.recordCount#)
Фактура - строки спецификации, актуальная версия (#qItem.recordCount#)
<cfif pageInfo.writePermitted()>
<cfoutput>
<cfset addUrl="specification_item.cfm?specification_item_uid=&specification_id=#d.specification_id#&#tr.fwx#"/>
@ -253,7 +254,7 @@
<td>#code#</td>
<td class="c">#item_version_count#</td>
<td class="c"></td>
<td><a href="agreement.cfm?contract_id=#contract_id#&agreement_version=#agreement_version#&#tr.fwx#">#agreement# #dateFormat(dt_agreement,'DD.MM.YYYY')#</td>
<td><a href="agreement.cfm?contract_id=#contract_id#&agreement_version=#agreement_version#&#tr.fwx#">#agreement# /#dateFormat(dt_agreement,'DD.MM.YYYY')#</td>
<td class="c">
<a href="specification_item_version.cfm?specification_item_uid=#specification_item_uid#&agreement_version=#agreement_version#&#tr.fwx#">#agreement_version#</a>
<cfif is_actual GT 0><img src="img/ok.png"/></cfif>
@ -271,15 +272,12 @@
</cfoutput>
</table>
Как сущности версии спецификации нет.
Можно синтезировать версию спецификации на произвольную дату, а можно по версии определенного соглашения (это должно быть возмозно, потому что соглашение меняет каждую строку не более 1 раза
)
Спецификация по версии соглашения не учитывает is_actual этого соглашения, но учитывает предыдущие
Можно собрать версию спецификации на произвольную дату, а можно по версии определенного соглашения (это возможно, потому что соглашение меняет каждую строку не более 1 раза)
Отображаеммая спецификация по версии соглашения не учитывает флаг is_actual этого соглашения, но учитывает флаги is_actual предыдущих
*** Собственно, нам нужно для илюстрации версионности как раз синтезировать спецификацию на дату и спецификацию по версии согдашения
<cfquery name="qVersion" datasource="#request.DS#">
select
@ -305,7 +303,7 @@
<cfoutput>
<p>
Версии (#qVersion.recordCount#)
Версии спецификации (#qVersion.recordCount#)
<!--- <cfif pageInfo.writePermitted()>
<cfoutput>
<cfset addUrl="specification_item.cfm?specification_item_uid=&specification_id=#d.specification_id#&#tr.fwx#"/>
@ -321,8 +319,8 @@
<tr>
<th></th>
<th>Соглашение (имя)</th>
<th>Дата соглашения</th>
<th>Версия номер</th>
<th>Дата согл.</th>
<th>Н-р согл.</th>
<th>Действует</th>
<th>Строк изменено</th>
</tr>

View File

@ -55,6 +55,7 @@
where s.svc_id=<cfqueryparam cfsqltype="cf_sql_integer" value="#d.svc_id#" null=#!isNumeric(d.svc_id)#/>
</cfquery>
<!--- decoration --->
<cfquery name="qDecoration" datasource="#request.DS#">
select
@ -198,7 +199,7 @@
left join contract d on (s.contract_id=d.contract_id)
left join agreement a on (siv.agreement_version=a.agreement_version AND s.contract_id=a.contract_id)
where siv.specification_item_uid=<cfqueryparam cfsqltype="cf_sql_other" value="#d.specification_item_uid#"/>
order by siv.agreement_version desc
order by siv.agreement_version
</cfquery>
<cfoutput>

View File

@ -92,7 +92,7 @@
join agreement ia on (isp.contract_id=ia.contract_id AND iiv.agreement_version=ia.agreement_version)
where iiv.specification_item_uid=si.specification_item_uid
AND ia.is_actual
)
)
<!--- where 1=1 <m:filter_build filter=#pageInfo.settings.filter#/>
order by <m:order_build sortArray=#pageInfo.settings.sort.sortArray# fieldCount=#fieldCount#/> --->
</cfquery>

View File

@ -97,6 +97,14 @@
where i.specification_item_uid=<cfqueryparam cfsqltype="cf_sql_other" value="#d.specification_item_uid#" null=#!IsValid('guid',d.specification_item_uid)#/>
</cfquery>
<cfquery name="qVersion" datasource="#request.DS#">
select
iv.agreement_version
from specification_item_version iv
where iv.specification_item_uid=<cfqueryparam cfsqltype="cf_sql_other" value="#d.specification_item_uid#" null=#!isValid('guid', d.specification_item_uid)#/>
order by 1
</cfquery>
<!--- decoration --->
<cfquery name="qDecoration">
@ -222,6 +230,18 @@
#qDecoration.updater# <cfif len(qDecoration.updater_shortname)>(#qDecoration.updater_shortname#)</cfif>
</layout:detail_line>
<layout:detail_line title="Версии">
<cfoutput query=#qVersion#>
<cfif qVersion.agreement_version EQ d.agreement_version>
<b>#agreement_version#</b>
<cfelse>
<a href="specification_item_version.cfm?specification_item_uid=#d.specification_item_uid#&agreement_version=#agreement_version#&track=#tr.self#">#agreement_version#</a>
</cfif>
&nbsp;
</cfoutput>
<i>номера соглашений, в которых данная строка изменялась</i>
</layout:detail_line>
</div>
</cfoutput>