Routine: ASDI

Call Graph

Call Graph Total: 14

Package	Total	Call Graph
Scheduling	5	(END,GOT,NEW,OKTD)^SDI CHKSO^SDM DT^SDM0 EN^SDROUT1 DTS^SDUTL
IHS Changes To Scheduling	3	(AIU,EF,HS,MP)^ASDFORM (PAT,WARD)^ASDM ($$DIV,$$HSTYP)^ASDUT
Kernel	3	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD
VA Fileman	2	^DIC ^DIR
IHS VA Utilities	1	$$VAL^XBDIQ1

Package	Total	Caller Graph
IHS View Patient Record	1	BVPSD
Mental Health Social Services	1	AMHVRL2
Scheduling	1	SD IHS WALK-INS

Package

Total

Caller Graph

IHS View Patient Record

BVPSD

Mental Health Social Services

AMHVRL2

Scheduling

SD IHS WALK-INS

Entry Points

Name	Comments	DBIA/ICR reference
CHKR	;EP; called by CHKR to print IHS forms
PAT2	;PEP; called when patient already known ; calling routine must set DFN=patient ien, SDPEP=1,DIV="" ; calling routine must kill SDPEP and pre-save DFN value
END	; -- eoj
FORMS1	;
APPT	; -- SUBRTN to display today's appointments
CHK	; -- SUBRTN to check patient in for appt
CHECKIN()	; -- returns check-in time
CHK2	;PATCH 7
CLN()	; -- returns clinic ien
FORMS	; -- checks if forms to be printed
SCX()	; -- returns multiple ien for patient in ^sc
HS1	;EP; called by ZTLOAD to print forms
HS	; -- prints HS and other forms if set to YES for clinic
CHOOSE	; -- ask what user wants to do
CR	; -- SUBRTN to request chart
PAT	; -- select patient
DFWI()	; -- returns default health summary printer

External References

Name	Field # of Occurrence
^%ZIS	HS+8
HOME^%ZIS	HS+12
^%ZISC	HS1+6
^%ZTLOAD	HS+12
AIU^ASDFORM	HS1+5
EF^ASDFORM	HS1+2
HS^ASDFORM	HS1+3
MP^ASDFORM	HS1+4
PAT^ASDM	PAT+2
WARD^ASDM	PAT2+4
$$DIV^ASDUT	CHKR+6, FORMS+1, DFWI+1
$$HSTYP^ASDUT	FORMS1+1
^DIC	CR+4
^DIR	CHOOSE+6, CHK+13, CHK2+3, CR+15, CHKR+2
END^SDI	END+1
GOT^SDI	CHK+9, CHK+15, CHK2+3
NEW^SDI	CHOOSE+9
OKTD^SDI	CR+16
CHKSO^SDM	APPT+11
DT^SDM0	APPT+11, APPT+19
EN^SDROUT1	CHKR+5
DTS^SDUTL	CR+8, CR+12
$$VAL^XBDIQ1	DFWI+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: CHOOSE+2
Function Call: WRITE	Prompt: ! Line Location: CHOOSE+9
Function Call: WRITE	Prompt: !!,"NO SCHEDULED APPOINTMENTS; CANNOT CHECK IN" Line Location: CHK+2
Function Call: WRITE	Prompt: !,*7,"Clinic is inactive ",$S(SDRE:"from ",1:"as of ") Line Location: CR+11
Function Call: WRITE	Prompt: Y,$S(SDRE:" to "_SDRE1,1:"") Line Location: CR+12
Function Call: WRITE	Prompt: !!?5," NO PENDING APPOINTMENTS FOR TODAY ",! Line Location: APPT+5
Function Call: WRITE	Prompt: !!?20,"** TODAY'S APPOINTMENTS **" Line Location: APPT+7
Function Call: WRITE	Prompt: !,ASDCT Condition for execution: $X>9 Line Location: APPT+11
Function Call: WRITE	Prompt: ?11 Line Location: APPT+11
Function Call: WRITE	Prompt: ?32 Line Location: APPT+11
Function Call: WRITE	Prompt: SDLN,$S($D(^SC(DA,0)):$P(^(0),U),1:"DELETED CLINIC ") Line Location: APPT+12
Function Call: WRITE	Prompt: COV," " Line Location: APPT+13
Function Call: WRITE	Prompt: "UNSCHEDULED" Line Location: APPT+16
Function Call: WRITE	Prompt: !?15,"CHECKED-IN at " Line Location: APPT+19
Function Call: WRITE	Prompt: !!,"Ready to print Health Summary now . . " Line Location: HS+7
Routine Call	%ZIS Line Location: HS+12
Routine Call	DIC Line Location: CR+4
Routine Call	DIR Line Location: CHOOSE+6 CHK+13 CHK2+3 CR+15 CHKR+2
Routine Call	%ZIS Line Location: HS+8

