Routine: DIPZ0

Information

DIPZ0 ;SFISC/TKW-COMPILE PRINT TEMPLATES ;19JAN2010

Source file <DIPZ0.m>

Package	Total	Call Graph
VA Fileman	5	($$EZBLD,BLD)^DIALOG (DELETROU,UNCAF)^DIEZ $$ROUEXIST^DILIBF ^DIR A^DIU21

Package	Total	Caller Graph
VA Fileman	3	DIEZ DIKZ DIPZ

Name	Comments	DBIA/ICR reference
UNC	;UNCOMPILE TEMPLATES/CROSS-REFS
RNM(DITYP)	;PROMPT FOR COMPILED ROUTINE NAME
SIZ(DITYP)	;PROMPT FOR SIZE OF COMPILED ROUTINE

Name	Line Occurrences
Function Call: WRITE	Prompt: A(%),! Line Location: RNM+17
Function Call: WRITE	Prompt: $C(7),!?5,DIR Line Location: RNM+19
Function Call: WRITE	Prompt: $C(7),!!,DIR("A") Line Location: UNC+6
Routine Call	DIALOG Line Location: SIZ+6 RNM+9 RNM+10 RNM+14 RNM+17 RNM+19 UNC+5
Routine Call	DIALOG Line Location: SIZ+5 SIZ+6 RNM+8 UNC+5
Routine Call	DIR Line Location: SIZ+7 RNM+7 RNM+15

Name	Line Occurrences (* Changed, ! Killed)
^DD("OS" - [#.7]	SIZ+4
^DD("ROU"	SIZ+4

Name	Line Occurrences
UNC	RNM+7

Name	Field # of Occurrence
^("ROUOLD"	UNC+1

Name	Field # of Occurrence
%	SIZ+3~, SIZ+4, SIZ+5, SIZ+6!, RNM+2~, RNM+8!, RNM+9, RNM+10, RNM+12, RNM+13 , RNM+14, RNM+17~*, RNM+19!, UNC+1~, UNC+5
%(1	SIZ+6, RNM+8, RNM+19, UNC+5
%(2	RNM+8*, RNM+10!
A	RNM+17~
A(	RNM+17
>> DIC	RNM+4, UNC+1
>> DIPZ	RNM+4, RNM+5, UNC+1, UNC+2, UNC+4
DIPZ0	UNC+1~*, UNC+3
DIR	SIZ+3~, RNM+2~, RNM+7!, RNM+15!, RNM+19!, UNC+1~
DIR("A"	SIZ+5*, UNC+6
DIR("B"	SIZ+5, RNM+7, RNM+13*
DIR(0	SIZ+5, RNM+7, RNM+13*
DIRNM	RNM+2~, RNM+3, RNM+4, RNM+5*, RNM+13
DIRNM(1	RNM+4, RNM+5, RNM+7, RNM+8
>> DIRUT	RNM+7, RNM+15
>> DISYS	SIZ+4
DITYP	SIZ~, SIZ+6, RNM~, RNM+4, RNM+8, UNC+1, UNC+2, UNC+5
U	SIZ+4, RNM+19
>> X	RNM+15, RNM+16, RNM+19, UNC+4, UNC+7
>> Y	RNM+7