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):