SQL Kefalo » Blog Archive » Provera JMBG

Provera JMBG – Funkcije

Objavljeno: 29-09-2014 | Autor: Nenad Živković | Kategorija: Skriptovi

0

IF EXISTS (SELECT * FROM sys.objects WHERE type IN ('FN', 'IF', 'TF') AND name = 'udf_Kefalo_ProveraJMBGDetaljna')
DROP FUNCTION udf_Kefalo_ProveraJMBGDetaljna;
GO
-- ****************************************************************
-- www.sql-kefalo.net
-- ****************************************************************
-- Autor: Nenad Zivkovic
-- Datum: 02.09.2014
-- Opis: Funkcija za proveru JMBG-a. Rezultat je tabela sa jednim redom.
--       Kolona [Validan] ce vratiti true/false informaciju o validnosti JMBG-a
--       Ostale kolone vracaju dodatne informacije koje se mogu procitati
--       Kolona [Napomena] vraca dodatne napomene i greske u slucaju nevalidnosti JMBG-a
-- Clanak: http://www.sql-kefalo.net/2014/09/provera-jmbg
-- ****************************************************************
CREATE FUNCTION udf_Kefalo_ProveraJMBGDetaljna 
(
	@JMBG NVarchar(MAX)
)
RETURNS @rezultat TABLE
(
	[Validan] BIT
  , [DatumRodjenja] DATE
  , [Republika] NVARCHAR(MAX)
  , [Region] NVARCHAR(MAX)
  , [Pol] CHAR(1)
  , [RedniBroj] INT
  , [Napomena] NVARCHAR(MAX)
)
AS 
BEGIN

	DECLARE @greska NVARCHAR(MAX);

	IF @JMBG IS NULL OR @JMBG = ''
	SET @greska = N'JMBG nije prosleđen';

	IF @greska IS NULL AND ISNUMERIC(@JMBG)<>1 
	SET @greska = N'JMBG nije validan - nisu svi znakovi brojevi';

	IF @greska IS NULL AND LEN(@JMBG) > 13 
	SET @greska = N'JMBG nije validan - ima više brojeva nego što je predviđeno';
	
	IF @greska IS NULL AND LEN(@JMBG) < 13 
	SET @greska = N'JMBG nije validan - ima manje brojeva nego što je predviđeno';

	IF (@greska IS NOT NULL)
	BEGIN
		INSERT INTO @rezultat (Validan, Napomena) SELECT 0, @greska;
	END  

	ELSE
	BEGIN  

		DECLARE @napomena NVARCHAR(MAX) = '';
		DECLARE @validan BIT = 1;
		
		DECLARE @Dan NVARCHAR(2);
		DECLARE @Mesec NVARCHAR(2);
		DECLARE @Godina NVARCHAR(4);
		DECLARE @Region NVARCHAR(2);
		DECLARE @RedniBroj NVARCHAR(3);

		SELECT @Dan = SUBSTRING(@JMBG,1,2);
		SELECT @Mesec = SUBSTRING(@JMBG,3,2);
		SELECT @Godina = SUBSTRING(@JMBG,5,3);
		SELECT @Region = SUBSTRING(@JMBG,8,2);
		SELECT @RedniBroj = SUBSTRING(@JMBG,10,3);

		IF @Godina<800 SET @Godina = @Godina + 2000;
		ELSE SET @Godina = @Godina + 1000;	

		IF ISDATE(@Godina + @Mesec + @Dan) <> 1 
		BEGIN 
			SET @napomena = @napomena + N'Datum rođenja nije validan; ';
			SET @validan = 0;
		END;
		ELSE
		BEGIN
			DECLARE @DatumRodj DATE;
			SELECT @DatumRodj = CONVERT(DATE,@Godina + @Mesec + @Dan,112);
			IF @DatumRodj > GETDATE() 
			BEGIN
				SET @napomena = @napomena + N'Datum rođenja je u budućnosti; ';
				SET @validan = 0;
			END;
		END;

		DECLARE @Republika NVARCHAR(MAX);
		DECLARE @RegionTekst NVARCHAR(MAX);

		SELECT @Republika = 
		CASE LEFT(@Region,1) WHEN '0' THEN N'Strani državljanin' + CASE @Region WHEN '01' THEN N' u BIH'
																			   WHEN '02' THEN N' u Crnoj Gori'
																			   WHEN '03' THEN N' u Hrvatskoj'
																			   WHEN '04' THEN N' u Makedoniji'
																			   WHEN '05' THEN N' u Sloveniji'
																			   WHEN '07' THEN N' u Srbiji'
																			   WHEN '08' THEN N' u Vojvodini'
																			   WHEN '09' THEN N' na Kosovu'
																			   ELSE N''
																	END
							 WHEN '1' THEN N'Bosna i Hercegovina'
							 WHEN '2' THEN N'Crna Gora'
							 WHEN '3' THEN N'Hrvatska'
							 WHEN '4' THEN N'Makedonija'
							 WHEN '5' THEN N'Slovenija'
							 WHEN '6' THEN N'/'
							 WHEN '7' THEN N'Srbija (centralna)'
							 WHEN '8' THEN N'Srbija (Vojvodina)'
							 WHEN '9' THEN N'Srbija (Kosovo)'

		END;

		SELECT @RegionTekst = 
		CASE @Region WHEN '10' THEN N'Banja Luka'
					 WHEN '11' THEN N'Bihać'
					 WHEN '12' THEN N'Doboj'
					 WHEN '13' THEN N'Goražde'
					 WHEN '14' THEN N'Livno'
					 WHEN '15' THEN N'Mostar'
					 WHEN '16' THEN N'Prijedor'
					 WHEN '17' THEN N'Sarajevo'
					 WHEN '18' THEN N'Tuzla'
					 WHEN '19' THEN N'Zenica'

					 WHEN '21' THEN N'Podgorica'
					 WHEN '22' THEN N'Bar, Ulcinj'
					 WHEN '23' THEN N'Budva, Kotor, Tivat'
					 WHEN '24' THEN N'Herceg Novi'
					 WHEN '25' THEN N'Cetinje'
					 WHEN '26' THEN N'Nikšić'
					 WHEN '27' THEN N'Berane, Rožaje, Plav, Andrijevica'
					 WHEN '28' THEN N'Bijelo Polje, Mojkovac'
					 WHEN '29' THEN N'Pljevlja, Žabljak'

					 WHEN '30' THEN N'Osijek'
					 WHEN '31' THEN N'Podravina'
					 WHEN '32' THEN N'Međimurje'
					 WHEN '33' THEN N'Zagreb'
					 WHEN '34' THEN N'Karlovac'
					 WHEN '35' THEN N'Lika'
					 WHEN '36' THEN N'Rijeka i Istra'
					 WHEN '37' THEN N'Karlovac'
					 WHEN '38' THEN N'Dalmacija'

					 WHEN '41' THEN N'Bitola'
					 WHEN '42' THEN N'Kumanovo'
					 WHEN '43' THEN N'Ohrid'
					 WHEN '44' THEN N'Prilep'
					 WHEN '45' THEN N'Skoplje'
					 WHEN '46' THEN N'Strumica'
					 WHEN '47' THEN N'Tetovo'
					 WHEN '48' THEN N'Veles'
					 WHEN '49' THEN N'Štip'

					 WHEN '50' THEN N'/'

					 WHEN '71' THEN N'Beograd'
					 WHEN '72' THEN N'Kragujevac, Jagodina'
					 WHEN '73' THEN N'Niš, Pirot, Toplica'
					 WHEN '74' THEN N'Leskovac, Vranje'
					 WHEN '75' THEN N'Bor, Zaječar'
					 WHEN '76' THEN N'Smederevo, Požarevac'
					 WHEN '77' THEN N'Mačva, Kolubara'
					 WHEN '78' THEN N'Kraljevo, Kruševac'
					 WHEN '79' THEN N'Užice'

					 WHEN '80' THEN N'Novi Sad'
					 WHEN '81' THEN N'Sombor'
					 WHEN '82' THEN N'Subotica'
					 WHEN '83' THEN N'Vrbas'
					 WHEN '84' THEN N'Kikinda'
					 WHEN '85' THEN N'Zrenjanin'
					 WHEN '86' THEN N'Pančevo'
					 WHEN '87' THEN N'Vršac'
					 WHEN '88' THEN N'Ruma'
					 WHEN '89' THEN N'Sremska Mitrovica'

					 WHEN '91' THEN N'Priština'
					 WHEN '92' THEN N'Kosovska Mitrovica'
					 WHEN '93' THEN N'Peć'
					 WHEN '94' THEN N'Đakovica'
					 WHEN '95' THEN N'Prizren'
					 WHEN '96' THEN N'Gnjilane'

					 ELSE N'/'
		END;

		IF @Region = '50' SET @Napomena = @Napomena + N'Za Sloveniju ne postoji dalja podela na regione; '

		DECLARE @Pol NVARCHAR(1);
		SELECT @Pol = CASE WHEN @RedniBroj < 500 THEN N'M' ELSE N'Ž' END;

		DECLARE @Rbr INT
		SELECT @Rbr = CASE WHEN @RedniBroj < 500 THEN CAST(@RedniBroj AS INT) + 1
						   ELSE CAST(@RedniBroj AS INT) - 499 END;

		--ABC DEF GHI JKL M
		DECLARE @A INT; 
		DECLARE @B INT; 
		DECLARE @C INT; 
		DECLARE @D INT; 
		DECLARE @E INT; 
		DECLARE @F INT; 
		DECLARE @G INT;
		DECLARE @H INT;
		DECLARE @I INT;
		DECLARE @J INT;
		DECLARE @K INT;
		DECLARE @L INT;
		DECLARE @M INT;

		SELECT @A = SUBSTRING(@JMBG,1,1);
		SELECT @B = SUBSTRING(@JMBG,2,1);
		SELECT @C = SUBSTRING(@JMBG,3,1);
		SELECT @D = SUBSTRING(@JMBG,4,1);
		SELECT @E = SUBSTRING(@JMBG,5,1);
		SELECT @F = SUBSTRING(@JMBG,6,1);
		SELECT @G = SUBSTRING(@JMBG,7,1);
		SELECT @H = SUBSTRING(@JMBG,8,1);
		SELECT @I = SUBSTRING(@JMBG,9,1);
		SELECT @J = SUBSTRING(@JMBG,10,1);
		SELECT @K = SUBSTRING(@JMBG,11,1);
		SELECT @L = SUBSTRING(@JMBG,12,1);
		SELECT @M = SUBSTRING(@JMBG,13,1);

		DECLARE @Provera INT;

		SELECT @Provera =  11 - (( 7*(@A+@G) + 6*(@B+@H) + 5*(@C+@I) + 4*(@D+@J) + 3*(@E+@K) + 2*(@F+@L) ) % 11);
		IF (@Provera > 9) SET @Provera = 0;

		IF @Provera <> @M 
		BEGIN 
			SET @napomena = @napomena + N'Kontrolna cifra nije dobra; ';
			SET @validan = 0;
		END
  
		IF @Dan = DAY(GETDATE()) AND @Mesec = MONTH(GETDATE()) SET @napomena = @napomena + N'Osobi je danas rođendan; '
      

		INSERT INTO @rezultat
		( 
			Validan
		  , DatumRodjenja
		  , Republika
		  , Region 
		  , Pol 
		  , RedniBroj
		  , Napomena
		)
		SELECT
			@validan
		  , @DatumRodj
		  , @Republika
		  , @RegionTekst
		  , @Pol
		  , @Rbr
		  , NULLIF(@napomena, '')
	END;

	--SELECT * FROM @rezultat;
	RETURN;
END
GO
		
IF EXISTS (SELECT * FROM sys.objects WHERE type IN ('FN', 'IF', 'TF') AND name = 'udf_Kefalo_ProveraJMBG')
DROP FUNCTION udf_Kefalo_ProveraJMBG;
GO
-- ****************************************************************
-- www.sql-kefalo.net
-- ****************************************************************
-- Autor: Nenad Zivkovic
-- Datum: 02.09.2014
-- Opis: Funkcija za proveru validnosti JMBG-a (true/false)
-- Clanak: http://www.sql-kefalo.net/2014/09/provera-jmbg
-- ****************************************************************
CREATE FUNCTION udf_Kefalo_ProveraJMBG
(
	@JMBG NVarchar(MAX)
)
RETURNS BIT
AS
BEGIN

	DECLARE @toRet BIT;

	SELECT @toRet = Validan FROM dbo.udf_Kefalo_ProveraJMBGDetaljna(@JMBG);

	RETURN @toRet;

END;

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

165

166

167

168

169

170

171

172

173

174

175

176

177

178

179

180

181

182

183

184

185

186

187

188

189

190

191

192

193

194

195

196

197

198

199

200

201

202

203

204

205

206

207

208

209

210

211

212

213

214

215

216

217

218

219

220

221

222

223

