Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^LRE

Package: Lab Service

Global: ^LRE


Information

FileMan FileNo FileMan Filename Package
65.5 BLOOD DONOR Lab Service

Description

Directly Accessed By Routines, Total: 86

Package Total Routines
Lab Service 68 BLOOD COMPONENT    COMPLETE DATE/TIME    DONATION OR DEFERRAL DATE    GROUP AFFILIATION    LRBL COLLECTION DISP RPT    LRBL DEFERRAL REPORT    LRBL DONOR TESTING REPORT    LRBL GROUP AFFILIATION REPORT
LRBL GROUP DONATION REPORT    LRBL MOBILE REPORT    LRBL PRODUCT REJECTION REPORT    LRBLA    LRBLA1    LRBLD    LRBLDA    LRBLDA1
LRBLDAA    LRBLDABRH    LRBLDAG    LRBLDAL    LRBLDC    LRBLDC1    LRBLDCP    LRBLDCPN
LRBLDEMO    LRBLDL    LRBLDLG    LRBLDPA    LRBLDPAW    LRBLDPK    LRBLDPL    LRBLDPT
LRBLDR1    LRBLDTA    LRBLJA    LRBLSSN    LRBLU    LRSETUP    ^LRE    LRBLDCR
LRBLDCU    LRBLDED    LRBLDEDIT    LRBLDEF    LRBLDEX    LRBLDEX1    LRBLDEX2    LRBLDK
LRBLDL1    LRBLDMV    LRBLDON    LRBLDPA1    LRBLDPA2    LRBLDPH    LRBLDR    LRBLDRR
LRBLDRR1    LRBLDRR2    LRBLDRR3    LRBLDSC    LRBLDT    LRBLDUC    LRBLDW    LRBLDX
LRBLWD    LRBLWDS    LRCAPBB    LRUT    

Accessed By FileMan Db Calls, Total: 16

