WV NOTIF-EDITBLK-2 (255)    BLOCK (.404)

Name Value
NAME WV NOTIF-EDITBLK-2
DATA DICTIONARY NUMBER 790.4
PRE ACTION D HLP^DDSUTL("*** NOTE: Most fields cannot be edited because the letter has been printed. ***")
FIELD
  • FIELD ORDER:   3
    CAPTION:   Date of Notification
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   3,25
    DATA LENGTH:   12
    CAPTION COORDINATE:   3,3
    DEFAULT:   T
    DISABLE EDITING:   YES
  • FIELD ORDER:   7
    CAPTION:   Complete by (Date)
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   7,29
    DATA LENGTH:   12
    CAPTION COORDINATE:   7,9
    DISABLE EDITING:   YES
  • FIELD ORDER:   6.5
    CAPTION:   Print Date
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   6,69
    DATA LENGTH:   11
    CAPTION COORDINATE:   6,57
    DISABLE EDITING:   YES
  • FIELD ORDER:   7.5
    CAPTION:   Printed
    PRE ACTION:   W IOINHI
    POST ACTION:   W IOINORM
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   7,69
    DATA LENGTH:   12
    CAPTION COORDINATE:   7,60
    DISABLE EDITING:   YES
  • FIELD ORDER:   3.5
    CAPTION:   Facility
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   3,56
    DATA LENGTH:   23
    CAPTION COORDINATE:   3,46
    DISABLE EDITING:   YES
  • FIELD ORDER:   10
    CAPTION:   Who Contacted
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   9,29
    DATA LENGTH:   22
    CAPTION COORDINATE:   9,14
  • FIELD ORDER:   11
    CAPTION:   Contacted Date
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   9,69
    DATA LENGTH:   11
    CAPTION COORDINATE:   9,53
  • FIELD ORDER:   1
    CAPTION:   Accession#
    PRE ACTION:   S DIC("S")="I $P(^WV(790.1,Y,0),U,2)=WVDFN"
    POST ACTION:   I X]"" W ?46,IOINORM,"PROCEDURE: ",$$NTPROC^WVUTL1A,IOELEOL
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   2,15
    DATA LENGTH:   12
    CAPTION COORDINATE:   2,3
    DISABLE EDITING:   YES
  • FIELD ORDER:   6
    CAPTION:   Type of Notification
    BRANCHING LOGIC:   I X S:'$P(^WV(790.403,X,0),U,2) DDSBR=7
    POST ACTION ON CHANGE:   D PRTDATE^WVUTL2
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   6,29
    DATA LENGTH:   26
    CAPTION COORDINATE:   6,7
    DISABLE EDITING:   YES
  • FIELD ORDER:   4
    CAPTION:   Purpose of Notification
    POST ACTION ON CHANGE:   S Y=X W !?18,"PRIORITY: ",$$PRIOR1^WVUTL1A," " S X=$$NDELQ1^WVUTL4 D PUT^DDSVAL(DIE,DA,.13,X)
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   4,29
    DATA LENGTH:   50
    CAPTION COORDINATE:   4,4
    DISABLE EDITING:   YES
  • FIELD ORDER:   8
    CAPTION:   Outcome
    POST ACTION:   S X=$S(X:"c",1:"o") D PUT^DDSVAL(790.4,DA,.14,X)
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   8,29
    DATA LENGTH:   30
    CAPTION COORDINATE:   8,20
  • FIELD ORDER:   9
    CAPTION:   Status
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   8,69
    DATA LENGTH:   6
    CAPTION COORDINATE:   8,61
  • FIELD ORDER:   5
    CAPTION:   !M
    EXECUTABLE CAPTION:   S Y="Priority: "_IOINHI_$$PRIOR^WVUTL1A_IOINORM
    FIELD TYPE:   CAPTION ONLY
    CAPTION COORDINATE:   5,19
  • FIELD ORDER:   2
    CAPTION:   !M
    EXECUTABLE CAPTION:   S Y=IOINORM_"Procedure: "_IOINHI_$$NTPROC^WVUTL1A_IOINORM
    FIELD TYPE:   CAPTION ONLY
    CAPTION COORDINATE:   2,38
  • FIELD ORDER:   5.5
    CAPTION:   Patient Ed
    FIELD TYPE:   DATA DICTIONARY FIELD
    DATA COORDINATE:   5,69
    DATA LENGTH:   7
    CAPTION COORDINATE:   5,57