I need a handler to convert a Rev date into ISO 8601?

From my library I have a rough and ready one to go the other way round:

on date_Convert8601 @revisionDate
   -- was "date_ConvertT"
   replace "T" with return in revisionDate
   put line 1 of revisionDate into someDate

   put line 2 of revisionDate into someTime
   put last char of someTime into timeZoneThing
   delete last char of someTime

   replace "-" with comma in someDate

   set the itemdelimiter to "."
   put item 1 of someTime into colonTime
   put item 2 of someTime into colonSeconds
   replace ":" with comma in colonTime

   set the itemdelimiter to comma
   put someDate into someDateItems
   put colonTime into item 4 of someDateItems

   put 0 into item 7 of someDateItems

   convert someDateItems to internet date
   delete word -1 of someDateItems
   convert someDateItems to internet date
   put someDateItems into revisionDate
end date_Convert8601

But seem to have lost the other side of the equation ")
_______________________________________________
use-revolution mailing list
use-revolution@lists.runrev.com
Please visit this url to subscribe, unsubscribe and manage your subscription 
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution

Reply via email to