STANDARD DATA DICTIONARY #550.2 -- CMOP TRANSMISSION FILE                                                         3/24/25    PAGE 1
STORED IN ^PSX(550.2,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                       (VERSION 2.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file is used by the Consolidated Mail Outpatient Pharmacy system at the medical center to maintain summary information on all
pharmacy prescription data transmissions created and transmitted to the Consolidated Mail Outpatient Pharmacy host facility. Data
in this file is maintained by the Consolidated Mail Outpatient Pharmacy software and must not be edited using VA FileMan.  


              DD ACCESS: @
              RD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @
IDENTIFIED BY: DIVISION (#2), SENDER (#4), TRANSMISSION DATE/TIME (#5)

POINTED TO BY: TRANSMISSION NUMBER field (#.01) of the CMOP EVENT sub-field (#52.01) of the PRESCRIPTION File (#52) 
               LAST BATCH TRANSMITTED field (#6) of the CMOP SYSTEM File (#550) 
               

CROSS
REFERENCED BY: STATUS(AA), STATUS(AC), STATUS(AQ), STATUS(AX), TRANSMISSION(B), DIVISION(C), TRANSMISSION DATE/TIME(D), 
               RETRANSMISSION #(E), CMOP SYSTEM(F), STATUS(ST), TYPE(TYP)



550.2,.01     TRANSMISSION           0;1 NUMBER (Required)

              INPUT TRANSFORM:  K:+X'=X!(X>99999999999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 24, 1994 
              HELP-PROMPT:      Type a Number between 0 and 99999999999, 0 Decimal Digits 
              DESCRIPTION:
                                This field contains the number of the data transmission.  

              TECHNICAL DESCR:
                                Number.  

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


550.2,1       STATUS                 0;2 SET

                                '1' FOR CREATED; 
                                '2' FOR TRANSMITTED; 
                                '3' FOR ACKNOWLEDGED; 
                                '4' FOR CLOSED; 
                                '5' FOR RETRANSMITTED; 
              LAST EDITED:      JUL 10, 2002 
              DESCRIPTION:
                                This is the status of the message.  

              CROSS-REFERENCE:  550.2^AQ^MUMPS 
                                1)= S:X=1 ^PSX(550.2,"AQ",DA)=""
                                2)= K ^PSX(550.2,"AQ",DA)
                                If this cross reference exists, the transmission was created and queued to send to the CMOP.  
                                  
                                    
                                     
                                     
                                     


              CROSS-REFERENCE:  550.2^AX^MUMPS 
                                1)= S:X=2 ^PSX(550.2,"AX",DA)=""
                                2)= K ^PSX(550.2,"AX",DA)
                                If this cross reference exists, the transmission has been transmitted to the CMOP.  
                                  
                                    
                                    
                                    
                                    


              CROSS-REFERENCE:  550.2^AA^MUMPS 
                                1)= S:X=3 ^PSX(550.2,"AA",DA)=""
                                2)= K ^PSX(550.2,"AA",DA)
                                If this cross reference exists, the transmission has been received by the CMOP.  
                                  


              CROSS-REFERENCE:  550.2^AC^MUMPS 
                                1)= S:X=4 ^PSX(550.2,"AC",DA)=""
                                2)= K ^PSX(550.2,"AC",DA)
                                If this cross reference exists, the transmission has been closed.  This means that all of the Rx's
                                in the transmission have been processed at the CMOP.  
                                  
                                     
                                      
                                     
                                     


              CROSS-REFERENCE:  550.2^ST 
                                1)= S ^PSX(550.2,"ST",$E(X,1,30),DA)=""
                                2)= K ^PSX(550.2,"ST",$E(X,1,30),DA)


