administrator/medicus
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
master
medicus/MedicusWithClaudeSelects/precti_log.txt
Vladimir Buzalka 1d9c6cca48 notebook vb
2026-03-20 18:03:44 +01:00

2669 lines
267 KiB
Plaintext
Raw Permalink Blame History

5 0 insert into stav (id, iduzi, idprac, mods, time_stamp, compname, cversion) values (7846, 6, 2, '//////////////////8=', '20.03.2026 07:01:45.915'/* time_stamp */, 'NTBVBHP470G10', '3.61.0.371')
17 0 execute procedure SET_USECASHDESKBYCCARDPAYMENT('F'/* USECASHDESKBYCCARDPAYMENT */)
67 0 update tellinky set idpracuziv = NULL where idpracuziv = (select id from pracuziv where idprac = 2 and iduziv = 6)
120 0 insert into statistika (datum, iduzi, idprac, textid, params, typ)
values ('20.03.2026'/* datum */, 6/* iduzi */, 2/* idprac */, 0/* textid */, 'acVybPacOrd'/* params */, '1'/* typ */)
123 0 update options set Obsah=31/* Obsah */ where ID=223/* ID */
143 0 select KAR.DATNAR,(select first 1 STAV from ES_PACIDENT join ES_PAC on (ES_PAC.ID=ES_PACIDENT.PAC_ID) left join ES_BROKER on (ES_BROKER.id_es_pac = ES_PAC.ID) where ((ES_PAC.idpac = kar.idpac) or (ES_BROKER.idpac = kar.idpac)) and ES_PACIDENT.INST_ID = 0) as ES_STAV,KAR.IDPAC,KAR.INFORMACE,KAR.INFORMACE_COL,KAR.JMENO,(select first 1 KZ.IDZAR from KARZARAZENI KZ where (KZ.IDPAC=KAR.IDPAC) and (KZ.DATUM is null or (KZ.DATUM<=CURRENT_DATE)) and (KZ.DATUMDO is null or (KZ.DATUMDO>=CURRENT_DATE)) order by KZ.ID) as K_ZARZAR,KAR.POHLAVI,GPP.POJ,KAR.POZNAMKA,KAR.PRIJMENI,KAR.PRIJMENI_UP,(select DATUM_REGISTRACE from SP_GETREGDAT(kar.IDPAC)) as REGDATUM,KAR.REGISTROVAL,(select PRIZNAK from SP_GETREGDAT(kar.IDPAC)) as REGPRIZNAK,KAR.RODCIS,KAR.ROZENA,(select first 1 OUTCOLS from GETKARZARAZENICOLORS(kar.idpac, '2026-03-20')) as SKUPINY,KAR.TITUL,KAR.TITULZA,KAR.TRVOBEC,KAR.TRVPSC,KAR.TRVULICE,KAR.VYRAZEN
from KAR
left join GETPACPOJ(KAR.IDPAC, '2026-03-20') GPP on GPP.IDPAC = KAR.IDPAC
where (vyrazen = 'N') and exists (select id from registr r join icp i on r.idicp = i.idicp where r.idpac = kar.idpac and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20') and (r.priznak in ('V','D','A')) and (i.icp = '09305001') and (i.odb = '001'))
ORDER BY KAR.PRIJMENI_UP ASC
, KAR.RODCIS ASC
299 0 select POHLAVI,PRIJMENI,JMENO,TITUL,(select first 1 POJ from GETPACPOJ(IDPAC, '20.03.2026 00:00:00.000'/* ODE_DNE */)) as POJ,DATNAR,RODCIS,IDSTAV,DRUHPOJ,TRVOBEC,TRVULICE,TRVPSC,PREOBEC,PREULICE,PREPSC,AKTIVBYDL,ZAMEST,ZAMADRESA,IDZAMEST,PROFES,OSCISLO,GEONOMU,(select KOD from GETPACCENPAS(IDPAC, '20.03.2026 00:00:00.000'/* ODE_DNE */)) as CENPAS,ROZENA,IZIPOD,STPRIS,ZUJEDN,PRUKAZ,TYPPECE,CIZINEC,TITULZA,DATREG,ZASTUPOVANY_ICP,IDISIN,UPRCHLIK from KAR where IDPAC = 3234/* ID */
319 0 select AC.NAZEV,
AV.SVALUE,
AV.BDATA,
AV.NVALUE,
AV.DVALUE,
AF.USERMASK,
AV.TYP
from ANAMVALUES AV
left join ANAMVCFG AC on AC.IDTYPHODN = AV.IDTYPHODN
left join ANAMVFMT AF on AF.IDTYPHODN = AV.IDTYPHODN
where AV.IDPAC=3234/* IDPAC */ and AV.PLATIOD <= '01.11.2022'/* DATUM */ and AKTUAL = 'T'
ORDER BY AF.PORADI ASC
, AV.DATZAPIS DESC
, AV.PLATIOD DESC
320 0 select heslotelkom from KAR where idpac = 3234
321 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
322 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'PSA'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
323 0 select K.POHLAVI as POHLAVI, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 KOD from STALDGN where IDPAC = K.IDPAC and IDANAM = (select first 1 ID from ANAMNEZA where IDPAC = K.IDPAC order by DATUM desc, ID desc) and KOD like 'C61%') as DGN, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('01131', '01132', '01133', '01134') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('01131', '01132', '01133', '01134') order by DATOSE desc, ID desc) as VYKON from KAR K where K.IDPAC = 3234/* IDPAC */
324 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
325 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'TOKS'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
326 0 select K.DATNAR as DATNAR, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('15120', '15121') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('15120', '15121') order by DATOSE desc, ID desc) as VYKON from KAR K where K.IDPAC = 3234/* IDPAC */
327 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
328 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'FRAX'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
329 0 select K.DATNAR, K.POHLAVI, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('11320', '11321', '11327') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('11320', '11321', '11327') order by DATOSE desc, ID desc) as VYKON, (select first 1 "DATA" from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 112/* TYP */ order by DATUM desc, IDPRE desc) as DXADATA, (select first 1 DATUM from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 112/* TYP */ order by DATUM desc, IDPRE desc) as DXADATUM from KAR K where K.IDPAC = 3234/* IDPAC */
330 0 select GV.DATUM from GENVYS GV where GV.IDPRE = (select first 1 IDPRE from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 0/* TYP */ order by DATUM desc)
331 0 select first 1 RPRUKAZ from KAR where IDPAC = 3234
332 0 select first 1 ZPRUKAZ from KAR where IDPAC = 3234
333 0 execute procedure sp_log(3234/* idpac */, 10000/* tblid */, 3234/* recid */, 'V', NULL/* rodcis */, NULL/* id1 */, NULL/* detail */)
334 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
335 0 select first 1 * from KAR
336 0 select ID_ESINSTITUCE from ( select coalesce(PU.ID_ESINSTITUCE, P.ID_ESINSTITUCE, O.ID_ESINSTITUCE, Z.ID_ESINSTITUCE) ID_ESINSTITUCE from PRACUZIV PU left join PRACOVISTE P on (P.ID=PU.IDPRAC) left join ODDEL O on (P.IDODDEL=O.ID) left join ZARIZENI Z on (O.IDZAR=Z.ID) where PU.IDPRAC = 2 and PU.IDUZIV = 6 ) ORGS where exists (select ID from ES_INSTITUCE where ID = ORGS.ID_ESINSTITUCE and ESERVICES = 'T')
337 0 select KAR.DATNAR,(select first 1 STAV from ES_PACIDENT join ES_PAC on (ES_PAC.ID=ES_PACIDENT.PAC_ID) left join ES_BROKER on (ES_BROKER.id_es_pac = ES_PAC.ID) where ((ES_PAC.idpac = kar.idpac) or (ES_BROKER.idpac = kar.idpac)) and ES_PACIDENT.INST_ID = 0) as ES_STAV,KAR.IDPAC,KAR.INFORMACE,KAR.INFORMACE_COL,KAR.JMENO,(select first 1 KZ.IDZAR from KARZARAZENI KZ where (KZ.IDPAC=KAR.IDPAC) and (KZ.DATUM is null or (KZ.DATUM<=CURRENT_DATE)) and (KZ.DATUMDO is null or (KZ.DATUMDO>=CURRENT_DATE)) order by KZ.ID) as K_ZARZAR,KAR.POHLAVI,GPP.POJ,KAR.POZNAMKA,KAR.PRIJMENI,KAR.PRIJMENI_UP,(select DATUM_REGISTRACE from SP_GETREGDAT(kar.IDPAC)) as REGDATUM,KAR.REGISTROVAL,(select PRIZNAK from SP_GETREGDAT(kar.IDPAC)) as REGPRIZNAK,KAR.RODCIS,KAR.ROZENA,(select first 1 OUTCOLS from GETKARZARAZENICOLORS(kar.idpac, '2026-03-20')) as SKUPINY,KAR.TITUL,KAR.TITULZA,KAR.TRVOBEC,KAR.TRVPSC,KAR.TRVULICE,KAR.VYRAZEN
from KAR
left join GETPACPOJ(KAR.IDPAC, '2026-03-20') GPP on GPP.IDPAC = KAR.IDPAC
where (VYRAZEN = 'N')
ORDER BY KAR.PRIJMENI_UP ASC
, KAR.RODCIS ASC
338 0 select first 1 ALERGIE from ANAMNEZA where IDPAC = 3234/* IDPAC */ and DATUM <= '20.03.2026'/* DATUM */
ORDER BY DATUM DESC
, ID DESC
339 0 select first 1 KAP_CHECK, KAP_STAV from KARB2B where IDPAC = 3234 and ICP='09305001'
340 0 select first 1 VAKCINACE_CHECK, VAKCINACE_STAV, VAKCINACE_DATUM from KARISIN where IDPAC = 3234
341 0 select distinct H.TYP from DOKLADH H join DOKLADD D on H.IDHLAV = D.IDHLAV where ((H.RODCIS = '486122443'/* RODCIS */) or (H.RODCIS is null)) and (D.RODCIS = '486122443'/* RODCIS */) and (H.IDA is NULL) and (H.POJ = '111'/* POJ */ ) and (H.ICZ = '09305001'/* ICZ */) and (H.HODB = '001'/* ODB */)
342 0 select 'acDokladHCes', 'DOC%C' || case count(*) when 0 then '' else 'X' end from CESH join CESD on CESD.IDHLAV = CESH.IDHLAV
where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHLaz', 'DOC%L' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='L') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHOzdrav', 'DOC%V' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='O') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHDrg', 'DOC%D' || case count(*) when 0 then '' else 'X' end from DRG where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHOrtop', 'DOC%O' || case count(*) when 0 then '' else 'X' end from POU where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHFoni', 'DOC%F' || case count(*) when 0 then '' else 'X' end from POUFONIH where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from POUFONID where IDHLAV = POUFONIH.IDHLAV)
343 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
344 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
345 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
346 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
347 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
348 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
349 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
350 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
351 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
352 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
353 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
354 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
355 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
356 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
357 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
358 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
359 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
360 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
361 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
362 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
363 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
364 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
365 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
366 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
367 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
368 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
369 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
370 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
371 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
372 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
373 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
374 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
375 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
376 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
377 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
378 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
379 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
380 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
381 0 select first 1 ALERGIE from ANAMNEZA where IDPAC = 3234/* IDPAC */ and DATUM <= '20.03.2026'/* DATUM */
ORDER BY DATUM DESC
, ID DESC
382 0 select first 1 KAP_CHECK, KAP_STAV from KARB2B where IDPAC = 3234 and ICP='09305001'
383 0 select first 1 VAKCINACE_CHECK, VAKCINACE_STAV, VAKCINACE_DATUM from KARISIN where IDPAC = 3234
384 0 select distinct H.TYP from DOKLADH H join DOKLADD D on H.IDHLAV = D.IDHLAV where ((H.RODCIS = '486122443'/* RODCIS */) or (H.RODCIS is null)) and (D.RODCIS = '486122443'/* RODCIS */) and (H.IDA is NULL) and (H.POJ = '111'/* POJ */ ) and (H.ICZ = '09305001'/* ICZ */) and (H.HODB = '001'/* ODB */)
385 0 select 'acDokladHCes', 'DOC%C' || case count(*) when 0 then '' else 'X' end from CESH join CESD on CESD.IDHLAV = CESH.IDHLAV
where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHLaz', 'DOC%L' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='L') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHOzdrav', 'DOC%V' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='O') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHDrg', 'DOC%D' || case count(*) when 0 then '' else 'X' end from DRG where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHOrtop', 'DOC%O' || case count(*) when 0 then '' else 'X' end from POU where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHFoni', 'DOC%F' || case count(*) when 0 then '' else 'X' end from POUFONIH where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from POUFONID where IDHLAV = POUFONIH.IDHLAV)
386 0 select idicz from ICZ where poj = '111' and icz = '09305000'
387 0 select icp from ICP where idicz = '12' and odb = '001'
388 0 select idicz from ICZ where poj = '111' and icz = '09305000'
389 0 select icp from ICP where idicz = '12' and odb = '001'
390 0 select cast('BalickyPac' as varchar(11)) as ID, substring(cast(BPAC.KOD as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(BPAC.CENPASMO as VARCHAR(70)) from 1 for 30) as VAR2, cast(BPAC.DATUMOD as DATE) as DATE1, cast(BPAC.DATUMDO as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from BALICKYPAC BPAC left join SP_BALICKYPAC_PRIZNAK(BPAC.ID, '20.03.2026') PRI on 1 = 1 where BPAC.IDPAC = 3234 and PRI.PRIZNAK in ('A', 'B') union select cast('Dluh' as varchar(11)) as ID, substring(cast(P.MENA as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast((SUM(P.CENA - P.SLEVAC) - (SUM(P.PLATBA) + SUM((COALESCE((select SUM(case ZD.TYP when 'R' then ZD.CELKEM else -ZD.CELKEM end) from PLADET ZD where ZD.IDPLA = P.IDPLA and (ZD.TYP <> P.DOKLADTYP) and (ZD.TYP <> '|') and ((ZD.CENA < 0) or (ZD.TYP = 'R'))), 0))))) as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM PLA P WHERE (P.IDPAC = 3234) AND (P.DOKLADTYP = 'F') AND (P.STORNO IS NULL) AND (P.NENISALDO = 'F') AND ((P.SPLATNOST IS NULL) OR (P.SPLATNOST < '2026-03-20')) AND (P.VALID = 'F') GROUP BY P.MENA union select cast('SouhlasPac' as varchar(11)) as ID, substring(cast(case when S.NAZEV is null then case when H.TYP = 'ZSOUPOS' then 'Souhlas/Nesouhlas s poskytnutím zdravotních služeb nezletilému' when H.TYP = 'ZSOUPOZ' then 'Souhlas zákonného zástupce nezletilého pacienta staršího 15ti let' when H.TYP = 'ZSOUPO2' then 'Nesouhlas s poskytnutím zdravotních služeb - povinné oèkování' when H.TYP = 'ZPOSIN2' then 'Urèení osoby oprávnìné dle zákona o zdravotních službách' when H.TYP = 'OdmPece' then 'Prohlášení o odmítnutí zdravotní péèe pacientem - Negativní revers' end else S.NAZEV end as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(H.DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from HISTDOC H left join SOUHLASPACSABL S on H.IDSOUHLASPACSABL = S.ID where H.TYP in ('IndSou', 'ZSOUPOS', 'ZSOUPOZ', 'ZSOUPO2', 'ZPOSIN2', 'OdmPece') and H.IDPACI = 3234 union select cast('sCenaVykZUM' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(coalesce(sum(cenabod),0) + coalesce(sum(cenamat),0) as NUMERIC(15,2)) as NUM1, cast((select coalesce(sum(cena),0) from LECD d where d.RODCIS = '486122443' and extract(year from d.DATOSE) = '2026' and ((d.KAT is null) or (d.KAT <> 'N')) and exists (select h.IDLEC from LECH h where h.IDLEC = d.IDLEC and h.POJ = '111' and h.ICZ in ('09305001'))) as NUMERIC(15,2)) as NUM2 from DOKLADD d where d.RODCIS = '486122443' and extract(year from d.DATOSE) = '2026' and ((d.KAT is null) or (d.KAT <> 'N' and d.KAT <> 'K' and d.KAT <> 'A')) and exists (select h.IDHLAV from DOKLADH h where h.IDHLAV = d.IDHLAV and h.POJ = '111' and h.ICZ in ('09305001')) union select cast('Registrl' as varchar(11)) as ID, substring(cast(REGISTROVAL as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from KAR where IDPAC = 3234 union select cast('OseLekPrak' as varchar(11)) as ID, substring(cast(F_CONCAT(PRIJMENI, F_CONCAT(JMENO, TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(TITUL2 as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(CAST(ODBORN as INTEGER) as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM KARUZIV_SEL(3234, 'T') WHERE ODBORN in ('001', '002') union select cast('SledLek' as varchar(11)) as ID, substring(cast(KOD as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(LEK as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from SLEDLEK where IDPAC = 3234 and DATUM <= '2026-03-20' union select first 10 cast('HistDoc' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from HISTDOC where IDPACI = 3234 and STAV is NULL and IDZARPR = 2 and IDODDPR = 2 and IDPRACPR = 2 union select first 1 cast('LastSms' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(SENDTIME) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from SMS where PACID = 3234 and SENDTIME is not NULL and not(STATUS in (100,1000)) union select first 1 cast('PozadLekar' as varchar(11)) as ID, substring(cast(H.EICZ as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(H.EODZ as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DOKLADH H where H.IDHLAV = (select first 1 I.IDHLAV from DOKLADH I where I.RODCIS = '486122443' and I.EICZ is not NULL order by I.IDHLAV desc) union select first 10 cast('Prilohy' as varchar(11)) as ID, substring(cast(FILENAME as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from FILES where IDPAC = 3234 union select first 10 cast('Objednavky' as varchar(11)) as ID, substring(cast(F_CONCAT(U.PRIJMENI, F_CONCAT(U.JMENO, U.TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(PRAC as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(CAS as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from OBJOBJ O join PRACOVISTE P on (P.ID = O.IDPRAC) join UZIVATEL U on (U.IDUZI = O.IDUZI) where IDPAC = 3234 and DATUM >= '20.03.2026' union select cast('OseLek' as varchar(11)) as ID, substring(cast(F_CONCAT(PRIJMENI, F_CONCAT(JMENO, TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(TITUL2 as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM KARUZIV_SEL(3234, 'T') union select cast('PeProhlidky' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(TERMIN as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PREH join PREINIH on (PREH.IDPREINI = PREINIH.IDPREINI) where IDPAC = 3234 union select cast('Medikace' as varchar(11)) as ID, substring(cast(NAZ as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(PLATI_OD as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from MEDIKACE where IDPAC = 3234 and PLATI_OD <= '20.03.2026' and (PLATI_DO >= '20.03.2026' or PLATI_DO is NULL) union select cast('NextDispenz' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(SKUPINA as VARCHAR(70)) from 1 for 30) as VAR2, cast(PRISTI as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DISPAC join DISSKU on (DISSKU.IDDIS = DISPAC.IDDIS) where IDPAC = 3234 and PRISTI is not NULL union select cast('Dispenz' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(SKUPINA as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATZAR as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DISPAC join DISSKU on (DISSKU.IDDIS = DISPAC.IDDIS) where IDPAC = 3234 union select cast('Prohlidky' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PREPRI join PREINIH on (PREPRI.IDPREINI = PREINIH.IDPREINI) where IDPAC = 3234 and datum is not null union select cast('NextOck' as varchar(11)) as ID, substring(cast(coalesce(NAZ,ZKRATKA) as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUMD as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from OCKPRI o left join KLK k on o.ZKRATKA = k.KOD where IDPAC = 3234 union select first 1 cast('LastVykon' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, substring(cast(D.KOD as VARCHAR(70)) from 1 for 30) as VAR2, cast(D.DATOSE as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DOKLADD D where D.ID = (select first 1 dd.id from dokladd dd join dokladh dh on (dh.idhlav = dd.idhlav) where dd.rodcis = '486122443' and (dh.hodb = '001' or dh.hodb is null) order by dd.datose desc) union select first 1 cast('LastDekurs' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(DATUM) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DEKURS where IDPAC = 3234 and (IDPRAC = 2 or IDPRAC = -1) union select first 1 cast('Karta' as varchar(11)) as ID, substring(cast(INFORMACE as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(CIZINEC as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(INFORMACE_COL as INTEGER) as INT1, POZNAMKA as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from KAR where IDPAC = 3234 union select first 1 cast('Saldo' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(SALDO as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PACIENT_SALDO(3234, 1, 0, 0) union select first 1 cast('Anamneza' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, substring(cast(KREVSKUP as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, ANAMNEZA as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ANAMNEZA where ID = (select first 1 ID from ANAMNEZA where IDPAC=3234 order by DATUM DESC, ID desc) union select first 20 cast('Ockovani' as varchar(11)) as ID, substring(cast(ockzaz.LATKA as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(ockzaz.ZKRATKA as VARCHAR(70)) from 1 for 30) as VAR2, cast(max(ockzaz.DATUM) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ockzaz where ockzaz.idpac = 3234 group by ockzaz.ZKRATKA, ockzaz.LATKA union select first 1 cast('NeschopenOd' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(ZACNES) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from NES where (IDPAC = 3234) and (ZACNES <= '20.03.2026') and ((KONNES is NULL) or (KONNES > '20.03.2026')) and (STORNO = 'F') union select first 1 cast('Alergie' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, ALERGIE as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ANAMNEZA where IDPAC = 3234 and ID = (select first 1 ID from ANAMNEZA where IDPAC = 3234 and DATUM <= '20.03.2026' order by DATUM desc, ID desc) union select first 1 cast('Pojistovna' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(P.IDICP as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ICP P join ICZ Z on (Z.IDICZ = P.IDICZ) where Z.POJ = '111' and P.ODB = '001'
391 0 select POHLAVI,PRIJMENI,JMENO,TITUL,(select first 1 POJ from GETPACPOJ(IDPAC, '20.03.2026 00:00:00.000'/* ODE_DNE */)) as POJ,DATNAR,RODCIS,IDSTAV,DRUHPOJ,TRVOBEC,TRVULICE,TRVPSC,PREOBEC,PREULICE,PREPSC,AKTIVBYDL,ZAMEST,ZAMADRESA,IDZAMEST,PROFES,OSCISLO,GEONOMU,(select KOD from GETPACCENPAS(IDPAC, '20.03.2026 00:00:00.000'/* ODE_DNE */)) as CENPAS,ROZENA,IZIPOD,STPRIS,ZUJEDN,PRUKAZ,TYPPECE,CIZINEC,TITULZA,DATREG,ZASTUPOVANY_ICP,IDISIN,UPRCHLIK from KAR where IDPAC = 3234/* ID */
392 0 select first 1 R.ID, R.DATUM from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
393 0 select KOD from STALDGN where (IDPAC = 3234) and IDANAM = (select first 1 ID from ANAMNEZA where IDPAC = 3234 order by DATUM desc)
ORDER BY PORADI ASC
, KOD ASC
394 0 select first 1 N.ZACNES, D.DATUM, D.KAM, D.KAMODKUD, D.ICZ
from NES N left join NESD D on D.IDNES = N.ID
where (N.IDPAC = 3234) and (N.ZACNES <= '20.03.2026') and ((N.KONNES is NULL) or (N.KONNES > '20.03.2026')) and (N.STORNO = 'F')
ORDER BY N.ZACNES DESC
, D.DATUM DESC
, D.ID DESC
395 0 select PV.KOD,
(select first 1 D.DATOSE from DOKLADD D where D.RODCIS = '486122443'/* RODCIS */ and D.KOD = PV.KOD order by DATOSE desc),
PV.JENREG,
PV.ODVYKAZANI
from PROHVYK PV
where (PV.ODBORN is NULL or PV.ODBORN = '001'/* ODB */)
and (PV.ICP is NULL or PV.ICP = '09305001'/* ICP */)
and (PV.VEKOD is NULL or PV.VEKOD <= 77/* VEKOD */)
and (PV.VEKDO is NULL or PV.VEKDO > 77/* VEKDO */)
and (PV.POHLAVI is NULL or PV.POHLAVI = 'Z'/* POHLAVI */)
ORDER BY PV.KOD ASC
396 0 select PV.KOD,
PV.JENREG,
PV.ODVYKAZANI
from PROHVYK PV
where (PV.ODBORN is NULL or PV.ODBORN = '001'/* ODB */)
and (PV.VEKOD is NULL or PV.VEKOD <= 77/* VEKOD */)
and (PV.VEKDO is NULL or PV.VEKDO > 77/* VEKDO */)
and (PV.POHLAVI is NULL or PV.POHLAVI = 'Z'/* POHLAVI */)
ORDER BY PV.KOD ASC
397 0 select S.NAZEV, M.NAZ, S.KOD from STALDGN S join MKN10 M on (M.KOD = S.KOD and (M.PLATIOD is NULL or M.PLATIOD <= 'NOW') and (M.PLATIDO is NULL or M.PLATIDO >= 'NOW')) where (S.IDPAC = 3234) and S.IDANAM = (select first 1 A.ID from ANAMNEZA A where A.IDPAC = 3234 order by A.DATUM desc)
ORDER BY S.PORADI ASC
, S.KOD ASC
398 0 select first 1 TP.DATUM from TEHPRO TP join TEH T on T.IDTEH = TP.IDTEH where T.IDPAC = 3234
ORDER BY TP.DATUM DESC
399 0 select first 1 DATUM from GENVYS where IDPAC = 3234 and TYP = 110
ORDER BY DATUM DESC
400 0 select first 1 KAP_CHECK, KAP_STAV, DALSI_KONTROLA from KARB2B where IDPAC = 3234 and ICP='09305001'
401 0 select first 1 T.WARN, T.POZN, T.DATUM from TEHKAL T where (T.IDPAC = 3234/* IDPAC */) and (T.DATUM >= '20.03.2026'/* DATUM */)
ORDER BY DATUM ASC
402 0 select first 1 (case T.VYPOCETDLE when 1 then (T.PM) else (T.UZ1POROD - 280) end) as POCATEKTEH
from Teh T
left join kar K on (K.idpac = T.IdPac)
where
(T.IDPAC = 3234/* IDPAC */) and
((ENDTEH>='20.03.2026 00:00:00.000'/* Dnes */) or (ENDTEH is null)) and /* pouze vysetreni pred datem ukonceni*/
(((PM is NULL) and (UZ1POROD is NULL) and (ENDTEH is null)) or /* nelze zjistit konec tehotenstvi*/
(T.PM >= ('20.03.2026 00:00:00.000'/* Dnes */ - (42*7))) or /* max. delka tehotenstvi dle PM 42 tyd. */
((PM is null) and (UZ1POROD+14 >= '20.03.2026 00:00:00.000'/* Dnes */)) /* max. termin dle UZ + 14 dni */
)
ORDER BY PM DESC NULLS LAST
, UZ1POROD DESC NULLS LAST
403 0 select first 1 ZAMEST, ZAMADRESA, PROFES, ICO from KAR left join FIRMY on FIRMY.FIRMA = KAR.ZAMEST where IDPAC = 3234 and (ZAMEST is not NULL or ZAMADRESA is not NULL or PROFES is not NULL)
404 0 select first 1 DATZAL from KAR where IDPAC = 3234
405 0 select first 1 BMI from SP_GETBMI(3234)
406 0 select first 1 puls from preh where (idpac = 3234) and not(puls is null)
ORDER BY datum DESC
407 0 select first 1 ZACNES, CISNES, ID, (select first 1 DATA from HISTDOC where TYP = 'POTDPN' and (IDPACI = 3234) and (DATA like '%CisNes=' || NES.CISNES || '%') order by DATUM desc) from NES where (IDPAC = 3234) and ('2026-03-20' >= ZACNES + 10) and ((KONNES is NULL) or (KONNES > '2026-03-20')) and (STORNO = 'F') and ((select count(*) from HISTDOC where TYP = 'POTDPN' and (IDPACI = 3234) and (extract(month from DATUM) || extract(year from DATUM) = extract(month from cast('2026-03-20' as date) + 4) || extract(year from cast('2026-03-20' as date) + 4)) and DATA like '%CisNes=' || NES.CISNES || '%') = 0) and (not exists(select Id from nesd where nesd.idnes = nes.id) or ((select first 1 Kam from nesd where nesd.idnes = nes.id order by nesd.datum desc, nesd.id desc) = 'N'))
ORDER BY ZACNES ASC
408 0 select first 1 ZACNES, CISNES, ID, POTVRZENI_VYDANO from NES where (IDPAC = 3234) and ('2026-03-20' >= ZACNES + 10) and ((KONNES is NULL) or (KONNES > '2026-03-20')) and (STORNO = 'F') and (extract(month from POTVRZENI_VYDANO) || extract(year from POTVRZENI_VYDANO) = extract(month from cast('2026-03-20' as date)) || extract(year from cast('2026-03-20' as date)))
ORDER BY ZACNES ASC
409 0 select * from GETPACPOJ(3234/* IDPAC */, '20.03.2026'/* ODE_DNE */)
410 0 select ID, IDPAC, ANAMNEZA, DATUM, ALERGIE, KREVSKUP,
HBSAG, DUCHOD, BEZMOCNOST, HIV, MESOD, MESDO,
MESTYP, BWR, ISOIMUN, PANEV, coalesce(POCPOROD, -1) as POCPOROD, coalesce(POCPOTRAT, -1) as POCPOTRAT,
coalesce(POCINTER, -1) as POCINTER, coalesce(POCOPER, -1) as POCOPER, IDUZIV, SIGNATURE, SIGNATURE_INFO,
IDCERTIFICATE, RHDATUM, RHVYSL, TRIZOMIE, NTD, VVV,
IZIPSTAT, KURAK, TST, KARDIOSTIM, CIGARETDENNE, FREKKOURENI,
(select first 1 vyska from preh where (idpac = anamneza.idpac) and (vyska is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) vyska,
(select first 1 vaha from preh where (idpac = anamneza.idpac) and (vaha is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) vaha,
(select first 1 puls from preh where (idpac = anamneza.idpac) and (puls is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) puls,
(select first 1 tlaksys from preh where (idpac = anamneza.idpac) and (tlaksys is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) tlaksys,
(select first 1 tlakdia from preh where (idpac = anamneza.idpac) and (tlakdia is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) tlakdia,
memporod, mempotrat, meminter, memoper, pm, ID_EDOKUMENT, PRUKAZ from ANAMNEZA where (IDPAC=3234/* IDPAC */)
ORDER BY DATUM DESC
, ID DESC
411 0 select AC.NAZEV,
AV.SVALUE,
AV.BDATA,
AV.NVALUE,
AV.DVALUE,
AF.USERMASK,
AV.TYP
from ANAMVALUES AV
left join ANAMVCFG AC on AC.IDTYPHODN = AV.IDTYPHODN
left join ANAMVFMT AF on AF.IDTYPHODN = AV.IDTYPHODN
where AV.IDPAC=3234/* IDPAC */ and AV.PLATIOD <= '01.11.2022'/* DATUM */ and AKTUAL = 'T'
ORDER BY AF.PORADI ASC
, AV.DATZAPIS DESC
, AV.PLATIOD DESC
412 0 select heslotelkom from KAR where idpac = 3234
413 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
414 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'PSA'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
415 0 select K.POHLAVI as POHLAVI, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 KOD from STALDGN where IDPAC = K.IDPAC and IDANAM = (select first 1 ID from ANAMNEZA where IDPAC = K.IDPAC order by DATUM desc, ID desc) and KOD like 'C61%') as DGN, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('01131', '01132', '01133', '01134') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('01131', '01132', '01133', '01134') order by DATOSE desc, ID desc) as VYKON from KAR K where K.IDPAC = 3234/* IDPAC */
416 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
417 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'TOKS'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
418 0 select K.DATNAR as DATNAR, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('15120', '15121') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('15120', '15121') order by DATOSE desc, ID desc) as VYKON from KAR K where K.IDPAC = 3234/* IDPAC */
419 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
420 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'FRAX'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
421 0 select K.DATNAR, K.POHLAVI, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('11320', '11321', '11327') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('11320', '11321', '11327') order by DATOSE desc, ID desc) as VYKON, (select first 1 "DATA" from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 112/* TYP */ order by DATUM desc, IDPRE desc) as DXADATA, (select first 1 DATUM from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 112/* TYP */ order by DATUM desc, IDPRE desc) as DXADATUM from KAR K where K.IDPAC = 3234/* IDPAC */
422 0 select GV.DATUM from GENVYS GV where GV.IDPRE = (select first 1 IDPRE from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 0/* TYP */ order by DATUM desc)
423 0 select first 1 RPRUKAZ from KAR where IDPAC = 3234
424 0 select first 1 ZPRUKAZ from KAR where IDPAC = 3234
425 0 execute procedure sp_log(3234/* idpac */, 10000/* tblid */, 3234/* recid */, 'V', NULL/* rodcis */, NULL/* id1 */, NULL/* detail */)
426 0 select first 1 * from KAR
427 0 select ID_ESINSTITUCE from ( select coalesce(PU.ID_ESINSTITUCE, P.ID_ESINSTITUCE, O.ID_ESINSTITUCE, Z.ID_ESINSTITUCE) ID_ESINSTITUCE from PRACUZIV PU left join PRACOVISTE P on (P.ID=PU.IDPRAC) left join ODDEL O on (P.IDODDEL=O.ID) left join ZARIZENI Z on (O.IDZAR=Z.ID) where PU.IDPRAC = 2 and PU.IDUZIV = 6 ) ORGS where exists (select ID from ES_INSTITUCE where ID = ORGS.ID_ESINSTITUCE and ESERVICES = 'T')
428 0 select KAR.DATNAR,(select first 1 STAV from ES_PACIDENT join ES_PAC on (ES_PAC.ID=ES_PACIDENT.PAC_ID) left join ES_BROKER on (ES_BROKER.id_es_pac = ES_PAC.ID) where ((ES_PAC.idpac = kar.idpac) or (ES_BROKER.idpac = kar.idpac)) and ES_PACIDENT.INST_ID = 0) as ES_STAV,KAR.IDPAC,KAR.INFORMACE,KAR.INFORMACE_COL,KAR.JMENO,(select first 1 KZ.IDZAR from KARZARAZENI KZ where (KZ.IDPAC=KAR.IDPAC) and (KZ.DATUM is null or (KZ.DATUM<=CURRENT_DATE)) and (KZ.DATUMDO is null or (KZ.DATUMDO>=CURRENT_DATE)) order by KZ.ID) as K_ZARZAR,KAR.POHLAVI,GPP.POJ,KAR.POZNAMKA,KAR.PRIJMENI,KAR.PRIJMENI_UP,(select DATUM_REGISTRACE from SP_GETREGDAT(kar.IDPAC)) as REGDATUM,KAR.REGISTROVAL,(select PRIZNAK from SP_GETREGDAT(kar.IDPAC)) as REGPRIZNAK,KAR.RODCIS,KAR.ROZENA,(select first 1 OUTCOLS from GETKARZARAZENICOLORS(kar.idpac, '2026-03-20')) as SKUPINY,KAR.TITUL,KAR.TITULZA,KAR.TRVOBEC,KAR.TRVPSC,KAR.TRVULICE,KAR.VYRAZEN
from KAR
left join GETPACPOJ(KAR.IDPAC, '2026-03-20') GPP on GPP.IDPAC = KAR.IDPAC
where (vyrazen = 'N') and exists (select id from registr r join icp i on r.idicp = i.idicp where r.idpac = kar.idpac and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20') and (r.priznak in ('V','D','A')) and (i.icp = '09305001') and (i.odb = '001'))
ORDER BY KAR.PRIJMENI_UP ASC
, KAR.RODCIS ASC
429 0 select first 1 ALERGIE from ANAMNEZA where IDPAC = 3234/* IDPAC */ and DATUM <= '20.03.2026'/* DATUM */
ORDER BY DATUM DESC
, ID DESC
430 0 select first 1 KAP_CHECK, KAP_STAV from KARB2B where IDPAC = 3234 and ICP='09305001'
431 0 select first 1 VAKCINACE_CHECK, VAKCINACE_STAV, VAKCINACE_DATUM from KARISIN where IDPAC = 3234
432 0 select distinct H.TYP from DOKLADH H join DOKLADD D on H.IDHLAV = D.IDHLAV where ((H.RODCIS = '486122443'/* RODCIS */) or (H.RODCIS is null)) and (D.RODCIS = '486122443'/* RODCIS */) and (H.IDA is NULL) and (H.POJ = '111'/* POJ */ ) and (H.ICZ = '09305001'/* ICZ */) and (H.HODB = '001'/* ODB */)
433 0 select 'acDokladHCes', 'DOC%C' || case count(*) when 0 then '' else 'X' end from CESH join CESD on CESD.IDHLAV = CESH.IDHLAV
where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHLaz', 'DOC%L' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='L') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHOzdrav', 'DOC%V' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='O') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHDrg', 'DOC%D' || case count(*) when 0 then '' else 'X' end from DRG where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHOrtop', 'DOC%O' || case count(*) when 0 then '' else 'X' end from POU where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHFoni', 'DOC%F' || case count(*) when 0 then '' else 'X' end from POUFONIH where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from POUFONID where IDHLAV = POUFONIH.IDHLAV)
434 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
435 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
436 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
437 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
438 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
439 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
440 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
441 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
442 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
443 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
444 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
445 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
446 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
447 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
448 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
449 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
450 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
451 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
452 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
453 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
454 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
455 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
456 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
457 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
458 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
459 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
460 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
461 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
462 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
463 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
464 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
465 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
466 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
467 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
468 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
469 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
470 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
471 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
472 0 select first 1 ALERGIE from ANAMNEZA where IDPAC = 3234/* IDPAC */ and DATUM <= '20.03.2026'/* DATUM */
ORDER BY DATUM DESC
, ID DESC
473 0 select first 1 KAP_CHECK, KAP_STAV from KARB2B where IDPAC = 3234 and ICP='09305001'
474 0 select first 1 VAKCINACE_CHECK, VAKCINACE_STAV, VAKCINACE_DATUM from KARISIN where IDPAC = 3234
475 0 select distinct H.TYP from DOKLADH H join DOKLADD D on H.IDHLAV = D.IDHLAV where ((H.RODCIS = '486122443'/* RODCIS */) or (H.RODCIS is null)) and (D.RODCIS = '486122443'/* RODCIS */) and (H.IDA is NULL) and (H.POJ = '111'/* POJ */ ) and (H.ICZ = '09305001'/* ICZ */) and (H.HODB = '001'/* ODB */)
476 0 select 'acDokladHCes', 'DOC%C' || case count(*) when 0 then '' else 'X' end from CESH join CESD on CESD.IDHLAV = CESH.IDHLAV
where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHLaz', 'DOC%L' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='L') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHOzdrav', 'DOC%V' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='O') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHDrg', 'DOC%D' || case count(*) when 0 then '' else 'X' end from DRG where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHOrtop', 'DOC%O' || case count(*) when 0 then '' else 'X' end from POU where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHFoni', 'DOC%F' || case count(*) when 0 then '' else 'X' end from POUFONIH where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from POUFONID where IDHLAV = POUFONIH.IDHLAV)
477 0 select idicz from ICZ where poj = '111' and icz = '09305000'
478 0 select icp from ICP where idicz = '12' and odb = '001'
479 0 select idicz from ICZ where poj = '111' and icz = '09305000'
480 0 select icp from ICP where idicz = '12' and odb = '001'
481 0 select cast('BalickyPac' as varchar(11)) as ID, substring(cast(BPAC.KOD as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(BPAC.CENPASMO as VARCHAR(70)) from 1 for 30) as VAR2, cast(BPAC.DATUMOD as DATE) as DATE1, cast(BPAC.DATUMDO as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from BALICKYPAC BPAC left join SP_BALICKYPAC_PRIZNAK(BPAC.ID, '20.03.2026') PRI on 1 = 1 where BPAC.IDPAC = 3234 and PRI.PRIZNAK in ('A', 'B') union select cast('Dluh' as varchar(11)) as ID, substring(cast(P.MENA as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast((SUM(P.CENA - P.SLEVAC) - (SUM(P.PLATBA) + SUM((COALESCE((select SUM(case ZD.TYP when 'R' then ZD.CELKEM else -ZD.CELKEM end) from PLADET ZD where ZD.IDPLA = P.IDPLA and (ZD.TYP <> P.DOKLADTYP) and (ZD.TYP <> '|') and ((ZD.CENA < 0) or (ZD.TYP = 'R'))), 0))))) as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM PLA P WHERE (P.IDPAC = 3234) AND (P.DOKLADTYP = 'F') AND (P.STORNO IS NULL) AND (P.NENISALDO = 'F') AND ((P.SPLATNOST IS NULL) OR (P.SPLATNOST < '2026-03-20')) AND (P.VALID = 'F') GROUP BY P.MENA union select cast('SouhlasPac' as varchar(11)) as ID, substring(cast(case when S.NAZEV is null then case when H.TYP = 'ZSOUPOS' then 'Souhlas/Nesouhlas s poskytnutím zdravotních služeb nezletilému' when H.TYP = 'ZSOUPOZ' then 'Souhlas zákonného zástupce nezletilého pacienta staršího 15ti let' when H.TYP = 'ZSOUPO2' then 'Nesouhlas s poskytnutím zdravotních služeb - povinné oèkování' when H.TYP = 'ZPOSIN2' then 'Urèení osoby oprávnìné dle zákona o zdravotních službách' when H.TYP = 'OdmPece' then 'Prohlášení o odmítnutí zdravotní péèe pacientem - Negativní revers' end else S.NAZEV end as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(H.DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from HISTDOC H left join SOUHLASPACSABL S on H.IDSOUHLASPACSABL = S.ID where H.TYP in ('IndSou', 'ZSOUPOS', 'ZSOUPOZ', 'ZSOUPO2', 'ZPOSIN2', 'OdmPece') and H.IDPACI = 3234 union select cast('sCenaVykZUM' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(coalesce(sum(cenabod),0) + coalesce(sum(cenamat),0) as NUMERIC(15,2)) as NUM1, cast((select coalesce(sum(cena),0) from LECD d where d.RODCIS = '486122443' and extract(year from d.DATOSE) = '2026' and ((d.KAT is null) or (d.KAT <> 'N')) and exists (select h.IDLEC from LECH h where h.IDLEC = d.IDLEC and h.POJ = '111' and h.ICZ in ('09305001'))) as NUMERIC(15,2)) as NUM2 from DOKLADD d where d.RODCIS = '486122443' and extract(year from d.DATOSE) = '2026' and ((d.KAT is null) or (d.KAT <> 'N' and d.KAT <> 'K' and d.KAT <> 'A')) and exists (select h.IDHLAV from DOKLADH h where h.IDHLAV = d.IDHLAV and h.POJ = '111' and h.ICZ in ('09305001')) union select cast('Registrl' as varchar(11)) as ID, substring(cast(REGISTROVAL as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from KAR where IDPAC = 3234 union select cast('OseLekPrak' as varchar(11)) as ID, substring(cast(F_CONCAT(PRIJMENI, F_CONCAT(JMENO, TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(TITUL2 as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(CAST(ODBORN as INTEGER) as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM KARUZIV_SEL(3234, 'T') WHERE ODBORN in ('001', '002') union select cast('SledLek' as varchar(11)) as ID, substring(cast(KOD as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(LEK as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from SLEDLEK where IDPAC = 3234 and DATUM <= '2026-03-20' union select first 10 cast('HistDoc' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from HISTDOC where IDPACI = 3234 and STAV is NULL and IDZARPR = 2 and IDODDPR = 2 and IDPRACPR = 2 union select first 1 cast('LastSms' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(SENDTIME) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from SMS where PACID = 3234 and SENDTIME is not NULL and not(STATUS in (100,1000)) union select first 1 cast('PozadLekar' as varchar(11)) as ID, substring(cast(H.EICZ as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(H.EODZ as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DOKLADH H where H.IDHLAV = (select first 1 I.IDHLAV from DOKLADH I where I.RODCIS = '486122443' and I.EICZ is not NULL order by I.IDHLAV desc) union select first 10 cast('Prilohy' as varchar(11)) as ID, substring(cast(FILENAME as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from FILES where IDPAC = 3234 union select first 10 cast('Objednavky' as varchar(11)) as ID, substring(cast(F_CONCAT(U.PRIJMENI, F_CONCAT(U.JMENO, U.TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(PRAC as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(CAS as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from OBJOBJ O join PRACOVISTE P on (P.ID = O.IDPRAC) join UZIVATEL U on (U.IDUZI = O.IDUZI) where IDPAC = 3234 and DATUM >= '20.03.2026' union select cast('OseLek' as varchar(11)) as ID, substring(cast(F_CONCAT(PRIJMENI, F_CONCAT(JMENO, TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(TITUL2 as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM KARUZIV_SEL(3234, 'T') union select cast('PeProhlidky' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(TERMIN as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PREH join PREINIH on (PREH.IDPREINI = PREINIH.IDPREINI) where IDPAC = 3234 union select cast('Medikace' as varchar(11)) as ID, substring(cast(NAZ as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(PLATI_OD as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from MEDIKACE where IDPAC = 3234 and PLATI_OD <= '20.03.2026' and (PLATI_DO >= '20.03.2026' or PLATI_DO is NULL) union select cast('NextDispenz' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(SKUPINA as VARCHAR(70)) from 1 for 30) as VAR2, cast(PRISTI as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DISPAC join DISSKU on (DISSKU.IDDIS = DISPAC.IDDIS) where IDPAC = 3234 and PRISTI is not NULL union select cast('Dispenz' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(SKUPINA as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATZAR as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DISPAC join DISSKU on (DISSKU.IDDIS = DISPAC.IDDIS) where IDPAC = 3234 union select cast('Prohlidky' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PREPRI join PREINIH on (PREPRI.IDPREINI = PREINIH.IDPREINI) where IDPAC = 3234 and datum is not null union select cast('NextOck' as varchar(11)) as ID, substring(cast(coalesce(NAZ,ZKRATKA) as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUMD as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from OCKPRI o left join KLK k on o.ZKRATKA = k.KOD where IDPAC = 3234 union select first 1 cast('LastVykon' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, substring(cast(D.KOD as VARCHAR(70)) from 1 for 30) as VAR2, cast(D.DATOSE as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DOKLADD D where D.ID = (select first 1 dd.id from dokladd dd join dokladh dh on (dh.idhlav = dd.idhlav) where dd.rodcis = '486122443' and (dh.hodb = '001' or dh.hodb is null) order by dd.datose desc) union select first 1 cast('LastDekurs' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(DATUM) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DEKURS where IDPAC = 3234 and (IDPRAC = 2 or IDPRAC = -1) union select first 1 cast('Karta' as varchar(11)) as ID, substring(cast(INFORMACE as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(CIZINEC as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(INFORMACE_COL as INTEGER) as INT1, POZNAMKA as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from KAR where IDPAC = 3234 union select first 1 cast('Saldo' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(SALDO as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PACIENT_SALDO(3234, 1, 0, 0) union select first 1 cast('Anamneza' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, substring(cast(KREVSKUP as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, ANAMNEZA as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ANAMNEZA where ID = (select first 1 ID from ANAMNEZA where IDPAC=3234 order by DATUM DESC, ID desc) union select first 20 cast('Ockovani' as varchar(11)) as ID, substring(cast(ockzaz.LATKA as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(ockzaz.ZKRATKA as VARCHAR(70)) from 1 for 30) as VAR2, cast(max(ockzaz.DATUM) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ockzaz where ockzaz.idpac = 3234 group by ockzaz.ZKRATKA, ockzaz.LATKA union select first 1 cast('NeschopenOd' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(ZACNES) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from NES where (IDPAC = 3234) and (ZACNES <= '20.03.2026') and ((KONNES is NULL) or (KONNES > '20.03.2026')) and (STORNO = 'F') union select first 1 cast('Alergie' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, ALERGIE as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ANAMNEZA where IDPAC = 3234 and ID = (select first 1 ID from ANAMNEZA where IDPAC = 3234 and DATUM <= '20.03.2026' order by DATUM desc, ID desc) union select first 1 cast('Pojistovna' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(P.IDICP as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ICP P join ICZ Z on (Z.IDICZ = P.IDICZ) where Z.POJ = '111' and P.ODB = '001'
482 0 select POHLAVI,PRIJMENI,JMENO,TITUL,(select first 1 POJ from GETPACPOJ(IDPAC, '20.03.2026 00:00:00.000'/* ODE_DNE */)) as POJ,DATNAR,RODCIS,IDSTAV,DRUHPOJ,TRVOBEC,TRVULICE,TRVPSC,PREOBEC,PREULICE,PREPSC,AKTIVBYDL,ZAMEST,ZAMADRESA,IDZAMEST,PROFES,OSCISLO,GEONOMU,(select KOD from GETPACCENPAS(IDPAC, '20.03.2026 00:00:00.000'/* ODE_DNE */)) as CENPAS,ROZENA,IZIPOD,STPRIS,ZUJEDN,PRUKAZ,TYPPECE,CIZINEC,TITULZA,DATREG,ZASTUPOVANY_ICP,IDISIN,UPRCHLIK from KAR where IDPAC = 3234/* ID */
483 0 select first 1 R.ID, R.DATUM from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
484 0 select KOD from STALDGN where (IDPAC = 3234) and IDANAM = (select first 1 ID from ANAMNEZA where IDPAC = 3234 order by DATUM desc)
ORDER BY PORADI ASC
, KOD ASC
485 0 select first 1 N.ZACNES, D.DATUM, D.KAM, D.KAMODKUD, D.ICZ
from NES N left join NESD D on D.IDNES = N.ID
where (N.IDPAC = 3234) and (N.ZACNES <= '20.03.2026') and ((N.KONNES is NULL) or (N.KONNES > '20.03.2026')) and (N.STORNO = 'F')
ORDER BY N.ZACNES DESC
, D.DATUM DESC
, D.ID DESC
486 0 select PV.KOD,
(select first 1 D.DATOSE from DOKLADD D where D.RODCIS = '486122443'/* RODCIS */ and D.KOD = PV.KOD order by DATOSE desc),
PV.JENREG,
PV.ODVYKAZANI
from PROHVYK PV
where (PV.ODBORN is NULL or PV.ODBORN = '001'/* ODB */)
and (PV.ICP is NULL or PV.ICP = '09305001'/* ICP */)
and (PV.VEKOD is NULL or PV.VEKOD <= 77/* VEKOD */)
and (PV.VEKDO is NULL or PV.VEKDO > 77/* VEKDO */)
and (PV.POHLAVI is NULL or PV.POHLAVI = 'Z'/* POHLAVI */)
ORDER BY PV.KOD ASC
487 0 select PV.KOD,
PV.JENREG,
PV.ODVYKAZANI
from PROHVYK PV
where (PV.ODBORN is NULL or PV.ODBORN = '001'/* ODB */)
and (PV.VEKOD is NULL or PV.VEKOD <= 77/* VEKOD */)
and (PV.VEKDO is NULL or PV.VEKDO > 77/* VEKDO */)
and (PV.POHLAVI is NULL or PV.POHLAVI = 'Z'/* POHLAVI */)
ORDER BY PV.KOD ASC
488 0 select S.NAZEV, M.NAZ, S.KOD from STALDGN S join MKN10 M on (M.KOD = S.KOD and (M.PLATIOD is NULL or M.PLATIOD <= 'NOW') and (M.PLATIDO is NULL or M.PLATIDO >= 'NOW')) where (S.IDPAC = 3234) and S.IDANAM = (select first 1 A.ID from ANAMNEZA A where A.IDPAC = 3234 order by A.DATUM desc)
ORDER BY S.PORADI ASC
, S.KOD ASC
489 0 select first 1 TP.DATUM from TEHPRO TP join TEH T on T.IDTEH = TP.IDTEH where T.IDPAC = 3234
ORDER BY TP.DATUM DESC
490 0 select first 1 DATUM from GENVYS where IDPAC = 3234 and TYP = 110
ORDER BY DATUM DESC
491 0 select first 1 KAP_CHECK, KAP_STAV, DALSI_KONTROLA from KARB2B where IDPAC = 3234 and ICP='09305001'
492 0 select first 1 T.WARN, T.POZN, T.DATUM from TEHKAL T where (T.IDPAC = 3234/* IDPAC */) and (T.DATUM >= '20.03.2026'/* DATUM */)
ORDER BY DATUM ASC
493 0 select first 1 (case T.VYPOCETDLE when 1 then (T.PM) else (T.UZ1POROD - 280) end) as POCATEKTEH
from Teh T
left join kar K on (K.idpac = T.IdPac)
where
(T.IDPAC = 3234/* IDPAC */) and
((ENDTEH>='20.03.2026 00:00:00.000'/* Dnes */) or (ENDTEH is null)) and /* pouze vysetreni pred datem ukonceni*/
(((PM is NULL) and (UZ1POROD is NULL) and (ENDTEH is null)) or /* nelze zjistit konec tehotenstvi*/
(T.PM >= ('20.03.2026 00:00:00.000'/* Dnes */ - (42*7))) or /* max. delka tehotenstvi dle PM 42 tyd. */
((PM is null) and (UZ1POROD+14 >= '20.03.2026 00:00:00.000'/* Dnes */)) /* max. termin dle UZ + 14 dni */
)
ORDER BY PM DESC NULLS LAST
, UZ1POROD DESC NULLS LAST
494 0 select first 1 ZAMEST, ZAMADRESA, PROFES, ICO from KAR left join FIRMY on FIRMY.FIRMA = KAR.ZAMEST where IDPAC = 3234 and (ZAMEST is not NULL or ZAMADRESA is not NULL or PROFES is not NULL)
495 0 select first 1 DATZAL from KAR where IDPAC = 3234
496 0 select first 1 BMI from SP_GETBMI(3234)
497 0 select first 1 puls from preh where (idpac = 3234) and not(puls is null)
ORDER BY datum DESC
498 0 select first 1 ZACNES, CISNES, ID, (select first 1 DATA from HISTDOC where TYP = 'POTDPN' and (IDPACI = 3234) and (DATA like '%CisNes=' || NES.CISNES || '%') order by DATUM desc) from NES where (IDPAC = 3234) and ('2026-03-20' >= ZACNES + 10) and ((KONNES is NULL) or (KONNES > '2026-03-20')) and (STORNO = 'F') and ((select count(*) from HISTDOC where TYP = 'POTDPN' and (IDPACI = 3234) and (extract(month from DATUM) || extract(year from DATUM) = extract(month from cast('2026-03-20' as date) + 4) || extract(year from cast('2026-03-20' as date) + 4)) and DATA like '%CisNes=' || NES.CISNES || '%') = 0) and (not exists(select Id from nesd where nesd.idnes = nes.id) or ((select first 1 Kam from nesd where nesd.idnes = nes.id order by nesd.datum desc, nesd.id desc) = 'N'))
ORDER BY ZACNES ASC
499 0 select first 1 ZACNES, CISNES, ID, POTVRZENI_VYDANO from NES where (IDPAC = 3234) and ('2026-03-20' >= ZACNES + 10) and ((KONNES is NULL) or (KONNES > '2026-03-20')) and (STORNO = 'F') and (extract(month from POTVRZENI_VYDANO) || extract(year from POTVRZENI_VYDANO) = extract(month from cast('2026-03-20' as date)) || extract(year from cast('2026-03-20' as date)))
ORDER BY ZACNES ASC
500 0 select * from GETPACPOJ(3234/* IDPAC */, '20.03.2026'/* ODE_DNE */)
501 0 select ID, IDPAC, ANAMNEZA, DATUM, ALERGIE, KREVSKUP,
HBSAG, DUCHOD, BEZMOCNOST, HIV, MESOD, MESDO,
MESTYP, BWR, ISOIMUN, PANEV, coalesce(POCPOROD, -1) as POCPOROD, coalesce(POCPOTRAT, -1) as POCPOTRAT,
coalesce(POCINTER, -1) as POCINTER, coalesce(POCOPER, -1) as POCOPER, IDUZIV, SIGNATURE, SIGNATURE_INFO,
IDCERTIFICATE, RHDATUM, RHVYSL, TRIZOMIE, NTD, VVV,
IZIPSTAT, KURAK, TST, KARDIOSTIM, CIGARETDENNE, FREKKOURENI,
(select first 1 vyska from preh where (idpac = anamneza.idpac) and (vyska is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) vyska,
(select first 1 vaha from preh where (idpac = anamneza.idpac) and (vaha is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) vaha,
(select first 1 puls from preh where (idpac = anamneza.idpac) and (puls is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) puls,
(select first 1 tlaksys from preh where (idpac = anamneza.idpac) and (tlaksys is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) tlaksys,
(select first 1 tlakdia from preh where (idpac = anamneza.idpac) and (tlakdia is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) tlakdia,
memporod, mempotrat, meminter, memoper, pm, ID_EDOKUMENT, PRUKAZ from ANAMNEZA where (IDPAC=3234/* IDPAC */)
ORDER BY DATUM DESC
, ID DESC
502 0 select AC.NAZEV,
AV.SVALUE,
AV.BDATA,
AV.NVALUE,
AV.DVALUE,
AF.USERMASK,
AV.TYP
from ANAMVALUES AV
left join ANAMVCFG AC on AC.IDTYPHODN = AV.IDTYPHODN
left join ANAMVFMT AF on AF.IDTYPHODN = AV.IDTYPHODN
where AV.IDPAC=3234/* IDPAC */ and AV.PLATIOD <= '01.11.2022'/* DATUM */ and AKTUAL = 'T'
ORDER BY AF.PORADI ASC
, AV.DATZAPIS DESC
, AV.PLATIOD DESC
503 0 select heslotelkom from KAR where idpac = 3234
504 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
505 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'PSA'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
506 0 select K.POHLAVI as POHLAVI, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 KOD from STALDGN where IDPAC = K.IDPAC and IDANAM = (select first 1 ID from ANAMNEZA where IDPAC = K.IDPAC order by DATUM desc, ID desc) and KOD like 'C61%') as DGN, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('01131', '01132', '01133', '01134') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('01131', '01132', '01133', '01134') order by DATOSE desc, ID desc) as VYKON from KAR K where K.IDPAC = 3234/* IDPAC */
507 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
508 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'TOKS'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
509 0 select K.DATNAR as DATNAR, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('15120', '15121') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('15120', '15121') order by DATOSE desc, ID desc) as VYKON from KAR K where K.IDPAC = 3234/* IDPAC */
510 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
511 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'FRAX'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
512 0 select K.DATNAR, K.POHLAVI, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('11320', '11321', '11327') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('11320', '11321', '11327') order by DATOSE desc, ID desc) as VYKON, (select first 1 "DATA" from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 112/* TYP */ order by DATUM desc, IDPRE desc) as DXADATA, (select first 1 DATUM from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 112/* TYP */ order by DATUM desc, IDPRE desc) as DXADATUM from KAR K where K.IDPAC = 3234/* IDPAC */
513 0 select GV.DATUM from GENVYS GV where GV.IDPRE = (select first 1 IDPRE from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 0/* TYP */ order by DATUM desc)
514 0 select first 1 RPRUKAZ from KAR where IDPAC = 3234
515 0 select first 1 ZPRUKAZ from KAR where IDPAC = 3234
516 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
517 0 execute procedure sp_log(3234/* idpac */, 10000/* tblid */, 3234/* recid */, 'V', NULL/* rodcis */, NULL/* id1 */, NULL/* detail */)
518 0 select first 1 * from KAR
519 0 select ID_ESINSTITUCE from ( select coalesce(PU.ID_ESINSTITUCE, P.ID_ESINSTITUCE, O.ID_ESINSTITUCE, Z.ID_ESINSTITUCE) ID_ESINSTITUCE from PRACUZIV PU left join PRACOVISTE P on (P.ID=PU.IDPRAC) left join ODDEL O on (P.IDODDEL=O.ID) left join ZARIZENI Z on (O.IDZAR=Z.ID) where PU.IDPRAC = 2 and PU.IDUZIV = 6 ) ORGS where exists (select ID from ES_INSTITUCE where ID = ORGS.ID_ESINSTITUCE and ESERVICES = 'T')
520 0 select KAR.DATNAR,(select first 1 STAV from ES_PACIDENT join ES_PAC on (ES_PAC.ID=ES_PACIDENT.PAC_ID) left join ES_BROKER on (ES_BROKER.id_es_pac = ES_PAC.ID) where ((ES_PAC.idpac = kar.idpac) or (ES_BROKER.idpac = kar.idpac)) and ES_PACIDENT.INST_ID = 0) as ES_STAV,KAR.IDPAC,KAR.INFORMACE,KAR.INFORMACE_COL,KAR.JMENO,(select first 1 KZ.IDZAR from KARZARAZENI KZ where (KZ.IDPAC=KAR.IDPAC) and (KZ.DATUM is null or (KZ.DATUM<=CURRENT_DATE)) and (KZ.DATUMDO is null or (KZ.DATUMDO>=CURRENT_DATE)) order by KZ.ID) as K_ZARZAR,KAR.POHLAVI,GPP.POJ,KAR.POZNAMKA,KAR.PRIJMENI,KAR.PRIJMENI_UP,(select DATUM_REGISTRACE from SP_GETREGDAT(kar.IDPAC)) as REGDATUM,KAR.REGISTROVAL,(select PRIZNAK from SP_GETREGDAT(kar.IDPAC)) as REGPRIZNAK,KAR.RODCIS,KAR.ROZENA,(select first 1 OUTCOLS from GETKARZARAZENICOLORS(kar.idpac, '2026-03-20')) as SKUPINY,KAR.TITUL,KAR.TITULZA,KAR.TRVOBEC,KAR.TRVPSC,KAR.TRVULICE,KAR.VYRAZEN
from kar join kar_sortby_idlist('4757') on idfromlist = idpac
left join GETPACPOJ(KAR.IDPAC, '2026-03-20') GPP on GPP.IDPAC = KAR.IDPAC
where (VYRAZEN = 'N')
ORDER BY KAR.PRIJMENI_UP ASC
, KAR.RODCIS ASC
521 0 select first 1 ALERGIE from ANAMNEZA where IDPAC = 4757/* IDPAC */ and DATUM <= '20.03.2026'/* DATUM */
ORDER BY DATUM DESC
, ID DESC
522 0 select first 1 KAP_CHECK, KAP_STAV from KARB2B where IDPAC = 4757 and ICP='09305001'
523 0 select first 1 VAKCINACE_CHECK, VAKCINACE_STAV, VAKCINACE_DATUM from KARISIN where IDPAC = 4757
524 0 select distinct H.TYP from DOKLADH H join DOKLADD D on H.IDHLAV = D.IDHLAV where ((H.RODCIS = '7553221918'/* RODCIS */) or (H.RODCIS is null)) and (D.RODCIS = '7553221918'/* RODCIS */) and (H.IDA is NULL) and (H.POJ = '207'/* POJ */ ) and (H.ICZ = '09305001'/* ICZ */) and (H.HODB = '001'/* ODB */)
525 0 select 'acDokladHCes', 'DOC%C' || case count(*) when 0 then '' else 'X' end from CESH join CESD on CESD.IDHLAV = CESH.IDHLAV
where (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */)
union
select 'acDokladHLaz', 'DOC%L' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='L') AND (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHOzdrav', 'DOC%V' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='O') AND (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHDrg', 'DOC%D' || case count(*) when 0 then '' else 'X' end from DRG where (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */)
union
select 'acDokladHOrtop', 'DOC%O' || case count(*) when 0 then '' else 'X' end from POU where (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */)
union
select 'acDokladHFoni', 'DOC%F' || case count(*) when 0 then '' else 'X' end from POUFONIH where (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */) and exists(select ID from POUFONID where IDHLAV = POUFONIH.IDHLAV)
526 0 select KAR.DATNAR,(select first 1 STAV from ES_PACIDENT join ES_PAC on (ES_PAC.ID=ES_PACIDENT.PAC_ID) left join ES_BROKER on (ES_BROKER.id_es_pac = ES_PAC.ID) where ((ES_PAC.idpac = kar.idpac) or (ES_BROKER.idpac = kar.idpac)) and ES_PACIDENT.INST_ID = 0) as ES_STAV,KAR.IDPAC,KAR.INFORMACE,KAR.INFORMACE_COL,KAR.JMENO,(select first 1 KZ.IDZAR from KARZARAZENI KZ where (KZ.IDPAC=KAR.IDPAC) and (KZ.DATUM is null or (KZ.DATUM<=CURRENT_DATE)) and (KZ.DATUMDO is null or (KZ.DATUMDO>=CURRENT_DATE)) order by KZ.ID) as K_ZARZAR,KAR.POHLAVI,GPP.POJ,KAR.POZNAMKA,KAR.PRIJMENI,KAR.PRIJMENI_UP,(select DATUM_REGISTRACE from SP_GETREGDAT(kar.IDPAC)) as REGDATUM,KAR.REGISTROVAL,(select PRIZNAK from SP_GETREGDAT(kar.IDPAC)) as REGPRIZNAK,KAR.RODCIS,KAR.ROZENA,(select first 1 OUTCOLS from GETKARZARAZENICOLORS(kar.idpac, '2026-03-20')) as SKUPINY,KAR.TITUL,KAR.TITULZA,KAR.TRVOBEC,KAR.TRVPSC,KAR.TRVULICE,KAR.VYRAZEN
from kar join kar_sortby_idlist('4757') on idfromlist = idpac
left join GETPACPOJ(KAR.IDPAC, '2026-03-20') GPP on GPP.IDPAC = KAR.IDPAC
where (VYRAZEN = 'N')
ORDER BY IDX ASC
527 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
528 0 select first 1 ALERGIE from ANAMNEZA where IDPAC = 4757/* IDPAC */ and DATUM <= '20.03.2026'/* DATUM */
ORDER BY DATUM DESC
, ID DESC
529 0 select first 1 KAP_CHECK, KAP_STAV from KARB2B where IDPAC = 4757 and ICP='09305001'
530 0 select first 1 VAKCINACE_CHECK, VAKCINACE_STAV, VAKCINACE_DATUM from KARISIN where IDPAC = 4757
531 0 select distinct H.TYP from DOKLADH H join DOKLADD D on H.IDHLAV = D.IDHLAV where ((H.RODCIS = '7553221918'/* RODCIS */) or (H.RODCIS is null)) and (D.RODCIS = '7553221918'/* RODCIS */) and (H.IDA is NULL) and (H.POJ = '207'/* POJ */ ) and (H.ICZ = '09305001'/* ICZ */) and (H.HODB = '001'/* ODB */)
532 0 select 'acDokladHCes', 'DOC%C' || case count(*) when 0 then '' else 'X' end from CESH join CESD on CESD.IDHLAV = CESH.IDHLAV
where (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */)
union
select 'acDokladHLaz', 'DOC%L' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='L') AND (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHOzdrav', 'DOC%V' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='O') AND (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHDrg', 'DOC%D' || case count(*) when 0 then '' else 'X' end from DRG where (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */)
union
select 'acDokladHOrtop', 'DOC%O' || case count(*) when 0 then '' else 'X' end from POU where (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */)
union
select 'acDokladHFoni', 'DOC%F' || case count(*) when 0 then '' else 'X' end from POUFONIH where (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */) and exists(select ID from POUFONID where IDHLAV = POUFONIH.IDHLAV)
533 0 select idicz from ICZ where poj = '207' and icz = '09305000'
534 0 select icp from ICP where idicz = '15' and odb = '001'
535 0 select idicz from ICZ where poj = '207' and icz = '09305000'
536 0 select icp from ICP where idicz = '15' and odb = '001'
537 0 select cast('BalickyPac' as varchar(11)) as ID, substring(cast(BPAC.KOD as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(BPAC.CENPASMO as VARCHAR(70)) from 1 for 30) as VAR2, cast(BPAC.DATUMOD as DATE) as DATE1, cast(BPAC.DATUMDO as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from BALICKYPAC BPAC left join SP_BALICKYPAC_PRIZNAK(BPAC.ID, '20.03.2026') PRI on 1 = 1 where BPAC.IDPAC = 4757 and PRI.PRIZNAK in ('A', 'B') union select cast('Dluh' as varchar(11)) as ID, substring(cast(P.MENA as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast((SUM(P.CENA - P.SLEVAC) - (SUM(P.PLATBA) + SUM((COALESCE((select SUM(case ZD.TYP when 'R' then ZD.CELKEM else -ZD.CELKEM end) from PLADET ZD where ZD.IDPLA = P.IDPLA and (ZD.TYP <> P.DOKLADTYP) and (ZD.TYP <> '|') and ((ZD.CENA < 0) or (ZD.TYP = 'R'))), 0))))) as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM PLA P WHERE (P.IDPAC = 4757) AND (P.DOKLADTYP = 'F') AND (P.STORNO IS NULL) AND (P.NENISALDO = 'F') AND ((P.SPLATNOST IS NULL) OR (P.SPLATNOST < '2026-03-20')) AND (P.VALID = 'F') GROUP BY P.MENA union select cast('SouhlasPac' as varchar(11)) as ID, substring(cast(case when S.NAZEV is null then case when H.TYP = 'ZSOUPOS' then 'Souhlas/Nesouhlas s poskytnutím zdravotních služeb nezletilému' when H.TYP = 'ZSOUPOZ' then 'Souhlas zákonného zástupce nezletilého pacienta staršího 15ti let' when H.TYP = 'ZSOUPO2' then 'Nesouhlas s poskytnutím zdravotních služeb - povinné oèkování' when H.TYP = 'ZPOSIN2' then 'Urèení osoby oprávnìné dle zákona o zdravotních službách' when H.TYP = 'OdmPece' then 'Prohlášení o odmítnutí zdravotní péèe pacientem - Negativní revers' end else S.NAZEV end as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(H.DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from HISTDOC H left join SOUHLASPACSABL S on H.IDSOUHLASPACSABL = S.ID where H.TYP in ('IndSou', 'ZSOUPOS', 'ZSOUPOZ', 'ZSOUPO2', 'ZPOSIN2', 'OdmPece') and H.IDPACI = 4757 union select cast('sCenaVykZUM' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(coalesce(sum(cenabod),0) + coalesce(sum(cenamat),0) as NUMERIC(15,2)) as NUM1, cast((select coalesce(sum(cena),0) from LECD d where d.RODCIS = '7553221918' and extract(year from d.DATOSE) = '2026' and ((d.KAT is null) or (d.KAT <> 'N')) and exists (select h.IDLEC from LECH h where h.IDLEC = d.IDLEC and h.POJ = '207' and h.ICZ in ('09305001'))) as NUMERIC(15,2)) as NUM2 from DOKLADD d where d.RODCIS = '7553221918' and extract(year from d.DATOSE) = '2026' and ((d.KAT is null) or (d.KAT <> 'N' and d.KAT <> 'K' and d.KAT <> 'A')) and exists (select h.IDHLAV from DOKLADH h where h.IDHLAV = d.IDHLAV and h.POJ = '207' and h.ICZ in ('09305001')) union select cast('Registrl' as varchar(11)) as ID, substring(cast(REGISTROVAL as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from KAR where IDPAC = 4757 union select cast('OseLekPrak' as varchar(11)) as ID, substring(cast(F_CONCAT(PRIJMENI, F_CONCAT(JMENO, TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(TITUL2 as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(CAST(ODBORN as INTEGER) as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM KARUZIV_SEL(4757, 'T') WHERE ODBORN in ('001', '002') union select cast('SledLek' as varchar(11)) as ID, substring(cast(KOD as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(LEK as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from SLEDLEK where IDPAC = 4757 and DATUM <= '2026-03-20' union select first 10 cast('HistDoc' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from HISTDOC where IDPACI = 4757 and STAV is NULL and IDZARPR = 2 and IDODDPR = 2 and IDPRACPR = 2 union select first 1 cast('LastSms' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(SENDTIME) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from SMS where PACID = 4757 and SENDTIME is not NULL and not(STATUS in (100,1000)) union select first 1 cast('PozadLekar' as varchar(11)) as ID, substring(cast(H.EICZ as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(H.EODZ as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DOKLADH H where H.IDHLAV = (select first 1 I.IDHLAV from DOKLADH I where I.RODCIS = '7553221918' and I.EICZ is not NULL order by I.IDHLAV desc) union select first 10 cast('Prilohy' as varchar(11)) as ID, substring(cast(FILENAME as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from FILES where IDPAC = 4757 union select first 10 cast('Objednavky' as varchar(11)) as ID, substring(cast(F_CONCAT(U.PRIJMENI, F_CONCAT(U.JMENO, U.TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(PRAC as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(CAS as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from OBJOBJ O join PRACOVISTE P on (P.ID = O.IDPRAC) join UZIVATEL U on (U.IDUZI = O.IDUZI) where IDPAC = 4757 and DATUM >= '20.03.2026' union select cast('OseLek' as varchar(11)) as ID, substring(cast(F_CONCAT(PRIJMENI, F_CONCAT(JMENO, TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(TITUL2 as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM KARUZIV_SEL(4757, 'T') union select cast('PeProhlidky' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(TERMIN as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PREH join PREINIH on (PREH.IDPREINI = PREINIH.IDPREINI) where IDPAC = 4757 union select cast('Medikace' as varchar(11)) as ID, substring(cast(NAZ as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(PLATI_OD as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from MEDIKACE where IDPAC = 4757 and PLATI_OD <= '20.03.2026' and (PLATI_DO >= '20.03.2026' or PLATI_DO is NULL) union select cast('NextDispenz' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(SKUPINA as VARCHAR(70)) from 1 for 30) as VAR2, cast(PRISTI as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DISPAC join DISSKU on (DISSKU.IDDIS = DISPAC.IDDIS) where IDPAC = 4757 and PRISTI is not NULL union select cast('Dispenz' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(SKUPINA as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATZAR as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DISPAC join DISSKU on (DISSKU.IDDIS = DISPAC.IDDIS) where IDPAC = 4757 union select cast('Prohlidky' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PREPRI join PREINIH on (PREPRI.IDPREINI = PREINIH.IDPREINI) where IDPAC = 4757 and datum is not null union select cast('NextOck' as varchar(11)) as ID, substring(cast(coalesce(NAZ,ZKRATKA) as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUMD as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from OCKPRI o left join KLK k on o.ZKRATKA = k.KOD where IDPAC = 4757 union select first 1 cast('LastVykon' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, substring(cast(D.KOD as VARCHAR(70)) from 1 for 30) as VAR2, cast(D.DATOSE as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DOKLADD D where D.ID = (select first 1 dd.id from dokladd dd join dokladh dh on (dh.idhlav = dd.idhlav) where dd.rodcis = '7553221918' and (dh.hodb = '001' or dh.hodb is null) order by dd.datose desc) union select first 1 cast('LastDekurs' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(DATUM) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DEKURS where IDPAC = 4757 and (IDPRAC = 2 or IDPRAC = -1) union select first 1 cast('Karta' as varchar(11)) as ID, substring(cast(INFORMACE as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(CIZINEC as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(INFORMACE_COL as INTEGER) as INT1, POZNAMKA as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from KAR where IDPAC = 4757 union select first 1 cast('Saldo' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(SALDO as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PACIENT_SALDO(4757, 1, 0, 0) union select first 1 cast('Anamneza' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, substring(cast(KREVSKUP as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, ANAMNEZA as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ANAMNEZA where ID = (select first 1 ID from ANAMNEZA where IDPAC=4757 order by DATUM DESC, ID desc) union select first 20 cast('Ockovani' as varchar(11)) as ID, substring(cast(ockzaz.LATKA as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(ockzaz.ZKRATKA as VARCHAR(70)) from 1 for 30) as VAR2, cast(max(ockzaz.DATUM) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ockzaz where ockzaz.idpac = 4757 group by ockzaz.ZKRATKA, ockzaz.LATKA union select first 1 cast('NeschopenOd' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(ZACNES) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from NES where (IDPAC = 4757) and (ZACNES <= '20.03.2026') and ((KONNES is NULL) or (KONNES > '20.03.2026')) and (STORNO = 'F') union select first 1 cast('Alergie' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, ALERGIE as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ANAMNEZA where IDPAC = 4757 and ID = (select first 1 ID from ANAMNEZA where IDPAC = 4757 and DATUM <= '20.03.2026' order by DATUM desc, ID desc) union select first 1 cast('Pojistovna' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(P.IDICP as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ICP P join ICZ Z on (Z.IDICZ = P.IDICZ) where Z.POJ = '207' and P.ODB = '001'
538 0 select POHLAVI,PRIJMENI,JMENO,TITUL,(select first 1 POJ from GETPACPOJ(IDPAC, '20.03.2026 00:00:00.000'/* ODE_DNE */)) as POJ,DATNAR,RODCIS,IDSTAV,DRUHPOJ,TRVOBEC,TRVULICE,TRVPSC,PREOBEC,PREULICE,PREPSC,AKTIVBYDL,ZAMEST,ZAMADRESA,IDZAMEST,PROFES,OSCISLO,GEONOMU,(select KOD from GETPACCENPAS(IDPAC, '20.03.2026 00:00:00.000'/* ODE_DNE */)) as CENPAS,ROZENA,IZIPOD,STPRIS,ZUJEDN,PRUKAZ,TYPPECE,CIZINEC,TITULZA,DATREG,ZASTUPOVANY_ICP,IDISIN,UPRCHLIK from KAR where IDPAC = 4757/* ID */
539 0 select first 1 R.ID, R.DATUM from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 4757) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
540 0 select KOD from STALDGN where (IDPAC = 4757) and IDANAM = (select first 1 ID from ANAMNEZA where IDPAC = 4757 order by DATUM desc)
ORDER BY PORADI ASC
, KOD ASC
541 0 select first 1 N.ZACNES, D.DATUM, D.KAM, D.KAMODKUD, D.ICZ
from NES N left join NESD D on D.IDNES = N.ID
where (N.IDPAC = 4757) and (N.ZACNES <= '20.03.2026') and ((N.KONNES is NULL) or (N.KONNES > '20.03.2026')) and (N.STORNO = 'F')
ORDER BY N.ZACNES DESC
, D.DATUM DESC
, D.ID DESC
542 0 select PV.KOD,
(select first 1 D.DATOSE from DOKLADD D where D.RODCIS = '7553221918'/* RODCIS */ and D.KOD = PV.KOD order by DATOSE desc),
PV.JENREG,
PV.ODVYKAZANI
from PROHVYK PV
where (PV.ODBORN is NULL or PV.ODBORN = '001'/* ODB */)
and (PV.ICP is NULL or PV.ICP = '09305001'/* ICP */)
and (PV.VEKOD is NULL or PV.VEKOD <= 50/* VEKOD */)
and (PV.VEKDO is NULL or PV.VEKDO > 50/* VEKDO */)
and (PV.POHLAVI is NULL or PV.POHLAVI = 'Z'/* POHLAVI */)
ORDER BY PV.KOD ASC
543 0 select PV.KOD,
PV.JENREG,
PV.ODVYKAZANI
from PROHVYK PV
where (PV.ODBORN is NULL or PV.ODBORN = '001'/* ODB */)
and (PV.VEKOD is NULL or PV.VEKOD <= 50/* VEKOD */)
and (PV.VEKDO is NULL or PV.VEKDO > 50/* VEKDO */)
and (PV.POHLAVI is NULL or PV.POHLAVI = 'Z'/* POHLAVI */)
ORDER BY PV.KOD ASC
544 0 select S.NAZEV, M.NAZ, S.KOD from STALDGN S join MKN10 M on (M.KOD = S.KOD and (M.PLATIOD is NULL or M.PLATIOD <= 'NOW') and (M.PLATIDO is NULL or M.PLATIDO >= 'NOW')) where (S.IDPAC = 4757) and S.IDANAM = (select first 1 A.ID from ANAMNEZA A where A.IDPAC = 4757 order by A.DATUM desc)
ORDER BY S.PORADI ASC
, S.KOD ASC
545 0 select first 1 TP.DATUM from TEHPRO TP join TEH T on T.IDTEH = TP.IDTEH where T.IDPAC = 4757
ORDER BY TP.DATUM DESC
546 0 select first 1 DATUM from GENVYS where IDPAC = 4757 and TYP = 110
ORDER BY DATUM DESC
547 0 select first 1 KAP_CHECK, KAP_STAV, DALSI_KONTROLA from KARB2B where IDPAC = 4757 and ICP='09305001'
548 0 select first 1 T.WARN, T.POZN, T.DATUM from TEHKAL T where (T.IDPAC = 4757/* IDPAC */) and (T.DATUM >= '20.03.2026'/* DATUM */)
ORDER BY DATUM ASC
549 0 select first 1 (case T.VYPOCETDLE when 1 then (T.PM) else (T.UZ1POROD - 280) end) as POCATEKTEH
from Teh T
left join kar K on (K.idpac = T.IdPac)
where
(T.IDPAC = 4757/* IDPAC */) and
((ENDTEH>='20.03.2026 00:00:00.000'/* Dnes */) or (ENDTEH is null)) and /* pouze vysetreni pred datem ukonceni*/
(((PM is NULL) and (UZ1POROD is NULL) and (ENDTEH is null)) or /* nelze zjistit konec tehotenstvi*/
(T.PM >= ('20.03.2026 00:00:00.000'/* Dnes */ - (42*7))) or /* max. delka tehotenstvi dle PM 42 tyd. */
((PM is null) and (UZ1POROD+14 >= '20.03.2026 00:00:00.000'/* Dnes */)) /* max. termin dle UZ + 14 dni */
)
ORDER BY PM DESC NULLS LAST
, UZ1POROD DESC NULLS LAST
550 0 select first 1 ZAMEST, ZAMADRESA, PROFES, ICO from KAR left join FIRMY on FIRMY.FIRMA = KAR.ZAMEST where IDPAC = 4757 and (ZAMEST is not NULL or ZAMADRESA is not NULL or PROFES is not NULL)
551 0 select first 1 DATZAL from KAR where IDPAC = 4757
552 0 select first 1 BMI from SP_GETBMI(4757)
553 0 select first 1 puls from preh where (idpac = 4757) and not(puls is null)
ORDER BY datum DESC
554 0 select first 1 ZACNES, CISNES, ID, (select first 1 DATA from HISTDOC where TYP = 'POTDPN' and (IDPACI = 4757) and (DATA like '%CisNes=' || NES.CISNES || '%') order by DATUM desc) from NES where (IDPAC = 4757) and ('2026-03-20' >= ZACNES + 10) and ((KONNES is NULL) or (KONNES > '2026-03-20')) and (STORNO = 'F') and ((select count(*) from HISTDOC where TYP = 'POTDPN' and (IDPACI = 4757) and (extract(month from DATUM) || extract(year from DATUM) = extract(month from cast('2026-03-20' as date) + 4) || extract(year from cast('2026-03-20' as date) + 4)) and DATA like '%CisNes=' || NES.CISNES || '%') = 0) and (not exists(select Id from nesd where nesd.idnes = nes.id) or ((select first 1 Kam from nesd where nesd.idnes = nes.id order by nesd.datum desc, nesd.id desc) = 'N'))
ORDER BY ZACNES ASC
555 0 select first 1 ZACNES, CISNES, ID, POTVRZENI_VYDANO from NES where (IDPAC = 4757) and ('2026-03-20' >= ZACNES + 10) and ((KONNES is NULL) or (KONNES > '2026-03-20')) and (STORNO = 'F') and (extract(month from POTVRZENI_VYDANO) || extract(year from POTVRZENI_VYDANO) = extract(month from cast('2026-03-20' as date)) || extract(year from cast('2026-03-20' as date)))
ORDER BY ZACNES ASC
556 0 select * from GETPACPOJ(4757/* IDPAC */, '20.03.2026'/* ODE_DNE */)
557 0 select ID, IDPAC, ANAMNEZA, DATUM, ALERGIE, KREVSKUP,
HBSAG, DUCHOD, BEZMOCNOST, HIV, MESOD, MESDO,
MESTYP, BWR, ISOIMUN, PANEV, coalesce(POCPOROD, -1) as POCPOROD, coalesce(POCPOTRAT, -1) as POCPOTRAT,
coalesce(POCINTER, -1) as POCINTER, coalesce(POCOPER, -1) as POCOPER, IDUZIV, SIGNATURE, SIGNATURE_INFO,
IDCERTIFICATE, RHDATUM, RHVYSL, TRIZOMIE, NTD, VVV,
IZIPSTAT, KURAK, TST, KARDIOSTIM, CIGARETDENNE, FREKKOURENI,
(select first 1 vyska from preh where (idpac = anamneza.idpac) and (vyska is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) vyska,
(select first 1 vaha from preh where (idpac = anamneza.idpac) and (vaha is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) vaha,
(select first 1 puls from preh where (idpac = anamneza.idpac) and (puls is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) puls,
(select first 1 tlaksys from preh where (idpac = anamneza.idpac) and (tlaksys is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) tlaksys,
(select first 1 tlakdia from preh where (idpac = anamneza.idpac) and (tlakdia is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) tlakdia,
memporod, mempotrat, meminter, memoper, pm, ID_EDOKUMENT, PRUKAZ from ANAMNEZA where (IDPAC=4757/* IDPAC */)
ORDER BY DATUM DESC
, ID DESC
558 0 select AC.NAZEV,
AV.SVALUE,
AV.BDATA,
AV.NVALUE,
AV.DVALUE,
AF.USERMASK,
AV.TYP
from ANAMVALUES AV
left join ANAMVCFG AC on AC.IDTYPHODN = AV.IDTYPHODN
left join ANAMVFMT AF on AF.IDTYPHODN = AV.IDTYPHODN
where AV.IDPAC=4757/* IDPAC */ and AV.PLATIOD <= '11.12.2014'/* DATUM */ and AKTUAL = 'T'
ORDER BY AF.PORADI ASC
, AV.DATZAPIS DESC
, AV.PLATIOD DESC
559 0 execute block(IDPAC integer=4757/* IDPAC */, DATUM DATE='21.09.2025'/* DATUM */)
returns (VALUE_BF varchar(8), VALUE_AF varchar(8), LEK_KOD varchar (8), LEK_NAZ varchar(30))
as
declare variable TMPATC varchar(7) = '';
declare variable TMPSILA varchar(24) = '';
declare variable RDATUM date;
declare variable LEKKOD varchar(8) = '';
declare variable LEKNAZ varchar(30) = '';
declare variable HODN_BE varchar(8) = '-1';
declare variable HODN_AF varchar(8) = '-1';
begin
VALUE_BF = '-1';
VALUE_AF = '-1';
LEK_KOD = '';
LEK_NAZ = '';
select first 1 DATUM, KOD, LEK, ATC
from RECEPT
where
IDPAC = :IDPAC and
DATUM >= :DATUM and
(ATC starting with 'C10AA01' or
ATC starting with 'C10AA05' or
ATC starting with 'C10AA07')
order by datum desc
into :RDATUM, :LEKKOD, :LEKNAZ, :TMPATC;
if (RDATUM is null) then
begin
select first 1 m.DATUM, m.KOD, m.NAZ , l.ATC
from MEDIKACE m
join LEKY l on m.kod = l.kod
where
m.IDPAC = :IDPAC and
(m.PLATI_DO >= :DATUM or m.PLATI_DO is null) and
(l.ATC starting with 'C10AA01' or
l.ATC starting with 'C10AA05' or
l.ATC starting with 'C10AA07')
order by m.DATUM desc
into :RDATUM, :LEKKOD, :LEKNAZ, :TMPATC;
end
if (RDATUM is null) then
begin
VALUE_BF = -1;
VALUE_AF = -1;
LEK_KOD = '';
LEK_NAZ = '';
suspend;
exit;
end
if (RDATUM is not null) then
begin
begin
select first 1 VYSL
from LABVD D
join LABMETOD M on M.IDMETOD = D.IDMETOD and (M.KLICMZ in ('02322', '02323', '02324', '02325', '03379', '03380'))
join LABVH H on H.IDVH = D.IDVH
where D.IDPACIENT = :IDPAC and
H.DATUM <= :RDATUM
order by H.DATUM desc, D.ID desc
into :HODN_BE;
select STRING_OUT from sp_replace_char(:HODN_BE, ',', '.') into HODN_BE;
select first 1 VYSL
from LABVD D
join LABMETOD M on M.IDMETOD = D.IDMETOD and (M.KLICMZ in ('02322', '02323', '02324', '02325', '03379', '03380'))
join LABVH H on H.IDVH = D.IDVH
where D.IDPACIENT = :IDPAC and
H.DATUM >= :RDATUM
order by H.DATUM desc, D.ID desc
into :HODN_AF;
select STRING_OUT from sp_replace_char(:HODN_AF, ',', '.') into HODN_AF;
end
if (((HODN_AF > '-1') and (HODN_AF > '0')) and ((HODN_BE = '-1') or (HODN_BE is null))) then
begin
HODN_BE = HODN_AF;
select first 1 SILA from LEKY where KOD = :LEKKOD and (PLATIDO is null or PLATIDO <= 'TODAY')
into :TMPSILA;
if ((substring(TMPSILA from 1 for 2) = '10') and (TMPATC = 'C10AA01')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.28 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '10') and (TMPATC = 'C10AA05')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.37 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '10') and (TMPATC = 'C10AA07')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.46 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '20') and (TMPATC = 'C10AA01')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.35 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '20') and (TMPATC = 'C10AA05')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.43 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '20') and (TMPATC = 'C10AA07')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.52 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '40') and (TMPATC = 'C10AA01')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.39 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '40') and (TMPATC = 'C10AA05')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.48 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '40') and (TMPATC = 'C10AA07')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.55 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '80') and (TMPATC = 'C10AA01')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.46 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '80') and (TMPATC = 'C10AA05')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.51 from 1 for 5);
end
end
begin
VALUE_BF = :hodn_be;
VALUE_AF = :hodn_af;
LEK_KOD = :lekkod;
LEK_NAZ = :leknaz;
suspend;
end
end
560 0 select heslotelkom from KAR where idpac = 4757
561 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 4757) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
562 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'PSA'/* TYP */ and IDPAC = 4757/* IDPAC */
ORDER BY DATUM DESC
563 0 select K.POHLAVI as POHLAVI, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 KOD from STALDGN where IDPAC = K.IDPAC and IDANAM = (select first 1 ID from ANAMNEZA where IDPAC = K.IDPAC order by DATUM desc, ID desc) and KOD like 'C61%') as DGN, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('01131', '01132', '01133', '01134') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('01131', '01132', '01133', '01134') order by DATOSE desc, ID desc) as VYKON from KAR K where K.IDPAC = 4757/* IDPAC */
564 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 4757) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
565 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'TOKS'/* TYP */ and IDPAC = 4757/* IDPAC */
ORDER BY DATUM DESC
566 0 select K.DATNAR as DATNAR, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('15120', '15121') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('15120', '15121') order by DATOSE desc, ID desc) as VYKON from KAR K where K.IDPAC = 4757/* IDPAC */
567 0 select D.DATOSE from DOKLADD D where D.ID = (select first 1 DD.ID from DOKLADD DD where DD.RODCIS = '7553221918'/* RODCIS */ and DD.KOD in ('15120') order by DD.DATOSE desc)
568 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 4757) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
569 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'FRAX'/* TYP */ and IDPAC = 4757/* IDPAC */
ORDER BY DATUM DESC
570 0 select K.DATNAR, K.POHLAVI, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('11320', '11321', '11327') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('11320', '11321', '11327') order by DATOSE desc, ID desc) as VYKON, (select first 1 "DATA" from GENVYS where IDPAC = 4757/* IDPAC */ and TYP = 112/* TYP */ order by DATUM desc, IDPRE desc) as DXADATA, (select first 1 DATUM from GENVYS where IDPAC = 4757/* IDPAC */ and TYP = 112/* TYP */ order by DATUM desc, IDPRE desc) as DXADATUM from KAR K where K.IDPAC = 4757/* IDPAC */
571 0 select D.DATOSE from DOKLADD D where D.ID = (select first 1 DD.ID from DOKLADD DD where DD.RODCIS = '7553221918'/* RODCIS */ and DD.KOD in ('11320', '11321') order by DD.DATOSE desc)
572 0 select first 1 RPRUKAZ from KAR where IDPAC = 4757
573 0 select first 1 ZPRUKAZ from KAR where IDPAC = 4757
574 0 execute procedure sp_log(4757/* idpac */, 10000/* tblid */, 4757/* recid */, 'V', NULL/* rodcis */, NULL/* id1 */, NULL/* detail */)
575 0 SELECT ID,IDUZIV,IDPRAC,SECRET_TYPE,SECRET FROM KEYSTORE WHERE coalesce(IDUZIV,0)=6/* IDUZIV */ AND coalesce(IDPRAC,0)=2/* IDPRAC */ AND SECRET_TYPE='SUKLPASS'/* SECRET_TYPE */
576 0 select ID,Obsah from Options where
(Category='Global'/* Category */) and
(Name='CheckVersion'/* Name */) and
(Login='2|6'/* Login */)
577 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
578 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
579 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
580 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
581 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
582 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
583 0 execute procedure SP_UPDATE_USER_TIMESTAMP(7846, 6, 2, '//////////////////8=', 'NTBVBHP470G10', '3.61.0.371')
584 0 select FSDATS from STAV where ID = 7846/* ID */
585 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
586 0 select first 1 * from MEDINETIN I where ((I.STAV <> 1) or (I.STAV is null)) and CGMNUMBER_PRIJEMCE in ('01300149556')
587 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
588 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
589 0 select servertimestamp from sp_servertimestamp
590 0 select first 1 LOGIN from OPTIONS where CATEGORY = 'MediWorker' and ID = 924578946
591 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
592 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
593 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
594 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
595 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
596 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
597 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
598 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
599 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
600 0 execute procedure SP_UPDATE_USER_TIMESTAMP(7846, 6, 2, '//////////////////8=', 'NTBVBHP470G10', '3.61.0.371')
601 0 select FSDATS from STAV where ID = 7846/* ID */
602 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
603 0 select first 1 * from MEDINETIN I where ((I.STAV <> 1) or (I.STAV is null)) and CGMNUMBER_PRIJEMCE in ('01300149556')
604 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
605 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
606 0 select servertimestamp from sp_servertimestamp
607 0 select first 1 LOGIN from OPTIONS where CATEGORY = 'MediWorker' and ID = 924578946
608 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
609 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
610 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
611 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
612 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
613 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
614 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
615 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
616 0 execute procedure SP_UPDATE_USER_TIMESTAMP(7846, 6, 2, '//////////////////8=', 'NTBVBHP470G10', '3.61.0.371')
617 0 select FSDATS from STAV where ID = 7846/* ID */
618 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
619 0 select distinct(ID_ESINSTITUCE) as ID_ESINSTITUCE,
(select first 1 MI.ID
from MEDINETRECIP MI
where MI.CGMNUMBER = ESI.NUMBER) as ID_MEDICALNET, coalesce((select first 1 MI.DISPLAYNAME
from MEDINETRECIP MI
where MI.CGMNUMBER = ESI.NUMBER), ESI.NAZEV || ', ' || ESI.ZARIZENI) as ZARIZENI,
ESI.VXKEY, ESI.UID, ESI.NUMBER as CGMNUMBER, ESI.EMAIL
from (select coalesce(PU.ID_ESINSTITUCE, P.ID_ESINSTITUCE, O.ID_ESINSTITUCE, Z.ID_ESINSTITUCE) as ID_ESINSTITUCE
from ZARIZENI Z
join ODDEL O on O.IDZAR = Z.ID
join PRACOVISTE P on P.IDODDEL = O.ID
join PRACUZIV PU on PU.IDPRAC = P.ID
join UZIVATEL U on U.IDUZI = PU.IDUZIV
where PU.ID = 6/* PUID */ and
U.AKTIVNI = 'T'
union all
select distinct(ID_ESINSTITUCE) as ID_ESINSTITUCE
from ES_GROUP_INT
left join ES_GROUP on (ES_GROUP_INT.IDGROUP = ES_GROUP.ID)
where (ES_GROUP.IDPRAC = 2/* IDPRAC */) or (ES_GROUP.IDODD = 2/* IDODD */) or (ES_GROUP.IDZAR = 2/* IDZAR */) or (ES_GROUP.IDPRACUZI = 6/* IDPRACUZIV */))
join ES_INSTITUCE ESI on ESI.ID = ID_ESINSTITUCE
where
ESI.CLICKBOX = 'A'
ORDER BY ZARIZENI ASC
620 0 select first 1 * from MEDINETIN I where ((I.STAV <> 1) or (I.STAV is null)) and CGMNUMBER_PRIJEMCE in ('01300149556')
621 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
622 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
623 0 select servertimestamp from sp_servertimestamp
624 0 select first 1 LOGIN from OPTIONS where CATEGORY = 'MediWorker' and ID = 924578946
625 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
626 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
627 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
628 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
629 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
630 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
631 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
632 0 select first 1 * from KAR
633 0 select ID_ESINSTITUCE from ( select coalesce(PU.ID_ESINSTITUCE, P.ID_ESINSTITUCE, O.ID_ESINSTITUCE, Z.ID_ESINSTITUCE) ID_ESINSTITUCE from PRACUZIV PU left join PRACOVISTE P on (P.ID=PU.IDPRAC) left join ODDEL O on (P.IDODDEL=O.ID) left join ZARIZENI Z on (O.IDZAR=Z.ID) where PU.IDPRAC = 2 and PU.IDUZIV = 6 ) ORGS where exists (select ID from ES_INSTITUCE where ID = ORGS.ID_ESINSTITUCE and ESERVICES = 'T')
634 0 select KAR.DATNAR,(select first 1 STAV from ES_PACIDENT join ES_PAC on (ES_PAC.ID=ES_PACIDENT.PAC_ID) left join ES_BROKER on (ES_BROKER.id_es_pac = ES_PAC.ID) where ((ES_PAC.idpac = kar.idpac) or (ES_BROKER.idpac = kar.idpac)) and ES_PACIDENT.INST_ID = 0) as ES_STAV,KAR.IDPAC,KAR.INFORMACE,KAR.INFORMACE_COL,KAR.JMENO,(select first 1 KZ.IDZAR from KARZARAZENI KZ where (KZ.IDPAC=KAR.IDPAC) and (KZ.DATUM is null or (KZ.DATUM<=CURRENT_DATE)) and (KZ.DATUMDO is null or (KZ.DATUMDO>=CURRENT_DATE)) order by KZ.ID) as K_ZARZAR,KAR.POHLAVI,GPP.POJ,KAR.POZNAMKA,KAR.PRIJMENI,KAR.PRIJMENI_UP,(select DATUM_REGISTRACE from SP_GETREGDAT(kar.IDPAC)) as REGDATUM,KAR.REGISTROVAL,(select PRIZNAK from SP_GETREGDAT(kar.IDPAC)) as REGPRIZNAK,KAR.RODCIS,KAR.ROZENA,(select first 1 OUTCOLS from GETKARZARAZENICOLORS(kar.idpac, '2026-03-20')) as SKUPINY,KAR.TITUL,KAR.TITULZA,KAR.TRVOBEC,KAR.TRVPSC,KAR.TRVULICE,KAR.VYRAZEN
from KAR
left join GETPACPOJ(KAR.IDPAC, '2026-03-20') GPP on GPP.IDPAC = KAR.IDPAC
where (vyrazen = 'N') and exists (select id from registr r join icp i on r.idicp = i.idicp where r.idpac = kar.idpac and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20') and (r.priznak in ('V','D','A')) and (i.icp = '09305001') and (i.odb = '001'))
ORDER BY KAR.PRIJMENI_UP ASC
, KAR.RODCIS ASC
635 0 select first 1 ALERGIE from ANAMNEZA where IDPAC = 3234/* IDPAC */ and DATUM <= '20.03.2026'/* DATUM */
ORDER BY DATUM DESC
, ID DESC
636 0 select first 1 KAP_CHECK, KAP_STAV from KARB2B where IDPAC = 3234 and ICP='09305001'
637 0 select first 1 VAKCINACE_CHECK, VAKCINACE_STAV, VAKCINACE_DATUM from KARISIN where IDPAC = 3234
638 0 select distinct H.TYP from DOKLADH H join DOKLADD D on H.IDHLAV = D.IDHLAV where ((H.RODCIS = '486122443'/* RODCIS */) or (H.RODCIS is null)) and (D.RODCIS = '486122443'/* RODCIS */) and (H.IDA is NULL) and (H.POJ = '111'/* POJ */ ) and (H.ICZ = '09305001'/* ICZ */) and (H.HODB = '001'/* ODB */)
639 0 select 'acDokladHCes', 'DOC%C' || case count(*) when 0 then '' else 'X' end from CESH join CESD on CESD.IDHLAV = CESH.IDHLAV
where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHLaz', 'DOC%L' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='L') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHOzdrav', 'DOC%V' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='O') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHDrg', 'DOC%D' || case count(*) when 0 then '' else 'X' end from DRG where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHOrtop', 'DOC%O' || case count(*) when 0 then '' else 'X' end from POU where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHFoni', 'DOC%F' || case count(*) when 0 then '' else 'X' end from POUFONIH where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from POUFONID where IDHLAV = POUFONIH.IDHLAV)
640 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
641 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
642 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
643 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
644 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
645 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
646 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
647 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
648 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
649 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
650 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
651 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
652 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
653 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
654 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
655 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
656 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
657 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
658 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
659 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
660 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
661 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
662 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
663 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
664 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
665 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
666 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
667 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
668 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
669 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
670 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
671 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
672 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
673 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
674 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
675 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
676 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
677 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
678 0 select first 1 ALERGIE from ANAMNEZA where IDPAC = 3234/* IDPAC */ and DATUM <= '20.03.2026'/* DATUM */
ORDER BY DATUM DESC
, ID DESC
679 0 select first 1 KAP_CHECK, KAP_STAV from KARB2B where IDPAC = 3234 and ICP='09305001'
680 0 select first 1 VAKCINACE_CHECK, VAKCINACE_STAV, VAKCINACE_DATUM from KARISIN where IDPAC = 3234
681 0 select distinct H.TYP from DOKLADH H join DOKLADD D on H.IDHLAV = D.IDHLAV where ((H.RODCIS = '486122443'/* RODCIS */) or (H.RODCIS is null)) and (D.RODCIS = '486122443'/* RODCIS */) and (H.IDA is NULL) and (H.POJ = '111'/* POJ */ ) and (H.ICZ = '09305001'/* ICZ */) and (H.HODB = '001'/* ODB */)
682 0 select 'acDokladHCes', 'DOC%C' || case count(*) when 0 then '' else 'X' end from CESH join CESD on CESD.IDHLAV = CESH.IDHLAV
where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHLaz', 'DOC%L' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='L') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHOzdrav', 'DOC%V' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='O') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHDrg', 'DOC%D' || case count(*) when 0 then '' else 'X' end from DRG where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHOrtop', 'DOC%O' || case count(*) when 0 then '' else 'X' end from POU where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHFoni', 'DOC%F' || case count(*) when 0 then '' else 'X' end from POUFONIH where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from POUFONID where IDHLAV = POUFONIH.IDHLAV)
683 0 select idicz from ICZ where poj = '111' and icz = '09305000'
684 0 select icp from ICP where idicz = '12' and odb = '001'
685 0 select idicz from ICZ where poj = '111' and icz = '09305000'
686 0 select icp from ICP where idicz = '12' and odb = '001'
687 0 select cast('BalickyPac' as varchar(11)) as ID, substring(cast(BPAC.KOD as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(BPAC.CENPASMO as VARCHAR(70)) from 1 for 30) as VAR2, cast(BPAC.DATUMOD as DATE) as DATE1, cast(BPAC.DATUMDO as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from BALICKYPAC BPAC left join SP_BALICKYPAC_PRIZNAK(BPAC.ID, '20.03.2026') PRI on 1 = 1 where BPAC.IDPAC = 3234 and PRI.PRIZNAK in ('A', 'B') union select cast('Dluh' as varchar(11)) as ID, substring(cast(P.MENA as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast((SUM(P.CENA - P.SLEVAC) - (SUM(P.PLATBA) + SUM((COALESCE((select SUM(case ZD.TYP when 'R' then ZD.CELKEM else -ZD.CELKEM end) from PLADET ZD where ZD.IDPLA = P.IDPLA and (ZD.TYP <> P.DOKLADTYP) and (ZD.TYP <> '|') and ((ZD.CENA < 0) or (ZD.TYP = 'R'))), 0))))) as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM PLA P WHERE (P.IDPAC = 3234) AND (P.DOKLADTYP = 'F') AND (P.STORNO IS NULL) AND (P.NENISALDO = 'F') AND ((P.SPLATNOST IS NULL) OR (P.SPLATNOST < '2026-03-20')) AND (P.VALID = 'F') GROUP BY P.MENA union select cast('SouhlasPac' as varchar(11)) as ID, substring(cast(case when S.NAZEV is null then case when H.TYP = 'ZSOUPOS' then 'Souhlas/Nesouhlas s poskytnutím zdravotních služeb nezletilému' when H.TYP = 'ZSOUPOZ' then 'Souhlas zákonného zástupce nezletilého pacienta staršího 15ti let' when H.TYP = 'ZSOUPO2' then 'Nesouhlas s poskytnutím zdravotních služeb - povinné oèkování' when H.TYP = 'ZPOSIN2' then 'Urèení osoby oprávnìné dle zákona o zdravotních službách' when H.TYP = 'OdmPece' then 'Prohlášení o odmítnutí zdravotní péèe pacientem - Negativní revers' end else S.NAZEV end as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(H.DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from HISTDOC H left join SOUHLASPACSABL S on H.IDSOUHLASPACSABL = S.ID where H.TYP in ('IndSou', 'ZSOUPOS', 'ZSOUPOZ', 'ZSOUPO2', 'ZPOSIN2', 'OdmPece') and H.IDPACI = 3234 union select cast('sCenaVykZUM' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(coalesce(sum(cenabod),0) + coalesce(sum(cenamat),0) as NUMERIC(15,2)) as NUM1, cast((select coalesce(sum(cena),0) from LECD d where d.RODCIS = '486122443' and extract(year from d.DATOSE) = '2026' and ((d.KAT is null) or (d.KAT <> 'N')) and exists (select h.IDLEC from LECH h where h.IDLEC = d.IDLEC and h.POJ = '111' and h.ICZ in ('09305001'))) as NUMERIC(15,2)) as NUM2 from DOKLADD d where d.RODCIS = '486122443' and extract(year from d.DATOSE) = '2026' and ((d.KAT is null) or (d.KAT <> 'N' and d.KAT <> 'K' and d.KAT <> 'A')) and exists (select h.IDHLAV from DOKLADH h where h.IDHLAV = d.IDHLAV and h.POJ = '111' and h.ICZ in ('09305001')) union select cast('Registrl' as varchar(11)) as ID, substring(cast(REGISTROVAL as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from KAR where IDPAC = 3234 union select cast('OseLekPrak' as varchar(11)) as ID, substring(cast(F_CONCAT(PRIJMENI, F_CONCAT(JMENO, TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(TITUL2 as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(CAST(ODBORN as INTEGER) as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM KARUZIV_SEL(3234, 'T') WHERE ODBORN in ('001', '002') union select cast('SledLek' as varchar(11)) as ID, substring(cast(KOD as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(LEK as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from SLEDLEK where IDPAC = 3234 and DATUM <= '2026-03-20' union select first 10 cast('HistDoc' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from HISTDOC where IDPACI = 3234 and STAV is NULL and IDZARPR = 2 and IDODDPR = 2 and IDPRACPR = 2 union select first 1 cast('LastSms' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(SENDTIME) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from SMS where PACID = 3234 and SENDTIME is not NULL and not(STATUS in (100,1000)) union select first 1 cast('PozadLekar' as varchar(11)) as ID, substring(cast(H.EICZ as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(H.EODZ as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DOKLADH H where H.IDHLAV = (select first 1 I.IDHLAV from DOKLADH I where I.RODCIS = '486122443' and I.EICZ is not NULL order by I.IDHLAV desc) union select first 10 cast('Prilohy' as varchar(11)) as ID, substring(cast(FILENAME as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from FILES where IDPAC = 3234 union select first 10 cast('Objednavky' as varchar(11)) as ID, substring(cast(F_CONCAT(U.PRIJMENI, F_CONCAT(U.JMENO, U.TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(PRAC as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(CAS as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from OBJOBJ O join PRACOVISTE P on (P.ID = O.IDPRAC) join UZIVATEL U on (U.IDUZI = O.IDUZI) where IDPAC = 3234 and DATUM >= '20.03.2026' union select cast('OseLek' as varchar(11)) as ID, substring(cast(F_CONCAT(PRIJMENI, F_CONCAT(JMENO, TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(TITUL2 as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM KARUZIV_SEL(3234, 'T') union select cast('PeProhlidky' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(TERMIN as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PREH join PREINIH on (PREH.IDPREINI = PREINIH.IDPREINI) where IDPAC = 3234 union select cast('Medikace' as varchar(11)) as ID, substring(cast(NAZ as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(PLATI_OD as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from MEDIKACE where IDPAC = 3234 and PLATI_OD <= '20.03.2026' and (PLATI_DO >= '20.03.2026' or PLATI_DO is NULL) union select cast('NextDispenz' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(SKUPINA as VARCHAR(70)) from 1 for 30) as VAR2, cast(PRISTI as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DISPAC join DISSKU on (DISSKU.IDDIS = DISPAC.IDDIS) where IDPAC = 3234 and PRISTI is not NULL union select cast('Dispenz' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(SKUPINA as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATZAR as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DISPAC join DISSKU on (DISSKU.IDDIS = DISPAC.IDDIS) where IDPAC = 3234 union select cast('Prohlidky' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PREPRI join PREINIH on (PREPRI.IDPREINI = PREINIH.IDPREINI) where IDPAC = 3234 and datum is not null union select cast('NextOck' as varchar(11)) as ID, substring(cast(coalesce(NAZ,ZKRATKA) as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUMD as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from OCKPRI o left join KLK k on o.ZKRATKA = k.KOD where IDPAC = 3234 union select first 1 cast('LastVykon' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, substring(cast(D.KOD as VARCHAR(70)) from 1 for 30) as VAR2, cast(D.DATOSE as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DOKLADD D where D.ID = (select first 1 dd.id from dokladd dd join dokladh dh on (dh.idhlav = dd.idhlav) where dd.rodcis = '486122443' and (dh.hodb = '001' or dh.hodb is null) order by dd.datose desc) union select first 1 cast('LastDekurs' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(DATUM) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DEKURS where IDPAC = 3234 and (IDPRAC = 2 or IDPRAC = -1) union select first 1 cast('Karta' as varchar(11)) as ID, substring(cast(INFORMACE as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(CIZINEC as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(INFORMACE_COL as INTEGER) as INT1, POZNAMKA as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from KAR where IDPAC = 3234 union select first 1 cast('Saldo' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(SALDO as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PACIENT_SALDO(3234, 1, 0, 0) union select first 1 cast('Anamneza' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, substring(cast(KREVSKUP as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, ANAMNEZA as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ANAMNEZA where ID = (select first 1 ID from ANAMNEZA where IDPAC=3234 order by DATUM DESC, ID desc) union select first 20 cast('Ockovani' as varchar(11)) as ID, substring(cast(ockzaz.LATKA as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(ockzaz.ZKRATKA as VARCHAR(70)) from 1 for 30) as VAR2, cast(max(ockzaz.DATUM) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ockzaz where ockzaz.idpac = 3234 group by ockzaz.ZKRATKA, ockzaz.LATKA union select first 1 cast('NeschopenOd' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(ZACNES) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from NES where (IDPAC = 3234) and (ZACNES <= '20.03.2026') and ((KONNES is NULL) or (KONNES > '20.03.2026')) and (STORNO = 'F') union select first 1 cast('Alergie' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, ALERGIE as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ANAMNEZA where IDPAC = 3234 and ID = (select first 1 ID from ANAMNEZA where IDPAC = 3234 and DATUM <= '20.03.2026' order by DATUM desc, ID desc) union select first 1 cast('Pojistovna' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(P.IDICP as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ICP P join ICZ Z on (Z.IDICZ = P.IDICZ) where Z.POJ = '111' and P.ODB = '001'
688 0 select POHLAVI,PRIJMENI,JMENO,TITUL,(select first 1 POJ from GETPACPOJ(IDPAC, '20.03.2026 00:00:00.000'/* ODE_DNE */)) as POJ,DATNAR,RODCIS,IDSTAV,DRUHPOJ,TRVOBEC,TRVULICE,TRVPSC,PREOBEC,PREULICE,PREPSC,AKTIVBYDL,ZAMEST,ZAMADRESA,IDZAMEST,PROFES,OSCISLO,GEONOMU,(select KOD from GETPACCENPAS(IDPAC, '20.03.2026 00:00:00.000'/* ODE_DNE */)) as CENPAS,ROZENA,IZIPOD,STPRIS,ZUJEDN,PRUKAZ,TYPPECE,CIZINEC,TITULZA,DATREG,ZASTUPOVANY_ICP,IDISIN,UPRCHLIK from KAR where IDPAC = 3234/* ID */
689 0 select first 1 R.ID, R.DATUM from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
690 0 select KOD from STALDGN where (IDPAC = 3234) and IDANAM = (select first 1 ID from ANAMNEZA where IDPAC = 3234 order by DATUM desc)
ORDER BY PORADI ASC
, KOD ASC
691 0 select first 1 N.ZACNES, D.DATUM, D.KAM, D.KAMODKUD, D.ICZ
from NES N left join NESD D on D.IDNES = N.ID
where (N.IDPAC = 3234) and (N.ZACNES <= '20.03.2026') and ((N.KONNES is NULL) or (N.KONNES > '20.03.2026')) and (N.STORNO = 'F')
ORDER BY N.ZACNES DESC
, D.DATUM DESC
, D.ID DESC
692 0 select PV.KOD,
(select first 1 D.DATOSE from DOKLADD D where D.RODCIS = '486122443'/* RODCIS */ and D.KOD = PV.KOD order by DATOSE desc),
PV.JENREG,
PV.ODVYKAZANI
from PROHVYK PV
where (PV.ODBORN is NULL or PV.ODBORN = '001'/* ODB */)
and (PV.ICP is NULL or PV.ICP = '09305001'/* ICP */)
and (PV.VEKOD is NULL or PV.VEKOD <= 77/* VEKOD */)
and (PV.VEKDO is NULL or PV.VEKDO > 77/* VEKDO */)
and (PV.POHLAVI is NULL or PV.POHLAVI = 'Z'/* POHLAVI */)
ORDER BY PV.KOD ASC
693 0 select PV.KOD,
PV.JENREG,
PV.ODVYKAZANI
from PROHVYK PV
where (PV.ODBORN is NULL or PV.ODBORN = '001'/* ODB */)
and (PV.VEKOD is NULL or PV.VEKOD <= 77/* VEKOD */)
and (PV.VEKDO is NULL or PV.VEKDO > 77/* VEKDO */)
and (PV.POHLAVI is NULL or PV.POHLAVI = 'Z'/* POHLAVI */)
ORDER BY PV.KOD ASC
694 0 select S.NAZEV, M.NAZ, S.KOD from STALDGN S join MKN10 M on (M.KOD = S.KOD and (M.PLATIOD is NULL or M.PLATIOD <= 'NOW') and (M.PLATIDO is NULL or M.PLATIDO >= 'NOW')) where (S.IDPAC = 3234) and S.IDANAM = (select first 1 A.ID from ANAMNEZA A where A.IDPAC = 3234 order by A.DATUM desc)
ORDER BY S.PORADI ASC
, S.KOD ASC
695 0 select first 1 TP.DATUM from TEHPRO TP join TEH T on T.IDTEH = TP.IDTEH where T.IDPAC = 3234
ORDER BY TP.DATUM DESC
696 0 select first 1 DATUM from GENVYS where IDPAC = 3234 and TYP = 110
ORDER BY DATUM DESC
697 0 select first 1 KAP_CHECK, KAP_STAV, DALSI_KONTROLA from KARB2B where IDPAC = 3234 and ICP='09305001'
698 0 select first 1 T.WARN, T.POZN, T.DATUM from TEHKAL T where (T.IDPAC = 3234/* IDPAC */) and (T.DATUM >= '20.03.2026'/* DATUM */)
ORDER BY DATUM ASC
699 0 select first 1 (case T.VYPOCETDLE when 1 then (T.PM) else (T.UZ1POROD - 280) end) as POCATEKTEH
from Teh T
left join kar K on (K.idpac = T.IdPac)
where
(T.IDPAC = 3234/* IDPAC */) and
((ENDTEH>='20.03.2026 00:00:00.000'/* Dnes */) or (ENDTEH is null)) and /* pouze vysetreni pred datem ukonceni*/
(((PM is NULL) and (UZ1POROD is NULL) and (ENDTEH is null)) or /* nelze zjistit konec tehotenstvi*/
(T.PM >= ('20.03.2026 00:00:00.000'/* Dnes */ - (42*7))) or /* max. delka tehotenstvi dle PM 42 tyd. */
((PM is null) and (UZ1POROD+14 >= '20.03.2026 00:00:00.000'/* Dnes */)) /* max. termin dle UZ + 14 dni */
)
ORDER BY PM DESC NULLS LAST
, UZ1POROD DESC NULLS LAST
700 0 select first 1 ZAMEST, ZAMADRESA, PROFES, ICO from KAR left join FIRMY on FIRMY.FIRMA = KAR.ZAMEST where IDPAC = 3234 and (ZAMEST is not NULL or ZAMADRESA is not NULL or PROFES is not NULL)
701 0 select first 1 DATZAL from KAR where IDPAC = 3234
702 0 select first 1 BMI from SP_GETBMI(3234)
703 0 select first 1 puls from preh where (idpac = 3234) and not(puls is null)
ORDER BY datum DESC
704 0 select first 1 ZACNES, CISNES, ID, (select first 1 DATA from HISTDOC where TYP = 'POTDPN' and (IDPACI = 3234) and (DATA like '%CisNes=' || NES.CISNES || '%') order by DATUM desc) from NES where (IDPAC = 3234) and ('2026-03-20' >= ZACNES + 10) and ((KONNES is NULL) or (KONNES > '2026-03-20')) and (STORNO = 'F') and ((select count(*) from HISTDOC where TYP = 'POTDPN' and (IDPACI = 3234) and (extract(month from DATUM) || extract(year from DATUM) = extract(month from cast('2026-03-20' as date) + 4) || extract(year from cast('2026-03-20' as date) + 4)) and DATA like '%CisNes=' || NES.CISNES || '%') = 0) and (not exists(select Id from nesd where nesd.idnes = nes.id) or ((select first 1 Kam from nesd where nesd.idnes = nes.id order by nesd.datum desc, nesd.id desc) = 'N'))
ORDER BY ZACNES ASC
705 0 select first 1 ZACNES, CISNES, ID, POTVRZENI_VYDANO from NES where (IDPAC = 3234) and ('2026-03-20' >= ZACNES + 10) and ((KONNES is NULL) or (KONNES > '2026-03-20')) and (STORNO = 'F') and (extract(month from POTVRZENI_VYDANO) || extract(year from POTVRZENI_VYDANO) = extract(month from cast('2026-03-20' as date)) || extract(year from cast('2026-03-20' as date)))
ORDER BY ZACNES ASC
706 0 select * from GETPACPOJ(3234/* IDPAC */, '20.03.2026'/* ODE_DNE */)
707 0 select ID, IDPAC, ANAMNEZA, DATUM, ALERGIE, KREVSKUP,
HBSAG, DUCHOD, BEZMOCNOST, HIV, MESOD, MESDO,
MESTYP, BWR, ISOIMUN, PANEV, coalesce(POCPOROD, -1) as POCPOROD, coalesce(POCPOTRAT, -1) as POCPOTRAT,
coalesce(POCINTER, -1) as POCINTER, coalesce(POCOPER, -1) as POCOPER, IDUZIV, SIGNATURE, SIGNATURE_INFO,
IDCERTIFICATE, RHDATUM, RHVYSL, TRIZOMIE, NTD, VVV,
IZIPSTAT, KURAK, TST, KARDIOSTIM, CIGARETDENNE, FREKKOURENI,
(select first 1 vyska from preh where (idpac = anamneza.idpac) and (vyska is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) vyska,
(select first 1 vaha from preh where (idpac = anamneza.idpac) and (vaha is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) vaha,
(select first 1 puls from preh where (idpac = anamneza.idpac) and (puls is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) puls,
(select first 1 tlaksys from preh where (idpac = anamneza.idpac) and (tlaksys is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) tlaksys,
(select first 1 tlakdia from preh where (idpac = anamneza.idpac) and (tlakdia is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) tlakdia,
memporod, mempotrat, meminter, memoper, pm, ID_EDOKUMENT, PRUKAZ from ANAMNEZA where (IDPAC=3234/* IDPAC */)
ORDER BY DATUM DESC
, ID DESC
708 0 select AC.NAZEV,
AV.SVALUE,
AV.BDATA,
AV.NVALUE,
AV.DVALUE,
AF.USERMASK,
AV.TYP
from ANAMVALUES AV
left join ANAMVCFG AC on AC.IDTYPHODN = AV.IDTYPHODN
left join ANAMVFMT AF on AF.IDTYPHODN = AV.IDTYPHODN
where AV.IDPAC=3234/* IDPAC */ and AV.PLATIOD <= '01.11.2022'/* DATUM */ and AKTUAL = 'T'
ORDER BY AF.PORADI ASC
, AV.DATZAPIS DESC
, AV.PLATIOD DESC
709 0 execute block(IDPAC integer=3234/* IDPAC */, DATUM DATE='21.09.2025'/* DATUM */)
returns (VALUE_BF varchar(8), VALUE_AF varchar(8), LEK_KOD varchar (8), LEK_NAZ varchar(30))
as
declare variable TMPATC varchar(7) = '';
declare variable TMPSILA varchar(24) = '';
declare variable RDATUM date;
declare variable LEKKOD varchar(8) = '';
declare variable LEKNAZ varchar(30) = '';
declare variable HODN_BE varchar(8) = '-1';
declare variable HODN_AF varchar(8) = '-1';
begin
VALUE_BF = '-1';
VALUE_AF = '-1';
LEK_KOD = '';
LEK_NAZ = '';
select first 1 DATUM, KOD, LEK, ATC
from RECEPT
where
IDPAC = :IDPAC and
DATUM >= :DATUM and
(ATC starting with 'C10AA01' or
ATC starting with 'C10AA05' or
ATC starting with 'C10AA07')
order by datum desc
into :RDATUM, :LEKKOD, :LEKNAZ, :TMPATC;
if (RDATUM is null) then
begin
select first 1 m.DATUM, m.KOD, m.NAZ , l.ATC
from MEDIKACE m
join LEKY l on m.kod = l.kod
where
m.IDPAC = :IDPAC and
(m.PLATI_DO >= :DATUM or m.PLATI_DO is null) and
(l.ATC starting with 'C10AA01' or
l.ATC starting with 'C10AA05' or
l.ATC starting with 'C10AA07')
order by m.DATUM desc
into :RDATUM, :LEKKOD, :LEKNAZ, :TMPATC;
end
if (RDATUM is null) then
begin
VALUE_BF = -1;
VALUE_AF = -1;
LEK_KOD = '';
LEK_NAZ = '';
suspend;
exit;
end
if (RDATUM is not null) then
begin
begin
select first 1 VYSL
from LABVD D
join LABMETOD M on M.IDMETOD = D.IDMETOD and (M.KLICMZ in ('02322', '02323', '02324', '02325', '03379', '03380'))
join LABVH H on H.IDVH = D.IDVH
where D.IDPACIENT = :IDPAC and
H.DATUM <= :RDATUM
order by H.DATUM desc, D.ID desc
into :HODN_BE;
select STRING_OUT from sp_replace_char(:HODN_BE, ',', '.') into HODN_BE;
select first 1 VYSL
from LABVD D
join LABMETOD M on M.IDMETOD = D.IDMETOD and (M.KLICMZ in ('02322', '02323', '02324', '02325', '03379', '03380'))
join LABVH H on H.IDVH = D.IDVH
where D.IDPACIENT = :IDPAC and
H.DATUM >= :RDATUM
order by H.DATUM desc, D.ID desc
into :HODN_AF;
select STRING_OUT from sp_replace_char(:HODN_AF, ',', '.') into HODN_AF;
end
if (((HODN_AF > '-1') and (HODN_AF > '0')) and ((HODN_BE = '-1') or (HODN_BE is null))) then
begin
HODN_BE = HODN_AF;
select first 1 SILA from LEKY where KOD = :LEKKOD and (PLATIDO is null or PLATIDO <= 'TODAY')
into :TMPSILA;
if ((substring(TMPSILA from 1 for 2) = '10') and (TMPATC = 'C10AA01')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.28 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '10') and (TMPATC = 'C10AA05')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.37 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '10') and (TMPATC = 'C10AA07')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.46 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '20') and (TMPATC = 'C10AA01')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.35 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '20') and (TMPATC = 'C10AA05')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.43 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '20') and (TMPATC = 'C10AA07')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.52 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '40') and (TMPATC = 'C10AA01')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.39 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '40') and (TMPATC = 'C10AA05')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.48 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '40') and (TMPATC = 'C10AA07')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.55 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '80') and (TMPATC = 'C10AA01')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.46 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '80') and (TMPATC = 'C10AA05')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.51 from 1 for 5);
end
end
begin
VALUE_BF = :hodn_be;
VALUE_AF = :hodn_af;
LEK_KOD = :lekkod;
LEK_NAZ = :leknaz;
suspend;
end
end
710 0 select heslotelkom from KAR where idpac = 3234
711 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
712 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'PSA'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
713 0 select K.POHLAVI as POHLAVI, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 KOD from STALDGN where IDPAC = K.IDPAC and IDANAM = (select first 1 ID from ANAMNEZA where IDPAC = K.IDPAC order by DATUM desc, ID desc) and KOD like 'C61%') as DGN, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('01131', '01132', '01133', '01134') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('01131', '01132', '01133', '01134') order by DATOSE desc, ID desc) as VYKON from KAR K where K.IDPAC = 3234/* IDPAC */
714 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
715 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'TOKS'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
716 0 select K.DATNAR as DATNAR, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('15120', '15121') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('15120', '15121') order by DATOSE desc, ID desc) as VYKON from KAR K where K.IDPAC = 3234/* IDPAC */
717 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
718 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'FRAX'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
719 0 select K.DATNAR, K.POHLAVI, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('11320', '11321', '11327') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('11320', '11321', '11327') order by DATOSE desc, ID desc) as VYKON, (select first 1 "DATA" from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 112/* TYP */ order by DATUM desc, IDPRE desc) as DXADATA, (select first 1 DATUM from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 112/* TYP */ order by DATUM desc, IDPRE desc) as DXADATUM from KAR K where K.IDPAC = 3234/* IDPAC */
720 0 select GV.DATUM from GENVYS GV where GV.IDPRE = (select first 1 IDPRE from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 0/* TYP */ order by DATUM desc)
721 0 select first 1 RPRUKAZ from KAR where IDPAC = 3234
722 0 select first 1 ZPRUKAZ from KAR where IDPAC = 3234
723 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
724 0 execute procedure sp_log(3234/* idpac */, 10000/* tblid */, 3234/* recid */, 'V', NULL/* rodcis */, NULL/* id1 */, NULL/* detail */)
725 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
726 0 execute procedure SP_UPDATE_USER_TIMESTAMP(7846, 6, 2, '//////////////////8=', 'NTBVBHP470G10', '3.61.0.371')
727 0 select FSDATS from STAV where ID = 7846/* ID */
728 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
729 0 select first 1 * from MEDINETIN I where ((I.STAV <> 1) or (I.STAV is null)) and CGMNUMBER_PRIJEMCE in ('01300149556')
730 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
731 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
732 0 select servertimestamp from sp_servertimestamp
733 0 select first 1 LOGIN from OPTIONS where CATEGORY = 'MediWorker' and ID = 924578946
734 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
735 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
736 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
737 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
738 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
739 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
740 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
741 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
742 0 execute procedure SP_UPDATE_USER_TIMESTAMP(7846, 6, 2, '//////////////////8=', 'NTBVBHP470G10', '3.61.0.371')
743 0 select FSDATS from STAV where ID = 7846/* ID */
744 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
745 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
746 0 select first 1 * from MEDINETIN I where ((I.STAV <> 1) or (I.STAV is null)) and CGMNUMBER_PRIJEMCE in ('01300149556')
747 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
748 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
749 0 select servertimestamp from sp_servertimestamp
750 0 select first 1 LOGIN from OPTIONS where CATEGORY = 'MediWorker' and ID = 924578946
751 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
752 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
753 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
754 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
755 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
756 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
757 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
758 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
759 0 execute procedure SP_UPDATE_USER_TIMESTAMP(7846, 6, 2, '//////////////////8=', 'NTBVBHP470G10', '3.61.0.371')
760 0 select FSDATS from STAV where ID = 7846/* ID */
761 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
762 0 select distinct(ID_ESINSTITUCE) as ID_ESINSTITUCE,
(select first 1 MI.ID
from MEDINETRECIP MI
where MI.CGMNUMBER = ESI.NUMBER) as ID_MEDICALNET, coalesce((select first 1 MI.DISPLAYNAME
from MEDINETRECIP MI
where MI.CGMNUMBER = ESI.NUMBER), ESI.NAZEV || ', ' || ESI.ZARIZENI) as ZARIZENI,
ESI.VXKEY, ESI.UID, ESI.NUMBER as CGMNUMBER, ESI.EMAIL
from (select coalesce(PU.ID_ESINSTITUCE, P.ID_ESINSTITUCE, O.ID_ESINSTITUCE, Z.ID_ESINSTITUCE) as ID_ESINSTITUCE
from ZARIZENI Z
join ODDEL O on O.IDZAR = Z.ID
join PRACOVISTE P on P.IDODDEL = O.ID
join PRACUZIV PU on PU.IDPRAC = P.ID
join UZIVATEL U on U.IDUZI = PU.IDUZIV
where PU.ID = 6/* PUID */ and
U.AKTIVNI = 'T'
union all
select distinct(ID_ESINSTITUCE) as ID_ESINSTITUCE
from ES_GROUP_INT
left join ES_GROUP on (ES_GROUP_INT.IDGROUP = ES_GROUP.ID)
where (ES_GROUP.IDPRAC = 2/* IDPRAC */) or (ES_GROUP.IDODD = 2/* IDODD */) or (ES_GROUP.IDZAR = 2/* IDZAR */) or (ES_GROUP.IDPRACUZI = 6/* IDPRACUZIV */))
join ES_INSTITUCE ESI on ESI.ID = ID_ESINSTITUCE
where
ESI.CLICKBOX = 'A'
ORDER BY ZARIZENI ASC
763 0 select first 1 * from MEDINETIN I where ((I.STAV <> 1) or (I.STAV is null)) and CGMNUMBER_PRIJEMCE in ('01300149556')
764 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
765 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
766 0 select servertimestamp from sp_servertimestamp
767 0 select first 1 LOGIN from OPTIONS where CATEGORY = 'MediWorker' and ID = 924578946
768 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
769 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
770 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
771 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
772 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
773 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
774 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
775 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
776 0 execute procedure SP_UPDATE_USER_TIMESTAMP(7846, 6, 2, '//////////////////8=', 'NTBVBHP470G10', '3.61.0.371')
777 0 select FSDATS from STAV where ID = 7846/* ID */
778 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
779 0 select first 1 * from MEDINETIN I where ((I.STAV <> 1) or (I.STAV is null)) and CGMNUMBER_PRIJEMCE in ('01300149556')
780 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
781 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
782 0 select servertimestamp from sp_servertimestamp
783 0 select first 1 LOGIN from OPTIONS where CATEGORY = 'MediWorker' and ID = 924578946
784 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
785 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
786 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
787 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
788 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
789 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
790 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
791 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
792 0 execute procedure SP_UPDATE_USER_TIMESTAMP(7846, 6, 2, '//////////////////8=', 'NTBVBHP470G10', '3.61.0.371')
793 0 select FSDATS from STAV where ID = 7846/* ID */
794 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
795 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
796 0 select first 1 * from MEDINETIN I where ((I.STAV <> 1) or (I.STAV is null)) and CGMNUMBER_PRIJEMCE in ('01300149556')
797 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
798 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
799 0 select servertimestamp from sp_servertimestamp
800 0 select first 1 LOGIN from OPTIONS where CATEGORY = 'MediWorker' and ID = 924578946
801 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
802 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
803 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
804 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
805 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
806 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
807 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
808 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
809 0 execute procedure SP_UPDATE_USER_TIMESTAMP(7846, 6, 2, '//////////////////8=', 'NTBVBHP470G10', '3.61.0.371')
810 0 select FSDATS from STAV where ID = 7846/* ID */
811 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
812 0 select distinct(ID_ESINSTITUCE) as ID_ESINSTITUCE,
(select first 1 MI.ID
from MEDINETRECIP MI
where MI.CGMNUMBER = ESI.NUMBER) as ID_MEDICALNET, coalesce((select first 1 MI.DISPLAYNAME
from MEDINETRECIP MI
where MI.CGMNUMBER = ESI.NUMBER), ESI.NAZEV || ', ' || ESI.ZARIZENI) as ZARIZENI,
ESI.VXKEY, ESI.UID, ESI.NUMBER as CGMNUMBER, ESI.EMAIL
from (select coalesce(PU.ID_ESINSTITUCE, P.ID_ESINSTITUCE, O.ID_ESINSTITUCE, Z.ID_ESINSTITUCE) as ID_ESINSTITUCE
from ZARIZENI Z
join ODDEL O on O.IDZAR = Z.ID
join PRACOVISTE P on P.IDODDEL = O.ID
join PRACUZIV PU on PU.IDPRAC = P.ID
join UZIVATEL U on U.IDUZI = PU.IDUZIV
where PU.ID = 6/* PUID */ and
U.AKTIVNI = 'T'
union all
select distinct(ID_ESINSTITUCE) as ID_ESINSTITUCE
from ES_GROUP_INT
left join ES_GROUP on (ES_GROUP_INT.IDGROUP = ES_GROUP.ID)
where (ES_GROUP.IDPRAC = 2/* IDPRAC */) or (ES_GROUP.IDODD = 2/* IDODD */) or (ES_GROUP.IDZAR = 2/* IDZAR */) or (ES_GROUP.IDPRACUZI = 6/* IDPRACUZIV */))
join ES_INSTITUCE ESI on ESI.ID = ID_ESINSTITUCE
where
ESI.CLICKBOX = 'A'
ORDER BY ZARIZENI ASC
813 0 select first 1 * from MEDINETIN I where ((I.STAV <> 1) or (I.STAV is null)) and CGMNUMBER_PRIJEMCE in ('01300149556')
814 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
815 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
816 0 select servertimestamp from sp_servertimestamp
817 0 select first 1 LOGIN from OPTIONS where CATEGORY = 'MediWorker' and ID = 924578946
818 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
819 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
820 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
821 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
822 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
823 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
824 0 select first 1 * from KAR
825 0 select ID_ESINSTITUCE from ( select coalesce(PU.ID_ESINSTITUCE, P.ID_ESINSTITUCE, O.ID_ESINSTITUCE, Z.ID_ESINSTITUCE) ID_ESINSTITUCE from PRACUZIV PU left join PRACOVISTE P on (P.ID=PU.IDPRAC) left join ODDEL O on (P.IDODDEL=O.ID) left join ZARIZENI Z on (O.IDZAR=Z.ID) where PU.IDPRAC = 2 and PU.IDUZIV = 6 ) ORGS where exists (select ID from ES_INSTITUCE where ID = ORGS.ID_ESINSTITUCE and ESERVICES = 'T')
826 0 select KAR.DATNAR,(select first 1 STAV from ES_PACIDENT join ES_PAC on (ES_PAC.ID=ES_PACIDENT.PAC_ID) left join ES_BROKER on (ES_BROKER.id_es_pac = ES_PAC.ID) where ((ES_PAC.idpac = kar.idpac) or (ES_BROKER.idpac = kar.idpac)) and ES_PACIDENT.INST_ID = 0) as ES_STAV,KAR.IDPAC,KAR.INFORMACE,KAR.INFORMACE_COL,KAR.JMENO,(select first 1 KZ.IDZAR from KARZARAZENI KZ where (KZ.IDPAC=KAR.IDPAC) and (KZ.DATUM is null or (KZ.DATUM<=CURRENT_DATE)) and (KZ.DATUMDO is null or (KZ.DATUMDO>=CURRENT_DATE)) order by KZ.ID) as K_ZARZAR,KAR.POHLAVI,GPP.POJ,KAR.POZNAMKA,KAR.PRIJMENI,KAR.PRIJMENI_UP,(select DATUM_REGISTRACE from SP_GETREGDAT(kar.IDPAC)) as REGDATUM,KAR.REGISTROVAL,(select PRIZNAK from SP_GETREGDAT(kar.IDPAC)) as REGPRIZNAK,KAR.RODCIS,KAR.ROZENA,(select first 1 OUTCOLS from GETKARZARAZENICOLORS(kar.idpac, '2026-03-20')) as SKUPINY,KAR.TITUL,KAR.TITULZA,KAR.TRVOBEC,KAR.TRVPSC,KAR.TRVULICE,KAR.VYRAZEN
from KAR
left join GETPACPOJ(KAR.IDPAC, '2026-03-20') GPP on GPP.IDPAC = KAR.IDPAC
where (VYRAZEN = 'N')
ORDER BY KAR.PRIJMENI_UP ASC
, KAR.RODCIS ASC
827 0 select first 1 ALERGIE from ANAMNEZA where IDPAC = 3234/* IDPAC */ and DATUM <= '20.03.2026'/* DATUM */
ORDER BY DATUM DESC
, ID DESC
828 0 select first 1 KAP_CHECK, KAP_STAV from KARB2B where IDPAC = 3234 and ICP='09305001'
829 0 select first 1 VAKCINACE_CHECK, VAKCINACE_STAV, VAKCINACE_DATUM from KARISIN where IDPAC = 3234
830 0 select distinct H.TYP from DOKLADH H join DOKLADD D on H.IDHLAV = D.IDHLAV where ((H.RODCIS = '486122443'/* RODCIS */) or (H.RODCIS is null)) and (D.RODCIS = '486122443'/* RODCIS */) and (H.IDA is NULL) and (H.POJ = '111'/* POJ */ ) and (H.ICZ = '09305001'/* ICZ */) and (H.HODB = '001'/* ODB */)
831 0 select 'acDokladHCes', 'DOC%C' || case count(*) when 0 then '' else 'X' end from CESH join CESD on CESD.IDHLAV = CESH.IDHLAV
where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHLaz', 'DOC%L' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='L') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHOzdrav', 'DOC%V' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='O') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHDrg', 'DOC%D' || case count(*) when 0 then '' else 'X' end from DRG where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHOrtop', 'DOC%O' || case count(*) when 0 then '' else 'X' end from POU where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHFoni', 'DOC%F' || case count(*) when 0 then '' else 'X' end from POUFONIH where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from POUFONID where IDHLAV = POUFONIH.IDHLAV)
832 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
833 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
834 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
835 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
836 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
837 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
838 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
839 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
840 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
841 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
842 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
843 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
844 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
845 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
846 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
847 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
848 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
849 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
850 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
851 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
852 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
853 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
854 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
855 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
856 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
857 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
858 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
859 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
860 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
861 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
862 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
863 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
864 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
865 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
866 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
867 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
868 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
869 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
870 0 select first 1 ALERGIE from ANAMNEZA where IDPAC = 3234/* IDPAC */ and DATUM <= '20.03.2026'/* DATUM */
ORDER BY DATUM DESC
, ID DESC
871 0 select first 1 KAP_CHECK, KAP_STAV from KARB2B where IDPAC = 3234 and ICP='09305001'
872 0 select first 1 VAKCINACE_CHECK, VAKCINACE_STAV, VAKCINACE_DATUM from KARISIN where IDPAC = 3234
873 0 select distinct H.TYP from DOKLADH H join DOKLADD D on H.IDHLAV = D.IDHLAV where ((H.RODCIS = '486122443'/* RODCIS */) or (H.RODCIS is null)) and (D.RODCIS = '486122443'/* RODCIS */) and (H.IDA is NULL) and (H.POJ = '111'/* POJ */ ) and (H.ICZ = '09305001'/* ICZ */) and (H.HODB = '001'/* ODB */)
874 0 select 'acDokladHCes', 'DOC%C' || case count(*) when 0 then '' else 'X' end from CESH join CESD on CESD.IDHLAV = CESH.IDHLAV
where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHLaz', 'DOC%L' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='L') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHOzdrav', 'DOC%V' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='O') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHDrg', 'DOC%D' || case count(*) when 0 then '' else 'X' end from DRG where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHOrtop', 'DOC%O' || case count(*) when 0 then '' else 'X' end from POU where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHFoni', 'DOC%F' || case count(*) when 0 then '' else 'X' end from POUFONIH where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from POUFONID where IDHLAV = POUFONIH.IDHLAV)
875 0 select idicz from ICZ where poj = '111' and icz = '09305000'
876 0 select icp from ICP where idicz = '12' and odb = '001'
877 0 select idicz from ICZ where poj = '111' and icz = '09305000'
878 0 select icp from ICP where idicz = '12' and odb = '001'
879 0 select cast('BalickyPac' as varchar(11)) as ID, substring(cast(BPAC.KOD as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(BPAC.CENPASMO as VARCHAR(70)) from 1 for 30) as VAR2, cast(BPAC.DATUMOD as DATE) as DATE1, cast(BPAC.DATUMDO as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from BALICKYPAC BPAC left join SP_BALICKYPAC_PRIZNAK(BPAC.ID, '20.03.2026') PRI on 1 = 1 where BPAC.IDPAC = 3234 and PRI.PRIZNAK in ('A', 'B') union select cast('Dluh' as varchar(11)) as ID, substring(cast(P.MENA as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast((SUM(P.CENA - P.SLEVAC) - (SUM(P.PLATBA) + SUM((COALESCE((select SUM(case ZD.TYP when 'R' then ZD.CELKEM else -ZD.CELKEM end) from PLADET ZD where ZD.IDPLA = P.IDPLA and (ZD.TYP <> P.DOKLADTYP) and (ZD.TYP <> '|') and ((ZD.CENA < 0) or (ZD.TYP = 'R'))), 0))))) as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM PLA P WHERE (P.IDPAC = 3234) AND (P.DOKLADTYP = 'F') AND (P.STORNO IS NULL) AND (P.NENISALDO = 'F') AND ((P.SPLATNOST IS NULL) OR (P.SPLATNOST < '2026-03-20')) AND (P.VALID = 'F') GROUP BY P.MENA union select cast('SouhlasPac' as varchar(11)) as ID, substring(cast(case when S.NAZEV is null then case when H.TYP = 'ZSOUPOS' then 'Souhlas/Nesouhlas s poskytnutím zdravotních služeb nezletilému' when H.TYP = 'ZSOUPOZ' then 'Souhlas zákonného zástupce nezletilého pacienta staršího 15ti let' when H.TYP = 'ZSOUPO2' then 'Nesouhlas s poskytnutím zdravotních služeb - povinné oèkování' when H.TYP = 'ZPOSIN2' then 'Urèení osoby oprávnìné dle zákona o zdravotních službách' when H.TYP = 'OdmPece' then 'Prohlášení o odmítnutí zdravotní péèe pacientem - Negativní revers' end else S.NAZEV end as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(H.DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from HISTDOC H left join SOUHLASPACSABL S on H.IDSOUHLASPACSABL = S.ID where H.TYP in ('IndSou', 'ZSOUPOS', 'ZSOUPOZ', 'ZSOUPO2', 'ZPOSIN2', 'OdmPece') and H.IDPACI = 3234 union select cast('sCenaVykZUM' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(coalesce(sum(cenabod),0) + coalesce(sum(cenamat),0) as NUMERIC(15,2)) as NUM1, cast((select coalesce(sum(cena),0) from LECD d where d.RODCIS = '486122443' and extract(year from d.DATOSE) = '2026' and ((d.KAT is null) or (d.KAT <> 'N')) and exists (select h.IDLEC from LECH h where h.IDLEC = d.IDLEC and h.POJ = '111' and h.ICZ in ('09305001'))) as NUMERIC(15,2)) as NUM2 from DOKLADD d where d.RODCIS = '486122443' and extract(year from d.DATOSE) = '2026' and ((d.KAT is null) or (d.KAT <> 'N' and d.KAT <> 'K' and d.KAT <> 'A')) and exists (select h.IDHLAV from DOKLADH h where h.IDHLAV = d.IDHLAV and h.POJ = '111' and h.ICZ in ('09305001')) union select cast('Registrl' as varchar(11)) as ID, substring(cast(REGISTROVAL as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from KAR where IDPAC = 3234 union select cast('OseLekPrak' as varchar(11)) as ID, substring(cast(F_CONCAT(PRIJMENI, F_CONCAT(JMENO, TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(TITUL2 as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(CAST(ODBORN as INTEGER) as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM KARUZIV_SEL(3234, 'T') WHERE ODBORN in ('001', '002') union select cast('SledLek' as varchar(11)) as ID, substring(cast(KOD as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(LEK as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from SLEDLEK where IDPAC = 3234 and DATUM <= '2026-03-20' union select first 10 cast('HistDoc' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from HISTDOC where IDPACI = 3234 and STAV is NULL and IDZARPR = 2 and IDODDPR = 2 and IDPRACPR = 2 union select first 1 cast('LastSms' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(SENDTIME) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from SMS where PACID = 3234 and SENDTIME is not NULL and not(STATUS in (100,1000)) union select first 1 cast('PozadLekar' as varchar(11)) as ID, substring(cast(H.EICZ as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(H.EODZ as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DOKLADH H where H.IDHLAV = (select first 1 I.IDHLAV from DOKLADH I where I.RODCIS = '486122443' and I.EICZ is not NULL order by I.IDHLAV desc) union select first 10 cast('Prilohy' as varchar(11)) as ID, substring(cast(FILENAME as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from FILES where IDPAC = 3234 union select first 10 cast('Objednavky' as varchar(11)) as ID, substring(cast(F_CONCAT(U.PRIJMENI, F_CONCAT(U.JMENO, U.TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(PRAC as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(CAS as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from OBJOBJ O join PRACOVISTE P on (P.ID = O.IDPRAC) join UZIVATEL U on (U.IDUZI = O.IDUZI) where IDPAC = 3234 and DATUM >= '20.03.2026' union select cast('OseLek' as varchar(11)) as ID, substring(cast(F_CONCAT(PRIJMENI, F_CONCAT(JMENO, TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(TITUL2 as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM KARUZIV_SEL(3234, 'T') union select cast('PeProhlidky' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(TERMIN as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PREH join PREINIH on (PREH.IDPREINI = PREINIH.IDPREINI) where IDPAC = 3234 union select cast('Medikace' as varchar(11)) as ID, substring(cast(NAZ as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(PLATI_OD as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from MEDIKACE where IDPAC = 3234 and PLATI_OD <= '20.03.2026' and (PLATI_DO >= '20.03.2026' or PLATI_DO is NULL) union select cast('NextDispenz' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(SKUPINA as VARCHAR(70)) from 1 for 30) as VAR2, cast(PRISTI as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DISPAC join DISSKU on (DISSKU.IDDIS = DISPAC.IDDIS) where IDPAC = 3234 and PRISTI is not NULL union select cast('Dispenz' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(SKUPINA as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATZAR as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DISPAC join DISSKU on (DISSKU.IDDIS = DISPAC.IDDIS) where IDPAC = 3234 union select cast('Prohlidky' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PREPRI join PREINIH on (PREPRI.IDPREINI = PREINIH.IDPREINI) where IDPAC = 3234 and datum is not null union select cast('NextOck' as varchar(11)) as ID, substring(cast(coalesce(NAZ,ZKRATKA) as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUMD as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from OCKPRI o left join KLK k on o.ZKRATKA = k.KOD where IDPAC = 3234 union select first 1 cast('LastVykon' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, substring(cast(D.KOD as VARCHAR(70)) from 1 for 30) as VAR2, cast(D.DATOSE as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DOKLADD D where D.ID = (select first 1 dd.id from dokladd dd join dokladh dh on (dh.idhlav = dd.idhlav) where dd.rodcis = '486122443' and (dh.hodb = '001' or dh.hodb is null) order by dd.datose desc) union select first 1 cast('LastDekurs' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(DATUM) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DEKURS where IDPAC = 3234 and (IDPRAC = 2 or IDPRAC = -1) union select first 1 cast('Karta' as varchar(11)) as ID, substring(cast(INFORMACE as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(CIZINEC as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(INFORMACE_COL as INTEGER) as INT1, POZNAMKA as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from KAR where IDPAC = 3234 union select first 1 cast('Saldo' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(SALDO as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PACIENT_SALDO(3234, 1, 0, 0) union select first 1 cast('Anamneza' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, substring(cast(KREVSKUP as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, ANAMNEZA as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ANAMNEZA where ID = (select first 1 ID from ANAMNEZA where IDPAC=3234 order by DATUM DESC, ID desc) union select first 20 cast('Ockovani' as varchar(11)) as ID, substring(cast(ockzaz.LATKA as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(ockzaz.ZKRATKA as VARCHAR(70)) from 1 for 30) as VAR2, cast(max(ockzaz.DATUM) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ockzaz where ockzaz.idpac = 3234 group by ockzaz.ZKRATKA, ockzaz.LATKA union select first 1 cast('NeschopenOd' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(ZACNES) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from NES where (IDPAC = 3234) and (ZACNES <= '20.03.2026') and ((KONNES is NULL) or (KONNES > '20.03.2026')) and (STORNO = 'F') union select first 1 cast('Alergie' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, ALERGIE as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ANAMNEZA where IDPAC = 3234 and ID = (select first 1 ID from ANAMNEZA where IDPAC = 3234 and DATUM <= '20.03.2026' order by DATUM desc, ID desc) union select first 1 cast('Pojistovna' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(P.IDICP as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ICP P join ICZ Z on (Z.IDICZ = P.IDICZ) where Z.POJ = '111' and P.ODB = '001'
880 0 select POHLAVI,PRIJMENI,JMENO,TITUL,(select first 1 POJ from GETPACPOJ(IDPAC, '20.03.2026 00:00:00.000'/* ODE_DNE */)) as POJ,DATNAR,RODCIS,IDSTAV,DRUHPOJ,TRVOBEC,TRVULICE,TRVPSC,PREOBEC,PREULICE,PREPSC,AKTIVBYDL,ZAMEST,ZAMADRESA,IDZAMEST,PROFES,OSCISLO,GEONOMU,(select KOD from GETPACCENPAS(IDPAC, '20.03.2026 00:00:00.000'/* ODE_DNE */)) as CENPAS,ROZENA,IZIPOD,STPRIS,ZUJEDN,PRUKAZ,TYPPECE,CIZINEC,TITULZA,DATREG,ZASTUPOVANY_ICP,IDISIN,UPRCHLIK from KAR where IDPAC = 3234/* ID */
881 0 select first 1 R.ID, R.DATUM from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
882 0 select KOD from STALDGN where (IDPAC = 3234) and IDANAM = (select first 1 ID from ANAMNEZA where IDPAC = 3234 order by DATUM desc)
ORDER BY PORADI ASC
, KOD ASC
883 0 select first 1 N.ZACNES, D.DATUM, D.KAM, D.KAMODKUD, D.ICZ
from NES N left join NESD D on D.IDNES = N.ID
where (N.IDPAC = 3234) and (N.ZACNES <= '20.03.2026') and ((N.KONNES is NULL) or (N.KONNES > '20.03.2026')) and (N.STORNO = 'F')
ORDER BY N.ZACNES DESC
, D.DATUM DESC
, D.ID DESC
884 0 select PV.KOD,
(select first 1 D.DATOSE from DOKLADD D where D.RODCIS = '486122443'/* RODCIS */ and D.KOD = PV.KOD order by DATOSE desc),
PV.JENREG,
PV.ODVYKAZANI
from PROHVYK PV
where (PV.ODBORN is NULL or PV.ODBORN = '001'/* ODB */)
and (PV.ICP is NULL or PV.ICP = '09305001'/* ICP */)
and (PV.VEKOD is NULL or PV.VEKOD <= 77/* VEKOD */)
and (PV.VEKDO is NULL or PV.VEKDO > 77/* VEKDO */)
and (PV.POHLAVI is NULL or PV.POHLAVI = 'Z'/* POHLAVI */)
ORDER BY PV.KOD ASC
885 0 select PV.KOD,
PV.JENREG,
PV.ODVYKAZANI
from PROHVYK PV
where (PV.ODBORN is NULL or PV.ODBORN = '001'/* ODB */)
and (PV.VEKOD is NULL or PV.VEKOD <= 77/* VEKOD */)
and (PV.VEKDO is NULL or PV.VEKDO > 77/* VEKDO */)
and (PV.POHLAVI is NULL or PV.POHLAVI = 'Z'/* POHLAVI */)
ORDER BY PV.KOD ASC
886 0 select S.NAZEV, M.NAZ, S.KOD from STALDGN S join MKN10 M on (M.KOD = S.KOD and (M.PLATIOD is NULL or M.PLATIOD <= 'NOW') and (M.PLATIDO is NULL or M.PLATIDO >= 'NOW')) where (S.IDPAC = 3234) and S.IDANAM = (select first 1 A.ID from ANAMNEZA A where A.IDPAC = 3234 order by A.DATUM desc)
ORDER BY S.PORADI ASC
, S.KOD ASC
887 0 select first 1 TP.DATUM from TEHPRO TP join TEH T on T.IDTEH = TP.IDTEH where T.IDPAC = 3234
ORDER BY TP.DATUM DESC
888 0 select first 1 DATUM from GENVYS where IDPAC = 3234 and TYP = 110
ORDER BY DATUM DESC
889 0 select first 1 KAP_CHECK, KAP_STAV, DALSI_KONTROLA from KARB2B where IDPAC = 3234 and ICP='09305001'
890 0 select first 1 T.WARN, T.POZN, T.DATUM from TEHKAL T where (T.IDPAC = 3234/* IDPAC */) and (T.DATUM >= '20.03.2026'/* DATUM */)
ORDER BY DATUM ASC
891 0 select first 1 (case T.VYPOCETDLE when 1 then (T.PM) else (T.UZ1POROD - 280) end) as POCATEKTEH
from Teh T
left join kar K on (K.idpac = T.IdPac)
where
(T.IDPAC = 3234/* IDPAC */) and
((ENDTEH>='20.03.2026 00:00:00.000'/* Dnes */) or (ENDTEH is null)) and /* pouze vysetreni pred datem ukonceni*/
(((PM is NULL) and (UZ1POROD is NULL) and (ENDTEH is null)) or /* nelze zjistit konec tehotenstvi*/
(T.PM >= ('20.03.2026 00:00:00.000'/* Dnes */ - (42*7))) or /* max. delka tehotenstvi dle PM 42 tyd. */
((PM is null) and (UZ1POROD+14 >= '20.03.2026 00:00:00.000'/* Dnes */)) /* max. termin dle UZ + 14 dni */
)
ORDER BY PM DESC NULLS LAST
, UZ1POROD DESC NULLS LAST
892 0 select first 1 ZAMEST, ZAMADRESA, PROFES, ICO from KAR left join FIRMY on FIRMY.FIRMA = KAR.ZAMEST where IDPAC = 3234 and (ZAMEST is not NULL or ZAMADRESA is not NULL or PROFES is not NULL)
893 0 select first 1 DATZAL from KAR where IDPAC = 3234
894 0 select first 1 BMI from SP_GETBMI(3234)
895 0 select first 1 puls from preh where (idpac = 3234) and not(puls is null)
ORDER BY datum DESC
896 0 select first 1 ZACNES, CISNES, ID, (select first 1 DATA from HISTDOC where TYP = 'POTDPN' and (IDPACI = 3234) and (DATA like '%CisNes=' || NES.CISNES || '%') order by DATUM desc) from NES where (IDPAC = 3234) and ('2026-03-20' >= ZACNES + 10) and ((KONNES is NULL) or (KONNES > '2026-03-20')) and (STORNO = 'F') and ((select count(*) from HISTDOC where TYP = 'POTDPN' and (IDPACI = 3234) and (extract(month from DATUM) || extract(year from DATUM) = extract(month from cast('2026-03-20' as date) + 4) || extract(year from cast('2026-03-20' as date) + 4)) and DATA like '%CisNes=' || NES.CISNES || '%') = 0) and (not exists(select Id from nesd where nesd.idnes = nes.id) or ((select first 1 Kam from nesd where nesd.idnes = nes.id order by nesd.datum desc, nesd.id desc) = 'N'))
ORDER BY ZACNES ASC
897 0 select first 1 ZACNES, CISNES, ID, POTVRZENI_VYDANO from NES where (IDPAC = 3234) and ('2026-03-20' >= ZACNES + 10) and ((KONNES is NULL) or (KONNES > '2026-03-20')) and (STORNO = 'F') and (extract(month from POTVRZENI_VYDANO) || extract(year from POTVRZENI_VYDANO) = extract(month from cast('2026-03-20' as date)) || extract(year from cast('2026-03-20' as date)))
ORDER BY ZACNES ASC
898 0 select * from GETPACPOJ(3234/* IDPAC */, '20.03.2026'/* ODE_DNE */)
899 0 select ID, IDPAC, ANAMNEZA, DATUM, ALERGIE, KREVSKUP,
HBSAG, DUCHOD, BEZMOCNOST, HIV, MESOD, MESDO,
MESTYP, BWR, ISOIMUN, PANEV, coalesce(POCPOROD, -1) as POCPOROD, coalesce(POCPOTRAT, -1) as POCPOTRAT,
coalesce(POCINTER, -1) as POCINTER, coalesce(POCOPER, -1) as POCOPER, IDUZIV, SIGNATURE, SIGNATURE_INFO,
IDCERTIFICATE, RHDATUM, RHVYSL, TRIZOMIE, NTD, VVV,
IZIPSTAT, KURAK, TST, KARDIOSTIM, CIGARETDENNE, FREKKOURENI,
(select first 1 vyska from preh where (idpac = anamneza.idpac) and (vyska is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) vyska,
(select first 1 vaha from preh where (idpac = anamneza.idpac) and (vaha is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) vaha,
(select first 1 puls from preh where (idpac = anamneza.idpac) and (puls is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) puls,
(select first 1 tlaksys from preh where (idpac = anamneza.idpac) and (tlaksys is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) tlaksys,
(select first 1 tlakdia from preh where (idpac = anamneza.idpac) and (tlakdia is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) tlakdia,
memporod, mempotrat, meminter, memoper, pm, ID_EDOKUMENT, PRUKAZ from ANAMNEZA where (IDPAC=3234/* IDPAC */)
ORDER BY DATUM DESC
, ID DESC
900 0 select AC.NAZEV,
AV.SVALUE,
AV.BDATA,
AV.NVALUE,
AV.DVALUE,
AF.USERMASK,
AV.TYP
from ANAMVALUES AV
left join ANAMVCFG AC on AC.IDTYPHODN = AV.IDTYPHODN
left join ANAMVFMT AF on AF.IDTYPHODN = AV.IDTYPHODN
where AV.IDPAC=3234/* IDPAC */ and AV.PLATIOD <= '01.11.2022'/* DATUM */ and AKTUAL = 'T'
ORDER BY AF.PORADI ASC
, AV.DATZAPIS DESC
, AV.PLATIOD DESC
901 0 select heslotelkom from KAR where idpac = 3234
902 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
903 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'PSA'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
904 0 select K.POHLAVI as POHLAVI, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 KOD from STALDGN where IDPAC = K.IDPAC and IDANAM = (select first 1 ID from ANAMNEZA where IDPAC = K.IDPAC order by DATUM desc, ID desc) and KOD like 'C61%') as DGN, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('01131', '01132', '01133', '01134') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('01131', '01132', '01133', '01134') order by DATOSE desc, ID desc) as VYKON from KAR K where K.IDPAC = 3234/* IDPAC */
905 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
906 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'TOKS'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
907 0 select K.DATNAR as DATNAR, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('15120', '15121') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('15120', '15121') order by DATOSE desc, ID desc) as VYKON from KAR K where K.IDPAC = 3234/* IDPAC */
908 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
909 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'FRAX'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
910 0 select K.DATNAR, K.POHLAVI, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('11320', '11321', '11327') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('11320', '11321', '11327') order by DATOSE desc, ID desc) as VYKON, (select first 1 "DATA" from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 112/* TYP */ order by DATUM desc, IDPRE desc) as DXADATA, (select first 1 DATUM from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 112/* TYP */ order by DATUM desc, IDPRE desc) as DXADATUM from KAR K where K.IDPAC = 3234/* IDPAC */
911 0 select GV.DATUM from GENVYS GV where GV.IDPRE = (select first 1 IDPRE from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 0/* TYP */ order by DATUM desc)
912 0 select first 1 RPRUKAZ from KAR where IDPAC = 3234
913 0 select first 1 ZPRUKAZ from KAR where IDPAC = 3234
914 0 execute procedure sp_log(3234/* idpac */, 10000/* tblid */, 3234/* recid */, 'V', NULL/* rodcis */, NULL/* id1 */, NULL/* detail */)
915 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
916 0 select first 1 * from KAR
917 0 select ID_ESINSTITUCE from ( select coalesce(PU.ID_ESINSTITUCE, P.ID_ESINSTITUCE, O.ID_ESINSTITUCE, Z.ID_ESINSTITUCE) ID_ESINSTITUCE from PRACUZIV PU left join PRACOVISTE P on (P.ID=PU.IDPRAC) left join ODDEL O on (P.IDODDEL=O.ID) left join ZARIZENI Z on (O.IDZAR=Z.ID) where PU.IDPRAC = 2 and PU.IDUZIV = 6 ) ORGS where exists (select ID from ES_INSTITUCE where ID = ORGS.ID_ESINSTITUCE and ESERVICES = 'T')
918 0 select KAR.DATNAR,(select first 1 STAV from ES_PACIDENT join ES_PAC on (ES_PAC.ID=ES_PACIDENT.PAC_ID) left join ES_BROKER on (ES_BROKER.id_es_pac = ES_PAC.ID) where ((ES_PAC.idpac = kar.idpac) or (ES_BROKER.idpac = kar.idpac)) and ES_PACIDENT.INST_ID = 0) as ES_STAV,KAR.IDPAC,KAR.INFORMACE,KAR.INFORMACE_COL,KAR.JMENO,(select first 1 KZ.IDZAR from KARZARAZENI KZ where (KZ.IDPAC=KAR.IDPAC) and (KZ.DATUM is null or (KZ.DATUM<=CURRENT_DATE)) and (KZ.DATUMDO is null or (KZ.DATUMDO>=CURRENT_DATE)) order by KZ.ID) as K_ZARZAR,KAR.POHLAVI,GPP.POJ,KAR.POZNAMKA,KAR.PRIJMENI,KAR.PRIJMENI_UP,(select DATUM_REGISTRACE from SP_GETREGDAT(kar.IDPAC)) as REGDATUM,KAR.REGISTROVAL,(select PRIZNAK from SP_GETREGDAT(kar.IDPAC)) as REGPRIZNAK,KAR.RODCIS,KAR.ROZENA,(select first 1 OUTCOLS from GETKARZARAZENICOLORS(kar.idpac, '2026-03-20')) as SKUPINY,KAR.TITUL,KAR.TITULZA,KAR.TRVOBEC,KAR.TRVPSC,KAR.TRVULICE,KAR.VYRAZEN
from KAR
left join GETPACPOJ(KAR.IDPAC, '2026-03-20') GPP on GPP.IDPAC = KAR.IDPAC
where (vyrazen = 'N') and exists (select id from registr r join icp i on r.idicp = i.idicp where r.idpac = kar.idpac and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20') and (r.priznak in ('V','D','A')) and (i.icp = '09305001') and (i.odb = '001'))
ORDER BY KAR.PRIJMENI_UP ASC
, KAR.RODCIS ASC
919 0 select first 1 ALERGIE from ANAMNEZA where IDPAC = 3234/* IDPAC */ and DATUM <= '20.03.2026'/* DATUM */
ORDER BY DATUM DESC
, ID DESC
920 0 select first 1 KAP_CHECK, KAP_STAV from KARB2B where IDPAC = 3234 and ICP='09305001'
921 0 select first 1 VAKCINACE_CHECK, VAKCINACE_STAV, VAKCINACE_DATUM from KARISIN where IDPAC = 3234
922 0 select distinct H.TYP from DOKLADH H join DOKLADD D on H.IDHLAV = D.IDHLAV where ((H.RODCIS = '486122443'/* RODCIS */) or (H.RODCIS is null)) and (D.RODCIS = '486122443'/* RODCIS */) and (H.IDA is NULL) and (H.POJ = '111'/* POJ */ ) and (H.ICZ = '09305001'/* ICZ */) and (H.HODB = '001'/* ODB */)
923 0 select 'acDokladHCes', 'DOC%C' || case count(*) when 0 then '' else 'X' end from CESH join CESD on CESD.IDHLAV = CESH.IDHLAV
where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHLaz', 'DOC%L' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='L') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHOzdrav', 'DOC%V' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='O') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHDrg', 'DOC%D' || case count(*) when 0 then '' else 'X' end from DRG where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHOrtop', 'DOC%O' || case count(*) when 0 then '' else 'X' end from POU where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHFoni', 'DOC%F' || case count(*) when 0 then '' else 'X' end from POUFONIH where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from POUFONID where IDHLAV = POUFONIH.IDHLAV)
924 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
925 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
926 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
927 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
928 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
929 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
930 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
931 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
932 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
933 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
934 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
935 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
936 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
937 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
938 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
939 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
940 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
941 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
942 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
943 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
944 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
945 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
946 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
947 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
948 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
949 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
950 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
951 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
952 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
953 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
954 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
955 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
956 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
957 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
958 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
959 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
960 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
961 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
962 0 select first 1 ALERGIE from ANAMNEZA where IDPAC = 3234/* IDPAC */ and DATUM <= '20.03.2026'/* DATUM */
ORDER BY DATUM DESC
, ID DESC
963 0 select first 1 KAP_CHECK, KAP_STAV from KARB2B where IDPAC = 3234 and ICP='09305001'
964 0 select first 1 VAKCINACE_CHECK, VAKCINACE_STAV, VAKCINACE_DATUM from KARISIN where IDPAC = 3234
965 0 select distinct H.TYP from DOKLADH H join DOKLADD D on H.IDHLAV = D.IDHLAV where ((H.RODCIS = '486122443'/* RODCIS */) or (H.RODCIS is null)) and (D.RODCIS = '486122443'/* RODCIS */) and (H.IDA is NULL) and (H.POJ = '111'/* POJ */ ) and (H.ICZ = '09305001'/* ICZ */) and (H.HODB = '001'/* ODB */)
966 0 select 'acDokladHCes', 'DOC%C' || case count(*) when 0 then '' else 'X' end from CESH join CESD on CESD.IDHLAV = CESH.IDHLAV
where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHLaz', 'DOC%L' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='L') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHOzdrav', 'DOC%V' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='O') AND (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHDrg', 'DOC%D' || case count(*) when 0 then '' else 'X' end from DRG where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHOrtop', 'DOC%O' || case count(*) when 0 then '' else 'X' end from POU where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */)
union
select 'acDokladHFoni', 'DOC%F' || case count(*) when 0 then '' else 'X' end from POUFONIH where (RODCIS = '486122443'/* RODCIS */) and (IDA is NULL) and (POJ = '111'/* POJ */) and exists(select ID from POUFONID where IDHLAV = POUFONIH.IDHLAV)
967 0 select idicz from ICZ where poj = '111' and icz = '09305000'
968 0 select icp from ICP where idicz = '12' and odb = '001'
969 0 select idicz from ICZ where poj = '111' and icz = '09305000'
970 0 select icp from ICP where idicz = '12' and odb = '001'
971 0 select cast('BalickyPac' as varchar(11)) as ID, substring(cast(BPAC.KOD as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(BPAC.CENPASMO as VARCHAR(70)) from 1 for 30) as VAR2, cast(BPAC.DATUMOD as DATE) as DATE1, cast(BPAC.DATUMDO as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from BALICKYPAC BPAC left join SP_BALICKYPAC_PRIZNAK(BPAC.ID, '20.03.2026') PRI on 1 = 1 where BPAC.IDPAC = 3234 and PRI.PRIZNAK in ('A', 'B') union select cast('Dluh' as varchar(11)) as ID, substring(cast(P.MENA as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast((SUM(P.CENA - P.SLEVAC) - (SUM(P.PLATBA) + SUM((COALESCE((select SUM(case ZD.TYP when 'R' then ZD.CELKEM else -ZD.CELKEM end) from PLADET ZD where ZD.IDPLA = P.IDPLA and (ZD.TYP <> P.DOKLADTYP) and (ZD.TYP <> '|') and ((ZD.CENA < 0) or (ZD.TYP = 'R'))), 0))))) as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM PLA P WHERE (P.IDPAC = 3234) AND (P.DOKLADTYP = 'F') AND (P.STORNO IS NULL) AND (P.NENISALDO = 'F') AND ((P.SPLATNOST IS NULL) OR (P.SPLATNOST < '2026-03-20')) AND (P.VALID = 'F') GROUP BY P.MENA union select cast('SouhlasPac' as varchar(11)) as ID, substring(cast(case when S.NAZEV is null then case when H.TYP = 'ZSOUPOS' then 'Souhlas/Nesouhlas s poskytnutím zdravotních služeb nezletilému' when H.TYP = 'ZSOUPOZ' then 'Souhlas zákonného zástupce nezletilého pacienta staršího 15ti let' when H.TYP = 'ZSOUPO2' then 'Nesouhlas s poskytnutím zdravotních služeb - povinné oèkování' when H.TYP = 'ZPOSIN2' then 'Urèení osoby oprávnìné dle zákona o zdravotních službách' when H.TYP = 'OdmPece' then 'Prohlášení o odmítnutí zdravotní péèe pacientem - Negativní revers' end else S.NAZEV end as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(H.DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from HISTDOC H left join SOUHLASPACSABL S on H.IDSOUHLASPACSABL = S.ID where H.TYP in ('IndSou', 'ZSOUPOS', 'ZSOUPOZ', 'ZSOUPO2', 'ZPOSIN2', 'OdmPece') and H.IDPACI = 3234 union select cast('sCenaVykZUM' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(coalesce(sum(cenabod),0) + coalesce(sum(cenamat),0) as NUMERIC(15,2)) as NUM1, cast((select coalesce(sum(cena),0) from LECD d where d.RODCIS = '486122443' and extract(year from d.DATOSE) = '2026' and ((d.KAT is null) or (d.KAT <> 'N')) and exists (select h.IDLEC from LECH h where h.IDLEC = d.IDLEC and h.POJ = '111' and h.ICZ in ('09305001'))) as NUMERIC(15,2)) as NUM2 from DOKLADD d where d.RODCIS = '486122443' and extract(year from d.DATOSE) = '2026' and ((d.KAT is null) or (d.KAT <> 'N' and d.KAT <> 'K' and d.KAT <> 'A')) and exists (select h.IDHLAV from DOKLADH h where h.IDHLAV = d.IDHLAV and h.POJ = '111' and h.ICZ in ('09305001')) union select cast('Registrl' as varchar(11)) as ID, substring(cast(REGISTROVAL as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from KAR where IDPAC = 3234 union select cast('OseLekPrak' as varchar(11)) as ID, substring(cast(F_CONCAT(PRIJMENI, F_CONCAT(JMENO, TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(TITUL2 as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(CAST(ODBORN as INTEGER) as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM KARUZIV_SEL(3234, 'T') WHERE ODBORN in ('001', '002') union select cast('SledLek' as varchar(11)) as ID, substring(cast(KOD as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(LEK as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from SLEDLEK where IDPAC = 3234 and DATUM <= '2026-03-20' union select first 10 cast('HistDoc' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from HISTDOC where IDPACI = 3234 and STAV is NULL and IDZARPR = 2 and IDODDPR = 2 and IDPRACPR = 2 union select first 1 cast('LastSms' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(SENDTIME) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from SMS where PACID = 3234 and SENDTIME is not NULL and not(STATUS in (100,1000)) union select first 1 cast('PozadLekar' as varchar(11)) as ID, substring(cast(H.EICZ as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(H.EODZ as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DOKLADH H where H.IDHLAV = (select first 1 I.IDHLAV from DOKLADH I where I.RODCIS = '486122443' and I.EICZ is not NULL order by I.IDHLAV desc) union select first 10 cast('Prilohy' as varchar(11)) as ID, substring(cast(FILENAME as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from FILES where IDPAC = 3234 union select first 10 cast('Objednavky' as varchar(11)) as ID, substring(cast(F_CONCAT(U.PRIJMENI, F_CONCAT(U.JMENO, U.TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(PRAC as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(CAS as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from OBJOBJ O join PRACOVISTE P on (P.ID = O.IDPRAC) join UZIVATEL U on (U.IDUZI = O.IDUZI) where IDPAC = 3234 and DATUM >= '20.03.2026' union select cast('OseLek' as varchar(11)) as ID, substring(cast(F_CONCAT(PRIJMENI, F_CONCAT(JMENO, TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(TITUL2 as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM KARUZIV_SEL(3234, 'T') union select cast('PeProhlidky' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(TERMIN as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PREH join PREINIH on (PREH.IDPREINI = PREINIH.IDPREINI) where IDPAC = 3234 union select cast('Medikace' as varchar(11)) as ID, substring(cast(NAZ as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(PLATI_OD as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from MEDIKACE where IDPAC = 3234 and PLATI_OD <= '20.03.2026' and (PLATI_DO >= '20.03.2026' or PLATI_DO is NULL) union select cast('NextDispenz' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(SKUPINA as VARCHAR(70)) from 1 for 30) as VAR2, cast(PRISTI as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DISPAC join DISSKU on (DISSKU.IDDIS = DISPAC.IDDIS) where IDPAC = 3234 and PRISTI is not NULL union select cast('Dispenz' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(SKUPINA as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATZAR as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DISPAC join DISSKU on (DISSKU.IDDIS = DISPAC.IDDIS) where IDPAC = 3234 union select cast('Prohlidky' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PREPRI join PREINIH on (PREPRI.IDPREINI = PREINIH.IDPREINI) where IDPAC = 3234 and datum is not null union select cast('NextOck' as varchar(11)) as ID, substring(cast(coalesce(NAZ,ZKRATKA) as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUMD as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from OCKPRI o left join KLK k on o.ZKRATKA = k.KOD where IDPAC = 3234 union select first 1 cast('LastVykon' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, substring(cast(D.KOD as VARCHAR(70)) from 1 for 30) as VAR2, cast(D.DATOSE as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DOKLADD D where D.ID = (select first 1 dd.id from dokladd dd join dokladh dh on (dh.idhlav = dd.idhlav) where dd.rodcis = '486122443' and (dh.hodb = '001' or dh.hodb is null) order by dd.datose desc) union select first 1 cast('LastDekurs' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(DATUM) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DEKURS where IDPAC = 3234 and (IDPRAC = 2 or IDPRAC = -1) union select first 1 cast('Karta' as varchar(11)) as ID, substring(cast(INFORMACE as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(CIZINEC as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(INFORMACE_COL as INTEGER) as INT1, POZNAMKA as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from KAR where IDPAC = 3234 union select first 1 cast('Saldo' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(SALDO as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PACIENT_SALDO(3234, 1, 0, 0) union select first 1 cast('Anamneza' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, substring(cast(KREVSKUP as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, ANAMNEZA as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ANAMNEZA where ID = (select first 1 ID from ANAMNEZA where IDPAC=3234 order by DATUM DESC, ID desc) union select first 20 cast('Ockovani' as varchar(11)) as ID, substring(cast(ockzaz.LATKA as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(ockzaz.ZKRATKA as VARCHAR(70)) from 1 for 30) as VAR2, cast(max(ockzaz.DATUM) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ockzaz where ockzaz.idpac = 3234 group by ockzaz.ZKRATKA, ockzaz.LATKA union select first 1 cast('NeschopenOd' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(ZACNES) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from NES where (IDPAC = 3234) and (ZACNES <= '20.03.2026') and ((KONNES is NULL) or (KONNES > '20.03.2026')) and (STORNO = 'F') union select first 1 cast('Alergie' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, ALERGIE as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ANAMNEZA where IDPAC = 3234 and ID = (select first 1 ID from ANAMNEZA where IDPAC = 3234 and DATUM <= '20.03.2026' order by DATUM desc, ID desc) union select first 1 cast('Pojistovna' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(P.IDICP as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ICP P join ICZ Z on (Z.IDICZ = P.IDICZ) where Z.POJ = '111' and P.ODB = '001'
972 0 select POHLAVI,PRIJMENI,JMENO,TITUL,(select first 1 POJ from GETPACPOJ(IDPAC, '20.03.2026 00:00:00.000'/* ODE_DNE */)) as POJ,DATNAR,RODCIS,IDSTAV,DRUHPOJ,TRVOBEC,TRVULICE,TRVPSC,PREOBEC,PREULICE,PREPSC,AKTIVBYDL,ZAMEST,ZAMADRESA,IDZAMEST,PROFES,OSCISLO,GEONOMU,(select KOD from GETPACCENPAS(IDPAC, '20.03.2026 00:00:00.000'/* ODE_DNE */)) as CENPAS,ROZENA,IZIPOD,STPRIS,ZUJEDN,PRUKAZ,TYPPECE,CIZINEC,TITULZA,DATREG,ZASTUPOVANY_ICP,IDISIN,UPRCHLIK from KAR where IDPAC = 3234/* ID */
973 0 select first 1 R.ID, R.DATUM from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
974 0 select KOD from STALDGN where (IDPAC = 3234) and IDANAM = (select first 1 ID from ANAMNEZA where IDPAC = 3234 order by DATUM desc)
ORDER BY PORADI ASC
, KOD ASC
975 0 select first 1 N.ZACNES, D.DATUM, D.KAM, D.KAMODKUD, D.ICZ
from NES N left join NESD D on D.IDNES = N.ID
where (N.IDPAC = 3234) and (N.ZACNES <= '20.03.2026') and ((N.KONNES is NULL) or (N.KONNES > '20.03.2026')) and (N.STORNO = 'F')
ORDER BY N.ZACNES DESC
, D.DATUM DESC
, D.ID DESC
976 0 select PV.KOD,
(select first 1 D.DATOSE from DOKLADD D where D.RODCIS = '486122443'/* RODCIS */ and D.KOD = PV.KOD order by DATOSE desc),
PV.JENREG,
PV.ODVYKAZANI
from PROHVYK PV
where (PV.ODBORN is NULL or PV.ODBORN = '001'/* ODB */)
and (PV.ICP is NULL or PV.ICP = '09305001'/* ICP */)
and (PV.VEKOD is NULL or PV.VEKOD <= 77/* VEKOD */)
and (PV.VEKDO is NULL or PV.VEKDO > 77/* VEKDO */)
and (PV.POHLAVI is NULL or PV.POHLAVI = 'Z'/* POHLAVI */)
ORDER BY PV.KOD ASC
977 0 select PV.KOD,
PV.JENREG,
PV.ODVYKAZANI
from PROHVYK PV
where (PV.ODBORN is NULL or PV.ODBORN = '001'/* ODB */)
and (PV.VEKOD is NULL or PV.VEKOD <= 77/* VEKOD */)
and (PV.VEKDO is NULL or PV.VEKDO > 77/* VEKDO */)
and (PV.POHLAVI is NULL or PV.POHLAVI = 'Z'/* POHLAVI */)
ORDER BY PV.KOD ASC
978 0 select S.NAZEV, M.NAZ, S.KOD from STALDGN S join MKN10 M on (M.KOD = S.KOD and (M.PLATIOD is NULL or M.PLATIOD <= 'NOW') and (M.PLATIDO is NULL or M.PLATIDO >= 'NOW')) where (S.IDPAC = 3234) and S.IDANAM = (select first 1 A.ID from ANAMNEZA A where A.IDPAC = 3234 order by A.DATUM desc)
ORDER BY S.PORADI ASC
, S.KOD ASC
979 0 select first 1 TP.DATUM from TEHPRO TP join TEH T on T.IDTEH = TP.IDTEH where T.IDPAC = 3234
ORDER BY TP.DATUM DESC
980 0 select first 1 DATUM from GENVYS where IDPAC = 3234 and TYP = 110
ORDER BY DATUM DESC
981 0 select first 1 KAP_CHECK, KAP_STAV, DALSI_KONTROLA from KARB2B where IDPAC = 3234 and ICP='09305001'
982 0 select first 1 T.WARN, T.POZN, T.DATUM from TEHKAL T where (T.IDPAC = 3234/* IDPAC */) and (T.DATUM >= '20.03.2026'/* DATUM */)
ORDER BY DATUM ASC
983 0 select first 1 (case T.VYPOCETDLE when 1 then (T.PM) else (T.UZ1POROD - 280) end) as POCATEKTEH
from Teh T
left join kar K on (K.idpac = T.IdPac)
where
(T.IDPAC = 3234/* IDPAC */) and
((ENDTEH>='20.03.2026 00:00:00.000'/* Dnes */) or (ENDTEH is null)) and /* pouze vysetreni pred datem ukonceni*/
(((PM is NULL) and (UZ1POROD is NULL) and (ENDTEH is null)) or /* nelze zjistit konec tehotenstvi*/
(T.PM >= ('20.03.2026 00:00:00.000'/* Dnes */ - (42*7))) or /* max. delka tehotenstvi dle PM 42 tyd. */
((PM is null) and (UZ1POROD+14 >= '20.03.2026 00:00:00.000'/* Dnes */)) /* max. termin dle UZ + 14 dni */
)
ORDER BY PM DESC NULLS LAST
, UZ1POROD DESC NULLS LAST
984 0 select first 1 ZAMEST, ZAMADRESA, PROFES, ICO from KAR left join FIRMY on FIRMY.FIRMA = KAR.ZAMEST where IDPAC = 3234 and (ZAMEST is not NULL or ZAMADRESA is not NULL or PROFES is not NULL)
985 0 select first 1 DATZAL from KAR where IDPAC = 3234
986 0 select first 1 BMI from SP_GETBMI(3234)
987 0 select first 1 puls from preh where (idpac = 3234) and not(puls is null)
ORDER BY datum DESC
988 0 select first 1 ZACNES, CISNES, ID, (select first 1 DATA from HISTDOC where TYP = 'POTDPN' and (IDPACI = 3234) and (DATA like '%CisNes=' || NES.CISNES || '%') order by DATUM desc) from NES where (IDPAC = 3234) and ('2026-03-20' >= ZACNES + 10) and ((KONNES is NULL) or (KONNES > '2026-03-20')) and (STORNO = 'F') and ((select count(*) from HISTDOC where TYP = 'POTDPN' and (IDPACI = 3234) and (extract(month from DATUM) || extract(year from DATUM) = extract(month from cast('2026-03-20' as date) + 4) || extract(year from cast('2026-03-20' as date) + 4)) and DATA like '%CisNes=' || NES.CISNES || '%') = 0) and (not exists(select Id from nesd where nesd.idnes = nes.id) or ((select first 1 Kam from nesd where nesd.idnes = nes.id order by nesd.datum desc, nesd.id desc) = 'N'))
ORDER BY ZACNES ASC
989 0 select first 1 ZACNES, CISNES, ID, POTVRZENI_VYDANO from NES where (IDPAC = 3234) and ('2026-03-20' >= ZACNES + 10) and ((KONNES is NULL) or (KONNES > '2026-03-20')) and (STORNO = 'F') and (extract(month from POTVRZENI_VYDANO) || extract(year from POTVRZENI_VYDANO) = extract(month from cast('2026-03-20' as date)) || extract(year from cast('2026-03-20' as date)))
ORDER BY ZACNES ASC
990 0 select * from GETPACPOJ(3234/* IDPAC */, '20.03.2026'/* ODE_DNE */)
991 0 select ID, IDPAC, ANAMNEZA, DATUM, ALERGIE, KREVSKUP,
HBSAG, DUCHOD, BEZMOCNOST, HIV, MESOD, MESDO,
MESTYP, BWR, ISOIMUN, PANEV, coalesce(POCPOROD, -1) as POCPOROD, coalesce(POCPOTRAT, -1) as POCPOTRAT,
coalesce(POCINTER, -1) as POCINTER, coalesce(POCOPER, -1) as POCOPER, IDUZIV, SIGNATURE, SIGNATURE_INFO,
IDCERTIFICATE, RHDATUM, RHVYSL, TRIZOMIE, NTD, VVV,
IZIPSTAT, KURAK, TST, KARDIOSTIM, CIGARETDENNE, FREKKOURENI,
(select first 1 vyska from preh where (idpac = anamneza.idpac) and (vyska is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) vyska,
(select first 1 vaha from preh where (idpac = anamneza.idpac) and (vaha is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) vaha,
(select first 1 puls from preh where (idpac = anamneza.idpac) and (puls is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) puls,
(select first 1 tlaksys from preh where (idpac = anamneza.idpac) and (tlaksys is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) tlaksys,
(select first 1 tlakdia from preh where (idpac = anamneza.idpac) and (tlakdia is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) tlakdia,
memporod, mempotrat, meminter, memoper, pm, ID_EDOKUMENT, PRUKAZ from ANAMNEZA where (IDPAC=3234/* IDPAC */)
ORDER BY DATUM DESC
, ID DESC
992 0 select AC.NAZEV,
AV.SVALUE,
AV.BDATA,
AV.NVALUE,
AV.DVALUE,
AF.USERMASK,
AV.TYP
from ANAMVALUES AV
left join ANAMVCFG AC on AC.IDTYPHODN = AV.IDTYPHODN
left join ANAMVFMT AF on AF.IDTYPHODN = AV.IDTYPHODN
where AV.IDPAC=3234/* IDPAC */ and AV.PLATIOD <= '01.11.2022'/* DATUM */ and AKTUAL = 'T'
ORDER BY AF.PORADI ASC
, AV.DATZAPIS DESC
, AV.PLATIOD DESC
993 0 select heslotelkom from KAR where idpac = 3234
994 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
995 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'PSA'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
996 0 select K.POHLAVI as POHLAVI, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 KOD from STALDGN where IDPAC = K.IDPAC and IDANAM = (select first 1 ID from ANAMNEZA where IDPAC = K.IDPAC order by DATUM desc, ID desc) and KOD like 'C61%') as DGN, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('01131', '01132', '01133', '01134') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('01131', '01132', '01133', '01134') order by DATOSE desc, ID desc) as VYKON from KAR K where K.IDPAC = 3234/* IDPAC */
997 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
998 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'TOKS'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
999 0 select K.DATNAR as DATNAR, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('15120', '15121') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('15120', '15121') order by DATOSE desc, ID desc) as VYKON from KAR K where K.IDPAC = 3234/* IDPAC */
1000 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 3234) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
1001 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'FRAX'/* TYP */ and IDPAC = 3234/* IDPAC */
ORDER BY DATUM DESC
1002 0 select K.DATNAR, K.POHLAVI, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('11320', '11321', '11327') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('11320', '11321', '11327') order by DATOSE desc, ID desc) as VYKON, (select first 1 "DATA" from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 112/* TYP */ order by DATUM desc, IDPRE desc) as DXADATA, (select first 1 DATUM from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 112/* TYP */ order by DATUM desc, IDPRE desc) as DXADATUM from KAR K where K.IDPAC = 3234/* IDPAC */
1003 0 select GV.DATUM from GENVYS GV where GV.IDPRE = (select first 1 IDPRE from GENVYS where IDPAC = 3234/* IDPAC */ and TYP = 0/* TYP */ order by DATUM desc)
1004 0 select first 1 RPRUKAZ from KAR where IDPAC = 3234
1005 0 select first 1 ZPRUKAZ from KAR where IDPAC = 3234
1006 0 execute procedure sp_log(3234/* idpac */, 10000/* tblid */, 3234/* recid */, 'V', NULL/* rodcis */, NULL/* id1 */, NULL/* detail */)
1007 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
1008 0 select first 1 * from KAR
1009 0 select ID_ESINSTITUCE from ( select coalesce(PU.ID_ESINSTITUCE, P.ID_ESINSTITUCE, O.ID_ESINSTITUCE, Z.ID_ESINSTITUCE) ID_ESINSTITUCE from PRACUZIV PU left join PRACOVISTE P on (P.ID=PU.IDPRAC) left join ODDEL O on (P.IDODDEL=O.ID) left join ZARIZENI Z on (O.IDZAR=Z.ID) where PU.IDPRAC = 2 and PU.IDUZIV = 6 ) ORGS where exists (select ID from ES_INSTITUCE where ID = ORGS.ID_ESINSTITUCE and ESERVICES = 'T')
1010 0 select KAR.DATNAR,(select first 1 STAV from ES_PACIDENT join ES_PAC on (ES_PAC.ID=ES_PACIDENT.PAC_ID) left join ES_BROKER on (ES_BROKER.id_es_pac = ES_PAC.ID) where ((ES_PAC.idpac = kar.idpac) or (ES_BROKER.idpac = kar.idpac)) and ES_PACIDENT.INST_ID = 0) as ES_STAV,KAR.IDPAC,KAR.INFORMACE,KAR.INFORMACE_COL,KAR.JMENO,(select first 1 KZ.IDZAR from KARZARAZENI KZ where (KZ.IDPAC=KAR.IDPAC) and (KZ.DATUM is null or (KZ.DATUM<=CURRENT_DATE)) and (KZ.DATUMDO is null or (KZ.DATUMDO>=CURRENT_DATE)) order by KZ.ID) as K_ZARZAR,KAR.POHLAVI,GPP.POJ,KAR.POZNAMKA,KAR.PRIJMENI,KAR.PRIJMENI_UP,(select DATUM_REGISTRACE from SP_GETREGDAT(kar.IDPAC)) as REGDATUM,KAR.REGISTROVAL,(select PRIZNAK from SP_GETREGDAT(kar.IDPAC)) as REGPRIZNAK,KAR.RODCIS,KAR.ROZENA,(select first 1 OUTCOLS from GETKARZARAZENICOLORS(kar.idpac, '2026-03-20')) as SKUPINY,KAR.TITUL,KAR.TITULZA,KAR.TRVOBEC,KAR.TRVPSC,KAR.TRVULICE,KAR.VYRAZEN
from kar join kar_sortby_idlist('4757') on idfromlist = idpac
left join GETPACPOJ(KAR.IDPAC, '2026-03-20') GPP on GPP.IDPAC = KAR.IDPAC
where (VYRAZEN = 'N')
ORDER BY KAR.PRIJMENI_UP ASC
, KAR.RODCIS ASC
1011 0 select first 1 ALERGIE from ANAMNEZA where IDPAC = 4757/* IDPAC */ and DATUM <= '20.03.2026'/* DATUM */
ORDER BY DATUM DESC
, ID DESC
1012 0 select first 1 KAP_CHECK, KAP_STAV from KARB2B where IDPAC = 4757 and ICP='09305001'
1013 0 select first 1 VAKCINACE_CHECK, VAKCINACE_STAV, VAKCINACE_DATUM from KARISIN where IDPAC = 4757
1014 0 select distinct H.TYP from DOKLADH H join DOKLADD D on H.IDHLAV = D.IDHLAV where ((H.RODCIS = '7553221918'/* RODCIS */) or (H.RODCIS is null)) and (D.RODCIS = '7553221918'/* RODCIS */) and (H.IDA is NULL) and (H.POJ = '207'/* POJ */ ) and (H.ICZ = '09305001'/* ICZ */) and (H.HODB = '001'/* ODB */)
1015 0 select 'acDokladHCes', 'DOC%C' || case count(*) when 0 then '' else 'X' end from CESH join CESD on CESD.IDHLAV = CESH.IDHLAV
where (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */)
union
select 'acDokladHLaz', 'DOC%L' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='L') AND (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHOzdrav', 'DOC%V' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='O') AND (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHDrg', 'DOC%D' || case count(*) when 0 then '' else 'X' end from DRG where (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */)
union
select 'acDokladHOrtop', 'DOC%O' || case count(*) when 0 then '' else 'X' end from POU where (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */)
union
select 'acDokladHFoni', 'DOC%F' || case count(*) when 0 then '' else 'X' end from POUFONIH where (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */) and exists(select ID from POUFONID where IDHLAV = POUFONIH.IDHLAV)
1016 0 select KAR.DATNAR,(select first 1 STAV from ES_PACIDENT join ES_PAC on (ES_PAC.ID=ES_PACIDENT.PAC_ID) left join ES_BROKER on (ES_BROKER.id_es_pac = ES_PAC.ID) where ((ES_PAC.idpac = kar.idpac) or (ES_BROKER.idpac = kar.idpac)) and ES_PACIDENT.INST_ID = 0) as ES_STAV,KAR.IDPAC,KAR.INFORMACE,KAR.INFORMACE_COL,KAR.JMENO,(select first 1 KZ.IDZAR from KARZARAZENI KZ where (KZ.IDPAC=KAR.IDPAC) and (KZ.DATUM is null or (KZ.DATUM<=CURRENT_DATE)) and (KZ.DATUMDO is null or (KZ.DATUMDO>=CURRENT_DATE)) order by KZ.ID) as K_ZARZAR,KAR.POHLAVI,GPP.POJ,KAR.POZNAMKA,KAR.PRIJMENI,KAR.PRIJMENI_UP,(select DATUM_REGISTRACE from SP_GETREGDAT(kar.IDPAC)) as REGDATUM,KAR.REGISTROVAL,(select PRIZNAK from SP_GETREGDAT(kar.IDPAC)) as REGPRIZNAK,KAR.RODCIS,KAR.ROZENA,(select first 1 OUTCOLS from GETKARZARAZENICOLORS(kar.idpac, '2026-03-20')) as SKUPINY,KAR.TITUL,KAR.TITULZA,KAR.TRVOBEC,KAR.TRVPSC,KAR.TRVULICE,KAR.VYRAZEN
from kar join kar_sortby_idlist('4757') on idfromlist = idpac
left join GETPACPOJ(KAR.IDPAC, '2026-03-20') GPP on GPP.IDPAC = KAR.IDPAC
where (VYRAZEN = 'N')
ORDER BY IDX ASC
1017 0 select IDZAR, BARVA from ZARAZENI_SPEC_S where BARVA is NOT NULL
1018 0 select first 1 ALERGIE from ANAMNEZA where IDPAC = 4757/* IDPAC */ and DATUM <= '20.03.2026'/* DATUM */
ORDER BY DATUM DESC
, ID DESC
1019 0 select first 1 KAP_CHECK, KAP_STAV from KARB2B where IDPAC = 4757 and ICP='09305001'
1020 0 select first 1 VAKCINACE_CHECK, VAKCINACE_STAV, VAKCINACE_DATUM from KARISIN where IDPAC = 4757
1021 0 select distinct H.TYP from DOKLADH H join DOKLADD D on H.IDHLAV = D.IDHLAV where ((H.RODCIS = '7553221918'/* RODCIS */) or (H.RODCIS is null)) and (D.RODCIS = '7553221918'/* RODCIS */) and (H.IDA is NULL) and (H.POJ = '207'/* POJ */ ) and (H.ICZ = '09305001'/* ICZ */) and (H.HODB = '001'/* ODB */)
1022 0 select 'acDokladHCes', 'DOC%C' || case count(*) when 0 then '' else 'X' end from CESH join CESD on CESD.IDHLAV = CESH.IDHLAV
where (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */)
union
select 'acDokladHLaz', 'DOC%L' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='L') AND (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHOzdrav', 'DOC%V' || case count(*) when 0 then '' else 'X' end from LZN_DOKLADH where (DSK_TYP_DOK='O') AND (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */) and exists(select ID from LZN_DOKLADD where IDHLAV = LZN_DOKLADH.IDHLAV)
union
select 'acDokladHDrg', 'DOC%D' || case count(*) when 0 then '' else 'X' end from DRG where (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */)
union
select 'acDokladHOrtop', 'DOC%O' || case count(*) when 0 then '' else 'X' end from POU where (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */)
union
select 'acDokladHFoni', 'DOC%F' || case count(*) when 0 then '' else 'X' end from POUFONIH where (RODCIS = '7553221918'/* RODCIS */) and (IDA is NULL) and (POJ = '207'/* POJ */) and exists(select ID from POUFONID where IDHLAV = POUFONIH.IDHLAV)
1023 0 select idicz from ICZ where poj = '207' and icz = '09305000'
1024 0 select icp from ICP where idicz = '15' and odb = '001'
1025 0 select idicz from ICZ where poj = '207' and icz = '09305000'
1026 0 select icp from ICP where idicz = '15' and odb = '001'
1027 0 select cast('BalickyPac' as varchar(11)) as ID, substring(cast(BPAC.KOD as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(BPAC.CENPASMO as VARCHAR(70)) from 1 for 30) as VAR2, cast(BPAC.DATUMOD as DATE) as DATE1, cast(BPAC.DATUMDO as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from BALICKYPAC BPAC left join SP_BALICKYPAC_PRIZNAK(BPAC.ID, '20.03.2026') PRI on 1 = 1 where BPAC.IDPAC = 4757 and PRI.PRIZNAK in ('A', 'B') union select cast('Dluh' as varchar(11)) as ID, substring(cast(P.MENA as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast((SUM(P.CENA - P.SLEVAC) - (SUM(P.PLATBA) + SUM((COALESCE((select SUM(case ZD.TYP when 'R' then ZD.CELKEM else -ZD.CELKEM end) from PLADET ZD where ZD.IDPLA = P.IDPLA and (ZD.TYP <> P.DOKLADTYP) and (ZD.TYP <> '|') and ((ZD.CENA < 0) or (ZD.TYP = 'R'))), 0))))) as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM PLA P WHERE (P.IDPAC = 4757) AND (P.DOKLADTYP = 'F') AND (P.STORNO IS NULL) AND (P.NENISALDO = 'F') AND ((P.SPLATNOST IS NULL) OR (P.SPLATNOST < '2026-03-20')) AND (P.VALID = 'F') GROUP BY P.MENA union select cast('SouhlasPac' as varchar(11)) as ID, substring(cast(case when S.NAZEV is null then case when H.TYP = 'ZSOUPOS' then 'Souhlas/Nesouhlas s poskytnutím zdravotních služeb nezletilému' when H.TYP = 'ZSOUPOZ' then 'Souhlas zákonného zástupce nezletilého pacienta staršího 15ti let' when H.TYP = 'ZSOUPO2' then 'Nesouhlas s poskytnutím zdravotních služeb - povinné oèkování' when H.TYP = 'ZPOSIN2' then 'Urèení osoby oprávnìné dle zákona o zdravotních službách' when H.TYP = 'OdmPece' then 'Prohlášení o odmítnutí zdravotní péèe pacientem - Negativní revers' end else S.NAZEV end as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(H.DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from HISTDOC H left join SOUHLASPACSABL S on H.IDSOUHLASPACSABL = S.ID where H.TYP in ('IndSou', 'ZSOUPOS', 'ZSOUPOZ', 'ZSOUPO2', 'ZPOSIN2', 'OdmPece') and H.IDPACI = 4757 union select cast('sCenaVykZUM' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(coalesce(sum(cenabod),0) + coalesce(sum(cenamat),0) as NUMERIC(15,2)) as NUM1, cast((select coalesce(sum(cena),0) from LECD d where d.RODCIS = '7553221918' and extract(year from d.DATOSE) = '2026' and ((d.KAT is null) or (d.KAT <> 'N')) and exists (select h.IDLEC from LECH h where h.IDLEC = d.IDLEC and h.POJ = '207' and h.ICZ in ('09305001'))) as NUMERIC(15,2)) as NUM2 from DOKLADD d where d.RODCIS = '7553221918' and extract(year from d.DATOSE) = '2026' and ((d.KAT is null) or (d.KAT <> 'N' and d.KAT <> 'K' and d.KAT <> 'A')) and exists (select h.IDHLAV from DOKLADH h where h.IDHLAV = d.IDHLAV and h.POJ = '207' and h.ICZ in ('09305001')) union select cast('Registrl' as varchar(11)) as ID, substring(cast(REGISTROVAL as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from KAR where IDPAC = 4757 union select cast('OseLekPrak' as varchar(11)) as ID, substring(cast(F_CONCAT(PRIJMENI, F_CONCAT(JMENO, TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(TITUL2 as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(CAST(ODBORN as INTEGER) as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM KARUZIV_SEL(4757, 'T') WHERE ODBORN in ('001', '002') union select cast('SledLek' as varchar(11)) as ID, substring(cast(KOD as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(LEK as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from SLEDLEK where IDPAC = 4757 and DATUM <= '2026-03-20' union select first 10 cast('HistDoc' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from HISTDOC where IDPACI = 4757 and STAV is NULL and IDZARPR = 2 and IDODDPR = 2 and IDPRACPR = 2 union select first 1 cast('LastSms' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(SENDTIME) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from SMS where PACID = 4757 and SENDTIME is not NULL and not(STATUS in (100,1000)) union select first 1 cast('PozadLekar' as varchar(11)) as ID, substring(cast(H.EICZ as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(H.EODZ as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DOKLADH H where H.IDHLAV = (select first 1 I.IDHLAV from DOKLADH I where I.RODCIS = '7553221918' and I.EICZ is not NULL order by I.IDHLAV desc) union select first 10 cast('Prilohy' as varchar(11)) as ID, substring(cast(FILENAME as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from FILES where IDPAC = 4757 union select first 10 cast('Objednavky' as varchar(11)) as ID, substring(cast(F_CONCAT(U.PRIJMENI, F_CONCAT(U.JMENO, U.TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(PRAC as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(CAS as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from OBJOBJ O join PRACOVISTE P on (P.ID = O.IDPRAC) join UZIVATEL U on (U.IDUZI = O.IDUZI) where IDPAC = 4757 and DATUM >= '20.03.2026' union select cast('OseLek' as varchar(11)) as ID, substring(cast(F_CONCAT(PRIJMENI, F_CONCAT(JMENO, TITUL, ', '), ' ') as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(TITUL2 as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 FROM KARUZIV_SEL(4757, 'T') union select cast('PeProhlidky' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(TERMIN as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PREH join PREINIH on (PREH.IDPREINI = PREINIH.IDPREINI) where IDPAC = 4757 union select cast('Medikace' as varchar(11)) as ID, substring(cast(NAZ as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(PLATI_OD as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from MEDIKACE where IDPAC = 4757 and PLATI_OD <= '20.03.2026' and (PLATI_DO >= '20.03.2026' or PLATI_DO is NULL) union select cast('NextDispenz' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(SKUPINA as VARCHAR(70)) from 1 for 30) as VAR2, cast(PRISTI as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DISPAC join DISSKU on (DISSKU.IDDIS = DISPAC.IDDIS) where IDPAC = 4757 and PRISTI is not NULL union select cast('Dispenz' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(SKUPINA as VARCHAR(70)) from 1 for 30) as VAR2, cast(DATZAR as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DISPAC join DISSKU on (DISSKU.IDDIS = DISPAC.IDDIS) where IDPAC = 4757 union select cast('Prohlidky' as varchar(11)) as ID, substring(cast(NAZEV as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUM as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PREPRI join PREINIH on (PREPRI.IDPREINI = PREINIH.IDPREINI) where IDPAC = 4757 and datum is not null union select cast('NextOck' as varchar(11)) as ID, substring(cast(coalesce(NAZ,ZKRATKA) as VARCHAR(254)) from 1 for 250) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(DATUMD as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from OCKPRI o left join KLK k on o.ZKRATKA = k.KOD where IDPAC = 4757 union select first 1 cast('LastVykon' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, substring(cast(D.KOD as VARCHAR(70)) from 1 for 30) as VAR2, cast(D.DATOSE as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DOKLADD D where D.ID = (select first 1 dd.id from dokladd dd join dokladh dh on (dh.idhlav = dd.idhlav) where dd.rodcis = '7553221918' and (dh.hodb = '001' or dh.hodb is null) order by dd.datose desc) union select first 1 cast('LastDekurs' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(DATUM) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from DEKURS where IDPAC = 4757 and (IDPRAC = 2 or IDPRAC = -1) union select first 1 cast('Karta' as varchar(11)) as ID, substring(cast(INFORMACE as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(CIZINEC as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(INFORMACE_COL as INTEGER) as INT1, POZNAMKA as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from KAR where IDPAC = 4757 union select first 1 cast('Saldo' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(SALDO as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from PACIENT_SALDO(4757, 1, 0, 0) union select first 1 cast('Anamneza' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, substring(cast(KREVSKUP as VARCHAR(70)) from 1 for 30) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, ANAMNEZA as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ANAMNEZA where ID = (select first 1 ID from ANAMNEZA where IDPAC=4757 order by DATUM DESC, ID desc) union select first 20 cast('Ockovani' as varchar(11)) as ID, substring(cast(ockzaz.LATKA as VARCHAR(254)) from 1 for 250) as VAR1, substring(cast(ockzaz.ZKRATKA as VARCHAR(70)) from 1 for 30) as VAR2, cast(max(ockzaz.DATUM) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ockzaz where ockzaz.idpac = 4757 group by ockzaz.ZKRATKA, ockzaz.LATKA union select first 1 cast('NeschopenOd' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(MAX(ZACNES) as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from NES where (IDPAC = 4757) and (ZACNES <= '20.03.2026') and ((KONNES is NULL) or (KONNES > '20.03.2026')) and (STORNO = 'F') union select first 1 cast('Alergie' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(NULL as INTEGER) as INT1, ALERGIE as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ANAMNEZA where IDPAC = 4757 and ID = (select first 1 ID from ANAMNEZA where IDPAC = 4757 and DATUM <= '20.03.2026' order by DATUM desc, ID desc) union select first 1 cast('Pojistovna' as varchar(11)) as ID, cast(NULL as VARCHAR(254)) as VAR1, cast(NULL as VARCHAR(70)) as VAR2, cast(NULL as DATE) as DATE1, cast(NULL as DATE) as DATE2, cast(NULL as TIMESTAMP) as TIME1, cast(P.IDICP as INTEGER) as INT1, NULL as TEXT1, cast(NULL as NUMERIC(15,2)) as NUM1, cast(NULL as NUMERIC(15,2)) as NUM2 from ICP P join ICZ Z on (Z.IDICZ = P.IDICZ) where Z.POJ = '207' and P.ODB = '001'
1028 0 select POHLAVI,PRIJMENI,JMENO,TITUL,(select first 1 POJ from GETPACPOJ(IDPAC, '20.03.2026 00:00:00.000'/* ODE_DNE */)) as POJ,DATNAR,RODCIS,IDSTAV,DRUHPOJ,TRVOBEC,TRVULICE,TRVPSC,PREOBEC,PREULICE,PREPSC,AKTIVBYDL,ZAMEST,ZAMADRESA,IDZAMEST,PROFES,OSCISLO,GEONOMU,(select KOD from GETPACCENPAS(IDPAC, '20.03.2026 00:00:00.000'/* ODE_DNE */)) as CENPAS,ROZENA,IZIPOD,STPRIS,ZUJEDN,PRUKAZ,TYPPECE,CIZINEC,TITULZA,DATREG,ZASTUPOVANY_ICP,IDISIN,UPRCHLIK from KAR where IDPAC = 4757/* ID */
1029 0 select first 1 R.ID, R.DATUM from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 4757) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
1030 0 select KOD from STALDGN where (IDPAC = 4757) and IDANAM = (select first 1 ID from ANAMNEZA where IDPAC = 4757 order by DATUM desc)
ORDER BY PORADI ASC
, KOD ASC
1031 0 select first 1 N.ZACNES, D.DATUM, D.KAM, D.KAMODKUD, D.ICZ
from NES N left join NESD D on D.IDNES = N.ID
where (N.IDPAC = 4757) and (N.ZACNES <= '20.03.2026') and ((N.KONNES is NULL) or (N.KONNES > '20.03.2026')) and (N.STORNO = 'F')
ORDER BY N.ZACNES DESC
, D.DATUM DESC
, D.ID DESC
1032 0 select PV.KOD,
(select first 1 D.DATOSE from DOKLADD D where D.RODCIS = '7553221918'/* RODCIS */ and D.KOD = PV.KOD order by DATOSE desc),
PV.JENREG,
PV.ODVYKAZANI
from PROHVYK PV
where (PV.ODBORN is NULL or PV.ODBORN = '001'/* ODB */)
and (PV.ICP is NULL or PV.ICP = '09305001'/* ICP */)
and (PV.VEKOD is NULL or PV.VEKOD <= 50/* VEKOD */)
and (PV.VEKDO is NULL or PV.VEKDO > 50/* VEKDO */)
and (PV.POHLAVI is NULL or PV.POHLAVI = 'Z'/* POHLAVI */)
ORDER BY PV.KOD ASC
1033 0 select PV.KOD,
PV.JENREG,
PV.ODVYKAZANI
from PROHVYK PV
where (PV.ODBORN is NULL or PV.ODBORN = '001'/* ODB */)
and (PV.VEKOD is NULL or PV.VEKOD <= 50/* VEKOD */)
and (PV.VEKDO is NULL or PV.VEKDO > 50/* VEKDO */)
and (PV.POHLAVI is NULL or PV.POHLAVI = 'Z'/* POHLAVI */)
ORDER BY PV.KOD ASC
1034 0 select S.NAZEV, M.NAZ, S.KOD from STALDGN S join MKN10 M on (M.KOD = S.KOD and (M.PLATIOD is NULL or M.PLATIOD <= 'NOW') and (M.PLATIDO is NULL or M.PLATIDO >= 'NOW')) where (S.IDPAC = 4757) and S.IDANAM = (select first 1 A.ID from ANAMNEZA A where A.IDPAC = 4757 order by A.DATUM desc)
ORDER BY S.PORADI ASC
, S.KOD ASC
1035 0 select first 1 TP.DATUM from TEHPRO TP join TEH T on T.IDTEH = TP.IDTEH where T.IDPAC = 4757
ORDER BY TP.DATUM DESC
1036 0 select first 1 DATUM from GENVYS where IDPAC = 4757 and TYP = 110
ORDER BY DATUM DESC
1037 0 select first 1 KAP_CHECK, KAP_STAV, DALSI_KONTROLA from KARB2B where IDPAC = 4757 and ICP='09305001'
1038 0 select first 1 T.WARN, T.POZN, T.DATUM from TEHKAL T where (T.IDPAC = 4757/* IDPAC */) and (T.DATUM >= '20.03.2026'/* DATUM */)
ORDER BY DATUM ASC
1039 0 select first 1 (case T.VYPOCETDLE when 1 then (T.PM) else (T.UZ1POROD - 280) end) as POCATEKTEH
from Teh T
left join kar K on (K.idpac = T.IdPac)
where
(T.IDPAC = 4757/* IDPAC */) and
((ENDTEH>='20.03.2026 00:00:00.000'/* Dnes */) or (ENDTEH is null)) and /* pouze vysetreni pred datem ukonceni*/
(((PM is NULL) and (UZ1POROD is NULL) and (ENDTEH is null)) or /* nelze zjistit konec tehotenstvi*/
(T.PM >= ('20.03.2026 00:00:00.000'/* Dnes */ - (42*7))) or /* max. delka tehotenstvi dle PM 42 tyd. */
((PM is null) and (UZ1POROD+14 >= '20.03.2026 00:00:00.000'/* Dnes */)) /* max. termin dle UZ + 14 dni */
)
ORDER BY PM DESC NULLS LAST
, UZ1POROD DESC NULLS LAST
1040 0 select first 1 ZAMEST, ZAMADRESA, PROFES, ICO from KAR left join FIRMY on FIRMY.FIRMA = KAR.ZAMEST where IDPAC = 4757 and (ZAMEST is not NULL or ZAMADRESA is not NULL or PROFES is not NULL)
1041 0 select first 1 DATZAL from KAR where IDPAC = 4757
1042 0 select first 1 BMI from SP_GETBMI(4757)
1043 0 select first 1 puls from preh where (idpac = 4757) and not(puls is null)
ORDER BY datum DESC
1044 0 select first 1 ZACNES, CISNES, ID, (select first 1 DATA from HISTDOC where TYP = 'POTDPN' and (IDPACI = 4757) and (DATA like '%CisNes=' || NES.CISNES || '%') order by DATUM desc) from NES where (IDPAC = 4757) and ('2026-03-20' >= ZACNES + 10) and ((KONNES is NULL) or (KONNES > '2026-03-20')) and (STORNO = 'F') and ((select count(*) from HISTDOC where TYP = 'POTDPN' and (IDPACI = 4757) and (extract(month from DATUM) || extract(year from DATUM) = extract(month from cast('2026-03-20' as date) + 4) || extract(year from cast('2026-03-20' as date) + 4)) and DATA like '%CisNes=' || NES.CISNES || '%') = 0) and (not exists(select Id from nesd where nesd.idnes = nes.id) or ((select first 1 Kam from nesd where nesd.idnes = nes.id order by nesd.datum desc, nesd.id desc) = 'N'))
ORDER BY ZACNES ASC
1045 0 select first 1 ZACNES, CISNES, ID, POTVRZENI_VYDANO from NES where (IDPAC = 4757) and ('2026-03-20' >= ZACNES + 10) and ((KONNES is NULL) or (KONNES > '2026-03-20')) and (STORNO = 'F') and (extract(month from POTVRZENI_VYDANO) || extract(year from POTVRZENI_VYDANO) = extract(month from cast('2026-03-20' as date)) || extract(year from cast('2026-03-20' as date)))
ORDER BY ZACNES ASC
1046 0 select * from GETPACPOJ(4757/* IDPAC */, '20.03.2026'/* ODE_DNE */)
1047 0 select ID, IDPAC, ANAMNEZA, DATUM, ALERGIE, KREVSKUP,
HBSAG, DUCHOD, BEZMOCNOST, HIV, MESOD, MESDO,
MESTYP, BWR, ISOIMUN, PANEV, coalesce(POCPOROD, -1) as POCPOROD, coalesce(POCPOTRAT, -1) as POCPOTRAT,
coalesce(POCINTER, -1) as POCINTER, coalesce(POCOPER, -1) as POCOPER, IDUZIV, SIGNATURE, SIGNATURE_INFO,
IDCERTIFICATE, RHDATUM, RHVYSL, TRIZOMIE, NTD, VVV,
IZIPSTAT, KURAK, TST, KARDIOSTIM, CIGARETDENNE, FREKKOURENI,
(select first 1 vyska from preh where (idpac = anamneza.idpac) and (vyska is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) vyska,
(select first 1 vaha from preh where (idpac = anamneza.idpac) and (vaha is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) vaha,
(select first 1 puls from preh where (idpac = anamneza.idpac) and (puls is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) puls,
(select first 1 tlaksys from preh where (idpac = anamneza.idpac) and (tlaksys is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) tlaksys,
(select first 1 tlakdia from preh where (idpac = anamneza.idpac) and (tlakdia is not null) /*and (datum <= anamneza.datum)*/ order by datum desc, idpre desc) tlakdia,
memporod, mempotrat, meminter, memoper, pm, ID_EDOKUMENT, PRUKAZ from ANAMNEZA where (IDPAC=4757/* IDPAC */)
ORDER BY DATUM DESC
, ID DESC
1048 0 select AC.NAZEV,
AV.SVALUE,
AV.BDATA,
AV.NVALUE,
AV.DVALUE,
AF.USERMASK,
AV.TYP
from ANAMVALUES AV
left join ANAMVCFG AC on AC.IDTYPHODN = AV.IDTYPHODN
left join ANAMVFMT AF on AF.IDTYPHODN = AV.IDTYPHODN
where AV.IDPAC=4757/* IDPAC */ and AV.PLATIOD <= '11.12.2014'/* DATUM */ and AKTUAL = 'T'
ORDER BY AF.PORADI ASC
, AV.DATZAPIS DESC
, AV.PLATIOD DESC
1049 0 execute block(IDPAC integer=4757/* IDPAC */, DATUM DATE='21.09.2025'/* DATUM */)
returns (VALUE_BF varchar(8), VALUE_AF varchar(8), LEK_KOD varchar (8), LEK_NAZ varchar(30))
as
declare variable TMPATC varchar(7) = '';
declare variable TMPSILA varchar(24) = '';
declare variable RDATUM date;
declare variable LEKKOD varchar(8) = '';
declare variable LEKNAZ varchar(30) = '';
declare variable HODN_BE varchar(8) = '-1';
declare variable HODN_AF varchar(8) = '-1';
begin
VALUE_BF = '-1';
VALUE_AF = '-1';
LEK_KOD = '';
LEK_NAZ = '';
select first 1 DATUM, KOD, LEK, ATC
from RECEPT
where
IDPAC = :IDPAC and
DATUM >= :DATUM and
(ATC starting with 'C10AA01' or
ATC starting with 'C10AA05' or
ATC starting with 'C10AA07')
order by datum desc
into :RDATUM, :LEKKOD, :LEKNAZ, :TMPATC;
if (RDATUM is null) then
begin
select first 1 m.DATUM, m.KOD, m.NAZ , l.ATC
from MEDIKACE m
join LEKY l on m.kod = l.kod
where
m.IDPAC = :IDPAC and
(m.PLATI_DO >= :DATUM or m.PLATI_DO is null) and
(l.ATC starting with 'C10AA01' or
l.ATC starting with 'C10AA05' or
l.ATC starting with 'C10AA07')
order by m.DATUM desc
into :RDATUM, :LEKKOD, :LEKNAZ, :TMPATC;
end
if (RDATUM is null) then
begin
VALUE_BF = -1;
VALUE_AF = -1;
LEK_KOD = '';
LEK_NAZ = '';
suspend;
exit;
end
if (RDATUM is not null) then
begin
begin
select first 1 VYSL
from LABVD D
join LABMETOD M on M.IDMETOD = D.IDMETOD and (M.KLICMZ in ('02322', '02323', '02324', '02325', '03379', '03380'))
join LABVH H on H.IDVH = D.IDVH
where D.IDPACIENT = :IDPAC and
H.DATUM <= :RDATUM
order by H.DATUM desc, D.ID desc
into :HODN_BE;
select STRING_OUT from sp_replace_char(:HODN_BE, ',', '.') into HODN_BE;
select first 1 VYSL
from LABVD D
join LABMETOD M on M.IDMETOD = D.IDMETOD and (M.KLICMZ in ('02322', '02323', '02324', '02325', '03379', '03380'))
join LABVH H on H.IDVH = D.IDVH
where D.IDPACIENT = :IDPAC and
H.DATUM >= :RDATUM
order by H.DATUM desc, D.ID desc
into :HODN_AF;
select STRING_OUT from sp_replace_char(:HODN_AF, ',', '.') into HODN_AF;
end
if (((HODN_AF > '-1') and (HODN_AF > '0')) and ((HODN_BE = '-1') or (HODN_BE is null))) then
begin
HODN_BE = HODN_AF;
select first 1 SILA from LEKY where KOD = :LEKKOD and (PLATIDO is null or PLATIDO <= 'TODAY')
into :TMPSILA;
if ((substring(TMPSILA from 1 for 2) = '10') and (TMPATC = 'C10AA01')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.28 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '10') and (TMPATC = 'C10AA05')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.37 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '10') and (TMPATC = 'C10AA07')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.46 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '20') and (TMPATC = 'C10AA01')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.35 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '20') and (TMPATC = 'C10AA05')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.43 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '20') and (TMPATC = 'C10AA07')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.52 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '40') and (TMPATC = 'C10AA01')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.39 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '40') and (TMPATC = 'C10AA05')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.48 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '40') and (TMPATC = 'C10AA07')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.55 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '80') and (TMPATC = 'C10AA01')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.46 from 1 for 5);
else if ((substring(TMPSILA from 1 for 2) = '80') and (TMPATC = 'C10AA05')) then
HODN_BE = substring(cast(HODN_BE as float) * 1.51 from 1 for 5);
end
end
begin
VALUE_BF = :hodn_be;
VALUE_AF = :hodn_af;
LEK_KOD = :lekkod;
LEK_NAZ = :leknaz;
suspend;
end
end
1050 0 select heslotelkom from KAR where idpac = 4757
1051 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 4757) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
1052 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'PSA'/* TYP */ and IDPAC = 4757/* IDPAC */
ORDER BY DATUM DESC
1053 0 select K.POHLAVI as POHLAVI, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 KOD from STALDGN where IDPAC = K.IDPAC and IDANAM = (select first 1 ID from ANAMNEZA where IDPAC = K.IDPAC order by DATUM desc, ID desc) and KOD like 'C61%') as DGN, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('01131', '01132', '01133', '01134') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('01131', '01132', '01133', '01134') order by DATOSE desc, ID desc) as VYKON from KAR K where K.IDPAC = 4757/* IDPAC */
1054 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 4757) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
1055 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'TOKS'/* TYP */ and IDPAC = 4757/* IDPAC */
ORDER BY DATUM DESC
1056 0 select K.DATNAR as DATNAR, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('15120', '15121') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('15120', '15121') order by DATOSE desc, ID desc) as VYKON from KAR K where K.IDPAC = 4757/* IDPAC */
1057 0 select D.DATOSE from DOKLADD D where D.ID = (select first 1 DD.ID from DOKLADD DD where DD.RODCIS = '7553221918'/* RODCIS */ and DD.KOD in ('15120') order by DD.DATOSE desc)
1058 0 select R.ID from REGISTR R join ICP i on (i.idicp = r.idicp) where (r.idpac = 4757) and not (r.priznak in ('Z','N')) and (i.ICP = '09305001') and (i.ODB = '001') and (r.datum <= '2026-03-20') and (r.datum_zruseni is null or r.datum_zruseni >= '2026-03-20')
1059 0 select DATUM, NEZOBRAZOVAT from ALERT where TYP = 'FRAX'/* TYP */ and IDPAC = 4757/* IDPAC */
ORDER BY DATUM DESC
1060 0 select K.DATNAR, K.POHLAVI, (select ROK from GET_VEK2(K.DATNAR, '20.03.2026'/* DATUM */)) as VEK, (select first 1 DATOSE from DOKLADD where RODCIS = K.RODCIS and KOD in ('11320', '11321', '11327') order by DATOSE desc, ID desc) as DATOSE, (select first 1 KOD from DOKLADD where RODCIS = K.RODCIS and KOD in ('11320', '11321', '11327') order by DATOSE desc, ID desc) as VYKON, (select first 1 "DATA" from GENVYS where IDPAC = 4757/* IDPAC */ and TYP = 112/* TYP */ order by DATUM desc, IDPRE desc) as DXADATA, (select first 1 DATUM from GENVYS where IDPAC = 4757/* IDPAC */ and TYP = 112/* TYP */ order by DATUM desc, IDPRE desc) as DXADATUM from KAR K where K.IDPAC = 4757/* IDPAC */
1061 0 select D.DATOSE from DOKLADD D where D.ID = (select first 1 DD.ID from DOKLADD DD where DD.RODCIS = '7553221918'/* RODCIS */ and DD.KOD in ('11320', '11321') order by DD.DATOSE desc)
1062 0 select first 1 RPRUKAZ from KAR where IDPAC = 4757
1063 0 select first 1 ZPRUKAZ from KAR where IDPAC = 4757
1064 0 execute procedure sp_log(4757/* idpac */, 10000/* tblid */, 4757/* recid */, 'V', NULL/* rodcis */, NULL/* id1 */, NULL/* detail */)
1065 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
1066 0 execute procedure SP_UPDATE_USER_TIMESTAMP(7846, 6, 2, '//////////////////8=', 'NTBVBHP470G10', '3.61.0.371')
1067 0 select FSDATS from STAV where ID = 7846/* ID */
1068 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
1069 0 select first 1 * from MEDINETIN I where ((I.STAV <> 1) or (I.STAV is null)) and CGMNUMBER_PRIJEMCE in ('01300149556')
1070 0 select "VALUE" from CLICKDOC where "KEY" = 'system_id'/* "KEY" */
Reference in New Issue View Git Blame Copy Permalink