TIME (13)    DATA TYPE (.81)

Name Value
NAME TIME
INTERNAL REPRESENTATION F
PROPERTY
SHORT DESCRIPTION Enter a time (no date), e.g., "NOON"
STANDARD PROMPT Time of Day
METHOD
  • M CODE:   D ^DITIME
  • M CODE:   S:Y]"" Y=$E(Y,1,2)_":"_$E(Y,3,9) S:$L(Y)>5 Y=$E(Y,1,5)_":"_$E(Y,6,9)
  • M CODE:   W "Enter 'NOW' or some valid time like '2:33PM'" I $G(DIPA("SECONDS ALLOWED"))'=0 W !?14,"Time may include seconds."
FIELDS DEFINED BY THIS TYPE
  • FIELD DEFINED BY THIS TYPE:   79.1,83
  • FIELD DEFINED BY THIS TYPE:   79.1,84