Package Total Routines
Lab Service 16 LRBLD    LRBLDA    LRBLDC    LRBLDCU    LRBLDED    LRBLDLG    LRBLDMV    LRBLDP
LRBLDPA    LRBLDPH    LRBLDR    LRBLDRR    LRBLDRR2    LRBLDT    LRBLDUC    LRBLDX

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Lab Service 1 WKLD DATA(#64.1)[#64.1111(9)]    

Pointer To FileMan Files, Total: 8

Package Total FileMan Files
Lab Service 6 LABORATORY TEST(#60)[#65.599(.01)]    FUNCTION FIELD(#61.3)[#65.56(.01)#65.57(.01)#65.58(.01)#65.59(.01)]    BLOOD BANK UTILITY(#65.4)[#65.51(.01)#65.54(.02)#65.54(.03)#65.54(3)#65.55(.01)]    BLOOD PRODUCT(#66)[#65.62(.01)#65.66(.01)]    WKLD CODE(#64)[#65.59911(.01)]    LAB DATA(#63)[63]    
Kernel 2 STATE(#5)[1.5]    NEW PERSON(#200)[.09.12#65.54(.011)#65.54(4.8)#65.54(10.2)#65.54(10.5)#65.54(11.2)#65.54(11.5)#65.54(12.2)#65.54(13.2)#65.54(14.2)#65.54(15.2)#65.54(16.2)#65.54(17.2)#65.54(18.2)#65.54(19.2)#65.54(20.2)#65.5991(.02)#65.61(.03)#65.66(.06)#65.66(.07)]    

Fields, Total: 37

Field # Name Loc Type Details
.001 IDENTIFICATION NUMBER NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 14, 1985
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 999999999
  • DESCRIPTION:  This is a unique number assigned to the blood donor. An existing
    number cannot be assigned to a new donor.
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!(X?1N.E)!($L(X)<3)!(X?1P.E)!(X'?1U.ANP)!(X'[",") X I $D(X) S Y=", " F I=0:0 Q:$F(X,Y)<1 S X=$E(X,1,($F(X,Y)-2))_$E(X,$F(X,Y),99)
  • LAST EDITED:  NOV 09, 1988
  • HELP-PROMPT:  THE NAME MUST BE 3-30 CHARACTERS AND NOT START WITH PUNCTUATION OR A NUMBER
  • DESCRIPTION:  
    Name of blood donor
  • EXECUTABLE HELP:  D EN^DDIOL("Enter Last name,First name")
  • DELETE TEST:  1,0)= I '$D(^XUSEC("LRBLSUPER",DUZ))
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  65.5^B
    1)= S ^LRE("B",$E(X,1,30),DA)=""
    2)= K ^LRE("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  ^^TRIGGER^65.5^.11
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^LRE(D0,0)):^(0),1:"") S X=$P(Y(1),U,11) S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC X ^DD(65.5,.01,1,2,1.4)
    1.4)= S DIH=$S($D(^LRE(DIV(0),0)):^(0),1:""),DIV=X X "F %=0:0 Q:$L($P(DIH,U,10,99))  S DIH=DIH_U" S %=$P(DIH,U,12,999),DIU=$P(DIH,U,11),^(0)=$P(DIH,U,1,10)_U_DIV_$S(%]"":U_%,1:""),DIH=65.5,DIG=.11 D ^DICR:$O(^DD(DIH,DIG,1,
    0))>0
    2)= Q
    CREATE VALUE)= TODAY
    DELETE VALUE)= NO EFFECT
    FIELD)= DATE REGISTERED
  • CROSS-REFERENCE:  65.5^F^MUMPS
    1)= Q:'$P(^LRE(DA,0),U,3)  S ^LRE("D",$E(X,1)_$E($P(^(0),U,3),4,7),DA)=""
    2)= Q:'$P(^LRE(DA,0),U,3)  K ^LRE("D",$E(X,1)_$E($P(^(0),U,3),4,7),DA)
    Cross-references the entries of the Blood Donor file (^LRE(DA,) by the first letter of the last name/month/date of the DOB.
  • CROSS-REFERENCE:  65.5^G40^MUMPS
    1)= Q:'$P(^LRE(DA,0),U,13)  S P=$S($P(^(0),U,13)["P":11,1:10) S ^LRE("G4",$E(^(0))_$E($P(^(0),U,13),6,P),DA)=""
    2)= Q:'$P(^LRE(DA,0),U,13)  S P=$S($P(^(0),U,13)["P":11,1:10) K ^LRE("G4",$E(^(0))_$E($P(^(0),U,13),6,P),DA)
    Cross-references the entries in the Blood Donor file (^LRE(DA,) by the first letter of the last name/last 4 # of the SSN.
.02 SEX 0;2 SET
  • 'M' FOR MALE;
  • 'F' FOR FEMALE;

  • DESCRIPTION:  
    This is the sex of the blood donor.
.03 DOB 0;3 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EXP",%DT(0)="-T" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 16, 1998
  • DESCRIPTION:  
    This is the age of the donor.  (Must be 17 years or older.)
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  65.5^E^MUMPS
    1)= S ^LRE("D",$E(^LRE(DA,0))_$E(X,4,7),DA)=""
    2)= K ^LRE("D",$E(^LRE(DA,0))_$E(X,4,7),DA)
.031 AGE COMPUTED

  • MUMPS CODE:  S Y(65.5,.031,1)=$S($D(^LRE(D0,0)):^(0),1:""),X=DT S X=X,X1=X,X2=$P(Y(65.5,.031,1),U,3),X="" D:X2 ^%DTC:X1 S X=X\365.25 S X=$J(X,0,0)
  • ALGORITHM:  TODAY-DOB\365.25 (ALWAYS 0 DECIMAL DIGITS)
  • DESCRIPTION:  
    This is the computed age of the donor.
.04 APHERESIS CODE 0;4 SET
  • '1' FOR YES;
  • '2' FOR NO;
  • '1' FOR yes;
  • '2' FOR no;

  • LAST EDITED:  AUG 05, 1987
  • DESCRIPTION:  If donor is willing donate plasma, platelets, or leukocytes
    enter 'YES'
.05 ABO GROUP 0;5 SET
  • 'A' FOR A;
  • 'B' FOR B;
  • 'O' FOR O;
  • 'AB' FOR AB;

  • LAST EDITED:  MAY 02, 1985
  • DESCRIPTION:  
    The ABO group of the donor is entered here
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.06 RH TYPE 0;6 SET
  • 'POS' FOR POSITIVE;
  • 'NEG' FOR NEGATIVE;

  • LAST EDITED:  MAR 24, 1985
  • DESCRIPTION:  
    The RH type of the donor is entered here
.07 CUMULATIVE DONATIONS 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUL 31, 1987
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 0 AND 9999999
  • DESCRIPTION:  Total number of donation credits based on values assigned
    to each type of donation.
