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: 405.11

Package: Registration

FACILITY MOVEMENT TYPE(#405.1)-->405.11

Sub-Field: 405.11


Information

Parent File Name Number Package
FACILITY MOVEMENT TYPE(#405.1) CAN ONLY FOLLOW MOVEMENT(S) 405.11 Registration

Details

Field # Name Loc Type Details
.01 CAN ONLY FOLLOW MOVEMENT(S) 0;1 POINTER TO FACILITY MOVEMENT TYPE FILE (#405.1) FACILITY MOVEMENT TYPE(#405.1)

  • INPUT TRANSFORM:  S DIC("S")="S DGY=+$P(^(0),""^"",3),DGX=$P(^DG(405.1,+DA,0),""^"",3) I DGX,$D(^DG(405.2,DGX,""F"",DGY,0))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X I $D(X) S DINUM=X
  • LAST EDITED:  APR 29, 1991
  • HELP-PROMPT:  Enter the movement which this one can follow.
  • DESCRIPTION:  Enter a movement type which this movement type can follow. Admissions can not follow any movement types. Nothing can follow a discharge. Likewise, check-in lodgers can not follow any movement types and nothing can
    follow a check-out lodger movement.
  • SCREEN:  S DIC("S")="S DGY=+$P(^(0),""^"",3),DGX=$P(^DG(405.1,+DA,0),""^"",3) I DGX,$D(^DG(405.2,DGX,""F"",DGY,0))"
  • EXPLANATION:  Can't follow discharge or check-out. Check-in and admission follow nothing. Must be consistent with distributed movement types.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  405.11^B
    1)= S ^DG(405.1,DA(1),"F","B",$E(X,1,30),DA)=""
    2)= K ^DG(405.1,DA(1),"F","B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  405.1^AF^MUMPS
    1)= S ^DG(405.1,"AF",+X,DA(1))=""
    2)= K ^DG(405.1,"AF",+X,DA(1))
Info |  Details