224

225

226

227

228

229

230

231

232

233

234

235

236

237

238

239

240

241

242

243

244

245

246

247

248

249

250

251

252

253

254

255

256

257

258

259

260

261

262

263

264

265

266

267

268

269

270

271

272

273

274

275

276

277

278

279

280

281

282

283

284

285

286

287

288

289

290

291

IF EXISTS (SELECT * FROM sys.objects WHERE type IN ('FN', 'IF', 'TF') AND name = 'udf_Kefalo_ProveraJMBGDetaljna')

DROP FUNCTION udf_Kefalo_ProveraJMBGDetaljna;

-- ****************************************************************

-- www.sql-kefalo.net

-- ****************************************************************

-- Autor: Nenad Zivkovic

-- Datum: 02.09.2014

-- Opis: Funkcija za proveru JMBG-a. Rezultat je tabela sa jednim redom.

-- Kolona [Validan] ce vratiti true/false informaciju o validnosti JMBG-a

-- Ostale kolone vracaju dodatne informacije koje se mogu procitati

-- Kolona [Napomena] vraca dodatne napomene i greske u slucaju nevalidnosti JMBG-a

-- Clanak: http://www.sql-kefalo.net/2014/09/provera-jmbg

-- ****************************************************************

CREATE FUNCTION udf_Kefalo_ProveraJMBGDetaljna

