| FIELD |
-
- FIELD ORDER: 78
- POST ACTION ON CHANGE: D VAL6^DICATTD6
- FIELD TYPE: FORM ONLY
- READ TYPE: FREE TEXT
- PARAMETERS: U
- QUALIFIERS: 1:250
- HELP:
A Computed Expression consists of Field Names, Operators (including "_"
for concatenation), Functions, and literal strings (e.g., "Name: ") and
digits.
- UNIQUE NAME: COMPUTED EXPRESSION
- DATA COORDINATE: 3,2
- DATA LENGTH: 73
- DEFAULT: !M
- EXECUTABLE DEFAULT: S Y=$G(^DD(DICATTA,DICATTF,9.1))
-
- FIELD ORDER: 77
- CAPTION: COMPUTED-FIELD EXPRESSION:
- FIELD TYPE: CAPTION ONLY
- UNIQUE NAME: COMP
- CAPTION COORDINATE: 2,2
-
- FIELD ORDER: 80
- CAPTION: NUMBER OF FRACTIONAL DIGITS TO OUTPUT
- FIELD TYPE: FORM ONLY
- READ TYPE: NUMERIC
- QUALIFIERS: 0:9:0
- HELP:
Enter the number of digits that should normally appear to the
right of the decimal point when this Field's value is displayed.
- UNIQUE NAME: FRACTIONAL DIGITS
- DATA COORDINATE: 5,65
- DATA LENGTH: 1
- CAPTION COORDINATE: 5,26
- DEFAULT: !M
- EXECUTABLE DEFAULT: S Y=$P($P(DICATT2,"J",2),",",2),Y=$S(Y?1N.E:+Y,1:"")
-
- FIELD ORDER: 79
- CAPTION: TYPE OF RESULT
- BRANCHING LOGIC: D BR79^DICATTD6
- FIELD TYPE: FORM ONLY
- READ TYPE: SET OF CODES
- PARAMETERS: M
- QUALIFIERS: D:DATE;N:NUMERIC;B:BOOLEAN;S:STRING;m:MULTIPLE-VALUED;mp:MULTIPLE POINTER;p:POINTER
- HELP:
The typical Computed Field is STRING-valued, i.e., alphanumeric.
If NUMERIC, the indented questions will be asked.
BOOLEAN values are "true-false".
If the computation returns a number that is actually an Entry number in a File, call it a POINTER.
- UNIQUE NAME: COMPTYPE
- DATA COORDINATE: 4,29
- DATA LENGTH: 17
- CAPTION COORDINATE: 4,13
-
- FIELD ORDER: 83
- CAPTION: LENGTH OF FIELD
- FIELD TYPE: FORM ONLY
- READ TYPE: NUMERIC
- QUALIFIERS: 1:250:0
- HELP:
MAXIMUM NUMBER OF CHARACTERS
(not more than 250)
- UNIQUE NAME: LENGTH
- DATA COORDINATE: 8,19
- DATA LENGTH: 3
- CAPTION COORDINATE: 8,2
- DEFAULT: !M
- EXECUTABLE DEFAULT: I DICATT2["J" S Y=+$P(DICATT2,"J",2)
-
- FIELD ORDER: 81
- CAPTION: SHOULD VALUE ALWAYS BE ROUNDED
- FIELD TYPE: FORM ONLY
- READ TYPE: YES OR NO
- UNIQUE NAME: ROUNDED
- DATA COORDINATE: 6,65
- DATA LENGTH: 3
- CAPTION COORDINATE: 6,33
- DEFAULT: !M
- EXECUTABLE DEFAULT: I DICATT2[";" S Y=$E("NY",DICATT5[" S X=$J(X,0,"+1)
-
- FIELD ORDER: 82
- CAPTION: WHEN TOTALLING, SHOULD SUMS BE SUMS OF COMPONENT FIELDS
- FIELD TYPE: FORM ONLY
- READ TYPE: YES OR NO
- UNIQUE NAME: TOTALLING
- DATA COORDINATE: 7,65
- DATA LENGTH: 3
- CAPTION COORDINATE: 7,8
- DEFAULT: !M
- EXECUTABLE DEFAULT: I $D(^DD(DICATTA,DICATTF,9.02)) S Y="Y"
-
- FIELD ORDER: 83.1
- CAPTION: POINT TO FILE
- FIELD TYPE: FORM ONLY
- READ TYPE: POINTER
- QUALIFIERS: 1:EOFIZ
- SCREEN: S DIR("S")="I $$OKFILE^DICOMPX(Y,""W"")"
- DATA COORDINATE: 8,46
- DATA LENGTH: 27
- CAPTION COORDINATE: 8,30
- DEFAULT: !M
- EXECUTABLE DEFAULT: S Y=+$P(DICATT2,"p",2),Y=$S(Y:$P($G(^DIC(Y,0)),U),1:"")
|
