IDATMG

RMNLIB

(IDATMG)

BASE

IDATMG and IDATMG2 are not recommended. Please use NEWDATE

FUNCTION IDATMG/IDATMG2 (IDATE)

ARGUMENTS

IN/OUT

IDATE integer(14)


IN
- idate(1)=day of the week (1-7,sunday=1)
- idate(2)=month (1-12)
- idate(3)=day (1-31)
- idate(4)=year (1900-2100):for idatmg2
- idate(4)=year (0-99):for idatmg
- idate(5)=zulu (0-23)
- idate(6)=100*number_of_second_since_last_hour (0,359 999):for idatmg2
- idate(6)=run (0-9):for idatmg 
- idate(7-13)=character format (7A4) of date-time


OUT
- idate(14)=CMC date-time stamp

DESCRIPTION

Given th CMC date-time group in IDATE(1-13), this function will return the CMC date-time stamp in IDATE(14) as well as in the function value IDATMG[2]. See DATMGP which does the inverse of this function.

EXAMPLE

Number 1

NOTES

- returns idate(14)=101010101 if inputs are invalid

- see incdatr for details on date-time stamps