Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details |  All
Print Page as PDF
Sub-Field: 58.29

Package: Auto Replenishment Ward Stock

AOU INVENTORY GROUP(#58.2)-->58.29

Sub-Field: 58.29


Information

Parent File Name Number Package
AOU INVENTORY GROUP(#58.2) NARCOTIC AREA OF USE (NAOU) 58.29 Auto Replenishment Ward Stock

Details

Field # Name Loc Type Details
.01 NARCOTIC AREA OF USE (NAOU) 0;1 POINTER TO DRUG ACCOUNTABILITY STATS FILE (#58.8)
************************REQUIRED FIELD************************
DRUG ACCOUNTABILITY STATS(#58.8)

  • INPUT TRANSFORM:  S:$D(PSDSITE) DIC("S")="I $P(^(0),""^"",2)'=""P"",$P(^(0),""^"",3)=+PSDSITE" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X S:$D(X) DINUM=X
  • LAST EDITED:  SEP 10, 1992
  • HELP-PROMPT:  Enter the NAOU for this inventory group.
  • DESCRIPTION:  
    This contains the name of the NAOU that is to be inventoried when selecting this inventory group.  This points to File 58.8 - DRUG ACCOUNTABILITY STATS file.
  • TECHNICAL DESCR:  
    Screened pointer to File 58.8 - DRUG ACCOUNTABILITY STATS file.  Screens out entries with type defined as "P" for Primary.
  • SCREEN:  S DIC("S")="I $P(^(0),""^"",2)'=""P"",$P(^(0),""^"",3)=+PSDSITE"
  • EXPLANATION:  Select only Controlled Substances locations.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  58.29^B
    1)= S ^PSI(58.2,DA(1),3,"B",$E(X,1,30),DA)=""
    2)= K ^PSI(58.2,DA(1),3,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  58.2^CS^MUMPS
    1)= S ^PSI(58.2,"CS",DA(1),$E(X,1,30))=""
    2)= K ^PSI(58.2,"CS",DA(1),$E(X,1,30))
    3)= DO NOT DELETE
    This cross-reference is used to distinguish between inventory groups that belong to the AR/WS module and those belonging to the CS module.  This cross-reference will identify CS inventory groups and will be used for
    lookup and sorting.
1 INVENTORY TYPE 1;0 POINTER Multiple #58.291 58.291

  • DESCRIPTION:  
    Inventory types are used to group related drugs in a Narcotic Area of Use.
2 SORT KEY 0;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."5N.N) X
  • LAST EDITED:  FEB 13, 1992
  • HELP-PROMPT:  Type a Number between 0 and 9999999999, 4 Decimal Digits
  • DESCRIPTION:  
    The sort key is used to define the sort order of NAOUs within an inventory group.
  • CROSS-REFERENCE:  58.29^D
    1)= S ^PSI(58.2,DA(1),3,"D",$E(X,1,30),DA)=""
    2)= K ^PSI(58.2,DA(1),3,"D",$E(X,1,30),DA)
Info |  Details |  All