Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^PSD(58.8

Package: Drug Accountability

Global: ^PSD(58.8


Information

FileMan FileNo FileMan Filename Package
58.8 DRUG ACCOUNTABILITY STATS Drug Accountability

Description

Directly Accessed By Routines, Total: 316

Package Total Routines
Controlled Substances 211 PSD79P    PSDACT    PSDACT1    PSDADJC    PSDADJD    PSDADJI    PSDADJN    PSDADJR
PSDBAL    PSDBAN    PSDCOR1    PSDCOR2    PSDCORP2    PSDCRP    PSDCSI    PSDDFP1
PSDDWK1    PSDDWK2    PSDDWK3    PSDDWK4    PSDDWKE    PSDEA41    PSDEN    PSDERP
PSDEST    PSDEVO1    PSDEVOR    PSDEXP    PSDFIL2    PSDFIL3    PSDGSH    PSDGSH1
PSDGSL    PSDGSPU    PSDHRPT    PSDIPOS1    PSDLBL    PSDLBLR1    PSDLSTK    PSDLSTK2
PSDMAPU    PSDNBT    PSDNDES    PSDNRGO    PSDNTT1    PSDNTTP1    PSDNTTPC    PSDOPT1
PSDOPT2    PSDOPTI    PSDOPTS    PSDOPTX    PSDORD    PSDORN    PSDORN0    PSDORN1
PSDORN2    PSDORN3    PSDORNC    PSDORNO    PSDORNV    PSDORP    PSDORP2    PSDORSN
PSDORST    PSDORSU    PSDORV    PSDPAT    PSDPAT1    PSDPAT2    PSDPDR1    PSDPDR2
PSDPGS    PSDPGS1    PSDPLOG1    PSDPMFG    PSDPND    PSDPSI    PSDPSTK    PSDPWK
PSDPWK1    PSDRDR    PSDREC1    PSDREC2    PSDREC3    PSDREC4    PSDREPD    PSDRF
PSDRF4    PSDRPGS    PSDRPGS1    PSDRPGS2    PSDRSI    PSDSITE    PSDSTK    PSDTRA1
PSDTRN    PSDTRN1    PSDTRV1    PSDTRVR1    PSDUP3    ^PSD(58.85    ^PSD(58.89    PSD68P
PSDADJ    PSDADJIN    PSDADJN1    PSDAMIS    PSDAMIS1    PSDAMIS2    PSDBALI    PSDBAN1
PSDCOR    PSDCORP    PSDCORP1    PSDCORP3    PSDCOSD    PSDCOSH    PSDCOSN    PSDCOST
PSDCOSV    PSDCPO    PSDDFP    PSDDWK    PSDEM    PSDEM1    PSDEM2    PSDEM4
PSDERCP    PSDESTP    PSDEVO    PSDEXGS    PSDEXGS1    PSDFND    PSDFT    PSDFT1
PSDGPR    PSDGSH11    PSDGSL1    PSDGSRV    PSDGSRV1    PSDGSRV2    PSDLBL0    PSDLBL1
PSDLBL4    PSDLBL5    PSDLBLB    PSDLBLP    PSDLBLR    PSDLBLR0    PSDLBLR2    PSDLSTK1
PSDMFG    PSDNACT    PSDNARC    PSDNCGS    PSDNMU    PSDNRGS    PSDNSCG    PSDNSCL
PSDNSTK    PSDNTF    PSDNTFPC    PSDNTR    PSDNTT    PSDNU    PSDNU1    PSDNU2
PSDOPT    PSDOPT0    PSDOPTN    PSDOR2    PSDOR21    PSDORD1    PSDORD2    PSDORD3
PSDORD4    PSDORNP    PSDORP1    PSDORV1    PSDPDR    PSDPDU    PSDPDU1    PSDPSTK1
PSDPUGS    PSDRDR1    PSDREC    PSDREPV    PSDREV    PSDREVC    PSDREVD    PSDRF1
PSDRFD    PSDRFM    PSDRFR    PSDRFS    PSDRFT    PSDRFW    PSDRFX    PSDRFZ
PSDRLOG1    PSDRPT    PSDRWK    PSDSET    PSDSP    PSDTRA    PSDTRV    PSDUP2
PSDUTL    PSDWADD    PSDWCHG    
Drug Accountability 90 ACTIVITY    DRUG    IV ROOM    MONTHLY ACTIVITY    ORDERS    OUTPATIENT SITE(S)    PRIMARY INVENTORY POINT(S)    PSABRKU2
PSADA    PSADAI    PSADJ    PSADJI    PSADJR    PSADRU    PSADRUG    PSADRUGP
PSAENT    PSAENTO    PSAENVIR    PSAFIX    PSAGIP    PSAGIP1    PSAHIS1    PSALEVEL
PSALEVRP    PSALOC    PSALOC2    PSALOCO    PSAMON    PSANAC    PSAOP    PSAOP1
PSAOP2    PSAOP3    PSAORDP1    PSAOUT    PSAPRE71    PSAPROC    PSAPROC1    PSAPROC2
PSAPROC6    PSAPROC8    PSAPROC9    PSAPSI    PSAPSI1    PSAPSI2    PSAPSI3    PSAPSI5
PSAPUR    PSARDCU1    PSARDCUT    PSAREC    PSAREC1    PSAREORD    PSAREPV    PSAREV
PSAREVC    PSAREVD    PSARIN    PSARWS    PSASIG    PSATRAN    PSATRAN1    PSAUDP
PSAUP4    PSAUTL    PSAUTL1    PSAUTL3    PSAUTL4    PSAUTL5    PSAUTL6    PSAVER
PSAVER1    PSAVER3    PSAVER4    PSAVER5    PSAVER6    PSAVER7    PSAVIN    ^PSD(58.81
PSAV3P53    PSAVERA    ^PSD(58.8    PSAVERA1    PSAVIN1    PSAVIN2    PSAVINC    PSAWARD
WARD    WARD (FOR DRUG)    
Inpatient Medications 6 PSGLOI    PSGPEN    PSGSICHK    PSJDCHK    PSJO    PSJORMAR    
Outpatient Pharmacy 2 PSODISP    PSOHLDI1    
Pharmacy Benefits Management 2 PSUMAPR    PSUPR2    
Pharmacy Data Management 1 PSSAUTL    

Accessed By FileMan Db Calls, Total: 64

Package Total Routines
Drug Accountability 32 PSADA    PSADJ    PSADJI    PSADJR    PSADRUG    PSAENT    PSAENTO    PSAGIP
PSALEVEL    PSALOC    PSALOC2    PSALOCO    PSAMON    PSANAC    PSAOP    PSAOP1
PSAPROC6    PSAPSI    PSAPSI4    PSAPUR    PSARDCUT    PSAREC    PSAREC1    PSAREVD
PSARIN    PSARWS    PSAUDP    PSAVER6    PSAVIN1    PSAVIN2    PSAVINC    PSAWARD
Controlled Substances 31 PSDADJ    PSDADJC    PSDADJD    PSDADJI    PSDADJIN    PSDADJN    PSDADJN1    PSDADJR
PSDDSOR2    PSDEN    PSDIPOS1    PSDOPT0    PSDOPTI    PSDOPTR    PSDOPTS    PSDORD1
PSDORD4    PSDORNO    PSDREC    PSDREC1    PSDREC2    PSDREC3    PSDREC4    PSDREPD
PSDREVD    PSDRF    PSDRF4    PSDRFR    PSDRFS    PSDRFW    PSDSET    
Pharmacy Benefits Management 1 PSUMAPR    

Pointed To By FileMan Files, Total: 10

Package Total FileMan Files
Controlled Substances 4 CS WORKSHEET(#58.85)[12]    CS DESTRUCTION(#58.86)[6]    CS CORRECTION LOG(#58.87)[512]    CS ERROR LOG(#58.89)[6]    
Drug Accountability 4 RETURN DRUG(#58.35)[.01]    DRUG ACCOUNTABILITY STATS(#58.8)[3#58.800118(2)]    DRUG ACCOUNTABILITY TRANSACTION(#58.81)[21766]
DRUG ACCOUNTABILITY ORDER(#58.811)[#58.8112(4)#58.8112(13)]    
Auto Replenishment Ward Stock 1 AOU INVENTORY GROUP(#58.2)[#58.29(.01)]    
Pharmacy Data Management 1 PHARMACY SYSTEM(#59.7)[#59.79002(.01)#59.79003(.01)]    

Pointer To FileMan Files, Total: 16

Package Total FileMan Files
Auto Replenishment Ward Stock 2 INPATIENT SITE(#59.4)[2]    AOU INVENTORY TYPE(#58.16)[#58.800116(.01)]    
Controlled Substances 2 CS ORDER STATUS(#58.82)[#58.800118(10)]    CS COMPLETION STATUS(#58.83)[#58.800118(11)]    
Drug Accountability 2 DRUG ACCOUNTABILITY STATS(#58.8)[3#58.800118(2)]    DRUG ACCOUNTABILITY TRANSACTION(#58.81)[#58.800118(17)#58.800119(.01)]    
IFCAP 2 PROCUREMENT & ACCOUNTING TRANSACTIONS(#442)[13]    GENERIC INVENTORY(#445)[11#58.8445(.01)]    
Kernel 2 DEVICE(#3.5)[24252629]    NEW PERSON(#200)[#58.800118(3)#58.800118(4)#58.800118(6)#58.800118(23)]    
Outpatient Pharmacy 2 OUTPATIENT SITE(#59)[20#58.836(.01)]    PRESCRIPTION(#52)[#58.800118(18)]    
Inpatient Medications 1 IV ROOM(#59.5)[#58.831(.01)]    
MailMan 1 MAIL GROUP(#3.8)[32]    
Pharmacy Data Management 1 DRUG(#50)[#58.8001(.01)]    
Registration 1 WARD LOCATION(#42)[#58.800115(.01)#58.842(.01)]    

Fields, Total: 37

Field # Name Loc Type Details
.01 PHARMACY LOCATION 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2)!'(X'?1P.E) X
  • LAST EDITED:  AUG 17, 2000
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
  • DESCRIPTION:  This field contains the name of the Pharmacy location.
    The Controlled Substances module will recognize this location as the Narcotic Area of Use (NAOU) throughout this package.
  • TECHNICAL DESCR:  
    Free text name of this Pharmacy location.  Not to exceed 30 characters.
  • DELETE TEST:  .01,0)= I 1 W !,?5,"DO NOT DELETE. Use the Inactivate NAOU option. "
  • CROSS-REFERENCE:  58.8^B
    1)= S ^PSD(58.8,"B",$E(X,1,30),DA)=""
    2)= K ^PSD(58.8,"B",$E(X,1,30),DA)
1 LOCATION TYPE 0;2 SET
************************REQUIRED FIELD************************
  • 'M' FOR MASTER VAULT;
  • 'S' FOR SATELLITE VAULT;
  • 'N' FOR NARCOTIC LOCATION;
  • 'P' FOR PRIMARY;

  • INPUT TRANSFORM:  K X W $C(7),!,?10," ** No Editing ** ",!
  • LAST EDITED:  OCT 21, 1993
  • HELP-PROMPT:  Enter the location type.
  • DESCRIPTION:  This field contains the location type for this pharmacy location. Location types are "M" for master vault, "S" for satellite vault, "N" for narcotic location, and "P" for primary.
    This field should NOT be edited directly using VA FileMan.  The Drug Accountability and Controlled Substances modules depend on the accuracy of this data.
    The Controlled Substances module supports "M", "S" and "N" location types.  For CS use, enter the master vault locations first.
  • TECHNICAL DESCR:  
    Set of codes.  Do NOT edit directly using VA FileMan.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  58.8^ADISP
    1)= S ^PSD(58.8,"ADISP",$E(X,1,30),DA)=""
    2)= K ^PSD(58.8,"ADISP",$E(X,1,30),DA)
  • CROSS-REFERENCE:  58.8^ASITE1^MUMPS
    1)= D SASITE1^PSDUTL
    2)= D KASITE1^PSDUTL
    3)= DO NOT DELETE
    This cross-reference is used in determining site for all Controlled Substances applications.  The cross-reference is ^PSD(58.8,"ASITE",INPATIENT SITE,LOC TYPE,DA)="".
2 INPATIENT SITE 0;3 POINTER TO INPATIENT SITE FILE (#59.4)
************************REQUIRED FIELD************************
INPATIENT SITE(#59.4)

  • INPUT TRANSFORM:  S:$D(PSDSITE) DIC("S")="I $P(^(0),""^"",31)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUN 09, 1992
  • HELP-PROMPT:  Enter inpatient site.
  • DESCRIPTION:  
    This field contains a pointer to the inpatient site.  This is a required data element within the Controlled Substances module.
  • TECHNICAL DESCR:  
    Screened pointer to File 59.4 - INPATIENT SITE file.  Required for CS use.
  • SCREEN:  S:$D(PSDSITE) DIC("S")="I $P(^(0),""^"",31)"
  • EXPLANATION:  Select only sites that are "Selectable for CS" in File 59.4.
  • CROSS-REFERENCE:  58.8^ASITE^MUMPS
    1)= D SASITE^PSDUTL
    2)= D KASITE^PSDUTL
    3)= DO NOT DELETE
    This cross-reference is used in distinguishing multi-divisional sites.  The Controlled Substances software uses this cross-reference in all ordering, dispensing, and reporting activity.  The cross-reference is
    ^PSD(58.8,"ASITE",INPATIENT SITE,LOC TYPE,DA)="".
3 PRIMARY DISPENSING SITE 0;4 POINTER TO DRUG ACCOUNTABILITY STATS FILE (#58.8) DRUG ACCOUNTABILITY STATS(#58.8)

  • INPUT TRANSFORM:  S:$D(PSDSITE) DIC("S")="I $P(^(0),""^"",3)=+PSDSITE,+Y'=DA,$S($P(^(0),""^"",2)=""M"":1,$P(^(0),""^"",2)=""S"":1,1:0)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  AUG 21, 1992
  • HELP-PROMPT:  Answer must be the name of an existing Master or Satellite vault.
  • DESCRIPTION:  
    This field contains a pointer to the primary dispensing site for this pharmacy location.  This data is utilized within the Controlled Substances module.
  • TECHNICAL DESCR:  
    Screened pointer to File 58.8 - DRUG ACCOUNTABILITY STATS file.  Selection limited to Master vault or Satellite vault.
  • SCREEN:  S:$D(PSDSITE) DIC("S")="I $P(^(0),""^"",3)=+PSDSITE,+Y'=DA,$S($P(^(0),""^"",2)=""M"":1,$P(^(0),""^"",2)=""S"":1,1:0)"
  • EXPLANATION:  Selection limited to Master or Satellite vault.
4 INACTIVE DATE I;1 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 06, 1992
  • HELP-PROMPT:  Enter the date when this pharmacy location became inactive.
  • DESCRIPTION:  
    The date on which this pharmacy location was inactivated.
  • TECHNICAL DESCR:  
    Inactive date for this pharmacy location.
5 ASK MFG/LOT #/EXP.DATE? 0;5 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JAN 06, 1992
  • HELP-PROMPT:  Enter "1" or "Y" if you wish to be prompted for mfg., lot #, and exp. date.
  • DESCRIPTION:  The answer for asking manufacturer, lot #, and expiration date on drugs tracked within this Pharmacy location . If this field is set to "1" or "YES", manufacturer, lot number, and expiration date will be asked when
    dispensing drugs within this Pharmacy location.
    For Controlled Substances use, this field should be answered for Master vaults and Satellite vaults.
  • TECHNICAL DESCR:  
    Set of codes - "1" for "YES" or "0" for "NO".
6 IS THIS PHARM WORKING STOCK? 0;7 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  MAY 05, 1992
  • HELP-PROMPT:  Enter "1" or "Y" if this is a Pharmacy NAOU for working stock.
  • DESCRIPTION:  
    Pharmacy location designated as a Narcotic Area of Use for pharmacy working stock. If this field is set to "1" or "YES" drug data will be utilized differently within the Controlled Substances module.
  • TECHNICAL DESCR:  
    Set of codes - "1" for "YES" or "0" for "NO".
10 DRUG 1;0 POINTER Multiple #58.8001 58.8001

  • DESCRIPTION:  Drug is defined by physical location, stock level, balance on-hand, reorder level, quantity to reorder, breakdown unit, package size, manufacturer, lot number, and expiration date. Other information available is inventory
    types, ward (for drug), and prime vendor item number (if applicable).
    In the Controlled Substances module, all CS order requests are stored in the ORDERS multiple within DRUG.
11 *PRIMARY INVENTORY POINT 0;6 POINTER TO GENERIC INVENTORY FILE (#445) GENERIC INVENTORY(#445)

  • INPUT TRANSFORM:  S DATABASE=1,DIC("S")="I $P(^(0),U,3)=""P""&($P(^(0),U,7)=822400)" D ^DIC K DIC S DIC=DIE,X=+Y D ^PSAUTL K DATABASE K:Y<0 X
  • LAST EDITED:  JUL 29, 1997
  • HELP-PROMPT:  For Controlled Substances enter the name of the pharmacy inventory point which contains ONLY the controlled substances stored in this pharmacy master vault.
  • DESCRIPTION:  
    To provide a direct link between a pharmacy inventory point and a pharmacy location entry in this file.  Receiving that occurs in the inventory point will update on hand quantities in the pharmacy location.
  • TECHNICAL DESCR:  
    To provide a direct link between the GENERIC INVENTORY file (#445) and the DRUG ACCOUNTABILITY STATS file (#58.8).
  • SCREEN:  S DIC("S")="I $P(^(0),U,3)=""P""&($P(^(0),U,7)=822400)"
  • EXPLANATION:  You can only select a Primary Inventory Point with a Cost Center of 822400.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  58.8^E
    1)= S ^PSD(58.8,"E",$E(X,1,30),DA)=""
    2)= K ^PSD(58.8,"E",$E(X,1,30),DA)
    To identify Pharmacy location linked to an Inventory Point.
11.5 *RECEIPT FAILURE NOTIFICATION? 0;11 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  MAR 19, 1993
  • HELP-PROMPT:  Enter "1" or "Y" to notify the RECEIPT FAILURE mail group of items that could not be received.
  • DESCRIPTION:  If a Drug Accountability location is linked to a Primary Inventory Point the items received into the Primary Inventory Point will also be updated in the Drug Accountability location. If items are received into the linked
    Primary Inventory that are not connected to the DRUG file (#50) or not stocked in the Drug Accountability location, and this field is set to "YES", the RECEIPT FAILURE mail group will be notified with a list of the items.
  • TECHNICAL DESCR:  
    Set of codes - "1" for "YES" or "0" for "NO".
12 PRIME VENDOR? 0;8 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JUL 29, 1997
  • HELP-PROMPT:  Enter "1" or "Y" for "YES". Enter "0" or "N" for "NO".
  • DESCRIPTION:  To more efficiently process prime vendor receipts, setting this flag to "YES" will allow you to store an obligation number. This number will then be offered as a default whenever using the Receive Directly into Drug
    Accountability [PSA RECEIVING] option on the Receipts Menu [PSA RECEIPTS MENU] menu.
  • TECHNICAL DESCR:  
    Directs the flow of receipt processing and checks for a 1358 obligation number stored in the CURRENT PRIME VENDOR PO# field (#13).
13 CURRENT PRIME VENDOR PO# 0;9 POINTER TO PROCUREMENT & ACCOUNTING TRANSACTIONS FILE (#442) PROCUREMENT & ACCOUNTING TRANSACTIONS(#442)

  • INPUT TRANSFORM:  S DIC("S")="I $P($G(^(0)),U,5)[822400" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUL 29, 1997
  • HELP-PROMPT:  Enter the 1358 obligation number for the current month.
  • DESCRIPTION:  
    This entry will be used as a default when receiving from the prime vendor.
  • TECHNICAL DESCR:  
    Default value for prime vendor receiving.
  • SCREEN:  S DIC("S")="I $P($G(^(0)),U,5)[822400"
  • EXPLANATION:  You can only select P.O.#s with a 822400 cost center.
14 AUTO GENERATE DISPENSING #'S? 2;1 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JUN 06, 1992
  • HELP-PROMPT:  Answer "YES" to automatically generate the pharmacy dispensing # for CS orders.
  • DESCRIPTION:  The pharmacy dispensing number (Green Sheet #) will be automatically generated when dispensing Controlled Substances orders if this field is set to "1" or "YES". If left blank, or if "0", or "NO" are entered the pharmacy
    employee processing the Controlled Substances order will have to enter the dispensing number (Green Sheet #).
15 LOW DISPENSING # 2;2 NUMBER

  • INPUT TRANSFORM:  K:'$D(PSDJLP) X W:'$D(X) " NO EDITING" Q:'$D(X) K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X D LOW^PSDSITE K:$D(PSDFLAG) X K PSD,PSDFLAG,PSDL
  • LAST EDITED:  NOV 23, 1992
  • HELP-PROMPT:  Enter the lowest CS dispensing # for this dispensing site (1 to 999999999).
  • DESCRIPTION:  
    The lowest CS pharmacy dispensing number for this dispensing site.  The system will not allow numbers smaller than the one you choose.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
16 HIGH DISPENSING # 2;3 NUMBER

  • INPUT TRANSFORM:  K:'$D(PSDJLP) X W:'$D(X) " NO EDITING" Q:'$D(X) K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X D HIGH^PSDSITE K:$D(PSDFLAG) X K PSD,PSDFLAG,PSDH,PSDL
  • LAST EDITED:  NOV 23, 1992
  • HELP-PROMPT:  Enter the largest CS dispensing number for this dispensing site (1-999999999).
  • DESCRIPTION:  The largest acceptable pharmacy dispensing number for this dispensing site. The difference between this number and the lowest pharmacy dispensing number should be substantial. The system will not allow numbers larger
    than the one you choose.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
17 LAST DISPENSING # 2;4 NUMBER

  • INPUT TRANSFORM:  K:'$D(PSDJLP) X W:'$D(X) " NO EDITING" Q:'$D(X) K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X D LAST^PSDSITE K:$D(PSDFLAG) X K PSDFLAG
  • LAST EDITED:  NOV 23, 1992
  • HELP-PROMPT:  Enter the last CS dispensing number used for this dispensing site (1 to 999999999).
  • DESCRIPTION:  The last CS pharmacy dispensing number used. This number will start at the lowest pharmacy dispensing number, increment it by one until it finds a number that has not been used, and then use that number for the next
    Controlled Substances order.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
18 USING PERPETUAL INVENTORY? 2;5 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  SEP 22, 1997
  • HELP-PROMPT:  Answer "YES" if this site is using the perpetual inventory method.
  • DESCRIPTION:  This flag is used to determine if this NAOU is using the Controlled Substances perpetual inventory functionality.
    If this field is set to "YES" or "1" the standard Controlled Substance Administration Record VA FORM 10-2638 (Green Sheet) WILL NOT be printed and will be replaced by the perpetual inventory method of tracking CS drugs.
    For an NAOU that is using a perpetual inventory, the MAXIMUM QUANTITY PER ORDER field (#8.5) for a drug in the dispensing site will limit the maximum quantity that Nursing Service may enter for any single order for that
    drug.  If the MAXIMUM QUANTITY PER ORDER is left blank, deleted, or set to zero, Nursing Service will be able to enter any quantity that is a multiple of package size, up to 999999, for any single order of that drug.
19 PRINT GREEN SHEET 2;6 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JUN 06, 1992
  • HELP-PROMPT:  Enter "YES" to print the Green Sheet after process only, "NO" to print after RPh verification.
  • DESCRIPTION:  This is a flag used to determine the sequence in which a Controlled Substance Administration Record VA FORM 10-2638 (Green Sheet) will be printed. If set to "YES" or "1" the "Green Sheet" will print after the order has
    been processed and prior to a RPh verification.  If set to "NO" or "0" the "Green Sheet" will print after a RPh has verified the filled order.
19.5 GREEN SHEET STOCK 2.5;1 SET
  • '1' FOR GPO 1992 PRINTING;
  • '0' FOR OTHER GPO PRINTING;

  • LAST EDITED:  MAY 26, 1993
  • HELP-PROMPT:  Enter 1 for GPO 1992 printed stock.
  • DESCRIPTION:  The VA FORM 10-2638 (Green Sheet) stock was printed on 8 x 10 1/2 paper. In 1992, the paper size changed to 8 1/2 x 11. This field is used as a site parameter when printing the Green Sheet forms. Additional spacing is
    required for the GPO 1992 printed stock.
20 OUTPATIENT SITE 0;10 POINTER TO OUTPATIENT SITE FILE (#59) OUTPATIENT SITE(#59)

  • INPUT TRANSFORM:  I $D(X) S Z=$O(^PSD(58.8,"AOP",+X,0)) S:Z=DA Z=$O(^(DA)) W:$G(Z) $C(7),!,$P($G(^PSD(58.8,+$O(^PSD(58.8,"AOP",+X,0)),0)),U)," is already linked to ",$P($G(^PS(59,+X,0)),U) K:$G(Z) X,Z
  • LAST EDITED:  JUL 29, 1997
  • HELP-PROMPT:  Enter the Outpatient Site from which to gather prescription dispensing data.
  • DESCRIPTION:  
    When prescriptions are filled the corresponding drug for this Outpatient Site will be updated for monthly total dispensed.
  • TECHNICAL DESCR:  
    To be used for automated updating of total dispensed when Rx is filled.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  58.8^AOP
    1)= S ^PSD(58.8,"AOP",$E(X,1,30),DA)=""
    2)= K ^PSD(58.8,"AOP",$E(X,1,30),DA)
    To be used for automated updating of total dispensed when Rx is filled.
21 WARD 3;0 POINTER Multiple #58.842 58.842

  • DESCRIPTION:  
    When Unit Dose and IV dispensing data is compiled, it will affect the Drug Accountability Location to which a ward is linked.
  • TECHNICAL DESCR:  
    For UD/IV dispensing to be subtracted from the appropriate DA location.
22 PRIMARY INVENTORY POINT(S) 4;0 POINTER Multiple #58.8445 58.8445

  • DESCRIPTION:  
    To provide a direct link between a pharmacy inventory point and a pharmacy location entry in this file.  Receiving that occurs in the inventory point will update on hand quantities in the pharmacy location.
  • TECHNICAL DESCR:  
    To provide a direct link between the GENERIC INVENTORY file (#445) and the DRUG ACCOUNTABILITY STATS file (#58.8).
  • SCREEN:  S DIC("S")="I $P(^(0),U,20)=""D"""
  • EXPLANATION:  Must be Special Inventory Point Type "D" for Drug Accountability.
23 DISPENSING WORKSHEET SORT 2;7 SET
  • 'D' FOR DRUG/NAOU;
  • 'N' FOR NAOU/DRUG;
  • 'S' FOR SELECT AT PRINTING;

  • LAST EDITED:  APR 26, 1993
  • HELP-PROMPT:  Enter the sort order to be used in creating the dispensing worksheet.
  • DESCRIPTION:  
    This field determines the sort order when printing the Controlled Substances "Pharmacy Dispensing Worksheet".  The sort order may be defined by drug then NAOU, by NAOU then drug, or selected when printing the worksheet.
  • TECHNICAL DESCR:  
    Set of codes used in determining the sort order when printing the "Pharmacy Dispensing Worksheet".
24 DEFAULT GREEN SHEET PRINTER 2;8 POINTER TO DEVICE FILE (#3.5) DEVICE(#3.5)

  • LAST EDITED:  APR 26, 1993
  • HELP-PROMPT:  Enter the name of the device selected to print Green Sheets.
  • DESCRIPTION:  
    A pointer to the name of the device selected as the default printer for Green Sheets.
  • TECHNICAL DESCR:  
    Pointer to File 3.5 - the DEVICE file.
25 DEFAULT REPORT PRINTER 2;9 POINTER TO DEVICE FILE (#3.5) DEVICE(#3.5)

  • LAST EDITED:  APR 26, 1993
  • HELP-PROMPT:  Enter the name of the device selected to print CS reports.
  • DESCRIPTION:  
    A pointer to the name of the device selected as the default printer for various Controlled Substances reports.
  • TECHNICAL DESCR:  
    Pointer to File 3.5 - the DEVICE file.
26 DEFAULT LABEL PRINTER 2;10 POINTER TO DEVICE FILE (#3.5) DEVICE(#3.5)

  • LAST EDITED:  APR 26, 1993
  • HELP-PROMPT:  Enter the name of the device selected to print CS labels.
  • DESCRIPTION:  
    A pointer to the name of the device selected as the default printer for Controlled Substances labels.
  • TECHNICAL DESCR:  
    Pointer to File 3.5 - the DEVICE file.
27 LAST UD UPDATE 0;12 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUL 29, 1997
  • HELP-PROMPT:  The last date that dispensing from the UNIT DOSE PICK LIST STATS file (#57.6) was collected to update this location.
  • DESCRIPTION:  
    When the UD dispensing data is collected from the UNIT DOSE PICK LIST STATS file (#57.6) a date is stored here.  Each time unit dose dispensing data is collected, it begins FROM this date.
  • TECHNICAL DESCR:  
    Used and stored by the PSAUDP routine for the collection of dispensing data from the UNIT DOSE PICK LIST STATS file (#57.6).
28 ORDER ENTRY BANNER 5;0 WORD-PROCESSING #58.828

  • DESCRIPTION:  
    A banner to be displayed for Nursing Order Entry, Pharmacy Order Entry from Nursing, and Infusion Order Entry.  This banner may be edited via the option, Create/Edit the Narcotic Area of Use.
  • TECHNICAL DESCR:  
    A banner to be displayed for Order Entry.
29 EMERGENCY ORDER PRINTER 2;11 POINTER TO DEVICE FILE (#3.5) DEVICE(#3.5)

  • LAST EDITED:  JAN 30, 1995
  • HELP-PROMPT:  Select a device for this dispensing vault which can receive notice of emergency orders submitted by nursing personnel.
  • DESCRIPTION:  This device will be used to print a notice of emergency orders submitted by nursing personnel. The printer designated to receive these messages SHOULD NOT be the printer which prints green sheets or controlled substances
    labels.
  • TECHNICAL DESCR:  
    This field is a pointer to the DEVICE file (#3.5).
30 ALLOW ONE-TIME REQUESTS? 0;13 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JUL 31, 1995
  • HELP-PROMPT:  Enter "1" or "Y" to allow NAOUs to place one-time requests.
  • DESCRIPTION:  If the primary dispensing site for an NAOU allows one-time requests, any active drug in that dispensing site may be ordered, even though it may be inactive or not stocked by that NAOU. Certain drugs within a
    dispensing site may be marked as not selectable and are unavailable for even one-time requests.
  • TECHNICAL DESCR:  
    Checked by order entry routines (PSDOR*) before allowing one-time requests.
31 IV ROOM 3.5;0 POINTER Multiple #58.831 58.831

  • DESCRIPTION:  The IV Room multiple contains the Outpatient Clinic's IV rooms to which the Outpatient Pharmacy dispenses IVs. When IV dispensing data is compiled, it will affect the Drug Accountability outpatient pharmacy location to
    which the IV Room is linked.
  • TECHNICAL DESCR:  
    This field points to the IV ROOM FILE (#59.5).
32 ADJUSTMENT MAIL GROUP 6;1 POINTER TO MAIL GROUP FILE (#3.8) MAIL GROUP(#3.8)

  • LAST EDITED:  OCT 07, 1996
  • HELP-PROMPT:  Enter the mail group that should receive messages when adjustments occur.
  • DESCRIPTION:  
    The persons in this mail group will receive messages whenever an adjustment or count correction occurs for this Narcotic Area of Use (NAOU).
33 TIME LIMIT FOR DELAYED DOSES 6;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>12)!(X<0)!(X?.E1"."3N.N) X
  • LAST EDITED:  OCT 07, 1996
  • HELP-PROMPT:  Type a Number between 0 and 12, 2 Decimal Digits
  • DESCRIPTION:  This is the time limit for Nursing to record a delayed wastage or return to stock for a dose that was not administered to a patient. If a "1" is entered, Nurses will have one hour to record the disposition of a dose for
    this Narcotic Area of Use.
34 MAINTAIN REORDER LEVELS? 0;14 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JAN 31, 1997
  • HELP-PROMPT:  Enter YES if the reorder level is to entered for each drug in the pharmacy location or master vault.
  • DESCRIPTION:  
    The MAINTAIN REORDER LEVELS? field denotes if the drugs in the pharmacy location or master vault are to maintain their reorder levels.
35 DAYS TO KEEP INVOICE DATA 0;15 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<120)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 19, 1997
  • HELP-PROMPT:  Enter the number of days to keep the invoices in the DA ORDERS file. Enter 120 to 9999 days.
  • DESCRIPTION:  The DAYS TO KEEP INVOICE DATA field contains the number of days invoices are to remain in the DRUG ACCOUNTABILITY ORDERS (#58.811) file. A nightly job checks this field to determine if the invoice data should be deleted.
    Invoice data must remain in the file at least 120 days.
36 OUTPATIENT SITE(S) 7;0 POINTER Multiple #58.836 58.836
37 BALANCE DISCREPANCY CHECK 8;1 SET
  • '1' FOR ON;
  • '0' FOR OFF;

  • LAST EDITED:  AUG 31, 2018
  • HELP-PROMPT:  Enter '1' to turn the balance discrepancy checking software ON, or '0' to turn it OFF.
  • DESCRIPTION:  Enables Control Substance Dispensing sites to turn off the manual balance discrepancy inventory software. ON will include the dispensing site in the manual count when dispensing controlled substances. OFF is used for
    automated dispensing when manual counting is not desired. A null entry in this field is the same as OFF.
  • TECHNICAL DESCR:  This field is designed to allow VA locations to decide which control substance dispensing sites will be included in the Balance Discrepancy software checks to help avoid diversion. Some automated dispensing systems may not
    require individual prescription level inventory. Since each location can have different dispensing site names, each will need to be turned on individually if Balance Discrepancy Checks are required.
  • CROSS-REFERENCE:  58.8^BC
    1)= S ^PSD(58.8,"BC",$E(X,1,30),DA)=""
    2)= K ^PSD(58.8,"BC",$E(X,1,30),DA)
    3)= Used for Balance Discrepancy Check On Off Switch.
    This cross reference is used to look up balance discrepancy check on/off selections. Automated Master Dispensing may need this turned off to function correctly.

Found Entries, Total: 1

PHARMACY LOCATION: VAULT    

ICR, Total: 5

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #223
  • OUTPATIENT PHARMACY
  • ICR #1036
  • OUTPATIENT PHARMACY
  • OUTPATIENT SITE (20).
    Access: Direct Global Read & w/Fileman

    DRUG (10).
    Access: Direct Global Read & w/Fileman

    ICR #2283
  • INPATIENT MEDICATIONS
  • WARD (FOR DRUG) (D Cross ref).
    Access: Direct Global Read & w/Fileman

    ICR #2519
  • PHARMACY BENEFITS MANAGEMENT
  • Pharmacy Location (.01).
    Access: Read w/Fileman

    Location type (1).
    Access: Read w/Fileman

    Inpatient site (2).
    Access: Read w/Fileman

    Primary dispensing site (3).
    Access: Read w/Fileman

    Outpatient site (20).
    Access: Read w/Fileman

    INACTIVE DATE (4).
    Access: Read w/Fileman

    Drug (.01).
    Access: Read w/Fileman

    Breakdown Unit (7).
    Access: Read w/Fileman

    Package Size (8).
    Access: Read w/Fileman

    IV Room (.01).
    Access: Read w/Fileman

    Ward (.01).
    Access: Read w/Fileman

    "B" x-ref, direct global read access permitted.
    ICR #2711
  • CONTROLLED SUBSTANCES
  • External References

    Name Field # of Occurrence
    ^%DT 4+1, 27+1
    EN^DDIOL IDWRITE+1
    ^DIC 2+1, 3+1, 11+1, 13+1
    ^PSAUTL 11+1
    HIGH^PSDSITE 16+1
    LAST^PSDSITE 17+1
    LOW^PSDSITE 15+1
    KASITE^PSDUTL 2(XREF 1K)
    KASITE1^PSDUTL 1(XREF 2K)
    SASITE^PSDUTL 2(XREF 1S)
    SASITE1^PSDUTL 1(XREF 2S)

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^PS(59 - [#59] 20+1
    ^PSD(58.8 - [#58.8] .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 11(XREF 1S), 11(XREF 1K), 20+1, 20(XREF 1S), 20(XREF 1K), 37(XREF 1S)
    37(XREF 1K)

    Naked Globals

    Name Field # of Occurrence
    ^( 20+1
    ^("I" IDWRITE+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT 4+1*, 27+1*
    >> DA .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 11(XREF 1S), 11(XREF 1K), 20+1, 20(XREF 1S), 20(XREF 1K), 37(XREF 1S)
    37(XREF 1K)
    DATABASE 11+1*!
    DIC 2+1!*, 3+1!*, 11+1!*, 13+1!*
    DIC("S" 2+1*, 2SCR+1*, 3+1*, 3SCR+1*, 11+1*, 11SCR+1*, 13+1*, 13SCR+1*
    >> DIE 2+1, 3+1, 11+1, 13+1
    DT IDWRITE+1
    PSD 15+1!, 16+1!
    PSDFLAG 15+1!, 16+1!, 17+1!
    PSDH 16+1!
    >> PSDJLP 15+1, 16+1, 17+1
    PSDL 15+1!, 16+1!
    >> PSDSITE 2+1, 2SCR+1, 3+1, 3SCR+1
    U 20+1
    X .01+1!, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 2+1*!, 3+1*!, 4+1*!, 11+1*!, 11(XREF 1S)
    11(XREF 1K), 13+1*!, 15+1!, 16+1!, 17+1!, 20+1!, 20(XREF 1S), 20(XREF 1K), 27+1*!, 33+1!
    , 35+1!, 37(XREF 1S), 37(XREF 1K)
    >> Y 2+1, 3+1, 4+1, 11+1, 13+1, 27+1
    Z 20+1*!
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All