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: ^BWP

Package: Women's Health

Global: ^BWP


Information

FileMan FileNo FileMan Filename Package
9002086 BW PATIENT Women's Health

Description

Directly Accessed By Routines, Total: 57

Package Total Routines
Women's Health 35 BWBRNED    BWBRNOT    BWBRNOT2    BWBRPCD    BWBRPCD2    BWCBE    BWGETALL    BWGRVL1
BWLETDQ    BWLOOP    BWMDE    BWMDE2    BWMDE5    BWMDET    BWMDET1    BWMDEU
BWMDEX0    BWMDEX2    BWMPEXP    BWOLD    BWPATP    BWPROF    BWRPSNP    BWUCVRC
BWUINC    BWUTL1    BWUTL5    BWUTL6    BWUTL7    BWUTL8    ^BWEDC    ^BWP
^BWPCD    RACE    ^BWPLOG    
Patient Care Component 6 APCDEREG    APCHS1    APCHS11A    APCHS1A    APCHS9B5    APCHSM04    
Health Summary Components 3 BHSDEM    BHSDM5    BHSWPROF    
IHS Uniform Data System 3 BUD4RPTC    BUD5RPTC    BUD6RPTC    
IHS Designated Provider 2 BDPLINKI    BDPPOST    
Clinical Scheduling for Windows 1 BSDX41A    
Diabetes Registry 1 BDMS9B5    
IHS Changes To Scheduling 1 BSDPCP    
IHS Mods To Radiology Nuclear Medicine 1 BRAWH    
IHS Patient 1 AUPNCIXL    
Local Area Programs 1 AZAXDPM1    
Patient Chart 1 BPCBWDSP    
iCare 1 BQIWHPRF    

Accessed By FileMan Db Calls, Total: 13

Package Total Routines
Women's Health 7 BWMDET1    BWMDEX0    BWPATE    BWPATP    BWUINC    BWUTL7    BWUTL8    
IHS Changes To Scheduling 3 BSDPCP    BSDPRV    BSDU1    
IHS Designated Provider 1 BDPLINKI    
Patient Care Component 1 APCDEREG    
iCare 1 BQIPTPR    

Pointed To By FileMan Files, Total: 4

Package Total FileMan Files
Women's Health 4 BW PREGNANCY LOG(#9002086.05)[.02]    BW NOTIFICATION(#9002086.4)[.01]    BW PROCEDURE(#9002086.1)[.02]    BW PAP REGIMEN LOG(#9002086.04)[.02]    

Pointer To FileMan Files, Total: 9

Package Total FileMan Files
Women's Health 5 BW CERVICAL TX NEED(#9002086.5)[.11]    BW BREAST TX NEED(#9002086.51)[.18]    BW CASE MANAGER(#9002086.01)[.1]    BW PAP REGIMEN(#9002086.03)[.16]    BW RACE MAPPINGS (NBCCEDP)(#9002086.34)[#9002086.07(.01)]    
IHS Patient 1 PATIENT(#9000001)[.01]    
Kernel 1 NEW PERSON(#200)[.25.26]    
Registration 1 ETHNICITY(#10.2)[.09]    
Utility Tables 1 PROVIDER CHANGE REASON(#9999999.93)[.28]    

Fields, Total: 35

Field # Name Loc Type Details
.01 NAME 0;1 POINTER TO PATIENT FILE (#9000001)
************************REQUIRED FIELD************************
PATIENT(#9000001)

  • INPUT TRANSFORM:  S:$D(X) DINUM=X I $P(^DPT(DINUM,0),"^",2)'="F" K X W !?5,"Patient is not female.",!
  • LAST EDITED:  JUL 20, 1995
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9002086^B
    1)= S ^BWP("B",$E(X,1,30),DA)=""
    2)= K ^BWP("B",$E(X,1,30),DA)
.02 MAILING ADDRESS-STREET COMPUTED

  • MUMPS CODE:  X ^DD(9002086,.02,9.2) X $P(^DD(9000001,1602.2,0),U,5,99) S Y(9002086,.02,101)=X S X=Y(9002086,.02,101) S D0=Y(9002086,.02,80)
    9.2 = S Y(9002086,.02,80)=$S($D(D0):D0,1:""),Y(9002086,.02,1)=$S($D(^BWP(D0,0)):^(0),1:""),D0=$P(Y(9002086,.02,1),U,1) S:'$D(^AUPNPAT(+D0,0)) D0=-1
  • ALGORITHM:  NAME:MAILING ADDRESS-STREET
  • LAST EDITED:  SEP 15, 1994
.022 MAILING ADDRESS-STREET 2 COMPUTED

  • MUMPS CODE:  X ^DD(9002086,.022,9.4) S X=$P(Y(9002086,.022,201),U,2) S D0=Y(9002086,.022,80)
    9.2 = S Y(9002086,.022,80)=$G(D0),Y(9002086,.022,1)=$S($D(^BWP(D0,0)):^(0),1:""),D0=$P(Y(9002086,.022,1),U,1) S:'D0!'$D(^AUPNPAT(+D0,0)) D0=-1 S Y(9002086,.022,180)=$G(D0)
    9.3 = X ^DD(9002086,.022,9.2) S Y(9002086,.022,101)=$S($D(^AUPNPAT(D0,0)):^(0),1:""),Y(9002086,.022,102)=$G(X)
    9.4 = X ^DD(9002086,.022,9.3) S D0=$P(Y(9002086,.022,101),U,1) S:'D0!'$D(^DPT(+D0,0)) D0=-1 S Y(9002086,.022,201)=$S($D(^DPT(D0,.11)):^(.11),1:"")
  • ALGORITHM:  NAME:NAME:STREET ADDRESS [LINE 2]
.023 MAILING ADDRESS-STREET 3 COMPUTED

  • MUMPS CODE:  X ^DD(9002086,.023,9.4) S X=$P(Y(9002086,.023,201),U,3) S D0=Y(9002086,.023,80)
    9.2 = S Y(9002086,.023,80)=$G(D0),Y(9002086,.023,1)=$S($D(^BWP(D0,0)):^(0),1:""),D0=$P(Y(9002086,.023,1),U,1) S:'D0!'$D(^AUPNPAT(+D0,0)) D0=-1 S Y(9002086,.023,180)=$G(D0)
    9.3 = X ^DD(9002086,.023,9.2) S Y(9002086,.023,101)=$S($D(^AUPNPAT(D0,0)):^(0),1:""),Y(9002086,.023,102)=$G(X)
    9.4 = X ^DD(9002086,.023,9.3) S D0=$P(Y(9002086,.023,101),U,1) S:'D0!'$D(^DPT(+D0,0)) D0=-1 S Y(9002086,.023,201)=$S($D(^DPT(D0,.11)):^(.11),1:"")
  • ALGORITHM:  NAME:NAME:STREET ADDRESS [LINE 3]
.03 MAILING ADDRESS-CITY COMPUTED

  • MUMPS CODE:  X ^DD(9002086,.03,9.2) X $P(^DD(9000001,1603.2,0),U,5,99) S Y(9002086,.03,101)=X S X=Y(9002086,.03,101) S D0=Y(9002086,.03,80)
    9.2 = S Y(9002086,.03,80)=$S($D(D0):D0,1:""),Y(9002086,.03,1)=$S($D(^BWP(D0,0)):^(0),1:""),D0=$P(Y(9002086,.03,1),U,1) S:'$D(^AUPNPAT(+D0,0)) D0=-1
  • ALGORITHM:  NAME:1603.2
  • LAST EDITED:  SEP 15, 1994
.04 MAILING ADDRESS-STATE COMPUTED

  • MUMPS CODE:  X ^DD(9002086,.04,9.2) X $P(^DD(9000001,1604.2,0),U,5,99) S Y(9002086,.04,101)=X S X=Y(9002086,.04,101) S D0=Y(9002086,.04,80)
    9.2 = S Y(9002086,.04,80)=$S($D(D0):D0,1:""),Y(9002086,.04,1)=$S($D(^BWP(D0,0)):^(0),1:""),D0=$P(Y(9002086,.04,1),U,1) S:'$D(^AUPNPAT(+D0,0)) D0=-1
  • ALGORITHM:  NAME:1604.2
  • LAST EDITED:  SEP 15, 1994
.05 MAILING ADDRESS-ZIP COMPUTED

  • MUMPS CODE:  X ^DD(9002086,.05,9.2) X $P(^DD(9000001,1605.2,0),U,5,99) S Y(9002086,.05,101)=X S X=Y(9002086,.05,101) S D0=Y(9002086,.05,80)
    9.2 = S Y(9002086,.05,80)=$S($D(D0):D0,1:""),Y(9002086,.05,1)=$S($D(^BWP(D0,0)):^(0),1:""),D0=$P(Y(9002086,.05,1),U,1) S:'$D(^AUPNPAT(+D0,0)) D0=-1
  • ALGORITHM:  NAME:1605.2
  • LAST EDITED:  SEP 15, 1994
.06 CHART# COMPUTED

  • MUMPS CODE:  Q:'$D(BWDFN)!('$D(DUZ(2))) S X=$$HRCN^BWUTL1(BWDFN,DUZ(2))
  • ALGORITHM:  Q:'$D(BWDFN)!('$D(DUZ(2))) S X=$$HRCN^BWUTL1(BWDFN,DUZ(2))
  • LAST EDITED:  MAY 11, 1995
.09 ETHNICITY 0;9 POINTER TO ETHNICITY FILE (#10.2) ETHNICITY(#10.2)

  • LAST EDITED:  JUN 26, 2003
.1 CASE MANAGER 0;10 POINTER TO BW CASE MANAGER FILE (#9002086.01)
************************REQUIRED FIELD************************
BW CASE MANAGER(#9002086.01)

  • LAST EDITED:  SEP 23, 1994
  • HELP-PROMPT:  Select the person who is currently managing this patient's Breast and Cervical Treatment Needs, letters, follow-up, etc.
  • CROSS-REFERENCE:  9002086^C
    1)= S ^BWP("C",$E(X,1,30),DA)=""
    2)= K ^BWP("C",$E(X,1,30),DA)
.11 CX TX NEED 0;11 POINTER TO BW CERVICAL TX NEED FILE (#9002086.5) BW CERVICAL TX NEED(#9002086.5)

  • LAST EDITED:  MAR 17, 1995
  • HELP-PROMPT:  Select the current or next cervical procedure needed for this patient.
.12 CX TX NEED DUE DATE 0;12 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 17, 1995
  • HELP-PROMPT:  Enter the date by which this Cervical Treatment Need should be completed.
.13 CURRENTLY PREGNANT 0;13 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  OCT 24, 1994
  • HELP-PROMPT:  Enter "YES" if this patient is currently pregnant, "NO" if not, and leave blank if unknown.
  • CROSS-REFERENCE:  9002086^AEDC^MUMPS
    1)= S BWPREG=X,BWEDC=$P(^BWP(DA,0),U,14) D STOREDC^BWUTL3
    2)= S BWPREG="",BWEDC=0 D STOREDC^BWUTL3
.14 EDC 0;14 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 24, 1994
  • HELP-PROMPT:  Enter the Estimated Date of Confinement (Delivery Date).
  • CROSS-REFERENCE:  9002086^AEDC1^MUMPS
    1)= S BWEDC=X,BWPREG=$P(^BWP(DA,0),U,13) D STOREDC^BWUTL3
    2)= S BWEDC="",BWPREG=$P(^BWP(DA,0),U,13) D STOREDC^BWUTL3
.15 DES DAUGHTER 0;15 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JAN 18, 1995
  • HELP-PROMPT:  Enter "YES" if this patient's mother took DES when she was pregnant with this patient.
.16 PAP REGIMEN 0;16 POINTER TO BW PAP REGIMEN FILE (#9002086.03) BW PAP REGIMEN(#9002086.03)

  • INPUT TRANSFORM:  S DIC("S")="I '$P(^(0),U,3)" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
  • LAST EDITED:  MAY 09, 2003
  • SCREEN:  S DIC("S")="I '$P(^(0),U,3)"
  • EXPLANATION:  Screen out inactive regimens.
  • CROSS-REFERENCE:  9002086^APRLOG^MUMPS
    1)= S BWLPRG=X,BWLDAT=$P(^BWP(DA,0),U,17) D STORPAP^BWUTL3
    2)= ;
.17 PAP REGIMEN START DATE 0;17 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 21, 1994
  • HELP-PROMPT:  Enter the date on which the patient began or will begin the current PAP Regimen.
  • CROSS-REFERENCE:  9002086^APDLOG^MUMPS
    1)= S BWLDAT=X,BWLPRG=$P(^BWP(DA,0),U,16) D STORPAP^BWUTL3
    2)= ;
.18 BR TX NEED 0;18 POINTER TO BW BREAST TX NEED FILE (#9002086.51) BW BREAST TX NEED(#9002086.51)

  • LAST EDITED:  MAR 17, 1995
  • HELP-PROMPT:  Select the current or next breast study procedure needed for this patient.
.19 BR TX NEED DUE DATE 0;19 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 17, 1995
  • HELP-PROMPT:  Enter the date by which this Breast Tx Procedure should be completed.
.2 CDC UNIQUE ID 0;20 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  AUG 29, 1995
  • HELP-PROMPT:  This is the unique patient identifier for transmitting data to CDC. If this site is not funded by CDC, ignore this field.
  • CROSS-REFERENCE:  9002086^CDC
    1)= S ^BWP("CDC",$E(X,1,30),DA)=""
    2)= K ^BWP("CDC",$E(X,1,30),DA)
.21 DATE ENROLLED 0;21 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  DEC 08, 1995
  • HELP-PROMPT:  If this is a CDC funded site, enter the date on which this patient was first enrolled in the CDC funded Program.
.22 REFERRAL SOURCE 0;22 SET
  • '1' FOR Self;
  • '2' FOR Provider;
  • '3' FOR Other;
  • '4' FOR Unknown;

  • LAST EDITED:  DEC 04, 1995
  • HELP-PROMPT:  If this is a CDC funded site, enter the referral source for this patient into the CDC funded program.
.23 FAMILY HX OF BR CA 0;23 SET
  • '0' FOR no family history;
  • '1' FOR 2nd degree relative;
  • '2' FOR 1st degree relative;
  • '3' FOR >1 1st degree relatives;

  • LAST EDITED:  FEB 08, 1996
  • HELP-PROMPT:  Enter the code for the relatives of this patient who have had breast cancer. (1st degree relative is a sister/mother, 2nd degree relatives are extended family.)
.24 DATE INACTIVE 0;24 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 01, 1996
  • HELP-PROMPT:  Enter the date on which this patient became inactive. ANY date (past, present or future) will cause this patient to be excluded from all reports that assess Treatment Needs.
.25 WH REFERRAL PROVIDER 0;25 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  FEB 14, 2000
  • CROSS-REFERENCE:  ^^TRIGGER^9002086^.26
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^BWP(D0,0)):^(0),1:"") S X=$P(Y(1),U,26),X=X S DIU=X K Y S X=DIV S X=$G(DUZ) X ^DD(9002086,.25,1,1,1.4)
    1.4)= S DIH=$S($D(^BWP(DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,26)=DIV,DIH=9002086,DIG=.26 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(^BWP(D0,0)):^(0),1:"") S X=$P(Y(1),U,26),X=X S DIU=X K Y S X=DIV S X=$G(DUZ) X ^DD(9002086,.25,1,1,2.4)
    2.4)= S DIH=$S($D(^BWP(DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,26)=DIV,DIH=9002086,DIG=.26 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    CREATE VALUE)= S X=$G(DUZ)
    DELETE VALUE)= S X=$G(DUZ)
    FIELD)= #.26
  • CROSS-REFERENCE:  ^^TRIGGER^9002086^.27
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^BWP(D0,0)):^(0),1:"") S X=$P(Y(1),U,27),X=X S DIU=X K Y S X=DIV S X=$G(DT) X ^DD(9002086,.25,1,2,1.4)
    1.4)= S DIH=$S($D(^BWP(DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,27)=DIV,DIH=9002086,DIG=.27 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(^BWP(D0,0)):^(0),1:"") S X=$P(Y(1),U,27),X=X S DIU=X K Y S X=DIV S X=$G(DT) X ^DD(9002086,.25,1,2,2.4)
    2.4)= S DIH=$S($D(^BWP(DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,27)=DIV,DIH=9002086,DIG=.27 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    CREATE VALUE)= S X=$G(DT)
    DELETE VALUE)= S X=$G(DT)
    FIELD)= #.27
.26 USER UPDATING WH REF PROV 0;26 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  FEB 14, 2000
    WRITE AUTHORITY:  ^
  • NOTES:  TRIGGERED by the WH REFERRAL PROVIDER field of the BW PATIENT File
.27 DATE WH REF PROV UPDATED 0;27 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  FEB 14, 2000
    WRITE AUTHORITY:  ^
  • NOTES:  TRIGGERED by the WH REFERRAL PROVIDER field of the BW PATIENT File
.28 REASON WH PROVIDER CHANGED 0;28 POINTER TO PROVIDER CHANGE REASON FILE (#9999999.93) PROVIDER CHANGE REASON(#9999999.93)

  • LAST EDITED:  JAN 29, 2001
.29 INCOME ELIGIBLE 0;29 SET
  • '1' FOR YES;
  • '2' FOR NO;
  • '3' FOR REFUSED;

  • LAST EDITED:  MAR 29, 2001
  • HELP-PROMPT:  Enter the appropriate code from the list.
  • DESCRIPTION:  
    Enter the appropriate code from the list.
.3 INCOME ELIGIBLE DATE 0;30 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 29, 2001
  • HELP-PROMPT:  Enter the date the Income Eligible information due.
  • DESCRIPTION:  
    Enter the date the Income Eligible information information is due.
.31 ROI CONSENT 0;31 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  APR 07, 2003
  • HELP-PROMPT:  Answer 'YES' if patient has consent to the release of medical information.
.32 PAP ELIGIBLE 0;32 SET
  • '1' FOR YES;
  • '2' FOR NO;

  • LAST EDITED:  JAN 05, 2009
.33 MAM ELIGIBLE 0;33 SET
  • '1' FOR YES;
  • '2' FOR NO;

  • LAST EDITED:  JAN 05, 2009
1.01 NOTES 1;0 WORD-PROCESSING #9002086.06
2 RACE 2;0 POINTER Multiple #9002086.07 9002086.07

External References

Name Field # of Occurrence
^%DT .12+1, .14+1, .17+1, .19+1, .21+1, .24+1, .27+1, .3+1
$$HRCN^BWUTL1 .06+1
STOREDC^BWUTL3 .13(XREF 1S), .13(XREF 1K), .14(XREF 1S), .14(XREF 1K)
STORPAP^BWUTL3 .16(XREF 1S), .17(XREF 1S)
^DIC .16+1
^DICR .25(XREF 1n1.4), .25(XREF 1n2.4), .25(XREF 2n1.4), .25(XREF 2n2.4)

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPAT - [#9000001] .02OF9.2+1, .022OF9.2+1, .022OF9.3+1, .023OF9.2+1, .023OF9.3+1, .03OF9.2+1, .04OF9.2+1, .05OF9.2+1
^BWP - [#9002086] .02OF9.2+1, .022OF9.2+1, .023OF9.2+1, .03OF9.2+1, .04OF9.2+1, .05OF9.2+1, .13(XREF 1S), .14(XREF 1S), .14(XREF 1K), .16(XREF 1S)
.17(XREF 1S), .25(XREF 1S), .25(XREF 1n1.4), .25(XREF 1K), .25(XREF 1n2.4), .25(XREF 2S), .25(XREF 2n1.4), .25(XREF 2K), .25(XREF 2n2.4)
^BWP("B" .01(XREF 1S), .01(XREF 1K)
^BWP("C" .1(XREF 1S), .1(XREF 1K)
^BWP("CDC" .2(XREF 1S), .2(XREF 1K)
^DD( .25(XREF 1n1.4), .25(XREF 1n2.4), .25(XREF 2n1.4), .25(XREF 2n2.4)
^DD(9000001 .02+1, .03+1, .04+1, .05+1
^DD(9002086 .02+1, .022+1, .022OF9.3+1, .022OF9.4+1, .023+1, .023OF9.3+1, .023OF9.4+1, .03+1, .04+1, .05+1
.25(XREF 1S), .25(XREF 1K), .25(XREF 2S), .25(XREF 2K)
^DPT - [#2] .01+1, .022OF9.4+1, .023OF9.4+1

Naked Globals

Name Field # of Occurrence
^( .022OF9.4+1, .023OF9.4+1
^(0 .02OF9.2+1, .022OF9.2+1, .022OF9.3+1, .023OF9.2+1, .023OF9.3+1, .03OF9.2+1, .04OF9.2+1, .05OF9.2+1, .25(XREF 1S), .25(XREF 1n1.4)
.25(XREF 1K), .25(XREF 1n2.4), .25(XREF 2S), .25(XREF 2n1.4), .25(XREF 2K), .25(XREF 2n2.4)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT .12+1*, .14+1*, .17+1*, .19+1*, .21+1*, .24+1*, .27+1*, .3+1*
>> BWDFN .06+1
>> BWEDC .13(XREF 1S), .13(XREF 1K), .14(XREF 1S), .14(XREF 1K)
>> BWLDAT .16(XREF 1S), .17(XREF 1S)
>> BWLPRG .16(XREF 1S), .17(XREF 1S)
>> BWPREG .13(XREF 1S), .13(XREF 1K), .14(XREF 1S), .14(XREF 1K)
>> D0 .02+1*, .02OF9.2+1*, .022+1*, .022OF9.2+1*, .022OF9.3+1, .022OF9.4+1*, .023+1*, .023OF9.2+1*, .023OF9.3+1, .023OF9.4+1*
, .03+1*, .03OF9.2+1*, .04+1*, .04OF9.2+1*, .05+1*, .05OF9.2+1*, .25(XREF 1S), .25(XREF 1K), .25(XREF 2S), .25(XREF 2K)
>> DA .01(XREF 1S), .01(XREF 1K), .1(XREF 1S), .1(XREF 1K), .13(XREF 1S), .14(XREF 1S), .14(XREF 1K), .16(XREF 1S), .17(XREF 1S), .2(XREF 1S)
.2(XREF 1K), .25(XREF 1S), .25(XREF 1K), .25(XREF 2S), .25(XREF 2K)
DIC .16+1!*
DIC("S" .16+1*, .16SCR+1*
>> DIE .16+1
>> DIG .25(XREF 1n1.4), .25(XREF 1n2.4), .25(XREF 2n1.4), .25(XREF 2n2.4)
>> DIH .25(XREF 1n1.4), .25(XREF 1n2.4), .25(XREF 2n1.4), .25(XREF 2n2.4)
>> DINUM .01+1*
>> DIU .25(XREF 1S), .25(XREF 1K), .25(XREF 2S), .25(XREF 2K)
DIV .25(XREF 1S), .25(XREF 1n1.4), .25(XREF 1K), .25(XREF 1n2.4), .25(XREF 2S), .25(XREF 2n1.4), .25(XREF 2K), .25(XREF 2n2.4)
DIV(0 .25(XREF 1S), .25(XREF 1n1.4), .25(XREF 1K), .25(XREF 1n2.4), .25(XREF 2S), .25(XREF 2n1.4), .25(XREF 2K), .25(XREF 2n2.4)
DT .25(XREF 2S), .25(XREF 2K)
DUZ .25(XREF 1S), .25(XREF 1K)
DUZ(2 .06+1
U .02+1, .02OF9.2+1, .022+1, .022OF9.2+1, .022OF9.4+1, .023+1, .023OF9.2+1, .023OF9.4+1, .03+1, .03OF9.2+1
, .04+1, .04OF9.2+1, .05+1, .05OF9.2+1, .13(XREF 1S), .14(XREF 1S), .14(XREF 1K), .16(XREF 1S), .17(XREF 1S), .25(XREF 1S)
.25(XREF 1n1.4), .25(XREF 1K), .25(XREF 1n2.4), .25(XREF 2S), .25(XREF 2n1.4), .25(XREF 2K), .25(XREF 2n2.4)
X .01+1!, .01(XREF 1S), .01(XREF 1K), .02+1*, .022+1*, .022OF9.3+1, .023+1*, .023OF9.3+1, .03+1*, .04+1*
, .05+1*, .06+1*, .1(XREF 1S), .1(XREF 1K), .12+1*!, .13(XREF 1S), .14+1*!, .14(XREF 1S), .16+1*!, .16(XREF 1S)
, .17+1*!, .17(XREF 1S), .19+1*!, .2+1!, .2(XREF 1S), .2(XREF 1K), .21+1*!, .24+1*!, .25(XREF 1S), .25(XREF 1n1.4)
.25(XREF 1K), .25(XREF 1n2.4), .25(XREF 2S), .25(XREF 2n1.4), .25(XREF 2K), .25(XREF 2n2.4), .27+1*!, .3+1*!
Y .12+1, .14+1, .16+1, .17+1, .19+1, .21+1, .24+1, .25(XREF 1S), .25(XREF 1K), .25(XREF 2S)
.25(XREF 2K), .27+1, .3+1
Y(1 .25(XREF 1S), .25(XREF 1K), .25(XREF 2S), .25(XREF 2K)
Y(9002086 .02+1*, .02OF9.2+1*, .022+1, .022OF9.2+1*, .022OF9.3+1*, .022OF9.4+1*, .023+1, .023OF9.2+1*, .023OF9.3+1*, .023OF9.4+1*
, .03+1*, .03OF9.2+1*, .04+1*, .04OF9.2+1*, .05+1*, .05OF9.2+1*
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