Skip to main content

IBM Systems  >   z Systems  >   z/VM  >  

Description of ELAPSE

Download count: 15 this month, 4040 altogether.

Downloads for ELAPSE:
VMARC archive: v-10K

 
************************************************************************
* :nick.ELAPSE     :sec.UNCLASSIFIED                 :disk.IBMVMGAT
* :title.Date functions on a given date or absolute day number.
* :version.1.0                      :date.93/02/16
* :oname.Frits Mooy                 :onode.EHONE     :ouser.40959065
* :aname.Frits Mooy                 :anode.EHONE     :auser.40959065
* :support.X    :doc.HELPREXX       :lang.ASSEMBLER  :source.N
* :repository.IBMVMGAT
* :kwd.ELAPSED days calculation
* :abs.ELAPSE is a REXX function that does various date functions on
* any given date, rather than on only todays date. The primary function
* is to calculate the day difference between a given date and todays
* date.
* The specified date can like REXX's DATE function be specified
* in the U, O or S format.
* Rather than returning the number of days passed since a given date,
* ELAPSE can also return the day of the week belonging to the given
* date, or the name of the month, or the absolute day number, where
* 1 jan 0001 is supposed to be day 1.
* There is no restriction on the year value, though the result is based
* on the Gregorian calender, as if it ever existed.
* To do more complicated date calculations, ELAPSE can also be feeded
* with the absolute day number, and is then able to return the
* corresponding date, weekday or month name.
* :lic.By placing material on this conference, I agree to grant
* IBM a non-exclusive, royalty-free license for the material
* as set forth in the LICENSE AGREEMNT file on this conference.
************************************************************************
      RXELAPSE MODULE   *  Module which does the work
      ELAPSE   HELPREXX *  Help file: HELP REXX ELAPSE
      ELAPSE   LICENCE  *  Licence Agreement