Routine: BTIUPCC3

Package	Total	Call Graph
Health Summary Components	1	$$FIXDT^BHSFAM1
IHS VA Utilities	1	ENP^XBDIQ1
Taxonomy	1	$$ICD^ATXAPI
VA Fileman	1	$$GET1^DIQ

Entry Points

Name	Comments	DBIA/ICR reference
EDC
OLD	;Get the reproductive history using the old fields
LMP	;Get the LMP data
HOSCHK	;
CHKCPT	;Check for surgical CPT codes
END
SURG(DFN,DATE)	;EP ; returns multi-line listing of patient's surgical history;PATC ; If DATE=1, return date each item obtained
REPRO(DFN,TARGET,MODE)	;EP Return reproductive history
NEW	;Get the reproductive history using the new fields
CONT(MODE)	;Get contraception data

External References

Name	Field # of Occurrence
$$ICD^ATXAPI	HOSCHK+5, CHKCPT+8
$$FIXDT^BHSFAM1	CONT+8, CONT+9
$$GET1^DIQ	REPRO+6, NEW+1, NEW+2, NEW+3, NEW+4, NEW+5, NEW+6, NEW+7, OLD+11, OLD+13 , LMP+2, LMP+7, EDC+1, EDC+4
ENP^XBDIQ1	SURG+13, CHKCPT+9

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUPNREP - [#9000017]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX("B"	HOSCHK+5, CHKCPT+8
^AUPNREP - [#9000017]	REPRO+4, REPRO+5, CONT+4, CONT+5, CONT+6, CONT+8, CONT+9, CONT+22
^AUPNVCPT - [#9000010.18]	CHKCPT+2
^AUPNVCPT("C"	SURG+21
^AUPNVPRC("AA"	SURG+11, SURG+12
^AUPNVPRC("AC"	SURG+9
^AUTTCM - [#99999.11]	CONT+7
^DPT - [#2]	REPRO+3
^ICPT - [#81]	CHKCPT+4
^TMP("BTIUPCC3"	SURG+5!, SURG+9, SURG+18, SURG+23, CHKCPT+13*

Label References

Name	Line Occurrences
CHKCPT	SURG+22
CONT	NEW+24
EDC	LMP+9
END	REPRO+3, REPRO+4
HOSCHK	SURG+14
LMP	OLD+16
NEW	REPRO+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARRAY	HOSCHK+3~
ARRAY2	CHKCPT+6~
BHC	CONT+1~, CONT+6*, CONT+7
BHSICD	SURG+3~, SURG+15, HOSCHK+5, HOSCHK+11
BHX	CONT+1~, CONT+4*, CONT+5, CONT+6, CONT+8, CONT+9, CONT+22
BTIUDFN	SURG+3~, SURG+12*, SURG+13
BTIUIVD	SURG+3~, SURG+11, SURG+12, SURG+21, CHKCPT+2, CHKCPT+9
BTIUM	REPRO+1~
BTIUN	REPRO+1~, REPRO+5*, OLD+1, OLD+12, LMP+9
BTIUSQ	SURG+3~, SURG+11*
CCNT	CONT+1~, CONT+2, CONT+12, CONT+16, CONT+20
CNT	REPRO+1~, NEW+8, NEW+9, NEW+10, NEW+11, NEW+12, NEW+13, NEW+14, NEW+15, NEW+16* , NEW+17, NEW+18, NEW+19, NEW+20, NEW+21, NEW+22, NEW+23, OLD+10, OLD+11, OLD+14* , OLD+15, LMP+3, LMP+5, LMP+8, EDC+2, EDC+3, EDC+5, CONT+3, CONT+12, CONT+14 , CONT+16, CONT+18, CONT+20, CONT+23
CODE	CHKCPT+1~, CHKCPT+4*, CHKCPT+5
COUNT	SURG+3~, SURG+4, SURG+10, SURG+18, CHKCPT+13
CPTIEN	CHKCPT+1~, CHKCPT+3*, CHKCPT+4, CHKCPT+8
DATE	SURG~, SURG+17, CHKCPT+12
DFN	REPRO~, REPRO+3, REPRO+4, REPRO+5, REPRO+6, NEW+1, NEW+2, NEW+3, NEW+4, NEW+5 , NEW+6, NEW+7, OLD+11, OLD+13, LMP+2, LMP+7, EDC+1, EDC+4, SURG~, SURG+9 , SURG+11, SURG+12, SURG+21, CONT+4, CONT+5, CONT+6, CONT+8, CONT+9, CONT+22
EC	REPRO+1~, NEW+4*, NEW+17
EDCDT	EDC~, EDC+4*, EDC+5
END	CONT+1~, CONT+9*, CONT+11, CONT+19, CONT+23
FPBEGIN	LMP+1~, LMP+7*, LMP+8
FPDATE	LMP+1~, LMP+7*, LMP+8
FT	REPRO+1~, NEW+2*, NEW+13
G	REPRO+1~, REPRO+6*, NEW+9
GRAV	REPRO+1~, OLD+4*, OLD+9
HOW	EDC~, EDC+4*, EDC+5
LC	REPRO+1~, NEW+5, NEW+19, OLD+6, OLD+9
LIN1	CONT+1~, CONT+21, CONT+22, CONT+23
LINE	SURG+3~, SURG+8, SURG+16, SURG+17, SURG+18, CHKCPT+11, CHKCPT+12, CHKCPT+13, CONT+1~, CONT+10 , CONT+13, CONT+14, CONT+17, CONT+18
MB	REPRO+1~, NEW+1*, NEW+11
MODE	REPRO~, NEW+24, CONT~, CONT+11, CONT+15
OTHER	REPRO+1~, OLD+4, OLD+5, OLD+6, OLD+7, OLD+8
PARA	REPRO+1~, OLD+5*, OLD+9
PRE	REPRO+1~, NEW+3*, NEW+15
REC	CHKCPT+1~, CHKCPT+2*, CHKCPT+3
SA	REPRO+1~, NEW+7, NEW+23, OLD+7, OLD+9
START	CONT+1~, CONT+8*, CONT+13, CONT+17
TA	REPRO+1~, NEW+6, NEW+21, OLD+8, OLD+9
TARGET	REPRO~, REPRO+2, REPRO+3, REPRO+4, END, NEW+9, NEW+11, NEW+13, NEW+15, NEW+17 , NEW+19, NEW+21, NEW+23, OLD+11, OLD+15, LMP+5, LMP+8, EDC+3, EDC+5, CONT+3 , CONT+14, CONT+18, CONT+23
TAXIEN	HOSCHK+3~, CHKCPT+6~
TIUA	SURG+3~, SURG+13!, CHKCPT+9!
TIUA(	SURG+16, SURG+17, HOSCHK+5, CHKCPT+11, CHKCPT+12
TIUX	SURG+3~, SURG+8*
TOT	REPRO+1~, OLD+9*, OLD+11
TYP	CONT+1~, CONT+7*, CONT+10
U	REPRO+3, OLD+1, OLD+12, LMP+9, CHKCPT+3, CHKCPT+4, CONT+6, CONT+7, CONT+8, CONT+9 , CONT+22
X	REPRO+1~, OLD+1, OLD+3, OLD+4, OLD+12, OLD+13, OLD+15, LMP+2, LMP+4, LMP+5 , LMP+8, LMP+9, EDC~, EDC+1, EDC+3, EDC+5

Customize PDF page

Package: IHS Mods To Text Integration Utilities

Routine: BTIUPCC3

Information

Source Information

Call Graph

Call Graph Total: 4

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: