STANDARD DATA DICTIONARY #552.5 -- CMOP COST STATS FILE                                                           3/24/25    PAGE 1
STORED IN ^PSX(552.5,  *** 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 to perform drug cost analysis for the host facility.  Cost
data is maintained by medical center/pharmacy division/drug and totals are stored daily and monthly. 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: @

CROSS
REFERENCED BY: DATE PRESCRIPTION FILLED(AD), FACILITY(B)



552.5,.01     FACILITY               0;1 NUMBER (Required)

              INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<100)!(X?.E1"."1N.N) X
              LAST EDITED:      JUN 22, 1994 
              HELP-PROMPT:      Enter the facility that transmitted the prescriptions to the host. 
              DESCRIPTION:
                                This field contains the remote facility that transmitted the prescriptions to the host site.  

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


552.5,1       DIVISION               1;0 Multiple #552.51 (Add New Entry without Asking)

              DESCRIPTION:
                                This sub-file contains the data for the pharmacy division that initiated the prescription.  


552.51,.01      DIVISION               0;1 FREE TEXT (Multiply asked)

                INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
                LAST EDITED:      NOV 12, 1993 
                HELP-PROMPT:      Enter the facility's division. 
                DESCRIPTION:      This field contains the pharmacy division that initiated the prescriptions.  
                                    

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

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


552.51,1        DATE PRESCRIPTION FILLED 1;0 DATE Multiple #552.61 (Add New Entry without Asking)

                LAST EDITED:      NOV 10, 1993 
                DESCRIPTION:
                                  This sub-file contains the fill/refill date of dispensed prescriptions. 


552.61,.01        DATE PRESCRIPTION FILLED 0;1 DATE (Multiply asked)

                  INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
                  LAST EDITED:      OCT 13, 1994 
                  HELP-PROMPT:      Enter the date the prescription was filled/refilled. 
                  DESCRIPTION:
                                    This field contains the date the prescriptions were filled/refilled.  

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

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

                  CROSS-REFERENCE:  552.5^AD 
                                    1)= S ^PSX(552.5,"AD",$E(X,1,30),DA(2),DA(1),DA)=""
                                    2)= K ^PSX(552.5,"AD",$E(X,1,30),DA(2),DA(1),DA)
                                    This cross reference lists the Date Prescription Filled, Facility IEN, Division IEN, then Date
                                    IEN.  It is used to purge the CMOP Cost Stats file for a specified date range.  
                                      
                                        
                                         
                                        
                                         
                                         



552.61,1          DRUG ID#               1;0 Multiple #552.611 (Add New Entry without Asking)

                  DESCRIPTION:
                                    This sub-file contains drug data for the prescriptions filled/refilled.  


552.611,.01         DRUG ID#               0;1 FREE TEXT (Multiply asked)

                    INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
                    LAST EDITED:      NOV 12, 1993 
                    HELP-PROMPT:      Enter the CMOP Drug ID#. 
                    DESCRIPTION:
                                      This field contains the CMOP Drug ID#.  

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


552.611,1           TOTAL ORIGINAL FILLS   0;2 NUMBER

                    INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<0)!(X?.E1"."1N.N) X
                    LAST EDITED:      NOV 12, 1993 
                    HELP-PROMPT:      Enter the total number of original prescriptions filled. 
                    DESCRIPTION:
                                      This field contains the total number of original prescriptions filled.  


552.611,2           TOTAL REFILLS          0;3 NUMBER

                    INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<0)!(X?.E1"."1N.N) X
                    LAST EDITED:      NOV 12, 1993 
                    HELP-PROMPT:      Enter the total number of prescriptions refilled. 
                    DESCRIPTION:
                                      This field contains the total number of prescriptions refilled.  


552.611,3           TOTAL COST             0;4 NUMBER

                    INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999999)!(X<0) X
                    LAST EDITED:      NOV 12, 1993 
                    HELP-PROMPT:      Enter the total cost of all prescriptions filled and refilled. 
                    DESCRIPTION:
                                      This field contains the total cost of prescriptions filled and refilled.  


552.611,4           TOTAL QUANTITY         0;5 NUMBER

                    INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<0)!(X?.E1"."1N.N) X
                    LAST EDITED:      NOV 19, 1993 
                    HELP-PROMPT:      Enter the total quantity dispensed. 
                    DESCRIPTION:      This field contains the total quantity dispensed for the drug. The quantity may be in
                                      tablets, bottles, etc.  









INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):