Routine: SDUTL2

Package	Total	Call Graph
VA Fileman	4	C^%DTC IX^DIC $$GET1^DIQ ^DIR
Registration	2	$$LST^DGMTU (DEM,KVAR)^VADPT
Kernel	1	$$FMTE^XLFDT
Scheduling	1	(ACTIVE,CLOSE,DATE,INDEX,OPEN,PAT,SCAN,SCANCB)^SDQ
Uncategorized	1	$$RET^YSGAF

Package

Total

Call Graph

VA Fileman

C^%DTC IX^DIC $$GET1^DIQ ^DIR

Registration

$$LST^DGMTU (DEM,KVAR)^VADPT

Kernel

$$FMTE^XLFDT

Scheduling

(ACTIVE,CLOSE,DATE,INDEX,OPEN,PAT,SCAN,SCANCB)^SDQ

Uncategorized

$$RET^YSGAF

Package	Total	Caller Graph
Scheduling	21	PROVIDER SCDXMSG2 SD53121 SDAL0 SDAM1 SDAM10 SDAM3 SDAMEP2 SDAMQ1 SDAMWI SDCO SDCO1 SDCO7 SDGAF SDMHNS SDMULT SDNACT SDPCE2 SDREACT ^SC SDUNC
IHS Changes To Scheduling	2	BSDAM10 BSDCHKI1
PCE Patient Care Encounter	2	PXCE PXCEHLOC
IHS VA Support Files	1	PROVIDER
Order Entry Results Reporting	1	ORWPCE2

Package

Total

Caller Graph

Scheduling

PROVIDER  SCDXMSG2  SD53121  SDAL0  SDAM1  SDAM10  SDAM3  SDAMEP2
SDAMQ1  SDAMWI  SDCO  SDCO1  SDCO7  SDGAF  SDMHNS  SDMULT
SDNACT  SDPCE2  SDREACT  ^SC  SDUNC

IHS Changes To Scheduling

BSDAM10 BSDCHKI1

PCE Patient Care Encounter

PXCE PXCEHLOC

IHS VA Support Files

PROVIDER

Order Entry Results Reporting

ORWPCE2

Entry Points

