This archive contains answers to questions sent to Unidata support through mid-2025. Note that the archive is no longer being updated. We provide the archive for reference; many of the answers presented here remain technically correct, even if somewhat outdated. For the most up-to-date information on the use of NSF Unidata software and data services, please consult the Software Documentation first.
Rick- Tom has updated our distribution with the latest version of FRNTDISP. In addition to the changes for the new formats, I also added some mccodeset stuff which involved some other code changes. As I mentioned in my last note, this is available from our addenda page in the mcupdate.tar.Z file. We don't usually announce changes unless they are major. If you find a problem with one of our routines, check the addenda page first to see if it has already been fixed. (http://www.unidata.ucar.edu/packages/mcidas/mcx/addenda.html) The version that is in that file does not have the library routines mapdraw and u0putftime. mapdraw has not changed from the XRD version and u0putftime was updated to output ccyyddd format. (changed mccydtoyd calls to mcydtocyd calls) I've included the new u0putftime.for after this message. This should only be used for 7.5. Let me know if you have any questions/problems. Don ************************************************************* Don Murray UCAR Unidata Program address@hidden P.O. Box 3000 (303) 497-8628 Boulder, CO 80307 ************************************************************* Unidata WWW Server http://www.unidata.ucar.edu/ McIDAS Demonstration Machine http://mcdemo.unidata.ucar.edu/ ************************************************************* *$ Name: *$ u0putftime - put the "frame" time for a particular frame *$ *$ Interface: *$ integer function *$ u0putftime(integer iframe, integer iday, integer itime) *$ *$ Input: *$ iframe - Number of the frame whose directory is being written. *$ iday - day to put in frame directory (yyddd or ccyyddd format) *$ itime - time to put in frame directory (hhmmss format) *$ *$ Input and Output: *$ none *$ *$ Output: *$ *$ Return values: *$ -2 = couldn't convert date to correct format *$ -1 = error updating date/time *$ 0 = successfully updated date/time in frame directory *$ 1 = frame time not updated because there is an image time in it already *$ integer function u0putftime(iframe, iday, itime) implicit none integer fday integer iframe integer iday integer itime integer ifdir(64) integer mcydtocyd ! <<<<< UPC mod 981208 >>>>> integer ret u0putftime = -1 call getfrm(iframe, ifdir) c Update the Frame directory with the day and time of the data if this c frame does not have one associated with it and set type to 3 (misc c imagery)) if (ifdir(1) .eq. -1 .or. ifdir(1) .eq. 1 .or. & ifdir(1) .eq. 3 .or. ifdir(1) .eq. 11 .or. & ifdir(2) .eq. 0 ) then ifdir(1) = 3 ifdir(3) = itime ret = mcydtocyd(iday, fday) ! convert the day to ccyyddd format if (ret .lt. 0) then u0putftime = -2 goto 10 endif ifdir(2) = fday call putfrm(iframe,ifdir) u0putftime = 0 else ! keep image time in frame u0putftime = 1 endif 10 return end