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

Package: Auto Replenishment Ward Stock

PADE DISPENSING DEVICE(#58.63)-->58.635

Sub-Field: 58.635


Information

Parent File Name Number Package
PADE DISPENSING DEVICE(#58.63) WARD GROUP 58.635 Auto Replenishment Ward Stock

Details

Field # Name Loc Type Details
.01 WARD GROUP 0;1 POINTER TO WARD GROUP FILE (#57.5) WARD GROUP(#57.5)

  • INPUT TRANSFORM:  S DIC("S")="I $$WGCHK2^PSJPADSI(Y,DA)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  DEC 08, 2015
  • HELP-PROMPT:  Enter a Ward Group supplied by this PADE device.
  • DESCRIPTION:  
    Ward Group associated with this PADE device.
  • SCREEN:  S DIC("S")="I $$WGCHK2^PSJPADSI(Y,DA)"
  • EXPLANATION:  Ward must be associated with Device's Division.
  • CROSS-REFERENCE:  58.635^B
    1)= S ^PS(58.63,DA(1),3,"B",$E(X,1,30),DA)=""
    2)= K ^PS(58.63,DA(1),3,"B",$E(X,1,30),DA)
  • FIELD INDEX:  WG (#1385) MUMPS IR LOOKUP & SORTING WHOLE FILE (#58.63)
    Short Descr: WARD GROUPS
    Description: This cross reference contains Ward Groups associated with PADE Dispensing cabinets. This cross reference will be used to enable and disable the display of PADE information in Inpatient Order Entry by enabling the display
    when the patient's ward location is linked to a PADE device, and disabling the display when the patient's ward location is not linked to a PADE device.
    Set Logic: S ^PS(58.63,"WG",X(1),$G(DA(1)))=""
    Kill Logic: K ^PS(58.63,"WG",X(1),$G(DA(1)))
    Whole Kill: K ^PS(58.63,"WG")
    X(1): WARD GROUP (58.635,.01) (Subscr 1) (forwards)
Info |  Details