БД: TDG - Флаг отображения кнопки догрузки "false" по умолчанию

This commit is contained in:
Mim 2026-04-08 10:28:05 +03:00
parent 63751700b4
commit 9bdd44f8fc

View File

@ -458,7 +458,7 @@ create or replace package PKG_P8PANELS_VISUAL as
NPAGES_COUNT in number := 0, -- Количество страниц NPAGES_COUNT in number := 0, -- Количество страниц
SPAGES_ALIGN in varchar2 := null, -- Область блока страниц по вертикали (см. константы STABLE_PAGES_ALIGN_*) SPAGES_ALIGN in varchar2 := null, -- Область блока страниц по вертикали (см. константы STABLE_PAGES_ALIGN_*)
SPAGES_POSITION in varchar2 := null, -- Область блока страниц по горизонтали (см. константы STABLE_PAGES_POSITION_*) SPAGES_POSITION in varchar2 := null, -- Область блока страниц по горизонтали (см. константы STABLE_PAGES_POSITION_*)
BMORE_PAGES in boolean := true -- Отображение кнопки догрузки данных (true - отображать, false - не отображать) BMORE_PAGES in boolean := false -- Отображение кнопки догрузки данных (true - отображать, false - не отображать)
) return TDG; -- Результат работы ) return TDG; -- Результат работы
/* Установка количества страниц таблицы данных */ /* Установка количества страниц таблицы данных */
@ -1453,7 +1453,7 @@ create or replace package body PKG_P8PANELS_VISUAL as
NPAGES_COUNT in number := 0, -- Количество страниц NPAGES_COUNT in number := 0, -- Количество страниц
SPAGES_ALIGN in varchar2 := null, -- Область блока страниц по вертикали (см. константы STABLE_PAGES_ALIGN_*) SPAGES_ALIGN in varchar2 := null, -- Область блока страниц по вертикали (см. константы STABLE_PAGES_ALIGN_*)
SPAGES_POSITION in varchar2 := null, -- Область блока страниц по горизонтали (см. константы STABLE_PAGES_POSITION_*) SPAGES_POSITION in varchar2 := null, -- Область блока страниц по горизонтали (см. константы STABLE_PAGES_POSITION_*)
BMORE_PAGES in boolean := true -- Отображение кнопки догрузки данных (true - отображать, false - не отображать) BMORE_PAGES in boolean := false -- Отображение кнопки догрузки данных (true - отображать, false - не отображать)
) return TDG -- Результат работы ) return TDG -- Результат работы
is is
RRES TDG; -- Буфер для результата RRES TDG; -- Буфер для результата
@ -1470,7 +1470,7 @@ create or replace package body PKG_P8PANELS_VISUAL as
RRES.SPAGES_ALIGN := COALESCE(SPAGES_ALIGN, STABLE_PAGES_ALIGN_RIGHT); RRES.SPAGES_ALIGN := COALESCE(SPAGES_ALIGN, STABLE_PAGES_ALIGN_RIGHT);
RRES.SPAGES_POSITION := COALESCE(SPAGES_POSITION, STABLE_PAGES_POSITION_BOTTOM); RRES.SPAGES_POSITION := COALESCE(SPAGES_POSITION, STABLE_PAGES_POSITION_BOTTOM);
else else
RRES.BMORE_PAGES := COALESCE(BMORE_PAGES, true); RRES.BMORE_PAGES := COALESCE(BMORE_PAGES, false);
RRES.SPAGES_ALIGN := SPAGES_ALIGN; RRES.SPAGES_ALIGN := SPAGES_ALIGN;
RRES.SPAGES_POSITION := SPAGES_POSITION; RRES.SPAGES_POSITION := SPAGES_POSITION;
end if; end if;
@ -1491,11 +1491,6 @@ create or replace package body PKG_P8PANELS_VISUAL as
begin begin
/* Обновляем значение количества страниц */ /* Обновляем значение количества страниц */
RDATA_GRID.NPAGES_COUNT := COALESCE(NPAGES_COUNT, 0); RDATA_GRID.NPAGES_COUNT := COALESCE(NPAGES_COUNT, 0);
/* Если количество страниц меньше или равно нулю */
if (RDATA_GRID.NPAGES_COUNT <= 0) then
/* Обновляем доступность загрузку по кнопке */
RDATA_GRID.BMORE_PAGES := true;
end if;
end TDG_PAGES_COUNT_SET; end TDG_PAGES_COUNT_SET;
/* Поиск описания колонки в таблице данных по наименованию */ /* Поиск описания колонки в таблице данных по наименованию */