| Name | Value |
|---|---|
| NAME | XUTIME |
| MUMPS CODE | S X=X_"000000",Y(1)=$E(X,9,10),Y(3)=$E(X,11,12),Y(4)=$E(X,13,14),Y(2)=$S($E(X,8,12)>.12:Y(1)-12,1:Y(1)),X="",Y(5)="" S:X1["H" X=$S(X1[24:Y(1),1:Y(2))_":" S:X1["M" X=X_Y(3) S:X1["S" X=X_Y(4) |
| EXPLANATION | Allow the print of time in many ways XUTIME("HMS24",date) |