Module:CiteFEK
![Documentation icon](http://upload.wikimedia.org/wikipedia/commons/thumb/4/43/Test_Template_Info-Icon_-_Version_%282%29.svg/50px-Test_Template_Info-Icon_-_Version_%282%29.svg.png)
Μπορείτε να συμβάλλετε στη δημιουργία σελίδας τεκμηρίωσης για αυτό το Scribunto module. Οι συντάκτες μπορούν να πειραματίζονται στο πρόχειρο (δημιουργία | αντίγραφο) και στις δοκιμαστικές σελίδες (δημιουργία) του module. Παρακαλούμε να προσθέτετε τις κατηγορίες στην υποσελίδα τεκμηρίωσης. Υποσελίδες αυτού του module. |
--Για την ευκολότερη δημιουργία παραπομπών σε ΦΕΚ
--για χρήση σε Πρότυπο:Cite FEK
_p = {}
exeikati = function (metabliti)
return (metabliti ~= nil and metabliti ~= '')
end
_p.fek = function( frame )
local lemmaargs = frame:getParent().args
output = '[[ΦΕΚ]]'
if exeikati(lemmaargs['Έτος']) then
output = output .. ', Έτος ' .. lemmaargs['Έτος']
end
if exeikati(lemmaargs['Τεύχος']) then
output = output .. ', Τεύχος: ' .. lemmaargs['Τεύχος']
end -- TODO έλεγχος της παραμέτρου για την ύπαρξη των σωστών στοιχείων Α,Β,Γ,Δ, Δ.Ε.Β.Ι.,Α.ΕΙ.Δ.,Α.Σ.Ε.Π.,ΑΕ-EΠΕ,Δ.Δ.Σ.,Ο.Π.Κ.,Υ.Ο.Δ.Δ.,Α.Α.Π.
--ή των αντίστοιχων εκτεταμένων ΠΡΩΤΟ,...,ΑΝΩΝΥΜΩΝ ΕΤΑΙΡΕΙΩΝ − ΕΤΑΙΡΕΙΩΝ ΠΕΡΙΟΡΙΣΜΕΝΗΣ ΕΥΘΥΝΗΣ ΚΑΙ ΓΕΝΙΚΟΥ ΕΜΠΟΡΙΚΟΥ ΜΗΤΡΩΟΥ, κλπ
--και μετατροπής τους σε συντμήσεις.
if exeikati(lemmaargs['Αριθμός']) then
output = output .. ', Αριθμός: ' .. lemmaargs['Αριθμός']
end
if exeikati(lemmaargs['ΗμερΦΕΚ']) then
output = output .. ', Ημ. ΦΕΚ: ' .. lemmaargs['ΗμερΦΕΚ']
end
if exeikati(lemmaargs['ΗμερΚυκλοφ']) then
output = output .. ', Ημ. Κυκλοφορίας: ' .. lemmaargs['ΗμερΚυκλοφ']
end
--τίτλος "άρθρου" του ΦΕΚ στο οποίο γίνεται αναφορά
if exeikati(lemmaargs['Τίτλος']) then
output = output .. ', Τίτλος: ' .. lemmaargs['Τίτλος']
end
--σελίδα στην οποία υπάρχει η αναφορά
if exeikati(lemmaargs['Σελίδα']) then
output = output .. ', σ. ' .. lemmaargs['Σελίδα']
end
return frame:preprocess(output)
end
return _p