Routine: BSDFRL

Package	Total	Call Graph
Kernel	4	^%ZISC $$FMTE^XLFDT $$REPEAT^XLFSTR DISP^XQORM1
Registration	4	ZIS^DGUTQ EN^VALM TERM^VALM0 CLEAR^VALM1
IHS Changes To ADT	2	($$CONF,$$READ,MSG)^BDGF ($$DEAD,$$DOD,$$HRCN,$$HRCND,$$HRCNT,$$INSUR)^BDGF2
IHS Changes To Scheduling	2	START^BSDFRL ($$ACTV,$$CLNCODE,$$DIV,$$DIVC,$$FAC,$$PRIN,CLINIC)^BSDU
VA Fileman	1	$$GET1^DIQ

Package	Total	Caller Graph
IHS Changes To Scheduling	1	BSDFRL

Entry Points

Name	Comments	DBIA/ICR reference
HDR	;EP; -- report heading
CHKOC(CLN,PAT,DATE)	;-- check to see if the patient has another appointment on today
PAD(D,L)	;EP -- SUBRTN to pad length of data ; -- D=data L=length
SP(N)	; -- SUBRTN to pad N number of spaces
OKAY(CLN)	; -- returns 1 if okay to use in file room list
SOME	; -- loop thru selected clinics
DATE	; -- select date
TM(T)	; -- cmi/anch/maw 11/5/26 item 1007.07 patch 1007 return trailing zeroes on time
PRINT	; -- print to paper
SORTS	; -- sort by
HEADING	; -- heading for paper report
HELP	;EP; -- help for SORTS question
SET(DATA,LINE)	; -- puts data into display array
EN	;EP; -- entry for list manager interface
START	;EP; entry to report after calling print device
CLINIC	; -- all clinics or selected ones? ; if ALL clinics are selected, VAUTC=1 ; otherwise the VAUTC array is set and VAUTC=0
DEVICE	; -- select device
ALL	; -- loop thru all clinics
CHTRQ	; -- ask to include chart requests ;IHS/ITSC/LJF 1/9/2004
GATHER	;EP; -- gathers data and sets into display array ; build sorted array
GETAPPT	; -- for clinic, get appts & chart requests for date
EXIT	;
HELP1	;
DOB(PAT)	; -- return date of birth in numerical format with leading zeros

External References

