STANDARD DATA DICTIONARY #8973 -- CP PARAMETERS FILE 9/29/25 PAGE 1
STORED IN ^KMPD(8973, (1 ENTRY) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 3.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file keeps track of all editable parameters for Capacity Planning packages. It also stores Start, Stop and Delta times for
background jobs, as well as CPU Node data. There is only one entry allowed in this file, and is a pointer to the Institution file
taken from the first piece of the $$SITE^VASITE extrinsic function.
DD ACCESS: @
RD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
AUDIT ACCESS: @
CROSS
REFERENCED BY: NAME(B)
8973,.01 NAME 0;1 POINTER TO INSTITUTION FILE (#4) (Required)
INPUT TRANSFORM: S DIC("S")="I '$O(^KMPD(8973,0))" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Pointer to the Institution file (#4)
SCREEN: S DIC("S")="I '$O(^KMPD(8973,0))"
EXPLANATION: Allow only one entry in file.
DELETE TEST: .01,0)= I 1
CROSS-REFERENCE: 8973^B
1)= S ^KMPD(8973,"B",$E(X,1,30),DA)=""
2)= K ^KMPD(8973,"B",$E(X,1,30),DA)
8973,.02 CM TOOLS CURRENT VERSION 0;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>10!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Current version of CAPACITY MANGEMENT TOOLS. Answer must be 1-10 characters in length
8973,.03 CM TOOLS CURRENT VERSION INST 0;3 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Installation date of the current version of CAPACITY MANAGEMENT TOOLS.
8973,.04 CM TOOLS CURRENT PATCH 0;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>10!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Current patch number for the CAPACITY MANAGEMNT TOOLS package. Answer must be 1-10 characters in
length
8973,.05 CM TOOLS CURRENT PATCH INST 0;5 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Installation Date of the current CAPACITY MANAGEMENT TOOLS patch.
8973,1.01 SAGG CURRENT VERSION 1;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>10!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Current version of the SAGG package. Answer must be 1-10 characters in length
8973,1.02 SAGG CURRENT VERSION INSTALL 1;2 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Installation Date for the current SAGG package.
8973,1.03 SAGG CURRENT PATCH 1;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Current SAGG patch number(s). Answer must be 1-20 characters in length
8973,1.04 SAGG CURRENT PATCH INSTALL 1;4 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Installation Date for current SAGG patch.
8973,1.05 SAGG DLY BKG START 1;5 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Start Time for the SAGG daily background job.
8973,1.06 SAGG DLY BKG STOP 1;6 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Stop Time for the SAGG daily background job.
8973,1.07 SAGG DLY BKG DELTA 1;7 FREE TEXT
INPUT TRANSFORM: K:$L(X)>10!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Delta for the SAGG daily background job.
8973,1.08 SAGG WKY BKG START 1;8 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Start Time for the SAGG weekly background job.
8973,1.09 SAGG WKY BKG STOP 1;9 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Stop Time for the SAGG weekly background job.
8973,1.1 SAGG WKY BKG DELTA 1;10 FREE TEXT
INPUT TRANSFORM: K:$L(X)>15!($L(X)<1) X
LAST EDITED: JUL 20, 2004
HELP-PROMPT: Most recent Delta for the SAGG weekly background job.
8973,1.11 SAGG WEEKS TO KEEP DATA 1;11 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>100)!(X<0)!(X?.E1"."1.N) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Type a number between 0 and 100, 0 Decimal Digits
8973,1.12 SAGG DLY PURGE START 1;12 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: (No range limit on date)
8973,1.13 SAGG DLY PURGE STOP 1;13 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: (No range limit on date)
8973,1.14 SAGG DLY PURGE DELTA 1;14 FREE TEXT
INPUT TRANSFORM: K:$L(X)>10!($L(X)<1) X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: Answer must be 1-10 characters in length
8973,1.15 SAGG WKY PURGE START 1;15 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: (No range limit on date)
8973,1.16 SAGG WKY PURGE STOP 1;16 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: (No range limit on date)
8973,1.17 SAGG WKY PURGE DELTA 1;17 FREE TEXT
INPUT TRANSFORM: K:$L(X)>10!($L(X)<1) X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: Answer must be 1-10 characters in length
8973,2.01 RUM CURRENT VERSION 2;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>10!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Current version of the RESOURCE USAGE MONITOR package. Answer must be 1-10 characters in length
8973,2.02 RUM CURRENT VERSION INSTALL 2;2 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Installation Date of the current RESOURCE USAGE MONITOR package.
8973,2.03 RUM CURRENT PATCH 2;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>10!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Current patch number(s) for the RESOURCE USAGE MONITOR package. Answer must be 1-10 characters in
length
8973,2.04 RUM CURRENT PATCH INSTALL 2;4 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Installation Date of the current patch for the RESOURCE USAGE MONITOR package.
8973,2.05 RUM DLY BKG START 2;5 DATE
INPUT TRANSFORM: S %DT="ESTR" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Start Time for the RUM daily background job.
8973,2.06 RUM DLY BKG STOP 2;6 DATE
INPUT TRANSFORM: S %DT="ESTR" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Stop Time for the RUM daily background job.
8973,2.07 RUM DLY BKG DELTA 2;7 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Delta for the RUM daily background job.
8973,2.08 RUM WKY BKG START 2;8 DATE
INPUT TRANSFORM: S %DT="ESTR" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Start Time for the RUM weekly background job.
8973,2.09 RUM WKY BKG STOP 2;9 DATE
INPUT TRANSFORM: S %DT="ESTR" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Stop Time for the RUM weekly background job.
8973,2.1 RUM WKY BKG DELTA 2;10 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Delta for the RUM weekly background job.
8973,2.11 RUM WEEKS TO KEEP DATA 2;11 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>20)!(X<2)!(X?.E1"."1.N) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: This is the number of weeks that RUM data will be retained in file #8971.1 before purging. It is
recommended that 2 weeks of data be retained.
8973,2.12 RUM DLY PURGE START 2;12 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: (No range limit on date)
8973,2.13 RUM DLY PURGE STOP 2;13 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: (No range limit on date)
8973,2.14 RUM DLY PURGE DELTA 2;14 FREE TEXT
INPUT TRANSFORM: K:$L(X)>10!($L(X)<1) X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: Answer must be 1-10 characters in length
8973,2.15 RUM WKY PURGE START 2;15 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: (No range limit on date)
8973,2.16 RUM WKY PURGE STOP 2;16 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: (No range limit on date)
8973,2.17 RUM WKY PURGE DELTA 2;17 FREE TEXT
INPUT TRANSFORM: K:$L(X)>10!($L(X)<1) X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: Answer must be 1-10 characters in length
8973,3.05 HL7 DLY BKG START 3;5 DATE
INPUT TRANSFORM: S %DT="ESTR" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Start Time for the HL7 daily background job.
8973,3.06 HL7 DLY BKG STOP 3;6 DATE
INPUT TRANSFORM: S %DT="ESTR" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Stop Time for the HL7 daily background job.
8973,3.07 HL7 DLY BKG DELTA 3;7 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Delta for the Timing daily background job.
8973,3.08 HL7 WKY BKG START 3;8 DATE
INPUT TRANSFORM: S %DT="ESTR" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Start Time for the HL7 weekly background job.
8973,3.09 HL7 WKY BKG STOP 3;9 DATE
INPUT TRANSFORM: S %DT="ESTR" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Stop Time for the HL7 weekly background job.
8973,3.1 HL7 WKY BKG DELTA 3;10 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Delta for the HL7 weekly background job.
8973,3.11 HL7 WEEKS TO KEEP DATA 3;11 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>20)!(X<2)!(X?.E1"."1.N) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: This is the number of weeks that HL7 data will be retained in file #8973.1 before purging. It is
recommended that 2 weeks of data be retained.
8973,3.12 HL7 DLY PURGE START 3;12 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: (No range limit on date)
8973,3.13 HL7 DLY PURGE END 3;13 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: (No range limit on date)
8973,3.14 HL7 DLY PURGE DELTA 3;14 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: Answer must be 1-20 characters in length
8973,3.15 HL7 WKY PURGE START 3;15 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: (No range limit on date)
8973,3.16 HL7 WKY PURGE END 3;16 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: (No range limit on date)
8973,3.17 HL7 WKY PURGE DELTA 3;17 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: Answer must be 1-20 characters in length
8973,4.05 TIMING DLY BKG START 4;5 DATE
INPUT TRANSFORM: S %DT="ESTR" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Start Time for the Timing daily background job.
8973,4.06 TIMING DLY BKG STOP 4;6 DATE
INPUT TRANSFORM: S %DT="ESTR" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Stop Time for the Timing daily background job.
8973,4.07 TIMING DLY BKG DELTA 4;7 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Delat for the Timing daily background job.
8973,4.08 TIMING WKY BKG START 4;8 DATE
INPUT TRANSFORM: S %DT="ESTR" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Start Time for the Timing weekly background job.
8973,4.09 TIMING WKY BKG STOP 4;9 DATE
INPUT TRANSFORM: S %DT="ESTR" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Stop Time for the Timing weekly background job.
8973,4.1 TIMING WKY BKG DELTA 4;10 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Most recent Delta for the Timing weekly background job.
8973,4.11 TIMING WEEKS TO KEEP DATA 4;11 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>40)!(X<2)!(X?.E1"."1.N) X
LAST EDITED: DEC 11, 2003
HELP-PROMPT: This is the number of weeks that Timing data will be retained in file #8973.2 before purging. It
is recommended that 4 weeks of data be retained.
8973,4.12 TIMING DLY PURGE START 4;12 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: (No range limit on date)
8973,4.13 TIMING DLY PURGE END 4;13 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: (No range limit on date)
8973,4.14 TIMING DLY PURGE DELTA 4;14 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: Answer must be 1-20 characters in length
8973,4.15 TIMING WKY PURGE START 4;15 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: (No range limit on date)
8973,4.16 TIMING WKY PURGE END 4;16 DATE
INPUT TRANSFORM: S %DT="EST" D ^%DT S X=Y K:X<1 X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: (No range limit on date)
8973,4.17 TIMING WKY PURGE DELTA 4;17 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X
LAST EDITED: NOV 21, 2003
HELP-PROMPT: Answer must be 1-20 characters in length
8973,5.01 SCHEDULED DOWN TIME START 5;1 DATE
INPUT TRANSFORM: S %DT="ESTXR" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 12, 2006
HELP-PROMPT: Enter the Date/Time that Scheduled Down Time is to begin. You cannot enter a 'Scheduled Down Time
Stop' unless this field has an entry.
8973,5.02 SCHEDULED DOWN TIME STOP 5;2 DATE
INPUT TRANSFORM: S %DT="ESTR" D ^%DT S X=Y K:X<1 X
LAST EDITED: APR 12, 2006
HELP-PROMPT: Enter the Date/Time that the Scheduled Down Time will end.
8973,5.03 REASON FOR DOWN TIME 5;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>65!($L(X)<1) X
LAST EDITED: APR 12, 2006
HELP-PROMPT: Answer must be 1-65 characters in length
8973,19.01 MONITOR UPDATE RATE - MINUTES 19;1 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>60)!(X<5)!(X?.E1"."1.N) X
LAST EDITED: FEB 13, 2004
HELP-PROMPT: When the Timing Monitor is running, this is the number of minutes between automatic updates. (Type
a number between 5 and 60)
8973,19.02 MONITOR ALERT - SECONDS 19;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<10)!(X?.E1"."1.N) X
LAST EDITED: FEB 13, 2004
HELP-PROMPT: When the Timing Monitor is running, if the average time-to-load a CPRS Coversheet exceeds this
value, an alert will appear on the Timing Monitor screen. (Type a number between 10 and 999)
8973,20 CPU 20;0 Multiple #8973.201
DESCRIPTION:
Current CPU/Node data.
8973.201,.01 NODE 0;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Node name. Answer must be 1-30 characters in length
CROSS-REFERENCE: 8973.201^B
1)= S ^KMPD(8973,DA(1),20,"B",$E(X,1,30),DA)=""
2)= K ^KMPD(8973,DA(1),20,"B",$E(X,1,30),DA)
8973.201,.02 TYPE OF CPU 0;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>60!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Type of CPU for this node. Answer must be 1-60 characters in length
8973.201,.03 NUMBER OF PROCESSORS 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<0)!(X?.E1"."1.N) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Number of processors for this node. Type a number between 0 and 999, 0 Decimal Digits
8973.201,.04 PROCESSOR SPEED 0;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Processor speed for this node. Answer must be 1-20 characters in length
8973.201,.05 AMOUNT OF MEMORY 0;5 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X
LAST EDITED: APR 01, 2004
HELP-PROMPT: Amount of memory for this node. Answer must be 1-20 characters in length
8973,21.1 SAGG TRANSMIT TO 21.1;0 Multiple #8973.01
DESCRIPTION: This represents the location(s) where the SAGG data is transmitted after being compiled at the
sites. *** THESE ENTRIES SHOULD NOT BE CHANGED BY THE LOCAL FACILITY ***
8973.01,.01 SAGG TRANSMIT TO 0;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>45!($L(X)<1) X
LAST EDITED: SEP 01, 2004
HELP-PROMPT: This represents the location(s) where the SAGG data is transmitted after being compiled at the
sites. *** THESE ENTRIES SHOULD NOT BE CHANGED BY THE LOCAL FACILITY ***
CROSS-REFERENCE: 8973.01^B
1)= S ^KMPD(8973,DA(1),21.1,"B",$E(X,1,30),DA)=""
2)= K ^KMPD(8973,DA(1),21.1,"B",$E(X,1,30),DA)
8973,21.2 RUM TRANSMIT TO 21.2;0 Multiple #8973.02
DESCRIPTION: This represents the location(s) where the RUM data is transmitted after being compiled at the
sites. *** THESE ENTRIES SHOULD NOT BE CHANGED BY THE LOCAL FACILITY ***
8973.02,.01 RUM TRANSMIT TO 0;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>45!($L(X)<1) X
LAST EDITED: SEP 01, 2004
HELP-PROMPT: This represents the location(s) where the RUM data is transmitted after being compiled at the
sites. *** THESE ENTRIES SHOULD NOT BE CHANGED BY THE LOCAL FACILITY ***
CROSS-REFERENCE: 8973.02^B
1)= S ^KMPD(8973,DA(1),21.2,"B",$E(X,1,30),DA)=""
2)= K ^KMPD(8973,DA(1),21.2,"B",$E(X,1,30),DA)
8973,21.3 HL7 TRANSMIT TO 21.3;0 Multiple #8973.03
DESCRIPTION: This represents the location(s) where the HL7 data is transmitted after being compiled at the
sites. *** THESE ENTRIES SHOULD NOT BE CHANGED BY THE LOCAL FACILITY ***
8973.03,.01 HL7 TRANSMIT TO 0;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>45!($L(X)<1) X
LAST EDITED: SEP 01, 2004
HELP-PROMPT: This represents the location(s) where the HL7 data is transmitted after being compiled at the
sites. *** THESE ENTRIES SHOULD NOT BE CHANGED BY THE LOCAL FACILITY ***
CROSS-REFERENCE: 8973.03^B
1)= S ^KMPD(8973,DA(1),21.3,"B",$E(X,1,30),DA)=""
2)= K ^KMPD(8973,DA(1),21.3,"B",$E(X,1,30),DA)
8973,21.4 TIMING TRANSMIT TO 21.4;0 Multiple #8973.04
DESCRIPTION: This represents the location(s) where the TIMING data is transmitted after being compiled at the
sites. *** THESE ENTRIES SHOULD NOT BE CHANGED BY THE LOCAL FACILITY ***
8973.04,.01 TIMING TRANSMIT TO 0;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>45!($L(X)<1) X
LAST EDITED: SEP 01, 2004
HELP-PROMPT: This represents the location(s) where the TIMING data is transmitted afterbeing compiled at the
sites. *** THESE ENTRIES SHOULD NOT BE CHANGED BY THE LOCAL FACILITY ***
CROSS-REFERENCE: 8973.04^B
1)= S ^KMPD(8973,DA(1),21.4,"B",$E(X,1,30),DA)=""
2)= K ^KMPD(8973,DA(1),21.4,"B",$E(X,1,30),DA)
8973,21.5 VISTA MONITOR TRANSMIT TO 21.5;0 Multiple #8973.05
8973.05,.01 VISTA MONITOR TRANSMIT TO 0;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>45!($L(X)<1) X
LAST EDITED: APR 12, 2006
HELP-PROMPT: Answer must be 1-45 characters in length
CROSS-REFERENCE: 8973.05^B
1)= S ^KMPD(8973,DA(1),21.5,"B",$E(X,1,30),DA)=""
2)= K ^KMPD(8973,DA(1),21.5,"B",$E(X,1,30),DA)
FILES POINTED TO FIELDS
INSTITUTION (#4) NAME (#.01)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):
KMPD PARAMETERS EDIT DEC 03, 2003@09:15 USER #0
KMPD PARAMETERS HDR DD #8973
KMPD PARAMETERS PAGE 1 DD #8973