DIKC EDIT COMPUTED CRV (.110108)    BLOCK (.404)

Name Value
NAME DIKC EDIT COMPUTED CRV
DATA DICTIONARY NUMBER .114
FIELD
  • FIELD ORDER:   1
    CAPTION:   Computed-Type Cross Reference Value
    FIELD TYPE:   CAPTION ONLY
    CAPTION COORDINATE:   1,21
  • FIELD ORDER:   2
    CAPTION:   Order Number
    POST ACTION ON CHANGE:   S:$$GET^DDSVAL(.114,.DA,.5) DIKCCRV=1
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   3,21
    DATA LENGTH:   3
    CAPTION COORDINATE:   3,7
  • FIELD ORDER:   3
    CAPTION:   Subscript Number
    POST ACTION ON CHANGE:   S:X=""!(DDSOLD="") DIKCCRV=1
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   4,21
    DATA LENGTH:   3
    CAPTION COORDINATE:   4,3
  • FIELD ORDER:   5
    CAPTION:   Maximum Length
    POST ACTION ON CHANGE:   S:$$GET^DDSVAL(.114,.DA,.5) DIKCCRV=1
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   5,21
    DATA LENGTH:   3
    CAPTION COORDINATE:   5,5
  • FIELD ORDER:   4
    CAPTION:   Lookup Prompt
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   4,48
    DATA LENGTH:   30
    CAPTION COORDINATE:   4,33
  • FIELD ORDER:   6
    CAPTION:   Collation
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   5,48
    DATA LENGTH:   9
    CAPTION COORDINATE:   5,37
  • FIELD ORDER:   7
    CAPTION:   Computed Code
    DATA VALIDATION:   I $G(DUZ(0))'="@" S DDSERROR=1 D HLP^DDSUTL($C(7)_"Only programmers are allowed to edit the Computed Code.")
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   7,18
    DATA LENGTH:   60
    CAPTION COORDINATE:   7,3