Routine: ASDUT

Information

ASDUT ; IHS/ADC/PDW/ENM - FUNCTIONS ; [ 03/25/1999 11:48 AM ]

Source file <ASDUT.m>

Package	Total	Call Graph
IHS VA Utilities	1	$$VAL^XBDIQ1
Kernel	1	($$FMTE,$$HTFM)^XLFDT

Package	Total	Caller Graph
IHS Changes To Scheduling	21	ASDAIU ASDAIU1 ASDAL ASDAMB ASDCLA ASDCLAV ASDCP ASDCR ASDCWMA ASDF ASDFORM ASDH01 ASDHS ASDHS1 ASDI ASDM ASDNAA ASDREG ASDROUT0 ASDROUT2 ASDWL

Name	Comments	DBIA/ICR reference
SHORTRS()	;EP; -- returns 1 if short form of RS selected
SCCC()	;EP -- state-county-community code (STCTYCOM index)
DIV()	;EP; -- returns division ien
HRCN()	;EP; -- IHS health record number
PC(SDC)	;EP; -- returns ien for princ clinic tied to sdc clinic
KHS	; -- Health Summary kill variables
TD()	;EP; returns hrcn in terminal digit order
PEDHS()	; -- returns ien for pediatric health summary
TIME	;ENTRY POINT to print time only
CONF1()	;EP; -- returns shortened confidential warning
HSTYP(SC,DFN)	;EP; -- returns health summary type
ACTV(SDC)	;EP; -- returns 1 if clinic is active
SHS	; -- Health Summary set variables (used by patient inquiry--DGZPI)
CONF()	;EP; -- returns confidential warning
PCP(DFN)	;EP; returns primary care provider name
ADULTHS()	; -- returns ien for adult regular health summary
FULLNM(DFN)	;EP; -- returns name first last
HRN(DFN)	;EP; -- health record number with dashes
HRC(DFN)	;EP; -- IHS health record number

Name	Line Occurrences
Function Call: WRITE	Prompt: $P($$FMTE^XLFDT(X,"2P")," ",2,3) Line Location: TIME+3

Name	Line Occurrences (* Changed, ! Killed)
^APCHSCTL("B"	PEDHS+1, ADULTHS+1
^AUPNPAT - [#9000001]	HRCN+1, HRC+1, SCCC+1, SCCC+2, HRN+2, HRN+3, HRN+10
^AUTTCOM - [#9999999.05]	SCCC+3
^DG(40.8 - [#40.8]	DIV+1, SHORTRS+1
^DPT - [#2]	FULLNM+1
^SC - [#44]	ACTV+1, PC+1, HSTYP+2

Name	Field # of Occurrence
^("I"	ACTV+1
^("SL"	PC+1

Name	Field # of Occurrence
AGE	HSTYP+1~, HSTYP+3*, HSTYP+4
APCHSBRK	SHS+2*, KHS+3!
APCHSCKP	SHS+2*, KHS+1!
APCHSCVD	SHS+1*, KHS+1!
APCHSDLM	KHS+2!
APCHSDLS	KHS+2!
APCHSEGC	KHS+2!
APCHSEGH	KHS+2!
APCHSEGL	KHS+2!
APCHSEGN	KHS+2!
APCHSEGT	KHS+2!
APCHSHD2	KHS+3!
APCHSHDR	KHS+1!
APCHSICF	KHS+1!
APCHSN	KHS+3!
APCHSNDM	KHS+3!
APCHSNPG	SHS+2*, KHS+1!
APCHSPAT	SHS+2*, KHS+3!
APCHSPG	KHS+1!
APCHSQ	KHS+3!
APCHSQIT	KHS+1!
DFN	HRCN+1, HRC~, HRC+1, SCCC+1, SCCC+2, HRN~, HRN+1, HRN+2, HRN+3, HRN+10 , SHS+2, PCP~, PCP+1, TD+1, FULLNM~, FULLNM+1, HSTYP~, HSTYP+3
>> DIV	DIV+1
DT	ACTV+1
DUZ(2	HRCN+1, HRC+1, HRN+1, HRN+2, HRN+3, HRN+10, DIV+1
SC	HSTYP~, HSTYP+2
SDC	ACTV~, ACTV+1, PC~, PC+1
U	HRC+1, ACTV+1, FULLNM+1, PC+1, SHORTRS+1, HSTYP+2
X	SCCC+1~, SCCC+2, SCCC+3, SCCC+4, HRN+1~, HRN+3, HRN+4, HRN+5, HRN+6, HRN+7* , HRN+8, FULLNM+1~, HSTYP+1~, HSTYP+2, TIME+1~, TIME+2*, TIME+3
Y	TD+1*, HSTYP+1~