| FIELD |
-
- FIELD ORDER: 1
- CAPTION: Start Date
- FIELD TYPE: DATA DICTIONARY FIELD
- DATA COORDINATE: 2,14
- DATA LENGTH: 11
- CAPTION COORDINATE: 2,2
-
- FIELD ORDER: 2
- CAPTION: At
- FIELD TYPE: DATA DICTIONARY FIELD
- DATA COORDINATE: 2,31
- DATA LENGTH: 6
- CAPTION COORDINATE: 2,27
-
- FIELD ORDER: 3
- CAPTION: Stop Date
- FIELD TYPE: DATA DICTIONARY FIELD
- DATA COORDINATE: 4,14
- DATA LENGTH: 11
- CAPTION COORDINATE: 4,3
-
- FIELD ORDER: 4
- CAPTION: At
- FIELD TYPE: DATA DICTIONARY FIELD
- DATA COORDINATE: 4,31
- DATA LENGTH: 6
- CAPTION COORDINATE: 4,27
-
- FIELD ORDER: 5
- CAPTION: Ward or Clinic?
- BRANCHING LOGIC: S DDSBR=$S(X="W":"1^1^2",1:"1^1^3")
- PRE ACTION: D PUT^DDSVAL(DIE,.DA,5,""),PUT^DDSVAL(DIE,.DA,.13,"")
- POST ACTION: D PUT^DDSVAL(DIE,.DA,.11,X)
- POST ACTION ON CHANGE: S DDSBR=$S(X="W":"1^1^2",1:"1^1^3")
- FIELD TYPE: FORM ONLY
- READ TYPE: SET OF CODES
- QUALIFIERS: W:Ward;C:Clinic
- UNIQUE NAME: LOC
- DATA COORDINATE: 6,31
- DATA LENGTH: 1
- CAPTION COORDINATE: 6,14
-
- FIELD ORDER: 6
- CAPTION: Location
- FIELD TYPE: COMPUTED
- COMPUTED EXPRESSION: S Y=$S({WARD}]"":{WARD},1:{CLINIC TO PRINT})
- DATA COORDINATE: 8,31
- DATA LENGTH: 30
- CAPTION COORDINATE: 8,21
|