550.2,2       DIVISION               0;3 POINTER TO OUTPATIENT SITE FILE (#59)

              LAST EDITED:      AUG 06, 1993 
              DESCRIPTION:
                                Pointer to the Outpatient Site File.  

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


550.2,3       CMOP SYSTEM            0;4 POINTER TO CMOP SYSTEM FILE (#550)

              LAST EDITED:      SEP 06, 1994 
              DESCRIPTION:
                                Pointer to the CMOP SYSTEM file (#550).  

              TECHNICAL DESCR:
                                Pointer to the CMOP SYSTEM file (#550).  

                                UNEDITABLE
              CROSS-REFERENCE:  550.2^F 
                                1)= S ^PSX(550.2,"F",$E(X,1,30),DA)=""
                                2)= K ^PSX(550.2,"F",$E(X,1,30),DA)


550.2,4       SENDER                 0;5 POINTER TO NEW PERSON FILE (#200)

              LAST EDITED:      JUN 08, 1993 
              DESCRIPTION:      Pointer to the New Person file.  Indicates the user who initiated this transmission.  
                                  

                                UNEDITABLE

550.2,5       TRANSMISSION DATE/TIME 0;6 DATE

              INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      AUG 06, 1993 
              DESCRIPTION:
                                Date and time the transmission was transmitted.  

                                UNEDITABLE
              CROSS-REFERENCE:  550.2^D 
                                1)= S ^PSX(550.2,"D",$E(X,1,30),DA)=""
                                2)= K ^PSX(550.2,"D",$E(X,1,30),DA)


550.2,6       CREATED DATE/TIME      0;7 DATE

              INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      MAY 25, 1993 
              DESCRIPTION:      Date and time the transmission was created.  This is the time that the user started the
                                transmission process.  

                                UNEDITABLE

550.2,7       RECEIVED DATE/TIME     1;1 DATE

              INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      AUG 12, 1993 
              DESCRIPTION:      This is the time that the transmission was received by the host site.  It is returned from the host
                                site in the acknowledgement message.  


550.2,8       RETRANSMISSION #       1;2 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99999999999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 03, 1993 
              HELP-PROMPT:      Type a Number between 1 and 99999999999, 0 Decimal Digits 
              DESCRIPTION:      If present, this is the transmission number for the retransmission.  It will only be present on the
                                original transmission.  

              CROSS-REFERENCE:  550.2^E 
                                1)= S ^PSX(550.2,"E",$E(X,1,30),DA)=""
                                2)= K ^PSX(550.2,"E",$E(X,1,30),DA)
                                This cross reference exists if this transmission is a retransmission of an earlier transmission.  



550.2,9       ORIGINAL TRANSMISSION  1;3 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99999999999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      AUG 24, 1994 
              HELP-PROMPT:      Type a Number between 0 and 99999999999, 0 Decimal Digits 
              DESCRIPTION:
                                The transmission number of the original data transfer for this retransmission entry.  

              TECHNICAL DESCR:
                                Number.  

                                UNEDITABLE

550.2,10      CLOSED DATE/TIME       1;4 DATE

              INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      MAY 25, 1993 
              DESCRIPTION:      This is the date/time that the remote site received confirmation that all the Rx's were released or
                                processed by the vendor.  This entry is made only when all of the Rx's have been confirmed.  

                                UNEDITABLE

550.2,11      START SEQUENCE         1;5 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      MAY 29, 1993 
              HELP-PROMPT:      Type a Number between 0 and 999999999, 0 Decimal Digits 
              DESCRIPTION:
                                This is the first message number in the transmission.  

                                UNEDITABLE

550.2,12      END SEQUENCE           1;6 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99999999999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      MAY 29, 1993 
              HELP-PROMPT:      Type a Number between 0 and 99999999999, 0 Decimal Digits 
              DESCRIPTION:
                                This is the last message number in the transmission.  

                                UNEDITABLE

550.2,13      TOTAL ORDERS           1;7 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99999999999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      MAY 25, 1993 
              HELP-PROMPT:      Type a Number between 0 and 99999999999, 0 Decimal Digits 
              DESCRIPTION:      This is the total number of orders in the transmission.  An order contains all of the Rx's for a
                                single patient.  A patient should only have one order, but a transmission will have many orders.  

                                UNEDITABLE

550.2,14      TOTAL RXS              1;8 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      MAY 25, 1993 
              HELP-PROMPT:      Type a Number between 0 and 999999999999, 0 Decimal Digits 
              DESCRIPTION:
                                This is the number of Rx's in the transmission.  

                                UNEDITABLE

550.2,15      PRESCRIPTIONS          15;0 POINTER Multiple #550.215

              DESCRIPTION:
                                Prescriptions to be transmitted.  


              INDEXED BY:       PATIENT & PATIENT & PRESCRIPTIONS & FILL (C)