(

@JMBG NVarchar(MAX)

)

RETURNS @rezultat TABLE

(

[Validan] BIT

, [DatumRodjenja] DATE

, [Republika] NVARCHAR(MAX)

, [Region] NVARCHAR(MAX)

, [Pol] CHAR(1)

, [RedniBroj] INT

, [Napomena] NVARCHAR(MAX)

)

BEGIN

DECLARE @greska NVARCHAR(MAX);

IF @JMBG IS NULL OR @JMBG = ''

SET @greska = N'JMBG nije prosleđen';

IF @greska IS NULL AND ISNUMERIC(@JMBG)<>1

SET @greska = N'JMBG nije validan - nisu svi znakovi brojevi';

IF @greska IS NULL AND LEN(@JMBG) > 13

SET @greska = N'JMBG nije validan - ima više brojeva nego što je predviđeno';

IF @greska IS NULL AND LEN(@JMBG) < 13

SET @greska = N'JMBG nije validan - ima manje brojeva nego što je predviđeno';

IF (@greska IS NOT NULL)

BEGIN

INSERT INTO @rezultat (Validan, Napomena) SELECT 0, @greska;

END

ELSE

BEGIN

DECLARE @napomena NVARCHAR(MAX) = '';

DECLARE @validan BIT = 1;

DECLARE @Dan NVARCHAR(2);

DECLARE @Mesec NVARCHAR(2);

DECLARE @Godina NVARCHAR(4);

DECLARE @Region NVARCHAR(2);

DECLARE @RedniBroj NVARCHAR(3);

SELECT @Dan = SUBSTRING(@JMBG,1,2);

SELECT @Mesec = SUBSTRING(@JMBG,3,2);

SELECT @Godina = SUBSTRING(@JMBG,5,3);

SELECT @Region = SUBSTRING(@JMBG,8,2);

SELECT @RedniBroj = SUBSTRING(@JMBG,10,3);

IF @Godina<800 SET @Godina = @Godina + 2000;

ELSE SET @Godina = @Godina + 1000;

IF ISDATE(@Godina + @Mesec + @Dan) <> 1

BEGIN

SET @napomena = @napomena + N'Datum rođenja nije validan; ';

SET @validan = 0;

END;

ELSE

BEGIN

DECLARE @DatumRodj DATE;

SELECT @DatumRodj = CONVERT(DATE,@Godina + @Mesec + @Dan,112);

IF @DatumRodj > GETDATE()

BEGIN

SET @napomena = @napomena + N'Datum rođenja je u budućnosti; ';

SET @validan = 0;

END;

DECLARE @Republika NVARCHAR(MAX);

DECLARE @RegionTekst NVARCHAR(MAX);

SELECT @Republika =

CASE LEFT(@Region,1) WHEN '0' THEN N'Strani državljanin' + CASE @Region WHEN '01' THEN N' u BIH'

WHEN '02' THEN N' u Crnoj Gori'

WHEN '03' THEN N' u Hrvatskoj'

WHEN '04' THEN N' u Makedoniji'

WHEN '05' THEN N' u Sloveniji'

WHEN '07' THEN N' u Srbiji'

WHEN '08' THEN N' u Vojvodini'

WHEN '09' THEN N' na Kosovu'

ELSE N''

END

WHEN '1' THEN N'Bosna i Hercegovina'

WHEN '2' THEN N'Crna Gora'

WHEN '3' THEN N'Hrvatska'

WHEN '4' THEN N'Makedonija'

WHEN '5' THEN N'Slovenija'

WHEN '6' THEN N'/'

WHEN '7' THEN N'Srbija (centralna)'

WHEN '8' THEN N'Srbija (Vojvodina)'

WHEN '9' THEN N'Srbija (Kosovo)'

END;

SELECT @RegionTekst =

CASE @Region WHEN '10' THEN N'Banja Luka'

WHEN '11' THEN N'Bihać'

WHEN '12' THEN N'Doboj'

WHEN '13' THEN N'Goražde'

WHEN '14' THEN N'Livno'

WHEN '15' THEN N'Mostar'

WHEN '16' THEN N'Prijedor'

WHEN '17' THEN N'Sarajevo'

WHEN '18' THEN N'Tuzla'

WHEN '19' THEN N'Zenica'

WHEN '21' THEN N'Podgorica'

WHEN '22' THEN N'Bar, Ulcinj'

WHEN '23' THEN N'Budva, Kotor, Tivat'

WHEN '24' THEN N'Herceg Novi'

WHEN '25' THEN N'Cetinje'

WHEN '26' THEN N'Nikšić'

WHEN '27' THEN N'Berane, Rožaje, Plav, Andrijevica'

WHEN '28' THEN N'Bijelo Polje, Mojkovac'

WHEN '29' THEN N'Pljevlja, Žabljak'

WHEN '30' THEN N'Osijek'

WHEN '31' THEN N'Podravina'

WHEN '32' THEN N'Međimurje'

WHEN '33' THEN N'Zagreb'

WHEN '34' THEN N'Karlovac'

WHEN '35' THEN N'Lika'

WHEN '36' THEN N'Rijeka i Istra'

WHEN '37' THEN N'Karlovac'

WHEN '38' THEN N'Dalmacija'

WHEN '41' THEN N'Bitola'

WHEN '42' THEN N'Kumanovo'

WHEN '43' THEN N'Ohrid'

WHEN '44' THEN N'Prilep'

WHEN '45' THEN N'Skoplje'

WHEN '46' THEN N'Strumica'

WHEN '47' THEN N'Tetovo'

WHEN '48' THEN N'Veles'

WHEN '49' THEN N'Štip'

WHEN '50' THEN N'/'

WHEN '71' THEN N'Beograd'

WHEN '72' THEN N'Kragujevac, Jagodina'

WHEN '73' THEN N'Niš, Pirot, Toplica'

WHEN '74' THEN N'Leskovac, Vranje'

WHEN '75' THEN N'Bor, Zaječar'

WHEN '76' THEN N'Smederevo, Požarevac'

WHEN '77' THEN N'Mačva, Kolubara'

WHEN '78' THEN N'Kraljevo, Kruševac'

WHEN '79' THEN N'Užice'

WHEN '80' THEN N'Novi Sad'

WHEN '81' THEN N'Sombor'

WHEN '82' THEN N'Subotica'

WHEN '83' THEN N'Vrbas'

WHEN '84' THEN N'Kikinda'

WHEN '85' THEN N'Zrenjanin'

WHEN '86' THEN N'Pančevo'

WHEN '87' THEN N'Vršac'

WHEN '88' THEN N'Ruma'

WHEN '89' THEN N'Sremska Mitrovica'

