POC START TIME DAY # (449)    BLOCK (.404)

Name Value
NAME POC START TIME DAY #
DATA DICTIONARY NUMBER 451.9999
DESCRIPTION
The block is used to enter the start time day #.
FIELD
  • FIELD ORDER:   1
    CAPTION:   START TIME=
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   1,14
    DATA LENGTH:   10
    CAPTION COORDINATE:   1,1
    SUPPRESS COLON AFTER CAPTION?:   YES
    REQUIRED:   YES
    DISABLE EDITING:   YES
  • FIELD ORDER:   2
    CAPTION:   STOP TIME=
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   2,13
    DATA LENGTH:   10
    CAPTION COORDINATE:   2,1
    SUPPRESS COLON AFTER CAPTION?:   YES
    REQUIRED:   YES
    DISABLE EDITING:   YES
  • FIELD ORDER:   3
    CAPTION:   Tour Start Time on Day #
    POST ACTION:   S Y=$$MILSS^PRSNEE0($$GET^DDSVAL(DIE,.DA,.01),$$GET^DDSVAL(DIE,.DA,1),X) D PUT^DDSVAL(DIE,.DA,8,$P(Y,U)),PUT^DDSVAL(DIE,.DA,9,$P(Y,U,2))
    FIELD TYPE:   FORM ONLY
    READ TYPE:   NUMERIC
    HELP:   
    Enter 1 if the tour start time of this session begins in Day 1.
          2 if the tour start time of this session begins in Day 2.
    
    INPUT TRANSFORM:   K:X'=1&(X'=2) X
    DATA COORDINATE:   4,27
    DATA LENGTH:   1
    CAPTION COORDINATE:   4,1
    DEFAULT:   !M
    EXECUTABLE DEFAULT:   S Y=$$GET^DDSVAL(DIE,.DA,8),Y=$S(Y="":"",Y>2400:2,1:1)