Routine: DICM1

Information

DICM1 ;SFISC/XAK,TKW - LOOKUP WHEN INPUT MUST BE TRANSFORMED ;01MAR2016

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
VA FileMan	7	^%DT LIST^DDSU DO^DIC1 P^DICM0 ^DICM2 $$PROP4TYP^DIETLIBF DT^DIQ

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 5

Package	Total	Caller Graph
VA FileMan	4	DIA2 DIC2 DICF4 DICM
Toolkit	1	XDRPTN

Entry Points

Name	Comments	DBIA/ICR reference
P	;POINTERS
D	;DATES
S	;SETS
SS
NO
SK
SC	;SCREENS ON SETS
SDSP	; Execute screen, transform, set up output for display
V	;VARIABLE POINTER
T	; Execute TRANSFORM code for indexes other than Pointers, Date, VP or Sets.
SOU	;
ACT	;
A
W
DO

External References

Name	Field # of Occurrence
^%DT	D+3
LIST^DDSU	SS+13
DO^DIC1	V+2, DO
P^DICM0	P+1
^DICM2	V+2
$$PROP4TYP^DIETLIBF	S+3
DT^DIQ	D+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: " ",X Line Location: D+7
Function Call: WRITE	Prompt: " " Line Location: D+9
Function Call: WRITE	Prompt: !,$P(DS(DICM),U,2,999) Line Location: SS+15
Function Call: WRITE	Prompt: !,"CHOOSE 1-"_DDH_": " Line Location: SS+16
Function Call: READ	Variable: DIY Timeout: $S($D(DTIME):DTIME,1:300) Line Location: SS+17
Function Call: WRITE	Prompt: $C(7),"??" Line Location: SS+19
Function Call: WRITE	Prompt: " "_DDH(DIY,X),! Line Location: SS+22
Function Call: WRITE	Prompt: DDH(DDH,Y) Line Location: SDSP+11

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	D+2, SC+2, A, A+2
^DI(	D+1

Label References

Name	Line Occurrences
@(	DICM1+7
A	A+2
DO	A+2
NO	SS+7, SS+12, SS+13, SS+20
SC	S+2
SDSP	S+6, SS+5
SK	S+6, SS+8, SS+24
W	A+1

Naked Globals

Name	Field # of Occurrence
^("ACT"	A
^(0	A+2
^(12.1	SC+2
^(31	D+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	D+1, D+2, D+7~, SC+3, SC+7, SOU+1, A+2~
%DT	D+2*, D+3!
A8	S+1~, SK, SC+1*, SC+7, SC+8
A9	S+1~, S+6, SS+3, SC+3, SC+6, SC+7, SC+8
>> DD	S+3, S+4, S+6, SS+1, SS+2, SS+4, SS+13*, SDSP+10
DDD	SS+13*!
DDH	S+1~, SS+6, SS+7, SS+8, SS+13, SS+15, SS+16, SK+1!, SDSP+2, SDSP+9 , SDSP+10, SDSP+11
DDH(	SS+6, SS+22, SDSP+2, SDSP+9, SDSP+10*, SDSP+11
DDH(1	SS+9, SS+10
DDQ	SS+13!
>> DDS	D+6, D+9, SS+10, SS+13, SS+14, SS+22, SDSP+11
>> DIC	SC+3, ACT+1, A+1, A+2, A+3*
>> DIC("S"	S+2, SK!*, SC+1, SC+2
>> DIC("W"	ACT+1*, W!
>> DIC(0	D+6, D+8, SS+2, SS+4, SS+10, SS+12, SDSP+11
DICM	SS+1, SS+14, SS+15, SS+19*, SK+1!
DICMF	SS, SS+4, SK+1!
DICMS	SK+1!
>> DICR	S+3, SC+3, SC+4
>> DICR(	S+3*, SC+4
>> DIDA	D+10*
>> DINDEX(1	D+4, D+5, D+6, D+7, SDSP+3, SDSP+5, SDSP+7, SDSP+8, T+2
DIOUT	SDSP+1~, SDSP+3, SDSP+5
DISAVX	SDSP+1~
DISAVY	SDSP+1~, SDSP+4, SDSP+8, SDSP+9
>> DIX	SOU+1, ACT+1, A+1, A+3
DIXX	SDSP+1~, SDSP+3, SDSP+6, SDSP+8, T+1~*, T+3
>> DIY	SS+17, SS+18, SS+20, SS+21, SS+22, SS+23, SOU+1, ACT+1*, A+3
>> DIY(1	ACT+1*, A+1, A+3
DO	DO!
DO(2	D+2, SC+2, A, A+2
DS	D+1, S+2, S+3, S+5~, SS+5, SS+6, SC+1, SDSP+2, SDSP+3, SDSP+6 , SDSP+9, SDSP+10, SDSP+11
DS(	SS+6, SS+15, SS+18, SS+20, SS+21, SS+23, SDSP+6
DS(1	SS+11
DSOU	SOU+1*, SOU+2!
DSOV	SOU+1*, SOU+2!
DTIME	SS+17
>> DTOUT	SS+13
>> I	S+3, S+4, SS+1, SC+3, SC+6, SC+7, SC+8
U	S+2, S+3, SS+15, SS+18, SS+21, SC+1, SDSP+2, SDSP+9, SDSP+10, A+2
X	D+2, D+3, D+5!, D+7~, D+11!, S+4, S+6, SS+1, SS+2, SS+4 , SS+9, SS+10, SS+11, SS+21, SS+22, SS+23, NO!, SDSP+3, SDSP+4~, SDSP+5 , SDSP+6, SDSP+8~, SDSP+9, V+1!, T+1, T+2!, T+3!, SOU+1, SOU+2, ACT+1 , A+1, A+3*
Y	DICM1+7, D+3, D+5, S+6, SS+2, SS+6, NO!, SC+3, SC+6, SC+7 , SDSP+1, SDSP+2, SDSP+3, SDSP+4~, SDSP+8~, SDSP+10, SDSP+11, T+2, T+3, SOU+1* , ACT+1, A+1, A+2, A+3

Customize PDF page

Package: VA FileMan