550.215,.01     PRESCRIPTIONS          0;1 POINTER TO PRESCRIPTION FILE (#52) (Multiply asked)

                LAST EDITED:      DEC 04, 2002 
                DESCRIPTION:
                                  Prescription to be transmitted.  

                CROSS-REFERENCE:  550.215^B 
                                  1)= S ^PSX(550.2,DA(1),15,"B",$E(X,1,30),DA)=""
                                  2)= K ^PSX(550.2,DA(1),15,"B",$E(X,1,30),DA)

                RECORD INDEXES:   C (#325)

550.215,.02     FILL                   0;2 NUMBER

                INPUT TRANSFORM:  K:+X'=X!(X>45)!(X<0)!(X?.E1"."1.N) X
                LAST EDITED:      DEC 04, 2002 
                HELP-PROMPT:      Type a number between 0 and 45, 0 Decimal Digits 
                DESCRIPTION:
                                  Fill number of the prescription to transmit.  

                RECORD INDEXES:   C (#325)

550.215,.03     PATIENT                0;3 POINTER TO PATIENT FILE (#2)

                LAST EDITED:      DEC 04, 2002 
                DESCRIPTION:
                                  Patient name on the prescription to transmit. (Pointer) 

                RECORD INDEXES:   C (#325)

550.215,.04     PATIENT NAME            ;  COMPUTED

                MUMPS CODE:     X ^DD(550.215,.04,9.2) S D0=$P(Y(550.215,.04,1),U,3) S:'D0!'$D(^DPT(+D0,0)) D0=-1 S Y(550.215,.04,1
                                01)=$S($D(^DPT(D0,0)):^(0),1:"") S X=$P(Y(550.215,.04,101),U,1) S D0=Y(550.215,.04,80) S D1=Y(550.2
                                15,.04,81)
                                9.2 = S Y(550.215,.04,81)=$G(D1),Y(550.215,.04,80)=$G(D0),Y(550.215,.04,1)=$S($D(^PSX(550.2,D0,15,D
                                1,0)):^(0),1:"")
                ALGORITHM:      .03:.01
                LAST EDITED:    DEC 04, 2002 
                DESCRIPTION:
                                Patient name on the prescription to transmit. (Free text) 


550.215,.05     SUSPENSE IEN         0;5 NUMBER

                INPUT TRANSFORM:K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1.N) X
                LAST EDITED:    MAR 06, 2003 
                HELP-PROMPT:    Type a number between 1 and 999999999, 0 Decimal Digits 



550.2,16      COMMENTS               3;0   WORD-PROCESSING #550.216

              DESCRIPTION:      This field can contain any comments the user/programmers feel necessary and that pertains to the
                                transmission.  


                LAST EDITED:      MAY 19, 1993 



550.2,17      TYPE                   TYPE;1 SET

                                'N' FOR NON-Controlled Subs; 
                                'C' FOR Controlled Subs; 
              LAST EDITED:      DEC 04, 2002 
              HELP-PROMPT:      This field indicates whether the CMOP transmission contained prescriptions written for controlled 
                                substances. 
              DESCRIPTION:
                                This identifies that the transmission contains either CS or NON-CS prescriptions.  

              CROSS-REFERENCE:  550.2^TYP 
                                1)= S ^PSX(550.2,"TYP",$E(X,1,30),DA)=""
                                2)= K ^PSX(550.2,"TYP",$E(X,1,30),DA)
                                This is a cross-reference of the type of transmission.  N = Non-Controlled Subs   ;  C = Controlled
                                Subs 




      FILES POINTED TO                      FIELDS

CMOP SYSTEM (#550)                CMOP SYSTEM (#3)

NEW PERSON (#200)                 SENDER (#4)

OUTPATIENT SITE (#59)             DIVISION (#2)

PATIENT (#2)                      PRESCRIPTIONS:PATIENT (#.03)

PRESCRIPTION (#52)                PRESCRIPTIONS:PRESCRIPTIONS (#.01)


Subfile #550.215

  Record Indexes:

  C (#325)    RECORD    REGULAR    IR    LOOKUP & SORTING
      Short Descr:  550.215 'C' PATNAME,DFN,RX,FILL
        Set Logic:  S ^PSX(550.2,DA(1),15,"C",X(2),X(3),X(4),X(5),DA)=""
       Kill Logic:  K ^PSX(550.2,DA(1),15,"C",X(2),X(3),X(4),X(5),DA)
       Whole Kill:  K ^PSX(550.2,DA(1),15,"C")
             X(1):  PATIENT  (550.215,.03)  (forwards)
             X(2):  Computed Code: I $G(X(1)) S X=$$GET1^DIQ(2,X(1),.01)
                      (Subscr 1)
             X(3):  PATIENT  (550.215,.03)  (Subscr 2)  (forwards)
             X(4):  PRESCRIPTIONS  (550.215,.01)  (Subscr 3)  (forwards)
             X(5):  FILL  (550.215,.02)  (Subscr 4)  (forwards)


INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):