STANDARD DATA DICTIONARY #95.11 -- LAB ARCHIVAL ACTIVITY FILE 6/27/25 PAGE 1 STORED IN ^LAB(95.11, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.2) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This file stores information and status of lab data archiving activities. IDENTIFIED BY: FILE (#1), SELECT DATE (#4)[R], ARCHIVER (#5), ARCHIVAL STATUS (#7), SELECTOR (#7.5) CROSS REFERENCED BY: ARCHIVE NUMBER(B), FILE(C), ARCHIVAL STATUS(O) 95.11,.01 ARCHIVE NUMBER 0;1 NUMBER (Required) INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: APR 10, 1995 HELP-PROMPT: Type a Number between 1 and 9999999, 0 Decimal Digits DESCRIPTION: This is a sequential number of an arhive activity. Example: Archival activity number 1 would be the first archive performed. CROSS-REFERENCE: 95.11^B 1)= S ^LAB(95.11,"B",$E(X,1,30),DA)="" 2)= K ^LAB(95.11,"B",$E(X,1,30),DA) 95.11,1 FILE 0;2 POINTER TO FILE FILE (#1) LAST EDITED: APR 10, 1995 HELP-PROMPT: Enter the file that this archival activity will effect. DESCRIPTION: This is the source file. CROSS-REFERENCE: 95.11^C 1)= S ^LAB(95.11,"C",$E(X,1,30),DA)="" 2)= K ^LAB(95.11,"C",$E(X,1,30),DA) This cross-reference allows lookup by file. 95.11,2 SEARCH TEMPLATE 0;3 POINTER TO SORT TEMPLATE FILE (#.401) (Required) LAST EDITED: APR 10, 1995 HELP-PROMPT: Enter the name of the sort/search template that you wish to use. DESCRIPTION: This is the sort/search template for this archival activity. 95.11,3 PRINT TEMPLATE 0;4 POINTER TO PRINT TEMPLATE FILE (#.4) (Required) INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,8)="_$S($D(DIAX):2,1:1)_",$P(^(0),U,4)=$P(^LAB(95.11,DA,0),U,2)",DIC(0)="QE ",D="F"++$P(^LAB(95.11,DA,0),U,2) D IX^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: APR 10, 1995 HELP-PROMPT: Enter the name of the FILEGRAM OR EXTRACT print template that you wish to use. DESCRIPTION: This is the extrtact print template used in this archival activity. SCREEN: S DIC("S")="I $P(^(0),U,8)="_$S($D(DIAX):2,1:1)_",$P(^(0),U,4)=$P(^LAB(95.11,DA,0),U,2)" EXPLANATION: Select a print template in Filegram or Extract Format. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 95.11,4 SELECT DATE 0;5 DATE (Required) INPUT TRANSFORM: S %DT="ET" D ^%DT S X=Y K:Y<1 X LAST EDITED: APR 10, 1995 HELP-PROMPT: Enter the select date of this archival activity. DESCRIPTION: This is the select date of the archival activity. 95.11,5 ARCHIVER 0;6 POINTER TO NEW PERSON FILE (#200) LAST EDITED: APR 10, 1995 HELP-PROMPT: Enter the name of the user that is doing the archiving. DESCRIPTION: This is the name of the user who is performing the archiving. 95.11,6 NUMBER OF ITEMS TO ARCHIVE 0;7 NUMBER INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: APR 10, 1995 HELP-PROMPT: Type a Number between 0 and 9999999, 0 Decimal Digits DESCRIPTION: This is the number of items to archive. 95.11,7 ARCHIVAL STATUS 0;8 SET '1' FOR SELECTED; '2' FOR ARCHIVED; '3' FOR CLEARED; '90' FOR PURGED; LAST EDITED: MAY 01, 1995 DESCRIPTION: This is the status of the archival activity. CROSS-REFERENCE: 95.11^O^MUMPS 1)= S ^LAB(95.11,"O",X,+$P(^LAB(95.11,DA,0),U,2),DA)="" 2)= K ^LAB(95.11,"O",X,+$P(^LAB(95.11,DA,0),U,2),DA) This cross-reference identifies the active archival activity for a file. 95.11,7.5 SELECTOR 2;1 POINTER TO NEW PERSON FILE (#200) LAST EDITED: APR 10, 1995 HELP-PROMPT: This is the person who selected entries for archival. DESCRIPTION: This is the person who selected entries for archival. 95.11,8 PURGER 0;9 POINTER TO NEW PERSON FILE (#200) LAST EDITED: APR 10, 1995 DESCRIPTION: This is the person who performs the purge. 95.11,9 ARCHIVE DATE 0;10 DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: APR 10, 1995 HELP-PROMPT: Enter the archive date of this archival activity. DESCRIPTION: This is the archive date of this archival activity. 95.11,10 PURGE DATE 0;11 DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: APR 10, 1995 HELP-PROMPT: Enter the purge date of this archival activity. DESCRIPTION: This is the purge date of this archival activity. 95.11,11 DATE LAST PRINTED 0;12 DATE INPUT TRANSFORM: S %DT="ETX" D ^%DT S X=Y K:Y<1 X LAST EDITED: APR 10, 1995 HELP-PROMPT: Enter the date that the listing of items to be archived was last printed. DESCRIPTION: This is the date that the listing of items to be archived was last printed. 95.11,12 ARCHIVING ACTION IN PROGRESS 0;13 SET '1' FOR SELECTING; '2' FOR ARCHIVING; '3' FOR CLEARING; '90' FOR PURGING; '99' FOR CANCELLING; LAST EDITED: JUN 08, 1995 HELP-PROMPT: Entry will be made here by system when user begins performing some action to this ARCHIVAL ACTIVITY and will be deleted when action is complete, to lock out other users. DESCRIPTION: Entry will be made here by system when user begins performing some action to this ARCHIVAL ACTIVITY and will be deleted when action is complete, to lock out other users. 95.11,13 DATE/TIME ACTIVITY BEGAN 0;14 DATE INPUT TRANSFORM: S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X LAST EDITED: APR 10, 1995 HELP-PROMPT: Date/time user began archiving action currently in progress. DESCRIPTION: This is the date/time the archiving action currently in progress began. 95.11,14 USER PERFORMING ACTION 0;15 POINTER TO NEW PERSON FILE (#200) LAST EDITED: APR 10, 1995 HELP-PROMPT: User that initiated the archiving action. DESCRIPTION: This is the user that initiated the archiving action. 95.11,15 DESTINATION FILE 0;16 POINTER TO FILE FILE (#1) LAST EDITED: APR 10, 1995 HELP-PROMPT: Ente the number of the destination file for this archival activity. DESCRIPTION: This field holds the number of the destination file for this archival activity. 95.11,16 ARCHIVE DEVICE LABEL 0;17 FREE TEXT INPUT TRANSFORM: K:$L(X)>45!($L(X)<2) X LAST EDITED: APR 10, 1995 HELP-PROMPT: Answer must be 2-45 characters in length. DESCRIPTION: This field holds the label information that identifies your archival medium. 95.11,18 ARCHIVE TASK NUMBER 2;2 FREE TEXT INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X LAST EDITED: JUN 13, 1995 HELP-PROMPT: Answer must be 1-30 characters in length. DESCRIPTION: This is the task number of the Archive data option for this Lab archival activity. 95.11,19 BEGINNING DATE 1;1 DATE INPUT TRANSFORM: S %DT="ET" D ^%DT S X=Y K:Y<1 X LAST EDITED: AUG 17, 1995 HELP-PROMPT: This field is entered through the archive routines. DESCRIPTION: The selected date to begin archiving. 95.11,20 ENDING DATE 1;2 DATE INPUT TRANSFORM: S %DT="ET" D ^%DT S X=Y K:Y<1 X LAST EDITED: AUG 17, 1995 HELP-PROMPT: This field is entered through the archive routines. DESCRIPTION: The selected date to end archiving. FILES POINTED TO FIELDS FILE (#1) FILE (#1) DESTINATION FILE (#15) NEW PERSON (#200) ARCHIVER (#5) SELECTOR (#7.5) PURGER (#8) USER PERFORMING ACTION (#14) PRINT TEMPLATE (#.4) PRINT TEMPLATE (#3) SORT TEMPLATE (#.401) SEARCH TEMPLATE (#2) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):