pro date_year_sec,year,month,day,hh,mm,ss,date

    syear=STRTRIM(year,2)
    if month lt 10 then smonth='0'+STRTRIM(month,2) else smonth=STRTRIM(month,2)
    if day lt 10 then sday='0'+STRTRIM(day,2) else sday=STRTRIM(day,2)
    if hh lt 10 then shh='0'+STRTRIM(hh,2)+'h' else shh=STRTRIM(hh,2)+'h'
    if mm lt 10 then smm='0'+STRTRIM(mm,2)+'m' else smm=STRTRIM(mm,2)+'m'
    if ss lt 10 then sss='0'+STRTRIM(ss,2)+'s' else sss=STRTRIM(ss,2)+'s'
    date=syear+':'+smonth+':'+sday+'_'+shh+':'+smm+':'+sss

end