| FIELD |
-
- FIELD ORDER: 1
- CAPTION: LOCATION
- POST ACTION ON CHANGE: D PUT^DDSVAL(6914,DA,90,"@")
- FIELD TYPE: DATA DICTIONARY FIELD
- DATA COORDINATE: 2,11
- DATA LENGTH: 20
- CAPTION COORDINATE: 2,1
-
- FIELD ORDER: 2
- CAPTION: NON-SPACE FILE LOCATION
- FIELD TYPE: DATA DICTIONARY FIELD
- DATA COORDINATE: 2,58
- DATA LENGTH: 20
- CAPTION COORDINATE: 2,33
-
- FIELD ORDER: 3
- CAPTION: IT REMOTE LOCATION (Press Z for zoom editor)
- FIELD TYPE: DATA DICTIONARY FIELD
- DATA COORDINATE: 5,3
- DATA LENGTH: 75
- CAPTION COORDINATE: 4,1
-
- FIELD ORDER: 4
- CAPTION: CMR
- DATA VALIDATION: I X'=DDSOLD S:'X DDSERROR=1 D:'X HLP^DDSUTL("Can't delete CMR.") Q:'X I '$D(^ENG(6914.1,"AIT",1,X)) S DDSERROR=1 D HLP^DDSUTL("New CMR must have IT TRACKING = YES")
- FIELD TYPE: DATA DICTIONARY FIELD
- DATA COORDINATE: 7,6
- DATA LENGTH: 5
- CAPTION COORDINATE: 7,1
-
- FIELD ORDER: 5
- CAPTION: USING SERVICE
- FIELD TYPE: DATA DICTIONARY FIELD
- DATA COORDINATE: 7,28
- DATA LENGTH: 30
- CAPTION COORDINATE: 7,13
-
- FIELD ORDER: 6
- CAPTION: UPDATE INVENTORY DATE?
- POST ACTION ON CHANGE: I X D PUT^DDSVAL(6914,DA,23,DT,"","I"),PUT^DDSVALF("UPDINVDT","","","")
- FIELD TYPE: FORM ONLY
- READ TYPE: YES OR NO
- HELP:
Enter YES if you want to update Last Inventoried value to today.
- UNIQUE NAME: UPDINVDT
- DATA COORDINATE: 9,25
- DATA LENGTH: 1
- CAPTION COORDINATE: 9,1
-
- FIELD ORDER: 7
- CAPTION: LAST INVENTORIED(R)
- FIELD TYPE: DATA DICTIONARY FIELD
- DATA COORDINATE: 9,50
- DATA LENGTH: 12
- CAPTION COORDINATE: 9,29
- DISABLE EDITING: YES
-
- FIELD ORDER: 8
- CAPTION: IT COMMENTS (wp)
- FIELD TYPE: DATA DICTIONARY FIELD
- DATA COORDINATE: 11,19
- DATA LENGTH: 1
- CAPTION COORDINATE: 11,1
-
- FIELD ORDER: 9
- CAPTION: !M
- EXECUTABLE CAPTION: N ENWP S ENWP=$$GET^DDSVAL(6914,.DA,92),Y=$S(ENWP]"":$G(@ENWP@(1,0)),1:""),Y=$S(Y]"":"["_$E(Y,1,56)_"]",1:"(empty)")
- FIELD TYPE: CAPTION ONLY
- CAPTION COORDINATE: 11,22
|
