ЦИТК-928 #25
@ -2757,6 +2757,11 @@ create or replace package body PKG_P8PANELS_MECHREC as
|
||||
if (NTASK_CLASS = NCLASS_PART_DEFICIT) then
|
||||
/* Определяем пропорции прогресса */
|
||||
NTASK_PROGRESS := ROUND(C.NREL_FACT / C.NMAIN_QUANT * 100);
|
||||
/* Если значение прогресса задачи больше 100 */
|
||||
if (NTASK_PROGRESS > 100) then
|
||||
/* Устанавливаем максимальное допустимое значение - 100 */
|
||||
NTASK_PROGRESS := 100;
|
||||
end if;
|
||||
else
|
||||
/* Не требуется */
|
||||
NTASK_PROGRESS := null;
|
||||
|
Loading…
x
Reference in New Issue
Block a user