.08 TOTAL AWARDS 0;8 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUL 12, 1985
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 99999
  • DESCRIPTION:  Number of awards given based on 1 award for each gallon
    or equivalent (8 donation credits) donated
  • NOTES:  TRIGGERED by the GIVE NEW AWARD field of the BLOOD DONOR File
.085 GIVE NEW AWARD 3;1 SET
  • '1' FOR YES;

  • LAST EDITED:  JUL 23, 1987
  • DESCRIPTION:  
    To acknowledge giving award delete entry by entering '@'
  • CROSS-REFERENCE:  ^^TRIGGER^65.5^.08
    1)= Q
    1.4)= S DIH=$S($D(^LRE(DIV(0),0)):^(0),1:""),DIV=X X "F %=0:0 Q:$L($P(DIH,U,7,99))  S DIH=DIH_U" S %=$P(DIH,U,9,999),DIU=$P(DIH,U,8),^(0)=$P(DIH,U,1,7)_U_DIV_$S(%]"":U_%,1:""),DIH=65.5,DIG=.08 D ^DICR:$O(^DD(DIH,DIG,1,0))>
    0
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^LRE(D0,0)):^(0),1:"") S X=$P(Y(1),U,8),X=X S DIU=X K Y S X=DIV S X=DIU+1 X ^DD(65.5,.085,1,1,2.4)
    2.4)= S DIH=$S($D(^LRE(DIV(0),0)):^(0),1:""),DIV=X X "F %=0:0 Q:$L($P(DIH,U,7,99))  S DIH=DIH_U" S %=$P(DIH,U,9,999),DIU=$P(DIH,U,8),^(0)=$P(DIH,U,1,7)_U_DIV_$S(%]"":U_%,1:""),DIH=65.5,DIG=.08 D ^DICR:$O(^DD(DIH,DIG,1,0))>
    0
    CREATE VALUE)= NO EFFECT
    DELETE VALUE)= TOTAL AWARDS+1
    FIELD)= TOTAL AWARDS
.09 DEMOG ENT/EDIT BY 0;9 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JUN 30, 1991
  • DESCRIPTION:  
    Person entering or editing donor demographic data
.1 PERMANENT DEFERRAL 0;10 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JUL 07, 1985
  • HELP-PROMPT:  If the donor is to be permanently excluded from donation enter 'YES'
  • DESCRIPTION:  Donor should be permanently deferred as a homologous blood
    donor based on donor history or test results.
.11 DATE REGISTERED/EDITED 0;11 DATE

  • INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 17, 1986
  • DESCRIPTION:  
    This is the date the donor was registered into this file.
  • NOTES:  TRIGGERED by the NAME field of the BLOOD DONOR File
.12 DEFERRAL ENTER/EDIT BY 0;12 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JUN 30, 1991
  • DESCRIPTION:  
    Person entering or editing permanent deferral of donor.
.13 SSN 0;13 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>10!($L(X)<9) X D:$D(X) ^LRBLSSN
  • OUTPUT TRANSFORM:  S Y=$S(Y["P":$E(Y,10)_"-"_$E(Y,1,3)_"-"_$E(Y,4,5)_"-"_$E(Y,6,9),1:$E(Y,1,3)_"-"_$E(Y,4,5)_"-"_$E(Y,6,9))
  • LAST EDITED:  APR 01, 1993
  • HELP-PROMPT:  ANSWER MUST BE 9-10 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field contains the social security number of the donor.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  65.5^G
    1)= S ^LRE("G",$E(X,1,30),DA)=""
    2)= K ^LRE("G",$E(X,1,30),DA)
  • CROSS-REFERENCE:  65.5^G4^MUMPS
    1)= S P=$S(X["P":11,1:10) S ^LRE("G4",$E(^LRE(DA,0))_$E(X,6,P),DA)=""
    2)= S P=$S(X["P":11,1:10) K ^LRE("G4",$E(^LRE(DA,0))_$E(X,6,P),DA)
.14 MILITARY RANK 0;14 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<2) X
  • LAST EDITED:  FEB 19, 1991
  • HELP-PROMPT:  Answer must be 2-20 characters in length.
  • DESCRIPTION:  
    If this collection is being performed by a DOD site, the rank of the donor is entered in this field.
  • TECHNICAL DESCR:  For DoD sites using this the DHCP Laboratory package, this field must be pointed to file 9003 (MILITARY RANK). This file is not exported by DHCP, therefore this field is defined as Free Text for techincal verification
    purposes.
.16 PERMANENT DEFERRAL DATE CHANGE 0;16 DATE

  • INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 17, 1988
  • DESCRIPTION:  
    If the deferral date is adjusted, the date is entered in this field.
1.1 ADDRESS LINE 1 1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • HELP-PROMPT:  ANSWER MUST BE 1-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    First line of donor address
1.2 ADDRESS LINE 2 1;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • HELP-PROMPT:  ANSWER MUST BE 1-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Second line of donor address (if necessary)
1.3 ADDRESS LINE 3 1;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • HELP-PROMPT:  ANSWER MUST BE 1-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Third line of donor address (if necessary)
1.4 CITY 1;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • HELP-PROMPT:  ANSWER MUST BE 1-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    City of donor
1.5 STATE 1;5 POINTER TO STATE FILE (#5) STATE(#5)

  • DESCRIPTION:  
    State of donor residence..
1.6 ZIP CODE 1;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<5) X
  • HELP-PROMPT:  ANSWER MUST BE 5-9 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Zip code of donor
1.7 HOME PHONE 1;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<3) X
  • HELP-PROMPT:  ANSWER MUST BE 3-15 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Home phone of donor
1.8 WORK PHONE 1;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<3) X
  • HELP-PROMPT:  ANSWER MUST BE 3-15 CHARACTERS IN LENGTH
  • DESCRIPTION:  Phone where donor works so that the donor may be reached
    during working hours if necessary
2 GROUP AFFILIATION 2;0 POINTER Multiple #65.51 65.51

  • DESCRIPTION:  
    These are groups with which the donor may be associated.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)[""G"""
  • EXPLANATION:  SELECTS ONLY GROUP AFFILIATIONS FROM DESCRIPTION LIST
4 DONOR SCHEDULING/RECALL 4;0 SET Multiple #65.53 65.53

  • DESCRIPTION:  
    These are donors placed on a specific recall list for recruitment purposes.
5 DONATION OR DEFERRAL DATE 5;0 DATE Multiple #65.54 65.54

  • DESCRIPTION:  
    These are the dates of donation or referral.
6.1 RBC ANTIGEN PRESENT 1.1;0 POINTER Multiple #65.56 65.56

  • DESCRIPTION:  Antigens identified as present on the red blood cells
    of the donor.  SNOMED codes can be entered as well as
    the name of the antigen.  Synonyms can also be used
    if they are in the function field file (#61.3)
  • SCREEN:  S DIC("S")="I $P(^(0),U,5)=""AN"""
  • EXPLANATION:  Selects antigens
6.2 RBC ANTIGEN ABSENT 1.2;0 POINTER Multiple #65.57 65.57

  • DESCRIPTION:  
    Multiple for RBC Antigen absent
  • SCREEN:  S DIC("S")="I $P(^(0),U,5)=""AN"""
  • EXPLANATION:  Selects only antigens
6.3 HLA ANTIGEN PRESENT 1.3;0 POINTER Multiple #65.58 65.58

  • DESCRIPTION:  
    Multiple for HLA antigen present
  • SCREEN:  S DIC("S")="I $P(^(0),U,5)=""HL"""
  • EXPLANATION:  Selects HLA antigens
6.4 HLA ANTIGEN ABSENT 1.4;0 POINTER Multiple #65.59 65.59

  • DESCRIPTION:  
    Multiple for HLA antigen absent
  • SCREEN:  S DIC("S")="I $P(^(0),U,5)=""HL"""
  • EXPLANATION:  Selects only HLA antigens
6.5 CMV ANTIBODY 0;15 SET
  • '0' FOR NEG;
  • '1' FOR POS;

  • LAST EDITED:  MAR 19, 1988
  • DESCRIPTION:  
    A negative or positive result for the Cytomegalovirus antibody
9 BLOOD DONOR COMMENTS 9;0 WORD-PROCESSING #65.52

  • DESCRIPTION:  
    This field contains comments about the donor not found elsewhere.
63 LABORATORY REFERENCE LR;1 POINTER TO LAB DATA FILE (#63) LAB DATA(#63)

  • INPUT TRANSFORM:  K X
  • LAST EDITED:  APR 06, 1985
  • HELP-PROMPT:  NOT EDITABLE
  • DESCRIPTION:  
    This field is a pointer to the lab data stored in the lab data file (#63)
  • DELETE TEST:  1,0)= I 1
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
99 PERMANENT DEFERRAL REASON 99;0 WORD-PROCESSING #65.99

  • DESCRIPTION:  
    Reason(s) why donor is permanently deferred

External References

Name Field # of Occurrence
^%DT .03+1, .11+1, .16+1
^%DTC .031+1
NOW^%DTC .01(XREF 2S)
EN^DDIOL .01(HELP )
^DICR .01(XREF 2n1.4), .085(XREF 1n1.4), .085(XREF 1n2.4)
^LRBLSSN .13+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( .01(XREF 2n1.4), .085(XREF 1n1.4), .085(XREF 1n2.4)
^DD(65.5 .01(XREF 2S), .085(XREF 1K)
^LRE - [#65.5] .01(XREF 2S), .01(XREF 2n1.4), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K), .03(XREF 1S), .03(XREF 1K), .031+1, .085(XREF 1n1.4)
.085(XREF 1K), .085(XREF 1n2.4), .13(XREF 2S), .13(XREF 2K)
^LRE("B" .01(XREF 1S), .01(XREF 1K)
^LRE("D" .01(XREF 3S), .01(XREF 3K), .03(XREF 1S), .03(XREF 1K)
^LRE("G" .13(XREF 1S), .13(XREF 1K)
^LRE("G4" .01(XREF 4S), .01(XREF 4K), .13(XREF 2S), .13(XREF 2K)
^XUSEC("LRBLSUPER" .01DEL1+1

Naked Globals

Name Field # of Occurrence
^("0" ID.02+1, ID.03+1
^("1" ID1.4+1
^(0 .01(XREF 2S), .01(XREF 2n1.4), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K), .031+1, .085(XREF 1n1.4), .085(XREF 1K), .085(XREF 1n2.4)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% .01(XREF 2S), .01(XREF 2n1.4), .085(XREF 1n1.4), .085(XREF 1n2.4)
>> %DT .03+1*, .11+1*, .16+1*
>> %DT(0 .03+1*
%H .01(XREF 2S)
%I .01(XREF 2S)
>> D0 .01(XREF 2S), .031+1, .085(XREF 1K)
>> DA .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K), .03(XREF 1S), .03(XREF 1K), .085(XREF 1K)
.13(XREF 1S), .13(XREF 1K), .13(XREF 2S), .13(XREF 2K)
>> DIG .01(XREF 2n1.4), .085(XREF 1n1.4), .085(XREF 1n2.4)
>> DIH .01(XREF 2n1.4), .085(XREF 1n1.4), .085(XREF 1n2.4)
>> DIU .01(XREF 2S), .01(XREF 2n1.4), .085(XREF 1n1.4), .085(XREF 1K), .085(XREF 1n2.4)
DIV .01(XREF 2S), .01(XREF 2n1.4), .085(XREF 1n1.4), .085(XREF 1K), .085(XREF 1n2.4)
DIV(0 .01(XREF 2S), .01(XREF 2n1.4), .085(XREF 1n1.4), .085(XREF 1K), .085(XREF 1n2.4)
DT .031+1
DUZ .01DEL1+1
>> I .01+1*
>> P .01(XREF 4S), .01(XREF 4K), .13(XREF 2S), .13(XREF 2K)
U ID.02+1, ID.03+1, ID1.4+1, .01(XREF 2S), .01(XREF 2n1.4), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K), .031+1
.085(XREF 1n1.4), .085(XREF 1K), .085(XREF 1n2.4)
X .001+1!, .01+1!*, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2n1.4), .01(XREF 3S), .01(XREF 3K), .03+1*!, .03(XREF 1S)
.03(XREF 1K), .031+1*, .07+1!, .08+1!, .085(XREF 1n1.4), .085(XREF 1K), .085(XREF 1n2.4), .11+1*!, .13+1!, .13(XREF 1S)
.13(XREF 1K), .13(XREF 2S), .13(XREF 2K), .14+1!, .16+1*!, 1.1+1!, 1.2+1!, 1.3+1!, 1.4+1!, 1.6+1!
, 1.7+1!, 1.8+1!, 63+1!
>> X1 .031+1*
>> X2 .031+1*
Y .01+1*, .01(XREF 2S), .03+1, .085(XREF 1K), .11+1, .13OT+1*, .16+1
Y( .031+1*
Y(0 .13OT+1*
Y(1 .01(XREF 2S), .085(XREF 1K)
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All