STANDARD DATA DICTIONARY #58.89 -- CS ERROR LOG FILE                                                              3/24/25    PAGE 1
STORED IN ^PSD(58.89,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                       (VERSION 3.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains the errors generated using the barcode TRAKKER options in Controlled Substances.  
 
Entries in this file should NOT be edited directly using VA FileMan.  
 
This file may expand to include other types of errors tracked within the Controlled Substances module with future releases.  


              DD ACCESS: @
              RD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @
IDENTIFIED BY: CS LOCATION (#6)

CROSS
REFERENCED BY: TRANSACTION NUMBER(AC), DATE/TIME(AD), CS LOCATION(AD1), DATE/TIME CORRECTED(AE), CS LOCATION(AE1), 
               LOG NUMBER(B)



58.89,.01     LOG NUMBER             0;1 NUMBER (Required)

              INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X S:$D(X) DINUM=X
              LAST EDITED:      NOV 07, 1993 
              HELP-PROMPT:      Type a Number between 0 and 999999999, 0 Decimal Digits 
              DESCRIPTION:
                                This field contains the internal entry number for this Controlled Substances error.  

              TECHNICAL DESCR:
                                DINUMed.  

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

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


58.89,1       TRANSACTION NUMBER     0;2 POINTER TO DRUG ACCOUNTABILITY TRANSACTION FILE (#58.81)

              LAST EDITED:      OCT 18, 1993 
              HELP-PROMPT:      Enter the transaction number generating this error. 
              DESCRIPTION:
                                This field contains a pointer to the Controlled Substances transaction generating this error.  

              CROSS-REFERENCE:  58.89^AC 
                                1)= S ^PSD(58.89,"AC",$E(X,1,30),DA)=""
                                2)= K ^PSD(58.89,"AC",$E(X,1,30),DA)
                                3)= DO NOT DELETE


58.89,2       DATE/TIME              0;3 DATE

              INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      NOV 07, 1993 
              HELP-PROMPT:      Enter the date/time the error occurred. 
              DESCRIPTION:
                                This field contains the date/time the Controlled Substances error occurred.  

              CROSS-REFERENCE:  58.89^AD^MUMPS 
                                1)= D SAD^PSDUTL4
                                2)= D KAD^PSDUTL4
                                3)= DO NOT DELETE
                                This cross-reference is used in compiling various CS error log reports.  
                                 
                                The cross-reference is defined by: ^PSD(58.89,"AD",DATE/TIME,NAOU,DA)="" 



58.89,3       CORRECTED BY           0;4 POINTER TO NEW PERSON FILE (#200)

              INPUT TRANSFORM:  S DIC("S")="I $D(^XUSEC(""PSD ERROR"",+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
              LAST EDITED:      OCT 17, 1993 
              HELP-PROMPT:      Enter the name of the supervisor correcting this error. 
              DESCRIPTION:      This field contains a pointer to the name of the pharmacy or nursing supervisor correcting this
                                error.  

              SCREEN:           S DIC("S")="I $D(^XUSEC(""PSD ERROR"",+Y))"
              EXPLANATION:      Access granted to pharmacy and nursing supervisors holding the appropriate key.

58.89,4       DATE/TIME CORRECTED    0;5 DATE

              INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      NOV 07, 1993 
              HELP-PROMPT:      Enter the date/time this error was corrected. 
              DESCRIPTION:
                                The date/time this Controlled Substances error was corrected.  

              CROSS-REFERENCE:  58.89^AE^MUMPS 
                                1)= D SAE^PSDUTL4
                                2)= D KAE^PSDUTL4
                                3)= DO NOT DELETE
                                This cross-reference is used in compiling the CS resolved error log report.  
                                 
                                The cross-reference is defined by: 
                                 ^PSD(58.89,"AE",DATE/TIME CORRECTED,CS LOCATION,DA)="" 



58.89,5       RESOLUTION             1;0   WORD-PROCESSING #58.895

              DESCRIPTION:
                                The final resolution for this Controlled Substances error.  


                LAST EDITED:      OCT 17, 1993 
                HELP-PROMPT:      Enter the resolution for this Controlled Substances error. 
                DESCRIPTION:
                                  The final resolution for this Controlled Substances error.  




58.89,6       CS LOCATION            0;6 POINTER TO DRUG ACCOUNTABILITY STATS FILE (#58.8)

              INPUT TRANSFORM:  S DIC("S")="I $P(^(0),""^"",2)'=""P""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
              LAST EDITED:      NOV 07, 1993 
              HELP-PROMPT:      Enter the NAOU or dispensing site generating this error log entry. 
              DESCRIPTION:      This field contains a pointer to the Controlled Substances location, dispensing vault or NAOU,
                                where this error occurred.  

              SCREEN:           S DIC("S")="I $P(^(0),""^"",2)'=""P"""
              EXPLANATION:      Allows selection of CS locations.
              CROSS-REFERENCE:  58.89^AD1^MUMPS 
                                1)= D SAD1^PSDUTL4
                                2)= D KAD1^PSDUTL4
                                3)= DO NOT DELETE
                                This cross-reference is used in compiling various CS error log reports.  
                                 
                                This cross-reference is defined by: ^PSD(58.89,"AD",DATE/TIME,NAOU,DA)="" 


              CROSS-REFERENCE:  58.89^AE1^MUMPS 
                                1)= D SAE1^PSDUTL4
                                2)= D KAE1^PSDUTL4
                                3)= DO NOT DELETE
                                This cross-reference is used in compiling the CS resolved error log report.  
                                 
                                This cross-reference is defined by: 
                                 ^PSD(58.89,"AE",DATE/TIME CORRECTED,CS LOCATION,DA)="" 




      FILES POINTED TO                      FIELDS

DRUG ACCOUNTABILITY STATS 
                   (#58.8)        CS LOCATION (#6)

DRUG ACCOUNTABILITY TRANSACTIO 
                   (#58.81)       TRANSACTION NUMBER (#1)

NEW PERSON (#200)                 CORRECTED BY (#3)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):