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.26

Package: Auto Replenishment Ward Stock

PHARMACY AOU STOCK(#58.1)-->58.11-->58.26

Sub-Field: 58.26


Information

Parent File Name Number Package
58.11 WARD (FOR ITEM) 58.26 Auto Replenishment Ward Stock

Details

Field # Name Loc Type Details
.01 WARD (FOR ITEM) 0;1 POINTER TO WARD LOCATION FILE (#42) WARD LOCATION(#42)

  • INPUT TRANSFORM:  S:$D(X) DINUM=X
  • LAST EDITED:  FEB 13, 1990
  • HELP-PROMPT:  Enter the ward which uses this item.
  • DESCRIPTION:  This contains the pointer to File 42 - Ward Location File. Names of the ward or wards using this item will be entered. This is the link between the AR/WS package and the Unit Dose package for determining ward stocked
    items.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  58.1^D^MUMPS
    1)= I $D(^PSI(58.1,DA(2),1,DA(1),0)),^(0) D INACT^PSGWUTL I $D(PSGWFLG) S ^PSI(58.1,"D",+^(0),DA,DA(2))="" K PSGWFLG
    2)= I $D(^PSI(58.1,DA(2),1,DA(1),0)),^(0) K ^PSI(58.1,"D",+^(0),DA,DA(2))
    This cross-reference is used by the UNIT DOSE package to identify items on the UD pick list that are Ward Stock items. It is also used by the option "Ward (For Item) Conversion".
Info |  Details |  All