Name	Line Occurrences (* Changed, ! Killed)
^DG(40.8 - [#40.8]	CHKR+6, FORMS+1
^DPT - [#2]	APPT+4, APPT+8, APPT+9, APPT+14, APPT+17, CLN+1
^SC - [#44]	CR+5, CR+7, CR+8, APPT+12, FORMS1+1, FORMS1+2, FORMS1+3, FORMS1+4, HS+3, CHECKIN+3 , CHECKIN+4, CHECKIN+5, SCX+3

Label References

Name	Line Occurrences
$$CHECKIN	APPT+16, APPT+18
$$CLN	CHECKIN+2
$$DFWI	HS+6, HS+9
$$SCX	CHK+9, CHK+15, CHK2+3
APPT	PAT2+3, CHK+11
ASDI	CHOOSE+6
CHK	CHOOSE+7, CHK2+5
CHK2	CHK+6
CR	CHOOSE+8, CR+10
END	PAT+2
FORMS	CHKR+4
FORMS1	HS+4
HS	CHKR+6
PAT	CHOOSE+7, CHOOSE+8, CHOOSE+9

Name	Field # of Occurrence
^(	SCX+3
^("I"	CR+8
^("SL"	CR+5
^(0	APPT+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %ZIS	HS+8*
AGE	END+1!
>> ASD	CHK2+1*
ASDA	END+1!, CHK+2, APPT+1!
ASDA(	CHK+4, CHK+5, CHK+6, CHK+14, CHK+15, CHK+16, APPT+16, APPT+18, APPT+21*
ASDA(0	CHK+3
ASDCKI	APPT+17!, APPT+18*, APPT+19, APPT+21
>> ASDCKO	CHK+6, CHK+16
ASDCR	PAT+2!
ASDCT	END+1!, CHK+12, APPT+1!, APPT+10*, APPT+11, APPT+16, APPT+18, APPT+21
ASDE	END+1!, APPT+1!, APPT+3*, APPT+4, APPT+8
ASDQUIT	PAT+2, END+1!
ASDS	END+1!, APPT+1!, APPT+3, APPT+4, APPT+8, APPT+9, APPT+11, APPT+14, APPT+16, APPT+17 , APPT+18, APPT+21, CHECKIN+3, CHECKIN+4, CHECKIN+5, CLN+1
>> AUPNSEX	CHOOSE+1
CLN	CHECKIN+1~, CHECKIN+2*, CHECKIN+3, CHECKIN+4, CHECKIN+5
>> COV	APPT+13
>> DA	APPT+11*, APPT+12
DFN	PAT+2, END+1!, APPT+4, APPT+8, APPT+9, APPT+14, APPT+17, CHKR+5, FORMS1+1, HS+1~ , HS+2, HS1+2, HS1+3, HS1+4, HS1+5, CHECKIN+4, SCX+3, CLN+1
DIC	CR+1!*, CR+4!
DIC("A"	CR+2*
DIC("S"	CR+3*
DIC(0	CR+1*
DIR	CHOOSE+2!, END+1!, CHK+12!, CHK2+1!, CR+14!, CHKR+1~
DIR("A"	CHOOSE+3, CHOOSE+4, CHOOSE+5, CHOOSE+6, CHK+12, CHK2+2, CR+15, CHKR+2
DIR("B"	CHK2+1, CR+14, CHKR+1*
DIR(0	CHOOSE+2, CHK+12, CHK2+1, CR+14, CHKR+1*
>> DIRUT	CHOOSE+6, CHK+13, CR+15
>> DIV	PAT+2*
DT	CR+10, APPT+3
HRCN	END+1!
>> I	CHK+9, CHK+15, CHK2+3, HS+11
>> I(	CHK+5, CHK+14, SCX+3
IO	HS1+1
ION	HS+9
IOP	CHKR+3!
>> ORDER	CHKR+3*
>> POP	HS+6
QUIT	CHECKIN+1~, CHECKIN+3, CHECKIN+5*
SC	CR+5, CR+7, CR+8, CHKR+5, FORMS1+1, FORMS1+2, FORMS1+3, FORMS1+4, HS+1~, HS+2 , HS+3
SDIN	CR+5!, CR+8*, CR+10, CR+12
>> SDLN	APPT+12
>> SDPEP	PAT+1
>> SDPR	CHK+5, CHK+14, HS1+2, SCX+3
SDRE	CR+5!, CR+8*, CR+10, CR+11, CR+12
SDRE1	CR+5!, CR+8*, CR+12
>> SDREP	CHKR+3*
>> SDSEX	CHOOSE+1*
>> SDSL	CR+5*
>> SDSTART	CHKR+3*
>> SDX	CHKR+3*
SDZAI	CHKR+4, CHKR+7!, FORMS1+4, HS+4*, HS+5, HS1+5
SDZCV	CHKR+3*, CHKR+7!
SDZDFN	CHKR+5*, CHKR+7!, HS+2
SDZEF	CHKR+4, CHKR+7!, FORMS1+2, HS+4*, HS+5, HS1+2
SDZHS	CHKR+4, CHKR+7!, FORMS1+1, HS+4*, HS+5, HS1+3
SDZMP	CHKR+4, CHKR+7!, FORMS1+3, HS+4*, HS+5, HS1+4
SDZPL	PAT+2!
SDZRS	CHKR+2*, CHKR+5, CHKR+7!
SDZSC	CHKR+5*, CHKR+7!, HS+2, HS1+2
SEX	END+1!
>> SSC	APPT+11, APPT+16, APPT+18, APPT+21
SSN	END+1!
U	CHK+5, CHK+6, CHK+14, CHK+15, CHK+16, CR+4, CR+8, APPT+9, APPT+12, APPT+14 , APPT+16, APPT+17, APPT+18, APPT+21, CHKR+6, FORMS+1, FORMS1+1, FORMS1+2, FORMS1+3, FORMS1+4 , HS+3, HS1+3, CHECKIN+4, CLN+1
X	CHK+1~, CHK+3, CHK+4, CHK+5, CHK+6, CHK+16, CR+4, APPT+4, CHECKIN+1~, CHECKIN+3* , CHECKIN+4, CHECKIN+5, SCX+1~, SCX+2, SCX+3, SCX+4
Y	CHOOSE+7, CHOOSE+8, CHK+13, CHK+14, CHK+15, CHK2+1, CHK2+3, CR+4, CR+5, CR+8* , CR+12, CR+15, APPT+11, APPT+19, CHKR+2, CHECKIN+1~, CHECKIN+5, CHECKIN+6
>> YY	CR+5*
>> ZTDESC	HS+10*
>> ZTDTH	HS+10*
>> ZTIO	HS+9*
>> ZTRTN	HS+10*
>> ZTSAVE(	HS+11*
ZTSK	HS+12!

Customize PDF page

Package: IHS Changes To Scheduling

Routine: ASDI

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: