| FIELD |
-
- FIELD ORDER: 1
- BRANCHING LOGIC: S DDSSTACK=$S($$GET^DDSVAL(.114,.DA,1)="F":2.1,1:2.2)
- POST ACTION ON CHANGE: D:DDSOLD'="" BLDLOG^DIKCFORM(DA(1))
- FIELD TYPE: DATA DICTIONARY FIELD
- UNIQUE NAME: ORDER
- DATA COORDINATE: 1,3
- DATA LENGTH: 3
-
- FIELD ORDER: 2
- POST ACTION ON CHANGE: D BLDLOG^DIKCFORM(DA(1))
- FIELD TYPE: DATA DICTIONARY FIELD
- DATA COORDINATE: 1,12
- DATA LENGTH: 3
-
- FIELD ORDER: 3
- BRANCHING LOGIC: S:X'=DDSOLD DDSSTACK=$S(X="F":2.1,1:2.2)
- POST ACTION ON CHANGE: D CRVTYPE^DIKCFORM
- FIELD TYPE: DATA DICTIONARY FIELD
- DATA COORDINATE: 1,19
- DATA LENGTH: 8
-
- FIELD ORDER: 5
- FIELD TYPE: COMPUTED
- COMPUTED EXPRESSION: N FIL,FLD,TYP S TYP={TYPE OF VALUE;I} S:TYP="F" FIL=+{FILE},FLD=+{FIELD},Y=$S('FIL!'FLD:"",$P($G(^DD(FIL,FLD,0)),U)="":"",1:$P(^(0),U)_" (#"_FLD_")") S:TYP="C" Y={COMPUTED CODE} S:$L($G(Y))>43 Y=$E(Y,1,40)_"..."
- DATA COORDINATE: 1,36
- DATA LENGTH: 43
-
- FIELD ORDER: 4
- POST ACTION ON CHANGE: D:$$GET^DDSVAL(.114,.DA,.5) BLDLOG^DIKCFORM(DA(1))
- FIELD TYPE: DATA DICTIONARY FIELD
- DATA COORDINATE: 1,29
- DATA LENGTH: 3
|
