+C* GETDAY	MACRO  GDATE NDATE  .GET NUMERIC DATE 09/09/1990
    +C* MOVE &1 TO GDATE
    +C* EXSR SRDAYS
    +C* Z-ADD NDATE TO &2 5.0