STANDARD DATA DICTIONARY #52.51 -- PHARMACY EXTERNAL INTERFACE FILE                                               3/24/25    PAGE 1
STORED IN ^PS(52.51,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                        (VERSION 7.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file holds all prescriptions that are sent to an External Interface at the time of label printing.  



   APPLICATION GROUP(S): PSO

CROSS
REFERENCED BY: TRANSMISSION DATE/TIME(AC1), MESSAGE SERVER ID(AM), DIVISION(AM1), TRANSMISSION DATE/TIME(AS), DIVISION(AS1), 
               PERSON(AS2), RX #(B)



52.51,.01     RX #                   0;1 POINTER TO PRESCRIPTION FILE (#52) (Required)

              LAST EDITED:      FEB 06, 1997 
              DESCRIPTION:
                                This field is the pointer to the Prescription file.  

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


52.51,2       PATIENT                0;2 POINTER TO PATIENT FILE (#2) (Required)

              LAST EDITED:      FEB 06, 1997 
              DESCRIPTION:
                                This field is the pointer to the Patient file.  


52.51,3       TRANSMISSION DATE/TIME 0;3 DATE

              INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      MAR 07, 1997 
              DESCRIPTION:
                                This is the Date/Time of the transmission to the External Interface.  

              CROSS-REFERENCE:  52.51^AS^MUMPS 
                                1)= D SDATE^PSOEXREF
                                2)= D KDATE^PSOEXREF
                                This cross reference is used to update the AS batch cross reference.  It sets the global
                                ^PS(52.51,"AS",Transmission date/time,Division, Person,DA)="".  


              CROSS-REFERENCE:  52.51^AC1 
                                1)= S ^PS(52.51,"AC1",$E(X,1,30),DA)=""
                                2)= K ^PS(52.51,"AC1",$E(X,1,30),DA)


52.51,4       PERSON                 0;4 POINTER TO NEW PERSON FILE (#200)

              LAST EDITED:      MAR 07, 1997 
              DESCRIPTION:
                                This is the pointer to File 200.  

              CROSS-REFERENCE:  52.51^AS2^MUMPS 
                                1)= D SPER^PSOEXREF
                                2)= D KPER^PSOEXREF
                                This is used to keep the AS batch cross reference up to date.  It sets the global
                                ^PS(52.51,"AS",Transmission date/time,Division, Person,DA)="".  



52.51,5       REPRINT                0;5 SET

                                '1' FOR REPRINT; 
              LAST EDITED:      FEB 06, 1997 
              DESCRIPTION:
                                This indicates whether the label was a Reprint.  


52.51,6       SITE PARAMETER         0;6 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
              LAST EDITED:      FEB 13, 1997 
              HELP-PROMPT:      Answer must be 1-30 characters in length. 
              DESCRIPTION:
                                Stores external interface site parameter.  


52.51,7       DISPENSE DEVICE        0;7 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
              LAST EDITED:      FEB 13, 1997 
              HELP-PROMPT:      Answer must be 1-30 characters in length. 
              DESCRIPTION:
                                This is the name of the External Interface device.  


52.51,8       FILL TYPE              0;8 SET

                                'F' FOR REGULAR FILL; 
                                'P' FOR PARTIAL FILL; 
              LAST EDITED:      FEB 06, 1997 
              DESCRIPTION:
                                This indicates whether the Fill was a regular or partial fill.  


52.51,9       FILL NUMBER            0;9 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      FEB 06, 1997 
              HELP-PROMPT:      Type a Number between 0 and 99, 0 Decimal Digits 
              DESCRIPTION:
                                This indicates which fill was being printed.  


52.51,10      MESSAGE SERVER ID      1;1 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
              LAST EDITED:      MAR 07, 1997 
              HELP-PROMPT:      Answer must be 1-30 characters in length. 
              DESCRIPTION:
                                This is the Message Server ID of the Transmission.  

              CROSS-REFERENCE:  52.51^AM^MUMPS 
                                1)= D SMES^PSOEXREF
                                2)= D KMES^PSOEXREF
                                This maintains the Message Server ID/Division cross reference.  It sets the global
                                ^PS(52.51,"AM",Message Server ID,Division,DA)="".  



52.51,11      CLIENT SERVER ID       1;2 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
              LAST EDITED:      FEB 13, 1997 
              HELP-PROMPT:      Answer must be 1-30 characters in length. 
              DESCRIPTION:
                                This is the Client Server ID of the Transmission.  


52.51,12      ERROR CODE             1;3 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
              LAST EDITED:      FEB 06, 1997 
              HELP-PROMPT:      Answer must be 1-30 characters in length. 
              DESCRIPTION:
                                This is the Error Code for an Unsuccessful Transmission.  


52.51,13      COMMENTS               1;4 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>50!($L(X)<1) X
              LAST EDITED:      FEB 06, 1997 
              HELP-PROMPT:      Answer must be 1-50 characters in length. 
              DESCRIPTION:
                                These are Comments for a Transmission.  


52.51,14      TRANSMISSION STATUS    0;10 SET

                                '1' FOR PROCESSING; 
                                '2' FOR PROCESSED; 
                                '3' FOR PROCESS FAILED; 
                                '4' FOR RESUBMISSION; 
              LAST EDITED:      FEB 10, 1997 
              DESCRIPTION:
                                This is the Status of the Transmission.  


52.51,15      DIVISION               0;11 POINTER TO OUTPATIENT SITE FILE (#59)

              LAST EDITED:      MAR 07, 1997 
              DESCRIPTION:
                                This is the Division where the label information was submitted.  

              CROSS-REFERENCE:  52.51^AS1^MUMPS 
                                1)= D SDIV^PSOEXREF
                                2)= D KDIV^PSOEXREF
                                This is used to keep the AS batch cross reference up to date.  It sets the global
                                ^PS(52.51,"AS",Transmission date/time,Division, Person,DA)="".  


              CROSS-REFERENCE:  52.51^AM1^MUMPS 
                                1)= D SDIVM^PSOEXREF
                                2)= D KDIVM^PSOEXREF
                                This maintains the Message Server ID/Division cross reference.  It sets the global
                                ^PS(52.51,"AM",Message Server ID,Division,DA)="".  




      FILES POINTED TO                      FIELDS

NEW PERSON (#200)                 PERSON (#4)

OUTPATIENT SITE (#59)             DIVISION (#15)

PATIENT (#2)                      PATIENT (#2)

PRESCRIPTION (#52)                RX # (#.01)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):