STANDARD DATA DICTIONARY #194.2 -- PULL LIST FILE                                                                 3/24/25    PAGE 1
STORED IN ^RTV(194.2,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                         (VERSION 2)   

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


COMPILED CROSS-REFERENCE ROUTINE: RTXP
IDENTIFIED BY: DATE RECORDS NEEDED (#2)[R], RECORD TYPE RESTRICTION (#4), PULL LIST STATUS (#6)

POINTED TO BY: PULL LIST field (#10) of the REQUESTED RECORDS File (#190.1) 
               

CROSS
REFERENCED BY: APPLICATION(AC), PULL LIST(B), DATE RECORDS NEEDED(C)



194.2,.001    NUMBER                     NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      JUN 30, 1986 
              HELP-PROMPT:      TYPE A WHOLE NUMBER BETWEEN 1 AND 9999999 
              DESCRIPTION:
                                This allows pull lists to be selected by internal file number 


194.2,.01     PULL LIST              0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>45!($L(X)<3) X I $D(X) S X=$$UP^XLFSTR(X)
              LAST EDITED:      NOV 22, 1995 
              HELP-PROMPT:      ANSWER MUST BE 3-45 CHARACTERS IN LENGTH 
              DESCRIPTION:      This allows a group of requests for records to be logically grouped in a list for group action,
                                charged out by the system.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

              CROSS-REFERENCE:  194.2^B 
                                1)= S ^RTV(194.2,"B",$E(X,1,45),DA)=""
                                2)= K ^RTV(194.2,"B",$E(X,1,45),DA)


194.2,2       DATE RECORDS NEEDED    0;2 DATE (Required)

              INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      JUN 17, 1986 
              DESCRIPTION:
                                This identifies the date for a group of requests for records.  

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


194.2,3       USER ENTERING REQUEST  0;3 POINTER TO NEW PERSON FILE (#200)

              LAST EDITED:      JUN 24, 1991 
              DESCRIPTION:
                                This defines the user who made the requests on the pull list 


194.2,4       RECORD TYPE RESTRICTION 0;4 POINTER TO RECORD TYPES FILE (#195.2)

              INPUT TRANSFORM:  S DIC("S")="I $D(D0),$P(^(0),U,3)=$P(^RTV(194.2,D0,0),U,15)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
              LAST EDITED:      MAY 06, 1987 
              DESCRIPTION:
                                This defines particular types of records which may be requested on a pull list.  

              SCREEN:           S DIC("S")="I $D(D0),$P(^(0),U,3)=$P(^RTV(194.2,D0,0),U,15)"
              EXPLANATION:      Allows only record types associated with the application.

194.2,5       BORROWER               0;5 POINTER TO BORROWERS/FILE AREAS FILE (#195.9) (Required)

              INPUT TRANSFORM:  D PULL^RTDPA31 S DIC("S")="I $D(D0),$P(^RTV(194.2,D0,0),U,15)=$P(^RTV(195.9,Y,0),U,3) D DICS^RTDPA3
                                1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
              LAST EDITED:      FEB 18, 1987 
              DESCRIPTION:
                                This defines the borrower in the system for the list of records.  

              SCREEN:           S DIC("S")="I $D(D0),$P(^RTV(194.2,D0,0),U,15)=$P(^RTV(195.9,Y,0),U,3) D DICS^RTDPA31"
              EXPLANATION:      Allows borrowers/locations associated with this application.
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


194.2,6       PULL LIST STATUS       0;6 SET

                                'c' FOR CHARGED; 
                                'x' FOR CANCELLED; 
                                'r' FOR REQUESTED; 
              LAST EDITED:      NOV 10, 1986 
              DESCRIPTION:
                                This delineates the state of the pull list in the system.  


194.2,7       DATE/TIME CURRENT STATUS 0;7 DATE

              INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      JUL 25, 1986 
              DESCRIPTION:
                                This defines the date, time the status of the pull list was set.  


194.2,8       USER RESPONSIBLE FOR STATUS 0;8 POINTER TO NEW PERSON FILE (#200)

              LAST EDITED:      JUN 24, 1991 
              DESCRIPTION:
                                This defines the user in the system who changed the status of the pull list.  


194.2,9       CANCEL REASON          0;9 POINTER TO REASONS FILE (#195.6)

              INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""c""!($P(^(0),U,2)=""g"")" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
              LAST EDITED:      MAY 27, 1987 
              DESCRIPTION:
                                This defines different reasons for cancelling the pull list.  

              SCREEN:           S DIC("S")="I $P(^(0),U,2)=""c""!($P(^(0),U,2)=""g"")"
              EXPLANATION:      Allows only cancel or general reasons.
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


194.2,10      TYPE OF LIST           0;10 SET

                                '1' FOR SCHEDULING; 
                                '2' FOR ADHOC; 
                                '3' FOR RECORD RETIREMENT; 
              LAST EDITED:      MAR 10, 1991 
              DESCRIPTION:      This allows the system to differentiate between pull list generated from Scheduling clinics and
                                other pull lists.  


194.2,11      VOLUMES REQUESTED      0;11 SET

                                'A' FOR ALL VOLUMES; 
                                'L' FOR LATEST VOLUME; 
              LAST EDITED:      FEB 15, 1987 
              DESCRIPTION:
                                This allows the system to handle multi-volume records by defining the needs of the borrower.  


194.2,12      INSTITUTION OF BORROWER 0;12 POINTER TO INSTITUTION FILE (#4) (Required)

              LAST EDITED:      NOV 10, 1986 
              DESCRIPTION:
                                This further describes the borrower of the record for different divisions within the system.  


194.2,13      DATE/TIME PULL LIST PRINTED 0;13 DATE

              INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      AUG 05, 1986 
              DESCRIPTION:      This defines the date, time the pull list was printed to identify the validity of the list at the
                                present time.  

              WRITE AUTHORITY:  ^

194.2,14      DATE/TIME LAST UPDATED 0;14 DATE

              INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      AUG 07, 1986 
              DESCRIPTION:
                                This defines the date, time of the last update to the list.  

              WRITE AUTHORITY:  ^

194.2,15      APPLICATION            0;15 POINTER TO RECORD TRACKING APPLICATION FILE (#195.1) (Required)

              LAST EDITED:      SEP 16, 1986 
              DESCRIPTION:      This defines the application identified with the list to allow the system to share the same file
                                with different applications.  

              CROSS-REFERENCE:  194.2^AC 
                                1)= S ^RTV(194.2,"AC",$E(X,1,30),DA)=""
                                2)= K ^RTV(194.2,"AC",$E(X,1,30),DA)


194.2,16      HOLDING AREA           0;16 POINTER TO BORROWERS/FILE AREAS FILE (#195.9)

              INPUT TRANSFORM:  S DIC("S")="I $D(D0),$P(^RTV(194.2,D0,0),U,15)=$P(^RTV(195.9,Y,0),U,3) D DICS^RTDPA31" D ^DIC K DIC
                                 S DIC=DIE,X=+Y K:Y<0 X
              LAST EDITED:      MAY 15, 1987 
              DESCRIPTION:
                                This allows groups of records to be moved to a temporary area before  further distribution.  

              SCREEN:           S DIC("S")="I $D(D0),$P(^RTV(194.2,D0,0),U,15)=$P(^RTV(195.9,Y,0),U,3) D DICS^RTDPA31"
              EXPLANATION:      Allows borrowers/locations associated with this application.

194.2,100     COMMENTS               1;0   WORD-PROCESSING #194.21

              DESCRIPTION:      This allows free text description to be added to the pull list to aid in justification and
                                identification of the list.  


                LAST EDITED:      SEP 04, 1986 




      FILES POINTED TO                      FIELDS

BORROWERS/FILE AREAS (#195.9)     BORROWER (#5)
                                  HOLDING AREA (#16)

INSTITUTION (#4)                  INSTITUTION OF BORROWER (#12)

NEW PERSON (#200)                 USER ENTERING REQUEST (#3)
                                  USER RESPONSIBLE FOR STATUS (#8)

REASONS (#195.6)                  CANCEL REASON (#9)

RECORD TRACKING APPLICATION 
                   (#195.1)       APPLICATION (#15)

RECORD TYPES (#195.2)             RECORD TYPE RESTRICTION (#4)



INPUT TEMPLATE(S):
RT CHANGE PULL LIST STATUS    FEB 02, 1987        USER #0    
RT PULL LIST                  APR 18, 1991@18:14  USER #0    ^RTCP 

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):