davay-popozhe/P8-Panels
1
0
Fork 0
forked from CITKParus/P8-Panels
Code Issues Pull Requests Projects Releases Wiki Activity

ЦИТК-928

Browse Source
This commit is contained in:
Vladislav 2024-11-21 14:52:36 +03:00
parent 9318d77118
commit 1d6007c4b7
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
db/PKG_P8PANELS_MECHREC.pck
View File

@ -2757,6 +2757,11 @@ create or replace package body PKG_P8PANELS_MECHREC as
if (NTASK_CLASS = NCLASS_PART_DEFICIT) then if (NTASK_CLASS = NCLASS_PART_DEFICIT) then
/* Определяем пропорции прогресса */ /* Определяем пропорции прогресса */
NTASK_PROGRESS := ROUND(C.NREL_FACT / C.NMAIN_QUANT * 100); NTASK_PROGRESS := ROUND(C.NREL_FACT / C.NMAIN_QUANT * 100);
/* Если значение прогресса задачи больше 100 */
if (NTASK_PROGRESS > 100) then
/* Устанавливаем максимальное допустимое значение - 100 */
NTASK_PROGRESS := 100;
end if;
else else
/* Не требуется */ /* Не требуется */
NTASK_PROGRESS := null; NTASK_PROGRESS := null;
@ -6190,11 +6195,11 @@ create or replace package body PKG_P8PANELS_MECHREC as
/* Определяем детализацию по прогрессу */ /* Определяем детализацию по прогрессу */
case case
when (NPROGRESS >= 70) then when (NPROGRESS >= 70) then
SRESULT := 'Основная сборка: Стыковка агрегатов выполнена'; SRESULT := 'Основная сборка';
when (NPROGRESS >= 40) then when (NPROGRESS >= 40) then
SRESULT := 'Изготовление агрегатов: Фюзеляж и ОЧК не переданы в цех ОС'; SRESULT := 'Изготовление агрегатов';
when (NPROGRESS >= 10) then when (NPROGRESS >= 10) then
SRESULT := 'Изготовление ДСЕ: Фюзеляж и ОЧК не укомлектованы ДСЕ'; SRESULT := 'Изготовление ДСЕ';
else else
SRESULT := 'Изготовление ДСЕ не начато'; SRESULT := 'Изготовление ДСЕ не начато';
end case; end case;