STANDARD DATA DICTIONARY #195.3 -- RECORD MOVEMENT TYPES FILE                                                     9/29/25    PAGE 1
STORED IN ^DIC(195.3,  (28 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                       (VERSION 2)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------


IDENTIFIED BY: APPLICATION (#3)[R]

POINTED TO BY: TYPE OF MOVEMENT field (#108) of the RECORDS File (#190) 
               TYPE OF MOVEMENT field (#8) of the RECORD MOVEMENT HISTORY File (#190.3) 
               

CROSS
REFERENCED BY: APPLICATION(AA), NAME(AA1), NAME(B), APPLICATION(C)



195.3,.01     NAME                   0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
              LAST EDITED:      JUN 14, 1990 
              HELP-PROMPT:      ANSWER MUST BE 3-30 CHARACTERS IN LENGTH 
              DESCRIPTION:
                                This describes the action when the system manipulates a record.  

              DELETE TEST:      .01,0)= I 1 W !,"Movement Types may not be deleted"

              CROSS-REFERENCE:  195.3^B 
                                1)= S ^DIC(195.3,"B",$E(X,1,30),DA)=""
                                2)= K ^DIC(195.3,"B",$E(X,1,30),DA)

              CROSS-REFERENCE:  195.3^AA1^MUMPS 
                                1)= S:$P(^DIC(195.3,DA,0),U,3) ^DIC(195.3,"AA",+$P(^(0),U,3),X,DA)=""
                                2)= K ^DIC(195.3,"AA",+$P(^DIC(195.3,DA,0),U,3),X,DA)


195.3,2       DISPLAY MESSAGE        0;2 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
              HELP-PROMPT:      ANSWER MUST BE 3-30 CHARACTERS IN LENGTH 
              DESCRIPTION:
                                This describes what is displayed by the system when a movement is done.  


195.3,3       APPLICATION            0;3 POINTER TO RECORD TRACKING APPLICATION FILE (#195.1) (Required)

              LAST EDITED:      JAN 15, 1987 
              DESCRIPTION:      This allows certain types of movements to be allowed for some applications and not performed for
                                others.  

              CROSS-REFERENCE:  195.3^AA^MUMPS 
                                1)= S ^DIC(195.3,"AA",X,$P(^DIC(195.3,DA,0),U),DA)=""
                                2)= K ^DIC(195.3,"AA",X,$P(^DIC(195.3,DA,0),U),DA)

              CROSS-REFERENCE:  195.3^C 
                                1)= S ^DIC(195.3,"C",$E(X,1,30),DA)=""
                                2)= K ^DIC(195.3,"C",$E(X,1,30),DA)


195.3,4       INCLUDE ON OVERDUE REPORT 0;4 SET

                                'y' FOR YES; 
                                'n' FOR NO; 
              LAST EDITED:      JAN 09, 1987 
              DESCRIPTION:      YES means that the current movement of the record indicates that it may not be available for
                                distribution.  



      FILES POINTED TO                      FIELDS

RECORD TRACKING APPLICATION 
                   (#195.1)       APPLICATION (#3)



INPUT TEMPLATE(S):
RT MOVEMENT SET-UP            MAY 18, 1987        USER #0    

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):