Routine: XMJDIR

Package	Total	Call Graph
Kernel	2	$$UP^XLFSTR EN^XQH
VA Fileman	2	($$EZBLD,BLD,MSG)^DIALOG ^DIR

Package	Total	Caller Graph
MailMan	12	XMJBM XMJBM1 XMJBN XMJMF XMJMF1 XMJMLR1 XMJMOI XMJMOIE XMJMORX XMJMRO XMJMSA XMJMSO

Entry Points

Name	Comments	DBIA/ICR reference
QHELP	;
PARROT	;
SHOWERR(XMOPT,XMY)	; Show error message
HELPCMD(XMOPT,XMOX,XMPMAX)	;
HELPSCR(XMOPT,XMOX)	;
COMMAND(XMOPT,XMOX,XMY)	; Check what the user enters against the list of ; acceptable choices. If the user enters something ambiguous, ; ^DIR is called to ask the user to choose one.
XMDIR(XMDIR,XMOPT,XMOX,XMY,XMABORT)	; ; XMDIR("A") User prompt ; XMDIR("B") Default choice ; XMDIR(0) Special instructions ; S - Show the choices ; C - Show choices in 2 columns, if necessary ; XMDIR("?") Help text for 1 ? ; XMDIR("??") Help text for 2 or more ?

External References

Name	Field # of Occurrence
$$EZBLD^DIALOG	XMDIR+10, XMDIR+11, XMDIR+13, HELPSCR+6
BLD^DIALOG	SHOWERR+4, HELPSCR+4
MSG^DIALOG	SHOWERR+5, HELPSCR+5
^DIR	COMMAND+28
$$UP^XLFSTR	COMMAND+8, COMMAND+16, COMMAND+18
EN^XQH	QHELP+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,?5,$$EZBLD^DIALOG(37008),! Line Location: XMDIR+13
Function Call: WRITE	Prompt: !!,XMDIR("A"),$S($D(XMDIR("B")):$P(XMDIR("B"),":",2,99)_"// ",1:"") Line Location: XMDIR+16
Function Call: READ	Timeout: DTIME Variable: XMX Line Location: XMDIR+17
Function Call: WRITE	Prompt: $C(7) Line Location: XMDIR+27
Function Call: WRITE	Prompt: $C(7),! Line Location: SHOWERR+1
Function Call: WRITE	Prompt: !,XMOPT(XMY,"?",I) Line Location: SHOWERR+9
Function Call: WRITE	Prompt: !,XMOPT(XMY,"?") Line Location: SHOWERR+10
Function Call: WRITE	Prompt: ! Line Location: HELPSCR+3
Function Call: WRITE	Prompt: !!,$$EZBLD^DIALOG(34054),! Line Location: HELPSCR+6
Function Call: WRITE	Prompt: !,?9,$E(XMCMD_" ",1,10)_XMOPT(XMOX("X",XMCMD)) Line Location: HELPCMD+7
Function Call: WRITE	Prompt: !,$E(XMHELP(I)_" ",1,39)_" "_$E(XMCMD_" ",1,XMLEN+2)_$E(XMOPT(XMOX("X",XMCMD)),1,37-XMLEN) Line Location: HELPCMD+19
Function Call: WRITE	Prompt: $E(XMOPT(XMCD),XMLEN+1,99) Line Location: PARROT+1
Function Call: WRITE	Prompt: " ",XMOPT(XMCD) Line Location: PARROT+2
Routine Call	DIALOG Line Location: SHOWERR+4 HELPSCR+4
Routine Call	DIALOG Line Location: XMDIR+10 XMDIR+11 XMDIR+13 HELPSCR+6
Routine Call	DIR Line Location: COMMAND+28
Routine Call	DIALOG Line Location: SHOWERR+5 HELPSCR+5

Label References