Name	Field # of Occurrence
^%ZISC	PRINT+15
$$CONF^BDGF	HDR+1
$$READ^BDGF	DATE+1, SORTS+7, CHTRQ+1
MSG^BDGF	HELP+1, HELP+2, HELP+3, HELP+4, HELP+5, HELP+6, HELP+7
$$DEAD^BDGF2	GETAPPT+40
$$DOD^BDGF2	GETAPPT+40
$$HRCN^BDGF2	GETAPPT+16
$$HRCND^BDGF2	GETAPPT+19
$$HRCNT^BDGF2	GETAPPT+17
$$INSUR^BDGF2	GETAPPT+32, GETAPPT+36
START^BSDFRL	DEVICE+5
$$ACTV^BSDU	ALL+4, SOME+5
$$CLNCODE^BSDU	GETAPPT+12
$$DIV^BSDU	SORTS+6
$$DIVC^BSDU	ALL+5, GETAPPT+18
$$FAC^BSDU	GETAPPT+16
$$PRIN^BSDU	GETAPPT+13
CLINIC^BSDU	CLINIC+3
ZIS^DGUTQ	DEVICE+4
$$GET1^DIQ	SORTS+6, GETAPPT+11, GETAPPT+14, GETAPPT+18, GETAPPT+23, GETAPPT+25, OKAY+1, OKAY+3, OKAY+4, DOB+1
EN^VALM	EN+2
TERM^VALM0	EN+1
CLEAR^VALM1	EN+3
$$FMTE^XLFDT	HDR+3, GETAPPT+31
$$REPEAT^XLFSTR	HEADING+6, PAD+2
DISP^XQORM1	HELP1+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,^TMP("BSDFRL",$J,BSDLN,0) Line Location: PRINT+13
Function Call: WRITE	Prompt: @IOF,!,VALMHDR(1),!,VALMHDR(2) Line Location: HEADING+2
Function Call: WRITE	Prompt: !,?3,"HRCN",?9,"Patient Name",?33,"Clinic",?58,"Appt Time",?68,"Insurance",!,$$REPEAT^XLFSTR("=",79),! Line Location: HEADING+6
Function Call: WRITE	Prompt: !! Line Location: HELP1+1
Routine Call	VALM Line Location: EN+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^SC - [#44]	GET1^DIQ
^BSDPAR - [#9009020.2]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^SC - [#44]	ALL+2, GETAPPT+4, GETAPPT+6, GETAPPT+7
^TMP("BSDFRL"	GATHER+2!, PRINT+7, PRINT+10, PRINT+13, EXIT+1!, SET+2*
^TMP("BSDFRL1"	GATHER+2!, GATHER+7, GATHER+16, GATHER+17, GATHER+18, GATHER+19, GATHER+23!, CHKOC+4, CHKOC+7, CHKOC+8 , CHKOC+10, CHKOC+13, CHKOC+14, CHKOC+15, CHKOC+16, GETAPPT+38, GETAPPT+40

Label References

Name	Line Occurrences
$$OKAY	ALL+3, SOME+4
$$PAD	GETAPPT+25, GETAPPT+29, GETAPPT+31, GETAPPT+32, GETAPPT+35, GETAPPT+36, SP+1
$$SP	HDR+1, HDR+3, GATHER+12, GATHER+14, GETAPPT+40
$$TM	GATHER+12
@(	GATHER+3
CHKOC	GATHER+20
EXIT	CLINIC+3, SORTS+10, DEVICE+4, PRINT+15
GATHER	START+2
GETAPPT	ALL+6, SOME+6
HDR	HEADING+2
HEADING	PRINT+4, PRINT+5, PRINT+10, PRINT+11
PRINT	START+2
SET	GATHER+12, GATHER+14, GATHER+19, CHKOC+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	GATHER+6~, GATHER+7*, GATHER+12, GATHER+14, GATHER+16, GATHER+17, GATHER+18, GATHER+19, GATHER+20
B	GATHER+6~, GATHER+16*, GATHER+17, GATHER+18, GATHER+19
BSDCL	SOME+1~, SOME+2*, SOME+3
BSDCLN	ALL+1~, ALL+2, ALL+3, ALL+4, ALL+5, SOME+1~, SOME+3, SOME+4, SOME+5, GETAPPT+4 , GETAPPT+6, GETAPPT+7, GETAPPT+11, GETAPPT+12, GETAPPT+13, GETAPPT+16, GETAPPT+18, GETAPPT+25
BSDCRI	BSDFRL+6~, CHTRQ+1*, GETAPPT+1
BSDDFN	GETAPPT+2~, GETAPPT+10*, GETAPPT+14, GETAPPT+32, GETAPPT+36
BSDDT	BSDFRL+6~, DATE+1*, DATE+2, HDR+3, ALL+4, SOME+5, GETAPPT+3
BSDEND	GETAPPT+2~, GETAPPT+3*, GETAPPT+4
BSDLN	GATHER+6, GATHER+12, GATHER+14, GATHER+19, GATHER+22, CHKOC+15, PRINT+3~, PRINT+7, PRINT+10, PRINT+13 , EXIT+1!
BSDN	GETAPPT+2~, GETAPPT+5, GETAPPT+6, GETAPPT+7
BSDSRT	BSDFRL+6~, SORTS+7*, SORTS+10, GATHER+9, GATHER+11, GATHER+20, GETAPPT+11, GETAPPT+12, GETAPPT+13, GETAPPT+14 , GETAPPT+15, GETAPPT+20, PRINT+4, PRINT+5, PRINT+10
BSDSUB	ALL+1~, ALL+6, SOME+1~, SOME+6, GETAPPT+1, GETAPPT+4, GETAPPT+6, GETAPPT+7, GETAPPT+27, GETAPPT+34
BSDT	GETAPPT+2~, GETAPPT+3, GETAPPT+4, GETAPPT+6, GETAPPT+7, GETAPPT+15, GETAPPT+31, GETAPPT+32, GETAPPT+36, GETAPPT+38 , GETAPPT+40
C	GATHER+6~, GATHER+17*, GATHER+18, GATHER+19, GATHER+20
CLN	CHKOC~, CHKOC+5, OKAY~, OKAY+1, OKAY+3, OKAY+4
D	GATHER+6~, GATHER+18*, GATHER+19, GATHER+20, PAD~, PAD+2
DATA	SET~, SET+2
DATE	CHKOC~, CHKOC+2*, CHKOC+11
DGVAR	DEVICE+1~, DEVICE+3*
DIR0	SORTS+1~, SORTS+4*, SORTS+7
DIRA	SORTS+1~, SORTS+5*, SORTS+7
DIRB	SORTS+1~, SORTS+6*, SORTS+7
HRCN	GETAPPT+2~, GETAPPT+16*, GETAPPT+17, GETAPPT+19, GETAPPT+23
I	TM+1~, TM+2*
IO	PRINT+3
IO("Q"	DEVICE+5
IOF	HEADING+2
>> IORVOFF	GETAPPT+40
>> IORVON	GETAPPT+40
IOSL	PRINT+11
J	CHKOC+3~, CHKOC+4*, CHKOC+5, CHKOC+7, CHKOC+8, CHKOC+10, CHKOC+13, CHKOC+14, CHKOC+15, CHKOC+16 , TM+1~
K	CHKOC+3~, CHKOC+7*, CHKOC+8, CHKOC+10, CHKOC+13, CHKOC+14, CHKOC+15, CHKOC+16
L	CHKOC+3~, CHKOC+8*, CHKOC+9, CHKOC+10, CHKOC+13, CHKOC+14, CHKOC+15, CHKOC+16, PAD~, PAD+2
LINE	GETAPPT+2~, GETAPPT+23, GETAPPT+25, GETAPPT+29, GETAPPT+31, GETAPPT+32, GETAPPT+35, GETAPPT+36, GETAPPT+38, SET~ , SET+1, SET+2
M	CHKOC+3~, CHKOC+10*, CHKOC+11, CHKOC+13, CHKOC+14, CHKOC+15, CHKOC+16
N	SP~, SP+1
NODE	GETAPPT+2~, GETAPPT+7*, GETAPPT+10, GETAPPT+16, GETAPPT+23, GETAPPT+29, GETAPPT+38, GETAPPT+40
PAT	CHKOC~, CHKOC+9, DOB~, DOB+1
PGM	DEVICE+1~, DEVICE+3*
POP	DEVICE+1~, DEVICE+4
SIX	CHKOC+12~, CHKOC+13*, CHKOC+16
SORT	GETAPPT+2~, GETAPPT+11, GETAPPT+12, GETAPPT+13, GETAPPT+14, GETAPPT+15, GETAPPT+20, GETAPPT+38, GETAPPT+40
T	TM~, TM+2, TM+3, TM+4
TERM	GETAPPT+2~, GETAPPT+17, GETAPPT+19, GETAPPT+20, GETAPPT+38, GETAPPT+40
U	GETAPPT+10, GETAPPT+29
VALMCNT	EN+1~, GATHER+22*
>> VALMHDR(1	HDR+1*, HEADING+2
>> VALMHDR(2	HDR+2, HDR+3, HEADING+2
VAUTC	BSDFRL+6~, GATHER+3
VAUTC(	SOME+2, SOME+3
VAUTD	BSDFRL+6~, ALL+5
VAUTD(	ALL+5
X	GATHER+3, GETAPPT+2~, HEADING+1~, HELP1+1, OKAY+2~, OKAY+3, OKAY+6, OKAY+7, DOB+1~, DOB+2
Y	CLINIC+3, OKAY+2~, OKAY+4*, OKAY+6, OKAY+8
Z	TM+1~, TM+2*

Customize PDF page

Package: IHS Changes To Scheduling

Routine: BSDFRL

Information

Source Information

Call Graph

Call Graph Total: 13

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

Local Variables

Legend: