Routine: BWMDET

Information

BWMDET ;CMI/THL - NEW METHOD TO EXPORT CBE/MAM DATA;30-Oct-2003 12:00;PLS

Source Information

Source file <BWMDET.m>

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
Women's Health	7	$$INCCHK^BWMDE ($$CNTYRES,$$CNTYSCR,$$DOB,$$PATID,$$RECID,$$STRES,$$STSCR,$$ZIP)^BWMDE2 $$EOR^BWMDE21 USED^BWMDET $$AGE^BWUTL1 PCDVARS^BWUTL3 ^BWUTL5
VA Fileman	1	^%DTC

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Women's Health	2	BWMDET BWMDET1

Entry Points

Name	Comments	DBIA/ICR reference
RACE(DATE)	;EP;FIND RACE FOR SELECTED SITES AFTER SELECTED DATES
F1	; EP
EN
PT(BWTPCDDA)	;EVALUATE ALL MAMM'S AND CBE'S FOR EACH PATIENT
FILE	;FILE NEW EXPORT RECORD
PAID	;EP; PATCH 8
DXWU	;DIAGNOSTIC WORKUP PLANNED
EN1	;REVIEW ALL MAMMS AND CBE'S
USED	;EP;ENTRY EVALUATED AND SHOULD NOT BE USED AGAIN
EXIT
EVAL	;EVALUATE MAMMOGRAM
ENDATE	;EP;CHECK ENROLLMENT DATE
PAGE2	;SET PAGE 2 VALUES
SETUP	;EP;
MCARE	;EP;EVALUATE MEDICARE ELIGIBILITY; PATCH 8

External References

Name	Field # of Occurrence
^%DTC	ENDATE+5
$$INCCHK^BWMDE	PT+6
$$CNTYRES^BWMDE2	FILE+21
$$CNTYSCR^BWMDE2	FILE+13
$$DOB^BWMDE2	FILE+24
$$PATID^BWMDE2	FILE+18
$$RECID^BWMDE2	FILE+19
$$STRES^BWMDE2	FILE+22
$$STSCR^BWMDE2	FILE+12
$$ZIP^BWMDE2	FILE+23
$$EOR^BWMDE21	FILE+70
USED^BWMDET	ENDATE+6
$$AGE^BWUTL1	PT+9, PT+10
PCDVARS^BWUTL3	FILE+7
^BWUTL5	FILE+7

Name	Line Occurrences
Function Call: WRITE	Prompt: !,BWTPATDA,?10,$P(^DPT(BWTPATDA,0),U)," disregarded." Line Location: PT+11
Function Call: WRITE	Prompt: "." Line Location: FILE+73

