GMPLIPRE.m

GMPLIPRE	; SLC/MKB -- Problem List pre-init rtn ;4/13/94  12:15

	;;2.0;Problem List;;Aug 25, 1994

EN	; entry point

	N %,%H,%I,X,Y

	D NOW^%DTC,YX^%DTC S GMPLSTRT=Y ; start time

	Q

GMPLIPRE  ; SLC/MKB -- Problem List pre-init rtn ;4/13/94  12:15

 +1       ;;2.0;Problem List;;Aug 25, 1994

EN        ; entry point

 +1        NEW %,%H,%I,X,Y

 +2       ; start time

           DO NOW^%DTC

           DO YX^%DTC

           SET GMPLSTRT=Y

 +3        QUIT