;
;Copyright 1996-2013 United States Government as represented by the
;Administrator of the National Aeronautics and Space Administration.
;All Rights Reserved.
; This software may be used, copied, or redistributed as long as it is not
; sold and this copyright notice is reproduced on each copy made.  This
; routine is provided as is without any express or implied warranties
; whatsoever.
;
pro cmb_jdattime2isodattime, jday, idattime
caldat,jday,mo,day,yr,hr,min,sec
if (sec lt 1.e-4) then sec = 0.0
if (mo lt 10) then mo_str = string('0'+strcompress(string(mo),/remove_all)) else mo_str = strcompress(string(mo),/remove_all)
if (day lt 10) then day_str = string('0'+strcompress(string(day),/remove_all)) else day_str = strcompress(string(day),/remove_all)
if (hr lt 10) then hr_str = string('0'+strcompress(string(hr),/remove_all)) else hr_str = strcompress(string(hr),/remove_all)
if (min lt 10) then min_str = string('0'+strcompress(string(min),/remove_all)) else min_str = strcompress(string(min),/remove_all)
if (sec lt 10) then sec_str = string('0'+strcompress(string(sec),/remove_all)) else sec_str = strcompress(string(sec),/remove_all)

idattime = strcompress(string(yr)+'-'+mo_str+'-'+day_str+'T'+hr_str+':'+min_str+':'+sec_str+'Z',/remove_all)  ;String initial time for getdata

end