int T,M,J,Mag; string QQ; T=Day(); M=Month(); J=Year(); QQ=StringConcatenate(T,M,J); Mag=(StrToInteger(QQ));