Name	Comments	DBIA/ICR reference
NEWGAF(DFN)	;;Determine if new GAF Score needed	ICR #2590 Status: Active Usage: Supported
HELP(SDDT)	; -- executable help called when entering a provider in the ; DEFAULT PROVIDER field (#16) or PROVIDER field (#.01) of the PROVIDER ; multiple (#2600) in the HOSPITAL LOCATION file (#44), the PROVIDER ; (#.01) field of the V PROVIDER file (#9000010.06), or in the ; PROVIDER prompt of the Check-out screen. display active providers ; with an active entry in the NEW PERSON file (#200) for PERSON CLASS.
XMY(GROUP,SDUZ,SDPOST)	; -- set up XMY for mail group members ; input: GROUP := mail group efn [required] ; SDUZ := send to current user [ 0\|no ; 1\|yes] [optional] ; SDPOST := send to postmaster if XMY is undefined ; [ 0\|no ; 1\|yes] [optional] ; output: XMY := array of users ; XMDUZ := message sender set postmaster
GAFCM()	;;
ELSTAT(DA)	;Retrieve patient eligibility status	ICR #3313 Status: Retired Usage: Private
SCANQ
SCREEN(Y,SDDT)	; -- screen called when entering a provider in the ; DEFAULT PROVIDER field (#16) or PROVIDER field (#.01) of the PROVIDER ; multiple (#2600) in the HOSPITAL LOCATION file (#44).
CLNCK(CLN,DSP)	;Check clinic for valid stop code restriction. ; INPUT: CLN = IEN of Clinic ; DSP = Error Message Display, 1 - Display or 0 No Display	ICR #4652 Status: Active Usage: Supported
MHCLIN(SDCL,SDSC)	;;Determines if Mental health Clinic requiring GAF	ICR #2590 Status: Active Usage: Supported
FMT(DFN)	; return current status of means test in external form ; input: DFN=ifn of patient ; ouput: [returned] MT^SMT^LST ; MT=external format of current status ; SMT=shortened format of current staus ; LST=date of last test
SCAN(SDINDEX,SDBEG,SDEND,SDCB,SDFN,SDIR)	; -- api to invoke scan
MSG	;display error message to screen
SCREST(SCIEN,TYP,DIS)	;check stop code restriction in file 40.7 for a clinic. ; INPUT: SCIEN = IEN of Stop Code ; TYP = Stop Code Type, Primary (P) or Secondary (S) ; DIS = Message Display, 1 - Display or 0 No Display
COLLAT(SDEC)	;Determines if patient has a collateral eligibility status	ICR #3313 Status: Retired Usage: Private
FYNUNK(SD)	; return YES, NO, UNKNOWN ; input: SD=internal piece ; output: [returned] Y=YES, N=NO, U=UNKNOWN
FCO(DFN)	; return current status of copay test in external form ; input: DFN=ifn of patient ; ouput: [returned] COT^SCOT^LST ; COT=external format of current status ; SCOT=shortened format of current staus ; LST=date of last test

External References

Name	Field # of Occurrence
C^%DTC	NEWGAF+23
$$LST^DGMTU	FMT+8, FCO+8
IX^DIC	HELP+15
$$GET1^DIQ	COLLAT+8, ELSTAT+9
^DIR	GAFCM+4
ACTIVE^SDQ	SCAN+7
CLOSE^SDQ	SCAN+9
DATE^SDQ	SCAN+5
INDEX^SDQ	SCAN+3
OPEN^SDQ	SCAN+2
PAT^SDQ	SCAN+4
SCAN^SDQ	SCAN+8
SCANCB^SDQ	SCAN+6
DEM^VADPT	NEWGAF+18
KVAR^VADPT	NEWGAF+20
$$FMTE^XLFDT	SCREST+18
$$RET^YSGAF	NEWGAF+16

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: GAFCM+4
Function Call: WRITE	Prompt: !?5,STR Line Location: MSG+1
Function Call: WRITE	Prompt: !?5,"Invalid Clinic." Line Location: CLNCK+8
Function Call: WRITE	Prompt: !?5,"Clinic not define or has no zero node." Line Location: CLNCK+10
Routine Call	DIR Line Location: GAFCM+4
Routine Call	DIC Line Location: HELP+15

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^VA(200 - [#200]	Classic Fileman Calls
^DIC(8 - [#8]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DIC(40.7 - [#40.7]	MHCLIN+21, SCREST+12
^SC - [#44]	MHCLIN+14, CLNCK+9, CLNCK+11
^XMB(3.8 - [#3.8]	XMY+11

Name	Line Occurrences
$$SCREST	CLNCK+13, CLNCK+15
MSG	SCREST+10, SCREST+14, SCREST+15, SCREST+17

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CLN	CLNCK~, CLNCK+7, CLNCK+9, CLNCK+11
CTY	SCREST+8~, SCREST+11*, SCREST+15
D	HELP+12~, HELP+13*
DA	ELSTAT~, ELSTAT+8, ELSTAT+9
DFN	FMT~, FMT+8, FCO~, FCO+8, NEWGAF~, NEWGAF+16
DIC	HELP+12~, HELP+13*
DIC("S"	HELP+14*
DIC(0	HELP+13*
DIR	GAFCM+1~
DIR("A"	GAFCM+2, GAFCM+3
DIR("B"	GAFCM+4*
DIR(0	GAFCM+4*
DIRUT	GAFCM+1~
DIS	SCREST~, SCREST+9*, MSG+1
DO	HELP+12~
DSP	CLNCK~, CLNCK+6, CLNCK+8, CLNCK+10, CLNCK+11, CLNCK+13, CLNCK+15
DT	SCREEN+30, HELP+11, NEWGAF+24, SCREST+17
DUZ	XMY+12
GROUP	XMY~, XMY+11
I	XMY+8~
IOST	MSG+1, CLNCK+8, CLNCK+10
ND0	CLNCK+5~, CLNCK+11*, CLNCK+12
PSC	CLNCK+5~, CLNCK+11*, CLNCK+13
RDT	SCREST+8~, SCREST+12*, SCREST+17, SCREST+18
RTY	SCREST+8~, SCREST+12*, SCREST+13, SCREST+15
SCIEN	SCREST~, SCREST+10, SCREST+12
SCN	SCREST+8~, SCREST+12*, SCREST+14, SCREST+16, SCREST+18
SD	FYNUNK~, FYNUNK+3
SDBEG	SCAN~, SCAN+5
SDCB	SCAN~, SCAN+6
SDCL	MHCLIN~, MHCLIN+13, MHCLIN+14
SDCS	MHCLIN+10~, MHCLIN+21*, MHCLIN+22, MHCLIN+23
SDDT	SCREEN~, SCREEN+30, SCREEN+31, HELP~, HELP+11*
SDEC	COLLAT~, COLLAT+7, COLLAT+8
SDEND	SCAN~, SCAN+5
SDFN	SCAN~, SCAN+4
SDGAF	NEWGAF+14~, NEWGAF+16*, NEWGAF+19, NEWGAF+22, NEWGAF+23, NEWGAF+24
SDGAFDT	NEWGAF+14~
SDINDEX	SCAN~, SCAN+3, SCAN+4, SCAN+5
SDIR	SCAN~, SCAN+8
SDMH	MHCLIN+10~, MHCLIN+23*, MHCLIN+25
SDNOGAF	MHCLIN+10~, MHCLIN+11*, MHCLIN+23
SDPOST	XMY~, XMY+10~*, XMY+14
SDQID	SCAN+1~, SCAN+2, SCAN+3, SCAN+4, SCAN+5, SCAN+6, SCAN+7, SCAN+8, SCAN+9
SDSC	MHCLIN~, MHCLIN+16
SDSTOP	MHCLIN+10~, MHCLIN+14, MHCLIN+16, MHCLIN+21
SDUZ	XMY~, XMY+9~*, XMY+12
SDY	SCREEN+29~, SCREEN+31, SCREEN+34, SCREEN+35
SSC	CLNCK+5~, CLNCK+11*, CLNCK+14, CLNCK+15
STR	SCREST+8~, SCREST+10, SCREST+13, SCREST+14, SCREST+15, SCREST+16, SCREST+17, SCREST+18, MSG+1
STYP	SCREST+8~, SCREST+9*, SCREST+10, SCREST+14, SCREST+18
TYP	SCREST~, SCREST+9, SCREST+11, SCREST+16
U	FMT+9, FMT+10, FCO+9, FCO+10, XMY+11, SCREST+12, SCREST+14, SCREST+16, SCREST+18, CLNCK+11 , CLNCK+12
VADM	NEWGAF+14~
VADM(6	NEWGAF+19
VAL	CLNCK+5~, CLNCK+13, CLNCK+14, CLNCK+15, CLNCK+16
X	FMT+7~, FMT+8, FMT+9, FMT+10, FCO+7~, FCO+8, FCO+9, FCO+10, HELP+12~, HELP+13* , NEWGAF+24
>> X1	NEWGAF+23*
>> X2	NEWGAF+23*
>> XMDUZ	XMY+16*
XMY	XMY+8!, XMY+14
XMY(	XMY+12, XMY+14
XMY("G."	XMY+11*
Y	FMT+7~, FMT+9, FMT+10, FCO+7~, FCO+9, FCO+10, SCREEN~, SCREEN+28, GAFCM+5

Customize PDF page

Package: Scheduling

Routine: SDUTL2

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 27

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: