1 Provera JMBG 1 ((ISNUMERIC(JMBG)=0) or (JMBG like '%.%') or (LEN(RTRIM(JMBG)) not in (7, 13)) or (JMBG in (select n.JMBG from BazaZnanjaNeispravniJMBG n)) or (dbo.datumIzJMBG(JMBG)>DatumIzdavanjaLeka)) (0 <> (select count (*) from ReceptiNeispravni n where ReceptiNeispravniRazlog.SifraRecepta = n.SifraRecepta and ((ISNUMERIC(n.JMBG)=0) or (JMBG like '%.%') or (LEN(RTRIM(n.JMBG)) not in (7, 13)) or (n.JMBG in (select b.JMBG from BazaZnanjaNeispravniJMBG b)) or (dbo.datumIzJMBG(JMBG)>DatumIzdavanjaLeka)))) true False JMBG Неисправан ЈМБГ Neispravan JMBG 2 Provera šifre države 2 (ID_Drzava not in (select ID_Drzava from sDrzava)) sifraRecepta in (select sifraRecepta from ReceptiNeispravni where ID_Drzava not in (select ID_Drzava from sDrzava)) true Country ID Шифра државе Šifra države ID_Drzava 3 Provera šifre filijale 4 (SifraFilijale not in (select SifraFilijale from sfilijala)) sifraRecepta in (select sifraRecepta from ReceptiNeispravni where SifraFilijale not in (select SifraFilijale from sfilijala)) true Branch Office ID Шифра филијале Šifra filijale SifraFilijale 4 Provera JMBGNoOs 8 (JMBGNoOs IS NOT NULL AND ((ISNUMERIC(JMBGNoOs)=0) or (LEN(RTRIM(JMBGNoOs)) not in (7, 13)) or (JMBGNoOs in (select n.JMBG from BazaZnanjaNeispravniJMBG n)))) (0 <> (select count (*) from ReceptiNeispravni n where ReceptiNeispravniRazlog.SifraRecepta = n.SifraRecepta and (n.JMBGNoOs IS NOT NULL AND ((ISNUMERIC(n.JMBGNoOs)=0) or (LEN(RTRIM(n.JMBGNoOs)) not in (7, 13)) or (n.JMBGNoOs in (select b.JMBG from BazaZnanjaNeispravniJMBG b)))))) true False JMBGNoOs Неисправан ЈМБГНоОс Neispravan JMBGNoOs 5 Provera šifre NO 16 (ID_NO not in (select ID_NO from sNO)) sifraRecepta in (select sifraRecepta from ReceptiNeispravni where ID_NO not in (select ID_NO from sNO)) true ID of Social Security Holder Шифра НО Šifra NO ID_NO 6 Provera šifre OO 32 (ID_OO not in (select ID_OO from sOO)) sifraRecepta in (select sifraRecepta from ReceptiNeispravni where ID_OO not in (select ID_OO from sOO)) true Insurance Grounds ID Шифра ОО Šifra OO ID_OO 7 Provera šifre OOP 64 (ID_OOP not in (select ID_OOP from sOOP)) sifraRecepta in (select sifraRecepta from ReceptiNeispravni where ID_OOP not in (select ID_OOP from sOOP)) true Grounds for Free Participation Шифра ООП Šifra OOP ID_OOP 8 Provera šifre zdravstvene ustanove 128 (sifraZU not in (select sifraZU from szuizuus)) sifraRecepta in (select sifraRecepta from ReceptiNeispravni where sifraZU not in (select sifraZU from szuizuus )) true Health Center ID Шифра ЗУ Šifra ZU SifraZU 9 Provera šifre recepta 256 dbo.ProveraSifraRecepta(sifraRecepta)=0 dbo.ProveraSifraRecepta(sifraRecepta)=0 true False Receipt ID Шифра рецепта Šifra recepta 10 Provera šifre izdanog leka 512 (0 = (Select Count(*) From Lek inner join sLek on lek.ID_Lek = s.Lek.ID_Lek Where ((Lek.SifraLeka=Recepti.ID_IzdatogLeka and sLek.DatumP<=Recepti.DatumPropisivanjaLeka And sLek.DatumK Is Null) Or (Lek.SifraLeka=Recepti.ID_IzdatogLeka and sLek.DatumP<=Recepti.DatumPropisivanjaLeka And sLek.DatumK>=Recepti.DatumPropisivanjaLeka)))) 0 = (Select Count(*) From lek inner join sLek on lek.ID_Lek = sLek.ID_Lek, ReceptiNeispravni Where (ReceptiNeispravni.SifraRecepta = ReceptiNeispravniRazlog.SifraRecepta and ((Lek.SifraLeka=ReceptiNeispravni.ID_IzdatogLeka and sLek.DatumP<=ReceptiNeispravni.DatumPropisivanjaLeka And sLek.DatumK Is Null) Or (Lek.SifraLeka=ReceptiNeispravni.ID_IzdatogLeka and sLek.DatumP<=ReceptiNeispravni.DatumPropisivanjaLeka And sLek.DatumK>=ReceptiNeispravni.DatumPropisivanjaLeka)))) true Id of Issued Medicine Шифра издатог лека Šifra izdatog leka ID_IzdatogLeka 11 Provera cene izdanog leka 1024 (0 = (Select Count(*) From lek inner join sLek on Lek.ID_Lek = sLek.ID_Lek Where (Lek.SifraLeka=Recepti.ID_IzdatogLeka and sLek.DatumP<=Recepti.DatumIzdavanjaLeka And (sLek.DatumK Is Null or sLek.DatumK>=Recepti.DatumIzdavanjaLeka)) and Recepti.CenaLeka <=sLek.CenaLeka)) 0 = (Select Count(*) From lek inner join sLek on lek.ID_Lek = sLek.ID_Lek, ReceptiNeispravni Where ReceptiNeispravniRazlog.SifraRecepta = ReceptiNeispravni.SifraRecepta and (Lek.SifraLeka=ReceptiNeispravni.ID_IzdatogLeka and sLek.DatumP<=ReceptiNeispravni.DatumIzdavanjaLeka And (sLek.DatumK Is Null or sLek.DatumK>=ReceptiNeispravni.DatumIzdavanjaLeka)) and ReceptiNeispravni.CenaLeka <=sLek.CenaLeka) true Medicine Price Цена издатог лека Cena izdatog leka CenaLeka 12 Provera šifre dijagnoze 2048 (ID_Dijagnoza not in (select ID_Dijagnoza from sMKB)) sifraRecepta in (select sifraRecepta from ReceptiNeispravni where ID_Dijagnoza not in (select ID_Dijagnoza from sMKB)) true Diagnosis ID Шифра дијагнозе Šifra dijagnoze ID_Dijagnoza 13 Provera šifre lekara 4096 (0 = (Select Count(*) From sLekar Where ((sLekar.SifraLekara=Recepti.SifraLekara and sLekar.DatumZ<=Recepti.DatumPropisivanjaLeka And sLekar.DatumV Is Null) Or (sLekar.SifraLekara=Recepti.SifraLekara and sLekar.DatumZ<=Recepti.DatumPropisivanjaLeka And sLekar.DatumV>=Recepti.DatumPropisivanjaLeka)))) 0 = (Select Count(*) From sLekar, ReceptiNeispravni Where ( ReceptiNeispravni.SifraRecepta = ReceptiNeispravniRazlog.SifraRecepta and ((sLekar.SifraLekara=ReceptiNeispravni.SifraLekara and sLekar.DatumZ<=ReceptiNeispravni.DatumPropisivanjaLeka And sLekar.DatumV Is Null) Or (sLekar.SifraLekara=ReceptiNeispravni.SifraLekara and sLekar.DatumZ<=ReceptiNeispravni.DatumPropisivanjaLeka And sLekar.DatumV>=ReceptiNeispravni.DatumPropisivanjaLeka)))) true Doctor ID Шифра лекара Šifra lekara SifraLekara 14 Provera šifre lekara i recepta 8192 (substring (sifralekara, 1, 2) <> substring (sifrarecepta, 1, 2) and substring(sifralekara, 1,2) <>'31') (0 = (select count (*) from ReceptiNeispravni n where (n.SifraRecepta = ReceptiNeispravniRazlog.SifraRecepta) and (substring (n.sifralekara, 1, 2) = substring (n.sifrarecepta, 1, 2) or substring(sifralekara, 1,2) ='31'))) true Doctor an Receipt ID doesn't match Шифре рецепта и лекара нису упарене Sifra recepta i lekara nisu uparene SifraLekara 15 Provera šifre recepta na max. vrednost 16384 (substring (Recepti.SifraRecepta,1,11) > (select m.MaxSifraRecepta from BazaZnanjaMaxSifraRecepta m where m.SifraFilijale = substring(Recepti.SifraRecepta, 1,2))) (substring(ReceptiNeispravniRazlog.SifraRecepta,1,11) > (select m.MaxSifraRecepta from BazaZnanjaMaxSifraRecepta m where m.SifraFilijale = substring(ReceptiNeispravniRazlog.SifraRecepta, 1,2))) false Receipt ID out of range Шифра рецепта ван опсега Šifra recepta van opsega 16 Provera perioda izmedu propisivanja i izdavanja leka 32768 ((DATEDIFF(day, datumpropisivanjaleka, datumizdavanjaleka) NOT BETWEEN 0 AND 15) and (0 = (Select Count(*) From lek inner join sLek on Lek.ID_Lek = sLek.ID_Lek Where (Lek.SifraLeka=Recepti.ID_IzdatogLeka and sLek.DatumP<=Recepti.DatumIzdavanjaLeka And (sLek.DatumK Is Null or sLek.DatumK>=Recepti.DatumIzdavanjaLeka)) and sLek.id_lista = 4))) sifraRecepta in (select sifrarecepta from receptineispravni where (DATEDIFF(day, datumpropisivanjaleka, datumizdavanjaleka) NOT BETWEEN 0 AND 15) and (0 = (Select Count(*) From lek inner join sLek on Lek.ID_Lek = sLek.ID_Lek, ReceptiNeispravni Where ReceptiNeispravniRazlog.SifraRecepta = ReceptiNeispravni.SifraRecepta and (Lek.SifraLeka=ReceptiNeispravni.ID_IzdatogLeka and sLek.DatumP<=ReceptiNeispravni.DatumIzdavanjaLeka And (sLek.DatumK Is Null or sLek.DatumK>=ReceptiNeispravni.DatumIzdavanjaLeka)) and sLek.id_lista = 4))) true Prescription older than 15 days Рецепт старији од 15 дана Recept stariji od 15 dana 17 Provera datuma izdavanja i propisivanja leka 65536 (datumpropisivanjaleka > getdate() or datumizdavanjaleka > getdate() or datumpropisivanjaleka < '2005-7-15' or datumizdavanjaleka < '2005-7-15') sifraRecepta in (select sifrarecepta from receptineispravni where (datumpropisivanjaleka > getdate() or datumizdavanjaleka > getdate() or datumpropisivanjaleka < '2005-7-15' or datumizdavanjaleka < '2005-7-15')) true Dates on prescription not valid Датум прописивања и/или издавања лека Datum propisivanja i/ili izdavanja leka 18 Provera važenja OOP 131072 ID_OOP not in (select tOOP.ID_OOP from tOOP where tOOP.DatumOd <= DatumIzdavanjaLeka and (tOOP.DatumDo is null or tOOP.DatumDo>=DatumIzdavanjaLeka)) sifraRecepta in (select sifraRecepta from ReceptiNeispravni where ID_OOP not in (select tOOP.ID_OOP from tOOP where tOOP.DatumOd <= DatumIzdavanjaLeka and (tOOP.DatumDo is null or tOOP.DatumDo>=DatumIzdavanjaLeka))) true Grounds for Free Participation not valid ООП није у важности OOP nije u važnosti ID_OOP 19 !Provera šifre podapoteke 262144 (sifrapodapoteke not in (select sifrapodapoteke from faktura)) sifraRecepta in (select sifraRecepta from ReceptiNeispravni where (sifrapodapoteke not in (select sifrapodapoteke from faktura))) false Subpharmacy ID false Погрешна шифра подапотеке Pogrešna šifra podapoteke 20 !Provera procenta marže 524288 (ID_IzdatogLeka in ('1031043','1037081','1039601','1039325', '1039390', '1039330', '1039285') AND ProcMarze <> 6.00) or ((cenaleka*((100 - ProcRabata)/100) < 251 and ProcMarze <> 18.00) or ((cenaleka*((100 - ProcRabata)/100) >=251 and cenaleka*((100 - ProcRabata)/100) <=500) and ProcMarze <> 14.00) or (ID_IzdatogLeka not in ('1031043','1037081','1039601','1039325', '1039390', '1039330', '1039285') AND cenaleka*((100 - ProcRabata)/100) > 500 and ProcMarze <> 12.00)) sifrarecepta in (select r.sifrarecepta from ReceptiNeispravni r where ((r.ID_IzdatogLeka in ('1031043','1037081','1039601','1039325', '1039390', '1039330', '1039285') AND r.ProcMarze <> 6.00) or (r.cenaleka*((100 - r.ProcRabata)/100) < 251 and r.ProcMarze <> 18.00) or ((r.cenaleka*((100 - r.ProcRabata)/100) >=251 and r.cenaleka*((100 - r.ProcRabata)/100) <=500) and r.ProcMarze <> 14.00) or (r.ID_IzdatogLeka not in ('1031043','1037081','1039601','1039325', '1039390', '1039330', '1039285') AND r.cenaleka*((100 - r.ProcRabata)/100) > 500 and r.ProcMarze <> 12.00))) false False price calculation element Погрешан проценат марже Pogrešan procenat marže 21 Provera leka u odnosu na dijagnozu 1048576 (Recepti.ID_Izdatogleka not in (select Lek.sifraleka from sLekUcesceDijagnoza, lek inner join sLek on lek.ID_Lek = sLek.ID_Lek where Lek.sifraleka = Recepti.ID_Izdatogleka and sLek.DatumP<=Recepti.DatumIzdavanjaLeka And (sLek.DatumK Is Null or sLek.DatumK>=Recepti.DatumIzdavanjaLeka) and slek.id_lek = sLekUcesceDijagnoza.id_lek and slek.rednibroj = sLekUcesceDijagnoza.rednibroj and Recepti.ID_Dijagnoza like sLekUcesceDijagnoza.opisdijagnoze and (GodineOd=0 and GodineDo is null or (dbo.godineUOpsegu(JMBG, GodineOd, GodineDo, DatumIzdavanjaLeka)=1)))) (sifraRecepta in (select sifraRecepta from ReceptiNeispravni where ReceptiNeispravni.ID_Izdatogleka not in (select Lek.sifraleka from sLekUcesceDijagnoza, sLek inner join lek on sLek.ID_Lek = lek.ID_Lek where Lek.sifraleka = ReceptiNeispravni.ID_Izdatogleka and sLek.DatumP<=ReceptiNeispravni.DatumIzdavanjaLeka And (sLek.DatumK Is Null or sLek.DatumK>=ReceptiNeispravni.DatumIzdavanjaLeka) and slek.id_lek = sLekUcesceDijagnoza.id_lek and slek.rednibroj = sLekUcesceDijagnoza.rednibroj and ReceptiNeispravni.ID_Dijagnoza like sLekUcesceDijagnoza.opisdijagnoze and (GodineOd=0 and GodineDo is null or (dbo.godineUOpsegu(JMBG, GodineOd, GodineDo, DatumIzdavanjaLeka)=1))))) true False medicine subscirebed accordinog to the Diagnosis ID Погрешно прописан лек у односу на дијагнозу Pogrešno propisan lek u odnosu na dijagnozu ID_IzdatogLeka 22 Provera kolicine leka 2097152 (Recepti.ID_Izdatogleka not in (select Lek.sifraleka from sLekUcesceDijagnoza, lek inner join sLek on lek.ID_Lek = sLek.ID_Lek where Lek.sifraleka = Recepti.ID_Izdatogleka and sLek.DatumP<=Recepti.DatumIzdavanjaLeka And (sLek.DatumK Is Null or sLek.DatumK>=Recepti.DatumIzdavanjaLeka) and slek.id_lek = sLekUcesceDijagnoza.id_lek and slek.rednibroj = sLekUcesceDijagnoza.rednibroj and (Recepti.Kolicina <= sLekUcesceDijagnoza.KolicinaLeka OR sLekUcesceDijagnoza.KolicinaLeka IS NULL ))) (sifraRecepta in (select sifraRecepta from ReceptiNeispravni where ReceptiNeispravni.ID_Izdatogleka not in (select Lek.sifraleka from sLekUcesceDijagnoza, sLek inner join lek on sLek.ID_Lek = lek.ID_Lek where Lek.sifraleka = ReceptiNeispravni.ID_Izdatogleka and sLek.DatumP<=ReceptiNeispravni.DatumIzdavanjaLeka And (sLek.DatumK Is Null or sLek.DatumK>=ReceptiNeispravni.DatumIzdavanjaLeka) and slek.id_lek = sLekUcesceDijagnoza.id_lek and slek.rednibroj = sLekUcesceDijagnoza.rednibroj and (ReceptiNeispravni.Kolicina <= sLekUcesceDijagnoza.KolicinaLeka OR sLekUcesceDijagnoza.KolicinaLeka IS NULL)))) true Quantity of Issued Medicine Количина издатог лека Količina izdatog leka Kolicina