Informacja dla użytkowników systemu EWOPIS
w związku z pismem GGK – KN-EGIB.400.2.2024
Aktualizacja: 2024-02-27
W celu skompletowania odpowiedzi na pismo Głównego Geodety Kraju o sygnaturze KN-EGIB.400.2.2024 z dnia 20 lutego 2024 r., należy w monitorze zapytań wykonać poniższe zapytanie.
Ad 1. Informacja o liczbie jednostek rejestrowych, które nie zostały dostosowane jeszcze do obowiązujących przepisów w zakresie dostosowania sposobu tworzenia jednostek rejestrowych do wytycznych określonych w § 13 rozporządzenia Ministra Rozwoju, Pracy i Technologii z dnia 27 lipca 2021 r. w sprawie ewidencji gruntów i budynków (Dz.U. 2024 poz. 219) oraz o liczbie jednostek, które już posiadają dostosowaną ewidencję w tym zakresie:
execute block returns(teryt dmn_teryt,idobr smallint,Liczba_jednostek int)
as
declare t dmn_teryt;
declare o smallint;
declare i smallint;
declare iJR smallint=1;
declare iOB smallint=0;
declare iPW smallint=0;
declare wl blob;
declare w blob;
declare id int;
declare n smallint;
declare P smallint;
begin
teryt='000000_0';
for select teryt,id_obr,ijr, LIST(WL) as LST
from (select ijr, teryt,id_obr,coalesce(id_podm||'*'||rwd2||'*'||coalesce(u.ud,''),'') as wl
from jedn_rej j
join udzialy u on u.id_jedn=j.id and u.sti = 0
where j.tjr=1 and j.sti=0
order by id,id_podm,rwd2,ud
)
group by 1,2,3
order by 1,2,4
into t, o,id, wl do begin
if ((t<>teryt) or (o<>idobr)) then begin
n=1;
if (teryt<>'000000_0') then begin
IF (P=0) then iOB=iOB+iJR-1;
if (iOB>0) then begin Liczba_jednostek=iOB; SUSPEND; end
iPW=iPW+iOB;
iOB=0;
p=1;
end
end else if (coalesce(w,'')<>coalesce(wl,'')) then BEGIN n=1; P=0; END
else n=0;
if (n=1) then begin
teryt=t;
idobr=o;
w=wl;
IF (P=0) then iOB=iOB+iJR-1;
iJR=1;
end else iJR=iJR+1;
end
IF (P=0) then iOB=iOB+iJR-1;
if (iOB>0) then begin Liczba_jednostek=iOB; SUSPEND; end
iPW=iPW+iOB;
teryt=null;
idobr=null;
Liczba_jednostek =iPW; suspend;
end
Uwaga – z naszej wiedzy wynika, że GUGiK zbiera ww. informacje z uwagi na planowane prace legislacyjne dotyczące tej kwestii.