WHEN '91' THEN N'Priština'

WHEN '92' THEN N'Kosovska Mitrovica'

WHEN '93' THEN N'Peć'

WHEN '94' THEN N'Đakovica'

WHEN '95' THEN N'Prizren'

WHEN '96' THEN N'Gnjilane'

ELSE N'/'

END;

IF @Region = '50' SET @Napomena = @Napomena + N'Za Sloveniju ne postoji dalja podela na regione; '

DECLARE @Pol NVARCHAR(1);

SELECT @Pol = CASE WHEN @RedniBroj < 500 THEN N'M' ELSE N'Ž' END;

DECLARE @Rbr INT

SELECT @Rbr = CASE WHEN @RedniBroj < 500 THEN CAST(@RedniBroj AS INT) + 1

ELSE CAST(@RedniBroj AS INT) - 499 END;

--ABC DEF GHI JKL M

DECLARE @A INT;

DECLARE @B INT;

DECLARE @C INT;

DECLARE @D INT;

DECLARE @E INT;

DECLARE @F INT;

DECLARE @G INT;

DECLARE @H INT;

DECLARE @I INT;

DECLARE @J INT;

DECLARE @K INT;

DECLARE @L INT;

DECLARE @M INT;

SELECT @A = SUBSTRING(@JMBG,1,1);

SELECT @B = SUBSTRING(@JMBG,2,1);

SELECT @C = SUBSTRING(@JMBG,3,1);

SELECT @D = SUBSTRING(@JMBG,4,1);

SELECT @E = SUBSTRING(@JMBG,5,1);

SELECT @F = SUBSTRING(@JMBG,6,1);

SELECT @G = SUBSTRING(@JMBG,7,1);

SELECT @H = SUBSTRING(@JMBG,8,1);

SELECT @I = SUBSTRING(@JMBG,9,1);

SELECT @J = SUBSTRING(@JMBG,10,1);

SELECT @K = SUBSTRING(@JMBG,11,1);

SELECT @L = SUBSTRING(@JMBG,12,1);

SELECT @M = SUBSTRING(@JMBG,13,1);

DECLARE @Provera INT;

SELECT @Provera = 11 - (( 7*(@A+@G) + 6*(@B+@H) + 5*(@C+@I) + 4*(@D+@J) + 3*(@E+@K) + 2*(@F+@L) ) % 11);

IF (@Provera > 9) SET @Provera = 0;

IF @Provera <> @M

BEGIN

SET @napomena = @napomena + N'Kontrolna cifra nije dobra; ';

SET @validan = 0;

END

IF @Dan = DAY(GETDATE()) AND @Mesec = MONTH(GETDATE()) SET @napomena = @napomena + N'Osobi je danas rođendan; '

INSERT INTO @rezultat

(

Validan

, DatumRodjenja

, Republika

, Region

, Pol

, RedniBroj

, Napomena

)

SELECT

@validan

, @DatumRodj

, @Republika

, @RegionTekst

, @Pol

, @Rbr

, NULLIF(@napomena, '')

END;

--SELECT * FROM @rezultat;

RETURN;

END

IF EXISTS (SELECT * FROM sys.objects WHERE type IN ('FN', 'IF', 'TF') AND name = 'udf_Kefalo_ProveraJMBG')

DROP FUNCTION udf_Kefalo_ProveraJMBG;

-- ****************************************************************

-- www.sql-kefalo.net

-- ****************************************************************

-- Autor: Nenad Zivkovic

-- Datum: 02.09.2014

-- Opis: Funkcija za proveru validnosti JMBG-a (true/false)

-- Clanak: http://www.sql-kefalo.net/2014/09/provera-jmbg

-- ****************************************************************

CREATE FUNCTION udf_Kefalo_ProveraJMBG

(

@JMBG NVarchar(MAX)

)

RETURNS BIT

BEGIN

DECLARE @toRet BIT;

SELECT @toRet = Validan FROM dbo.udf_Kefalo_ProveraJMBGDetaljna(@JMBG);

RETURN @toRet;

END;

Provera JMBG – Funkcije

Objavljeno: 29-09-2014 | Autor: Nenad Živković | Kategorija: Skriptovi

0

Napišite komentar

Prijava na mejling listu

Najnoviji članci