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

Package: Lab Service

BLOOD DONOR(#65.5)-->65.54-->65.599-->65.5991

Sub-Field: 65.5991


Information

Parent File Name Number Package
65.599 COMPLETE DATE/TIME 65.5991 Lab Service

Details

Field # Name Loc Type Details
.01 COMPLETE DATE/TIME 0;1 DATE

  • INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X S:$D(X) DINUM=X
  • LAST EDITED:  MAR 03, 1993
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  65.5^AA^MUMPS
    1)= S A=$P(^LRE(DA(3),5,DA(2),99,DA(1),1,DA,0),U,3) S:'A ^LRE("AA",DA(3),DA(2),DA(1),DA)=$P(^LRE(DA(3),5,DA(2),0),U,4)
    2)= K ^LRE("AA",DA(3),DA(2),DA(1),DA)
    Used for workload recording.  If x-ref exists workload needs to be counted.
.02 TECH 0;2 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JAN 28, 1991
1 WKLD CODE 1;0 POINTER Multiple #65.59911 65.59911
Info |  Details |  All