Routine: BSDLCA1

Information

BSDLCA1 ; IHS/ANMC/LJF - CLERK WHO MADE APPT TOTALS ; [ 03/01/2004 2:16 PM ]

Source file <BSDLCA1.m>

Package	Total	Call Graph
Kernel	3	^%ZISC $$REPEAT^XLFSTR DISP^XQORM1
Registration	3	EN^VALM TERM^VALM0 CLEAR^VALM1
IHS Changes To ADT	1	$$RANGE^BDGF
IHS Changes To Scheduling	1	$$ACTV^BSDU
VA Fileman	1	$$GET1^DIQ

Package	Total	Caller Graph
IHS Changes To Scheduling	1	BSDLCA

Name	Comments	DBIA/ICR reference
SET(DATA)	; -- sets ^tmp with display line
ALL	; -- all clinics
EN	;EP; -- main entry point for SD IHS APPT MADE BY
HDR	;EP; -- header code
PERCENT(X,Y)	; -- returns % of y in x
HD(X)	; -- heading
SP(N)	; -- returns N number of spaces
AGE(X)	; -- age
D(Y)	; -- date
1	; -- loop clinics
PAD(DATA,LENGTH)	; -- SUBRTN to pad length of data
INIT	; -- gather data
EXIT	; -- exit code
PRINT	; -- prints list to paper
DISPLAY	; -- create ^tmp for list template display
HELP	; -- help code

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Function Call: WRITE	Prompt: !,^TMP("BSDLCA",$J,BSDLN,0) Line Location: PRINT+5
Function Call: WRITE	Prompt: @IOF Condition for execution: X Line Location: HD+1
Function Call: WRITE	Prompt: !!,?27,"NUMBER OF APPTS MADE BY USERS",! Line Location: HD+1
Function Call: WRITE	Prompt: !?1,"Clinic Name",?25,"User Name",?47,"# of Appts Made" Line Location: HD+2
Function Call: WRITE	Prompt: ?65,"% of Total",!,$$REPEAT^XLFSTR("=",79),! Line Location: HD+3
Routine Call	VALM Line Location: EN+3

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	D+2
^SC - [#44]	ALL+1, ALL+2, 1+2, 1+4, 1+5, 1+6
^TMP("BSDLCA"	INIT+2!, EXIT+1!, DISPLAY+2!, SET+2, SET+3, PRINT+3, PRINT+5
^TMP("BSDLCA1"	INIT+2!, EXIT+1!, 1+9, 1+12, DISPLAY+3, DISPLAY+5, DISPLAY+9, DISPLAY+10, DISPLAY+11
^VA(200 - [#200]	1+7

Name	Field # of Occurrence
%DT	EXIT+2!
BSDBDT	HDR+1, EXIT+2!, ALL+3, 1+3
BSDEDT	HDR+1, EXIT+2!, 1+4
BSDLN	EXIT+2!, DISPLAY+2, DISPLAY+16, SET+1, SET+2, SET+3, PRINT+1~, PRINT+3*, PRINT+5
BSDTYP	EXIT+2!
CLN	1+1~, 1+2, 1+9, 1+12, DISPLAY+1~, DISPLAY+3, DISPLAY+5, DISPLAY+9, DISPLAY+10, DISPLAY+11
COUNT	1+1~, 1+8*, 1+12
D	D+1~, AGE+1~
DATA	SET~, SET+2, PAD~, PAD+1
DATE	1+1~, 1+3, 1+4, 1+5, 1+6
IO	PRINT+2
IOF	HD+1
IOSL	PRINT+4
IOST	EN+1
LENGTH	PAD~, PAD+1
LINE	DISPLAY+1~, DISPLAY+5, DISPLAY+6, DISPLAY+12, DISPLAY+13*, DISPLAY+14
N	D+1~, AGE+1~, SP~, SP+1
NM	1+1~, 1+7, 1+9, DISPLAY+1~, DISPLAY+9, DISPLAY+10, DISPLAY+11, DISPLAY+12
NODE	1+1~, 1+6*, 1+7
NUM	DISPLAY+1~, DISPLAY+11*, DISPLAY+12, DISPLAY+13
P	D+1~, AGE+1~
PAT	1+1~, 1+5*, 1+6
SC	INIT+1~, INIT+5, ALL+1, ALL+2, ALL+3, 1+2, 1+4, 1+5, 1+6
SD	INIT+1~, INIT+4, INIT+5
TOTAL	DISPLAY+1~, DISPLAY+5*, DISPLAY+13
U	ALL+2, 1+2, 1+7
USR	1+1~, 1+7, 1+9, DISPLAY+1~, DISPLAY+10, DISPLAY+11
VALMBCK	EXIT+2!
VALMCNT	EN+2~, EXIT+2!, DISPLAY+16*
VALMHDR	EXIT+2!
VALMHDR(1	HDR+1*
VAUTC	INIT+3, EXIT+2!
VAUTC(	INIT+5
VAUTD	EXIT+2!
VAUTD(	ALL+2
VAUTD(0	ALL+2
X	HELP+1*, PERCENT~, PERCENT+1, HD~, HD+1, AGE~, AGE+2
Y	PERCENT~, PERCENT+1, D~, D+2