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

Package: Auto Replenishment Ward Stock

PHARMACY AOU INVENTORY(#58.19)-->58.24

Sub-Field: 58.24


Information

Parent File Name Number Package
PHARMACY AOU INVENTORY(#58.19) AREA OF USE 58.24 Auto Replenishment Ward Stock

Details

Field # Name Loc Type Details
.01 AREA OF USE (AOU) 0;1 POINTER TO PHARMACY AOU STOCK FILE (#58.1)
************************REQUIRED FIELD************************
PHARMACY AOU STOCK(#58.1)

  • INPUT TRANSFORM:  S:$D(X) DINUM=X
  • LAST EDITED:  FEB 13, 1990
  • DESCRIPTION:  
    This contains the name of the Area of Use as defined in File 58.1 - Pharmacy AOU Stock File.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  58.24^B
    1)= S ^PSI(58.19,DA(1),1,"B",$E(X,1,30),DA)=""
    2)= K ^PSI(58.19,DA(1),1,"B",$E(X,1,30),DA)
1 INVENTORY TYPE 1;0 POINTER Multiple #58.25 58.25
2 SORT KEY 0;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 31, 1989
  • HELP-PROMPT:  Type a Number between 0 and 999999999, 0 Decimal Digits
  • DESCRIPTION:  
    The sort key is used to place the AOUs within an Inventory Group in the order in which they are inventoried. This sort order is reflected in the inventory sheet.
  • CROSS-REFERENCE:  58.24^C
    1)= S ^PSI(58.19,DA(1),1,"C",$E(X,1,30),DA)=""
    2)= K ^PSI(58.19,DA(1),1,"C",$E(X,1,30),DA)
Info |  Details