Modul:Vorlage:FormatDate - Versionsgeschichte

Admin: 52 Versionen importiert

2019-09-06T11:27:59Z

52 Versionen importiert

2017-07-28T17:56:42Z

Dezimalzahlen abfangen

2017-06-11T15:08:50Z

2016-04-02T22:00:27Z

Gemäß Diskussionsseite der Vorlage

2015-10-07T18:07:39Z

2015-10-07T17:38:04Z

2015-03-14T15:40:02Z

Siehe D-Seite

2013-12-03T17:36:57Z

2013-11-01T17:01:16Z

typo

2013-09-12T00:52:10Z

@@ Zeile 15: / Zeile 15: @@
 			Datum.y = tonumber(str);
 			if Datum.y then
 				return true, Datum -- Nur eine Jahreszahl
 			else
@@ Zeile 22: / Zeile 25: @@
 		Teil  = mw.ustring.sub(str,1,pos-1);
 		Datum.y = tonumber(Teil) or 0;
 		str = mw.ustring.sub(str,pos+1,   -1);
 		pos = mw.ustring.find(str,'-',1,true);
@@ Zeile 28: / Zeile 32: @@
 			Datum.m = tonumber(str) or 0
 			Datum.d = 0;
 			return true, Datum;
 		end
 		Teil  = mw.ustring.sub(str,1,pos-1)
@@ Zeile 36: / Zeile 42: @@
 		Teil  = mw.ustring.sub(str,pos+1,   -1)
 		Datum.d = tonumber(Teil) or 0;
 		return true, Datum;
 	end

@@ Zeile 174: / Zeile 174: @@
 		local Arg4 = mw.ustring.lower(mw.text.trim(Args[4] or ""));
 		local davor = mw.text.trim(Args['davor'] or "");
 		if Arg2 == "nbsp"  or Arg3 == "nbsp"  or Arg4 == "nbsp" then NBSP = true; end
 		if Arg2 == "link"  or Arg3 == "link"  or Arg4 == "link" then LINK = true; end
@@ Zeile 268: / Zeile 269: @@
 				Tbl.y = 0 - Tbl.y
 			end
-			Numstr = string.format('%d%2.2d%2.2d',5000+Tbl.y,Tbl.m,Tbl.d);
+			-- Begrenzung auf 3000 v Chr. bis 6999 n. Chr. Vierstellige Sortierung reicht aus
 			SortTag='<span style="display:none" class="sortkey">' .. Numstr .. '</span>';
 			Text = SortTag .. davor .. Text;

@@ Zeile 326: / Zeile 326: @@
 	function p.Execute(frame)
 		local FR = frame:getParent()
 		return Run(FR.args)
 	end

@@ Zeile 276: / Zeile 276: @@
 	--
 	local function CountDays(Args)
 		local Tbl = {}
@@ Zeile 326: / Zeile 338: @@
 		local FR = frame:getParent()
 		local Number = CountDays(FR.args);
 		return tostring(Number);
 	end

@@ Zeile 275: / Zeile 275: @@
 	end
 	--
 	function p.Execute(frame)
@@ Zeile 286: / Zeile 322: @@
 		return Run(FR.args)
 	end
 return p

← Nächstältere Version	Version vom 6. September 2019, 11:27 Uhr
(kein Unterschied)

@@ Zeile 1: / Zeile 1: @@
 local p = {}
-	-- Trennen der Parameter
+ 	-- Trennen der Parameter
 	local function Split(str)
 		local Datum = {}
@@ Zeile 24: / Zeile 24: @@
 		str = mw.ustring.sub(str,pos+1,   -1);
 		pos = mw.ustring.find(str,'-',1,true);
 		if not pos or pos == 0 then
-			return true, Datum;  -- Nur Jahr
+			Datum.m = tonumber(str) or 0
 		end
 		Teil  = mw.ustring.sub(str,1,pos-1)
 		Datum.m = tonumber(Teil) or 0
 		Teil  = mw.ustring.sub(str,pos+1,   -1)
-		if #Teil == 0 then
+		Datum.d = tonumber(Teil) or 0;
 		return true, Datum;
 	end
@@ Zeile 63: / Zeile 61: @@
 		if Date.d > 31  then return false; end
 		return true;
 	end
 	--
@@ Zeile 80: / Zeile 164: @@
 		local VCHR = "";
 		local STIL = 'L';
-		local IsOk = true
+		local IsOk = true;
 		local Tbl = {}
 		local SortIt = false;
@@ Zeile 104: / Zeile 188: @@
 			return Text
 		end
-		--Tag ohne Monat nicht erlaubt: Auch Tag auf Null setzen (= nur Jahr)
+		--Tage ohne Monat: Tage in Monat und Tag umrechnen
-		if Tbl.m == 0 then
+		if Tbl.m == 0 and Tbl.d ~= 0  then
-			Tbl.d = 0;
+			IsOk, Tbl = TageInMonate(Tbl)
 		end
 		Tbl.y = tonumber(Tbl.y) or 0;

@@ Zeile 69: / Zeile 69: @@
 		local T_L  = {"Januar","Februar", "März", "April", "Mai","Juni", "Juli", "August","September","Oktober","November","Dezember","Jänner"}
 		local T_M  = {"Jan.","Feb.", "März", "Apr.", "Mai","Juni", "Juli", "Aug.","Sep.","Okt.","Nov.","Dez.","Jän."}
-		local T_S  = {"Jan.","Feb.",  "Mrz", "Apr.", "Mai","Jun.", "Jul.", "Aug.","Sep.","Okt.","Nov.","Dez.","Jän."}
+		local T_S  = {"Jan.","Feb.",  "Mrz.", "Apr.", "Mai","Jun.", "Jul.", "Aug.","Sep.","Okt.","Nov.","Dez.","Jän."}
 		local Text = "";
 		local TextYear  = "";

@@ Zeile 83: / Zeile 83: @@
 		local Tbl = {}
 		local SortIt = false;
 		local Numstr = "";
 		local SortTag= "";
@@ Zeile 94: / Zeile 95: @@
 		if Arg2 == "s"     or Arg3 == "s"     or Arg4 == "s"    then STIL = 'S'; end
 		if mw.ustring.lower(mw.text.trim(Args['AT'] or "")) == "ja" then AT = true; end
-		if mw.ustring.lower(mw.text.trim(Args['Sort'] or "")) ~= "" then SortIt = true; end
+		if mw.ustring.lower(mw.text.trim(Args['Zero'] or "")) ~= "" then Zero = true; end
 		IsOk, Tbl = Split(Args[1])
@@ Zeile 123: / Zeile 125: @@
 		if Tbl.d > 0 then	-- Tag angegeben, String erstellen
 			TextDay =  tostring(Tbl.d) .. '.&nbsp;'
-			if Tbl.d < 10 and SortIt then
+			if Tbl.d < 10 and Zero then
 				TextDay = '<span style="visibility:hidden;">0</span>' .. TextDay;
 			end