Name	Line Occurrences
$$COMMAND	XMDIR+24
HELPCMD	XMDIR+14, HELPSCR+7
HELPSCR	XMDIR+27, QHELP+1, QHELP+4
PARROT	COMMAND+11, COMMAND+25
QHELP	XMDIR+22
SHOWERR	XMDIR+28

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DIR	COMMAND+20~
DIR(0	COMMAND+21, COMMAND+22, COMMAND+26*
>> DIRUT	COMMAND+28
DTIME	XMDIR+17
I	SHOWERR+7~, SHOWERR+8, SHOWERR+9, HELPCMD+1~, HELPCMD+9, HELPCMD+10, HELPCMD+13, HELPCMD+14, HELPCMD+15, HELPCMD+18 , HELPCMD+19, HELPCMD+20, HELPCMD+21, COMMAND+20~, COMMAND+21, COMMAND+22*, COMMAND+23, COMMAND+24
IOM	SHOWERR+5, HELPSCR+5
IOSL	XMDIR+14, HELPCMD+4
U	XMDIR+18
X	COMMAND+20~
XMABORT	XMDIR~, XMDIR+15, XMDIR+17, XMDIR+18, XMDIR+20*
XMC	COMMAND+12~, COMMAND+17, COMMAND+18
XMCD	COMMAND+5~, COMMAND+9, COMMAND+10, COMMAND+13, COMMAND+14, COMMAND+23, COMMAND+24, PARROT+1, PARROT+2
XMCD(	COMMAND+22*, COMMAND+24, COMMAND+29
XMCHOOSE	COMMAND+12~, COMMAND+19
XMCHOOSE(	COMMAND+16, COMMAND+18, COMMAND+22
XMCMD	HELPCMD+1~, HELPCMD+2, HELPCMD+3, HELPCMD+5, HELPCMD+6, HELPCMD+7, HELPCMD+11, HELPCMD+12, HELPCMD+14, HELPCMD+16* , HELPCMD+17, HELPCMD+19
XMCNT	HELPCMD+1~, HELPCMD+2, HELPCMD+3, HELPCMD+4, HELPCMD+8
XMDIR	XMDIR~
XMDIR("?"	HELPSCR+1, HELPSCR+4
XMDIR("??"	QHELP+3
XMDIR("A"	XMDIR+10*, XMDIR+16
XMDIR("B"	XMDIR+11*, XMDIR+16, XMDIR+20, XMDIR+21
XMDIR("PRE"	XMDIR+23
XMDIR(0	XMDIR+12, XMDIR+14
XMHELP	HELPCMD+1~
XMHELP(	HELPCMD+14*, HELPCMD+19, HELPCMD+21
XMLEN	HELPCMD+1~, HELPCMD+2, HELPCMD+3, HELPCMD+14, HELPCMD+19, COMMAND+5~, COMMAND+7*, COMMAND+16, COMMAND+18, PARROT+1
XMOPT	XMDIR~, XMDIR+14, XMDIR+24, XMDIR+27, XMDIR+28, SHOWERR~, QHELP+1, QHELP+4, HELPSCR~, HELPSCR+7 , HELPCMD~, COMMAND~
XMOPT(	XMDIR+25, XMDIR+28, SHOWERR+2, SHOWERR+4, SHOWERR+6, SHOWERR+9, SHOWERR+10, HELPCMD+3, HELPCMD+6, HELPCMD+7 , HELPCMD+12, HELPCMD+14, HELPCMD+17, HELPCMD+19, COMMAND+14, COMMAND+18, PARROT+1, PARROT+2
XMOX	XMDIR~, XMDIR+14, XMDIR+24, XMDIR+27, QHELP+1, QHELP+4, HELPSCR~, HELPSCR+7, HELPCMD~, COMMAND~
XMOX("O"	HELPCMD+3
XMOX("X"	HELPCMD+5, HELPCMD+6, HELPCMD+7, HELPCMD+11, HELPCMD+12, HELPCMD+14, HELPCMD+16, HELPCMD+17, HELPCMD+19, COMMAND+9 , COMMAND+10, COMMAND+18
XMPMAX	HELPCMD~, HELPCMD+4
XMROWS	HELPCMD+1~, HELPCMD+8*, HELPCMD+10
XMT	COMMAND+12~, COMMAND+15, COMMAND+16, COMMAND+21, COMMAND+22
XMTEXT	SHOWERR+3~, HELPSCR+2~
XMTXT	COMMAND+12~
XMTXT(	COMMAND+14*, COMMAND+16, COMMAND+22
XMX	XMDIR+8~, XMDIR+17, XMDIR+18, XMDIR+19, XMDIR+22, XMDIR+24, QHELP+1, COMMAND+5~, COMMAND+6, COMMAND+7 , PARROT+1
XMY	XMDIR~, XMDIR+9!, XMDIR+15, XMDIR+21, XMDIR+24, XMDIR+25, XMDIR+26, XMDIR+28, XMDIR+29!, SHOWERR~ , SHOWERR+2, SHOWERR+4, SHOWERR+6, SHOWERR+9, SHOWERR+10, COMMAND~, COMMAND+3, COMMAND+4, COMMAND+6, COMMAND+8* , COMMAND+9, COMMAND+10, COMMAND+15, COMMAND+16, COMMAND+17, COMMAND+18
XQH	QHELP+2~, QHELP+3*, QHELP+4, QHELP+5
Y	COMMAND+20~, COMMAND+29

Customize PDF page

Package: MailMan

Routine: XMJDIR

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 12

Entry Points

External References

Interaction Calls

Label References

Local Variables

Legend: