\START92\
\COMMENT=
\NAME=localdat
\FILE=LOCALDAT.89F
(ds)
Func
\(C)\ds:Func
Local  l
datelist(ds)\->\l
localize(string(l[2])&"-"&string(l[3])&"-"&string(l[1]),string(l[2])&"-"&string(l[3])&"-"&string(l[1]),string(l[3])&"."&string(l[2])&"."&string(l[1]),string(l[3])&"/"&string(l[2])&"/"&string(l[1]))
EndFunc

\STOP92\