Nicht angemeldeter Benutzer - Bearbeiten von Seiten ist nur als angemeldeter Benutzer möglich.
Änderungen
Zur Navigation springen
Zur Suche springen
Zeile 1:
Zeile 1: − + Zeile 277:
Zeile 277: − + Zeile 932:
Zeile 932: − + Zeile 939:
Zeile 939: − -- 2013-09-01 Zeile 952:
Zeile 951: + + + + Zeile 1.206:
Zeile 1.209: − + − + +
2017-10-02
local URIutil = { suite = "URIutil",
local URIutil = { suite = "URIutil",
serial = "2017-08-16" };
serial = "2017-10-02" };
--[=[
--[=[
Utilities for URI etc.
Utilities for URI etc.
lead = false;
lead = false;
else -- even
else -- even
r = r + k + k;
r = r + k + k;
lead = true;
lead = true;
end
end
-- attempt -- string with any presumable DNB code
-- attempt -- string with any presumable DNB code
-- also -- string or nil; optional requirement DMA GND SWD
-- also -- string or nil; optional requirement DMA GND SWD
-- currently not implemented
-- "ZDB" -- permit hyphen, but use >2011 rule
-- DMA starting with 3 and no hyphen
-- DMA starting with 3 and no hyphen
-- GND not DNB2011
-- GND not DNB2011
-- Returns number of digits or 2011, if valid
-- Returns number of digits or 2011, if valid
-- false if not correct, bad data or check digit wrong
-- false if not correct, bad data or check digit wrong
local s = mw.text.trim( attempt );
local s = mw.text.trim( attempt );
local j = s:find( "/", 5, true );
local j = s:find( "/", 5, true );
if s:match( "^[0-9]+-[0-9xX]$" ) then
if s:match( "^[0-9]+-[0-9xX]$" ) then
dnb = factory( s, true );
dnb = factory( s, true );
if also and
mw.text.trim( also ) == "ZDB" then
j = false;
end
end
end
end
end
r = attempt;
r = attempt;
end
end
r = string.format( "%s [%s%s%s%s %s]",
r = string.format( "%s [%s%s%s%s%s %s]",
s,
s,
"https://portal.dnb.de/opac.htm",
"https://portal.dnb.de/opac.htm",
"?method=simpleSearch&cqlMode=true",
"?referrer=Wikipedia",
"&method=simpleSearch&cqlMode=true",
"&query=idn%3D",
"&query=idn%3D",
attempt,
attempt,