Routine: SDDIV

Information

SDDIV ;BSN/GRR - MULTI-DIVISION SELECT ; 27 FEB 84 9:40 am

Source file <SDDIV.m>

Package	Total	Call Graph
Registration	2	$$PRIM^VASITE DIVISION^VAUTOMA
VA Fileman	1	^DIC

Package	Total	Caller Graph
Scheduling	23	SDACSCGB SDACSCGP SDAL SDAMBMR SDAMO SDAMOCC SDAMODO SDAMOL SDAMOW SDCIAL SDCLAS SDCP SDCWL SDD SDF SDMHAD SDN SDNOS SDOQMP0 SDRFC SDROUT SDRRCRR SDST
IHS Changes To Scheduling	10	ASDAIU1 ASDCLDOW ASDCR ASDCWMA ASDF ASDHS ASDM BSDCHKIN BSDRCLN BSDU
Registration	9	DGOINPT DGOINS DGOREL DGPMOLD DGPMRBA DGRUGIX DGRUGPI DGRUGPP DGRUGS
Beneficiary Travel	1	DGBTOA1
IHS Changes To ADT	1	BDGSD1

Name	Comments	DBIA/ICR reference
NSLET
ERR
SDCP
DIC
WLLET
CSSD
AWAY
DSSA
FRLST
APLST
ASK
PALST
CLST
ASK2	;S (VAUTD,Y)=0 I '$D(^DG(40.8,$N(^DG(40.8,0)),0)) W !,7,"**WARNING...MEDICAL CENTER DIVISION FILE IS NOT SET UP" G ERR ;IHS/ANMC/LJF 6/30/2000
PCNLET
PSDR
A223
CALST
CACTLST
CSEE
NSLET1
RALST
ROUT
CNLET

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: X Line Location: ASK+0
Function Call: WRITE	Prompt: !,DIC("A")," ",$P(^(0),"^"),"// " Line Location: ASK+0
Function Call: WRITE	Prompt: *7," ??" Line Location: ASK+1
Function Call: WRITE	Prompt: " Enter 'ALL' for all divisions or" Line Location: ASK+2
Function Call: WRITE	Prompt: !,7,"**WARNING...MEDICAL CENTER DIVISION FILE IS NOT SET UP" Line Location: ASK2+0
Function Call: WRITE	Prompt: !,7,"**WARNING...MEDICAL CENTER DIVISION FILE IS NOT SET UP" Line Location: ASK2+1
Routine Call	DIC Line Location: DIC

Name	Line Occurrences (* Changed, ! Killed)
^DG(40.8 - [#40.8]	ASK, ASK2+1, ASK2+5
^DG(43 - [#43]	ASK2+2

Name	Line Occurrences
ASK	ROUT, APLST, FRLST, CLST, NSLET, RALST, A223, CSSD, SDCP, DSSA , CSEE, CALST, CACTLST, DIC
ASK2	PSDR
AWAY	ASK+2
DIC	PALST, CNLET, PCNLET, WLLET, NSLET1
ERR	ASK, ASK2+1, ASK2+5

Name	Field # of Occurrence
^("GL"	ASK2+2
^(0	ASK, ASK2+5

Name	Field # of Occurrence
>> ALL	ASK, ASK+1
DIC	ASK+2*, DIC!, AWAY!, ERR!, ASK2+5!
DIC("A"	ROUT, APLST, FRLST, CLST, PALST, CNLET, PCNLET, WLLET, NSLET, NSLET1 , RALST, A223, CSSD, SDCP, DSSA, PSDR, CSEE, CALST, CACTLST*, ASK
DIC(0	ASK+2*
>> DIV	ASK+2, DIC
DTIME	ASK
DUZ(2	ASK2+5
>> I	ASK2+5*
SDALL	ASK+1, ASK+2, ERR!
SDEF	ASK*, ASK+2, AWAY!, ERR!
>> SDLT	DIC
>> SDV1	DIC*
U	ASK2+2, ASK2+5
>> VAUTD	ASK2+1*
>> VAUTD(	ASK2+5*
>> X	ASK, ASK+1, ASK+2, DIC
>> Y	DIC, AWAY, ERR, ASK2+1*