Name	Line Occurrences (* Changed, ! Killed)
^AUPNMCR - [#9000003]	MCARE+5, MCARE+6
^AUPNMCR("B"	MCARE+1
^AUTTLOC - [#9999999.06]	FILE+14
^BWCBE - [#9002086.93]	PAGE2+7, PAGE2+26
^BWDIAG - [#9002086.31]	EVAL+7, EVAL+11
^BWP - [#9002086]	ENDATE+2
^BWPCD - [#9002086.1]	EN1+5, EN1+6, EN1+7, ENDATE+3
^BWPCD("APCD"	EN1+4
^BWTMP($J	FILE+71*
^DPT - [#2]	PT+11, PAID+12
^TMP("BWTBW2"	EXIT+1!
^TMP("BWTEST"	FILE+46*
^TMP("BWTPCD"	EXIT+2!, EN1+4, USED+1*
^TMP("CBEARRAY"	EXIT+3!

Name	Line Occurrences
DXWU	PAGE2+5
EN1	EN
ENDATE	EVAL+2
EXIT	EN1+1
F1	EVAL+16, PAGE2+11, PAGE2+16, PAGE2+18, PAGE2+27
FILE	EVAL+20
MCARE	FILE+5
PAGE2	EVAL+18
PAID	FILE+44
PT	EN1+9
RACE	FILE+2
SETUP	EVAL+8
USED	EVAL+6, EVAL+7, EVAL+10, EVAL+17

Name	Field # of Occurrence
^(2	EN1+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AGE	PAID+5~, PAID+12, PAID+13, PAID+14, PAID+15, PAID+16
BW	PAID+5~, PAID+6, PAID+7, PAID+8, PAID+9, PAID+10
>> BW0	EN1+7*, EN1+8, PT+1, PT+6, EVAL+5, EVAL+9, EVAL+11, PAGE2+1, PAID+3, PAID+4 , PAID+12, FILE+4, FILE+15, FILE+16, FILE+17
>> BWBEGDT	EN1+8, PT+7
>> BWCDC(	PAID+2, PAID+6, FILE+12, FILE+13, FILE+14, FILE+15, FILE+16, FILE+17, FILE+18, FILE+19 , FILE+20, FILE+21, FILE+22, FILE+23, FILE+24, FILE+25, FILE+26, FILE+27, FILE+28, FILE+29 , FILE+32, FILE+33, FILE+34, FILE+35, FILE+36, FILE+37, FILE+38, FILE+39, FILE+40, FILE+45 , FILE+47, FILE+48, FILE+49, FILE+50, FILE+51, FILE+52, FILE+53, FILE+54, FILE+56, FILE+58* , FILE+59, FILE+60, FILE+61, FILE+62, FILE+63, FILE+64, FILE+65, FILE+66, FILE+67, FILE+68* , FILE+69, FILE+70, FILE+71, FILE+74!
>> BWCUTF	PT+9
>> BWCUTO	PT+10
>> BWDFN	PT+4*, PT+5, PT+6, MCARE+1, MCARE+5, MCARE+6, FILE+71
>> BWDT	MCARE+1, MCARE+7, FILE+4*
>> BWENDDT	EN1+8, PT+8
>> BWIEN	EVAL+19*, PAID+2, PAID+6, FILE+7, FILE+12, FILE+13, FILE+14, FILE+15, FILE+16, FILE+17 , FILE+18, FILE+19, FILE+20, FILE+21, FILE+22, FILE+23, FILE+24, FILE+25, FILE+26, FILE+27 , FILE+28, FILE+29, FILE+32, FILE+33, FILE+34, FILE+35, FILE+36, FILE+37, FILE+38, FILE+39 , FILE+40, FILE+45, FILE+47, FILE+48, FILE+49, FILE+50, FILE+51, FILE+52, FILE+53, FILE+54 , FILE+56, FILE+58, FILE+59, FILE+60, FILE+61, FILE+62, FILE+63, FILE+64, FILE+65, FILE+66 , FILE+67, FILE+68, FILE+69, FILE+70, FILE+71, FILE+74
>> BWMAM	FILE+10*, FILE+17
>> BWPAP	FILE+11*, FILE+16
>> BWPNDA	EN1+2*, EN1+4
BWQUIT	MCARE+2!, MCARE+5, MCARE+7, RACE+2!, RACE+10, FILE+1!, FILE+3!, FILE+6!
>> BWSILENT	FILE+73
BWT	EVAL+4!
BWT0	EXIT!
BWT2	EXIT!
BWTCBE	EXIT!, FILE+74!
BWTCBE(	PAGE2+12, F1+4, DXWU+2*
BWTCBE("CBE P	AID" , FILE+30, FILE+31, FILE+32
BWTCBE(20	PAGE2+29, FILE+27, SETUP+1
BWTCBE(21	PAGE2+7, PAGE2+11, PAGE2+26, PAGE2+27, FILE+8, FILE+9, FILE+28, FILE+30, FILE+31, SETUP+2*
BWTCBE(22	PAGE2+30, FILE+8, FILE+9*, FILE+29
BWTCBE(23	FILE+8, FILE+9, SETUP+3*
BWTCBE(27	SETUP+4*
BWTCBE(29	SETUP+5*
BWTCBE(32	FILE+36, SETUP+6*
BWTCBE(33	FILE+37
BWTCBE(35	EVAL+11, EVAL+12, FILE+38, FILE+41, FILE+42, SETUP+7
BWTCBE(36	PAGE2+5, DXWU+1, FILE+39, FILE+54, SETUP+9*
BWTCBE(37	FILE+2, FILE+9, FILE+40
BWTCBE(38	PAID+2, PAID+3, PAID+4, PAID+7, PAID+10, PAID+11, PAID+16, PAID+17, FILE+41, FILE+42 , FILE+43*, FILE+45, FILE+46
BWTCBE(52	PAGE2+28*, FILE+49
BWTCBE(53	PAGE2+19*, FILE+50
BWTCBE(54	PAGE2+20*, FILE+51
BWTCBE(55	PAGE2+21*, FILE+52
BWTCBE(56	PAGE2+22*, FILE+53
BWTCBE(57	PAGE2+14*, FILE+54
BWTCBE(58	PAGE2+14, FILE+55, FILE+56
BWTCBE(59	PAGE2+14, FILE+57, FILE+58
BWTCBE(60	PAGE2+23*, FILE+62
BWTCBE(61	PAGE2+1*, FILE+63
BWTCBE(62	PAGE2+24*, FILE+64
BWTCBE(63	PAGE2+15*, PAGE2+16, FILE+65
BWTCBE(64	PAGE2+15*, FILE+67
BWTCBE(65	PAGE2+17, PAGE2+23, FILE+68
BWTCBE(66	FILE+69
BWTDAT	EXIT!, EVAL+9*, EVAL+10, EVAL+14, ENDATE+1~
BWTDATE	EXIT!
BWTDATX	EXIT!, ENDATE+1~
BWTI	EXIT!
BWTINTV	EVAL+21!
BWTJ	EXIT!
BWTP2	EXIT!, EN1+6*, EVAL+21!, PAGE2+4, PAGE2+7, PAGE2+8, PAGE2+30
BWTPATDA	EXIT!, PT+2*, PT+3, PT+4, PT+9, PT+10, PT+11, ENDATE+2
BWTPCDDA	EXIT!, EN1+3, EN1+4, EN1+5, EN1+6, EN1+7, EN1+9, PT~, EVAL+19, USED+1 , FILE+46, ENDATE+3
BWTPDAX	EXIT!
BWTPN	EXIT!
BWTPNDA	EXIT!
BWTQUIT	EVAL+1!, EVAL+3!, PAGE2+2!, PAGE2+4, PAGE2+13, PAGE2+31!, ENDATE+6
>> BWTSEL	PT+5
>> BWTSEL(	PT+5
D	MCARE+3~, MCARE+6*
DATE	RACE~, RACE+3, RACE+5, RACE+6
DT	PAID+13
DUZ(2	PAID+1, PAID+3, PAID+4, RACE+4, FILE+2, FILE+14
IO(0	FILE+73
J	PAGE2+3~, PAGE2+4, PAGE2+5, PAGE2+6, PAGE2+14, PAGE2+15, PAGE2+16, PAGE2+17, PAGE2+18, PAGE2+19 , PAGE2+20, PAGE2+21, PAGE2+22, PAGE2+23, PAGE2+24, PAGE2+25, PAGE2+27, PAGE2+28, PAGE2+29, FILE+60
>> K	PAGE2+12*
>> NEW	FILE+8, FILE+9
U	EN1+5, EN1+8, PT+2, PT+6, PT+7, PT+8, PT+11, EVAL+6, EVAL+7, EVAL+9 , EVAL+11, PAGE2+1, PAGE2+4, PAGE2+7, PAGE2+8, PAGE2+26, PAGE2+30, MCARE+6, MCARE+7, PAID+1 , PAID+3, PAID+4, PAID+12, FILE+4, FILE+14, FILE+15, FILE+16, FILE+17, ENDATE+2, ENDATE+3
X	PT+1, PT+2, PT+7, PT+8, EVAL+5, EVAL+6, EVAL+7, PAGE2+3~, PAGE2+4, PAGE2+5 , PAGE2+6, PAGE2+8, PAGE2+9, PAGE2+14, PAGE2+15, PAGE2+16, PAGE2+17, PAGE2+18, PAGE2+19, PAGE2+20 , PAGE2+21, PAGE2+22, PAGE2+23, PAGE2+24, PAGE2+26, PAGE2+27, PAGE2+28, PAGE2+29, DXWU+2, MCARE+3~ , MCARE+4, MCARE+5, MCARE+6, FILE+59, FILE+60, FILE+61, FILE+66, ENDATE+6
>> X1	ENDATE+2*, ENDATE+4
>> X2	ENDATE+3*, ENDATE+4
XMINUS	EXIT!, EVAL+21!
XX	EVAL+13~, EVAL+14, PAGE2+9, PAGE2+16, PAGE2+18, PAGE2+27, F1+1, F1+2, F1+3, F1+4
Y	MCARE+3~, MCARE+6*, MCARE+7
YY	EVAL+13~, EVAL+15, PAGE2+10, PAGE2+16, PAGE2+18, PAGE2+27*, F1+1, F1+4
Z	MCARE+3~
>> ZZ	RACE+8*, RACE+9

Customize PDF page

Package: Women's Health

Routine: BWMDET

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: