Routine: BCHDLA1

Information

BCHDLA1 ; IHS/TUCSON/LAB - PROCESS CHR RECORD LIST ; [ 06/26/02 5:49 AM ]

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
IHS VA Utilities	2	$$VAL^XBDIQ1 ^XBGSAVE
IHS Patient Registration	1	$$UID^AGTXID
Kernel	1	($$FMADD,$$FMTE)^XLFDT
Patient Care Component Reports	1	$$^APCLDF
VA Fileman	1	^DIE

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
IHS RPMS CHR System	1	BCHDLA

Entry Points

Name	Comments	DBIA/ICR reference
MULTFILE	; information regarding multiple files
PP	;
END	;
NAME
EOJ	;
TX(DFN)	;create tx record
QU(X)	;quote a string
SCREENS	;
START	;
SINGLE	;
COMM	;
LASTVD(P,F)	;PEP - given patient DFN, return pt's last pcc visit date, using ; the data fetcher. Returns date in format specified in F.
FILE	; setup file name(s)
H	;HRN
PRINT	;EP CALLED FROM XBDBQUE
WRITEFX	;
PROC	;
MULT	;
WRITEF	;EP - write out flat file

External References

Name	Field # of Occurrence
$$UID^AGTXID	H+11
$$^APCLDF	LASTVD+6
^DIE	PRINT+16
$$VAL^XBDIQ1	H+8
^XBGSAVE	WRITEF+5
$$FMADD^XLFDT	START+1
$$FMTE^XLFDT	LASTVD+11

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: MULTFILE+3
Function Call: WRITE	Prompt: !?5,"/usr/spool/uucppublic/",BCHFILE(BCHFNUM),?45,"("_BCHFILE(BCHFNUM,"COUNT")_") patients",! Line Location: MULTFILE+6
Routine Call	DIE Line Location: PRINT+16

FileNo	Call Tags
^BCHSITE - [#90002.31]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AGPATCH(	PP+1, PP+2, PP+3
^APCCCTRL - [#9001000]	H+3
^AUPNPAT - [#9000001]	PP+4, PROC+1, NAME+4, COMM+1, COMM+3, H+2, H+3, H+4, H+5
^AUPNVSIT("AC"	LASTVD+4
^AUTTCOM - [#9999999.05]	COMM+3
^AUTTLOC - [#9999999.06]	H+11
^AUTTSITE(1	H+11
^AUTTTRI - [#9999999.03]	NAME+5
^BCHSORT - [#90002.41]	SCREENS+3, SINGLE+2, MULT+2
^BCHTRPT - [#90002.42]	SCREENS+2, SINGLE+4, MULT+4
^DPT - [#2]	PP+5, PP+6, NAME, H+6, H+7, H+9, H+10
^TMP($J	PRINT+4!, PRINT+9*, WRITEFX+2!
^XTMP("BCHDL"	START+1, PP+7, PROC+5, PRINT+7, PRINT+8, PRINT+9, WRITEFX+3!

Label References

Name	Line Occurrences
$$TX	PROC+5
@(	START+4
END	START+6
EOJ	END+1
MULT	SCREENS+4
PRINT	START+5
PROC	PP+8
SCREENS	PROC+3
SINGLE	SCREENS+3
WRITEF	PRINT+13
WRITEFX	PRINT+15

Naked Globals

Name	Field # of Occurrence
^(0	NAME
^(1	SINGLE+2, MULT+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	TX+1~, COMM+1*
%1	TX+1~, COMM+1, COMM+2, COMM+3
A	TX+1~
BCHBTH	START+2*, PP+7, PROC+5, PRINT+7, PRINT+8, PRINT+9, WRITEFX+3!
BCHC	START+2*, EOJ+2!
BCHCOUNT	EOJ+1!, PRINT+6, FILE+4, FILE+6
BCHD	START+2*, EOJ+2!
>> BCHDLDT	PP+1
>> BCHDT	PP+1*, PP+2, PP+3
BCHFAC	EOJ+2!, H+1, H+2, H+3, H+4*, H+11
>> BCHFILE	FILE+2*, FILE+3, WRITEF+2
>> BCHFILE(	FILE+3, FILE+4, MULTFILE+6
BCHFNUM	EOJ+2!, PRINT+6, FILE+1, FILE+2, FILE+3, FILE+4, FILE+5, MULTFILE+5, MULTFILE+6, MULTFILE+8! , WRITEFX+5!
BCHFOUN	EOJ+1!, MULT+1!, MULT+4, MULT+5, MULT+6
>> BCHI	SCREENS+2*, SCREENS+3, SINGLE+2, SINGLE+4, MULT+2, MULT+4
BCHJD	EOJ+1!
BCHJOB	START+2*, PP+7, PROC+5, PRINT+7, PRINT+8, PRINT+9, WRITEFX+3!
>> BCHLOC	PP+2*, PP+3
BCHMULTI	PRINT+6, FILE+5, MULTFILE+2, WRITEFX+1, WRITEFX+5!
BCHN	MULTFILE+6*, MULTFILE+8!, WRITEFX+5!
BCHPCNT	EOJ+1!
BCHPROC	START+3*, START+4, EOJ+1!
>> BCHPTVS	START+3, PROC+2
BCHR	EOJ+1!
BCHRORD	EOJ+2!, PRINT+6, PRINT+7, WRITEFX+5!
>> BCHRPT	SCREENS+2, SINGLE+4, MULT+4
BCHSKIP	EOJ+1!, PROC+4, SCREENS+1!, SCREENS+2, SINGLE+3, SINGLE+4, MULT+1!, MULT+3, MULT+6
BCHSPEC	SINGLE+1!, SINGLE+4, MULT+1!, MULT+4, MULT+5
BCHTOTAL	EOJ+1!, PRINT+6, PRINT+12, MULTFILE+4, WRITEFX+1
>> BCHTYPE	START+3
BCHX	EOJ+1!, SINGLE+1, MULT+1, PRINT+6, PRINT+8, PRINT+9, WRITEFX+3!
C	TX+1~, COMM+1, COMM+3, H+11
CTY	TX+1~, H+7*, H+11
D	EOJ+3!
D0	EOJ+3!
>> DA	PRINT+16*
DFN	PP+3*, PP+4, PP+5, PP+6, PP+7, EOJ+3!, PROC+1, PROC+2, PROC+5, TX~ , NAME, NAME+4, COMM+1, COMM+3, H+2, H+3, H+4, H+5, H+6, H+7 , H+8, H+9, H+10, H+11
DI	EOJ+3!
DIC	EOJ+3!
>> DIE	PRINT+16*
DOB	TX+1~, NAME, NAME+3, H+11
DQ	EOJ+3!
>> DR	PRINT+16*
DT	START+1, PRINT+16
DUZ(2	H+1, PRINT+16
ERR	LASTVD+5~, LASTVD+6*
F	LASTVD~, LASTVD+3*, LASTVD+11
FN	TX+1~, NAME+1*, H+11
H	TX+1~, H+2, H+3, H+4*, H+11
HPH	TX+1~, H+10*, H+11
IOF	MULTFILE+3
J	EOJ+3!
LN	TX+1~, NAME+1*, H+11
LVD	LASTVD+5~, LASTVD+7
LVD(1	LASTVD+7, LASTVD+8
>> M	H+5*, H+11
MN	TX+1~, NAME+1*, H+11
N	TX+1~, NAME*, NAME+1
P	LASTVD~, LASTVD+2, LASTVD+4, LASTVD+6
R	TX+1~, H+11*, H+12
S	TX+1~, NAME*, H+11
SA	TX+1~, H+6*, H+11
SSN	TX+1~, NAME*, H+11
ST	TX+1~, H+8*, H+11
T	TX+1~, NAME+4, NAME+5, H+11
U	START+1, PP+6, SCREENS+3, NAME, NAME+4, NAME+5, COMM+3, H+2, H+3, H+4 , H+5, H+6, H+7, H+9, H+10, H+11, LASTVD+8
X	SINGLE+1!, SINGLE+3, SINGLE+4, MULT+1!, MULT+5, H+3, QU~, QU+1, QU+2
X(	MULT+4
X(""	MULT+3
>> XBE	WRITEF+3*
XBF	WRITEF+3*, WRITEFX+4!
XBFLG	EOJ+3!
XBFLT	WRITEF+3*, WRITEFX+4!
XBFN	WRITEF+2*, WRITEFX+4!
XBGL	WRITEF+1*, WRITEFX+4!
XBMED	WRITEF+2*, WRITEFX+4!
XBQ	WRITEF+3*, WRITEFX+4!
XBTLE	WRITEF+2*, WRITEFX+4!
Y	EOJ+3!, MULT+4, LASTVD+5~, LASTVD+8, LASTVD+11
ZIP	TX+1~, H+9*, H+11
>> ZTQUEUED	MULTFILE+1, MULTFILE+4, MULTFILE+7, WRITEF+4, WRITEFX+1

Customize PDF page

Package: IHS RPMS CHR System

Routine: BCHDLA1

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: