Routine: XPAREDT2

Package	Total	Call Graph
VA Fileman	3	^DIC ^DIR EN^DIWE
Toolkit	2	($$GET,DEL,EN,GETLST,GETWP)^XPAR $$DASH^XPAREDIT

Package	Total	Caller Graph
Toolkit	2	XPAREDIT XPAREDT3

Entry Points

Name	Comments	DBIA/ICR reference
SHWINST(ENT,PAR,CNT,SCR,LST)	; list CNT instances of an entity/parameter
PDIR	; call DIR if not pointer type, otherwise call DIC
EDIT1	; called only from EDIT, expects ENT,PAR,INST to be defined
SHWDESC(PAR)	; show description of parameter
EDITVAL(DTA,PAR,TYP,DFLT)	; edit the value for an instance or a value ; .DTA=internal value^external value returned, wp in DTA(n,0) nodes ; PAR=parameter which describes the data being edited ; TYP=edit type - I:instance, V:value, S:select instance ; .DFLT=internal default value^external default value ; internal values are preceded by "`" if they are pointers
ERR()	; function - displays error message, expects ERR to be present
SELINST(INST,ENT,PAR)	; select a specific instance from multiple parameter ; .INST=external value of instance

External References

Name	Field # of Occurrence
^DIC	PDIR+16
^DIR	PDIR+2, SHWINST+19, SELINST+10
EN^DIWE	EDITVAL+34
$$GET^XPAR	EDIT1+5, SELINST+7
DEL^XPAR	EDIT1+8
EN^XPAR	EDIT1+13
GETLST^XPAR	SHWINST+3
GETWP^XPAR	EDIT1+3
$$DASH^XPAREDIT	SHWINST+16

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $$ERR Line Location: EDIT1+2
Function Call: WRITE	Prompt: $$ERR Line Location: EDIT1+9
Function Call: WRITE	Prompt: " ...deleted" Line Location: EDIT1+10
Function Call: WRITE	Prompt: " ",$P(Y,U,2) Line Location: EDIT1+11
Function Call: WRITE	Prompt: $$ERR Line Location: EDIT1+13
Function Call: WRITE	Prompt: !,DIR("A")_$S($D(DIR("B")):DIR("B")_"// ",1:"") Line Location: PDIR+6
Function Call: READ	Timeout: DTIME Variable: X Line Location: PDIR+7
Function Call: WRITE	Prompt: $E($P(INSTLST(I),U),$L(X)+1,999) Line Location: PDIR+13
Function Call: WRITE	Prompt: $$ERR Line Location: SHWINST+3
Function Call: WRITE	Prompt: !!,"There are currently no entries for ",TERM,".",! Line Location: SHWINST+4
Function Call: WRITE	Prompt: !!,LST," entries for ",TERM," currently exist.",! Line Location: SHWINST+5
Function Call: WRITE	Prompt: !!,TERM,?RCPOS,"Value",!,$$DASH^XPAREDIT($L(TERM)),?RCPOS,"-----",! Line Location: SHWINST+16
Function Call: WRITE	Prompt: $E($P(LST(I),U,1),1,LC),?RCPOS,$E($P(LST(I),U,2),1,RC),! Line Location: SHWINST+18
Function Call: WRITE	Prompt: ! Line Location: SHWINST+19
Function Call: WRITE	Prompt: $$ERR Line Location: SELINST+11
Function Call: WRITE	Prompt: !,^(I,0) Line Location: SHWDESC+1
Function Call: WRITE	Prompt: !!,">>> ",$P($G(ERR),U,2),!! Line Location: ERR+1
Routine Call	DIC Line Location: PDIR+16
Routine Call	DIR Line Location: PDIR+2 SHWINST+19 SELINST+10

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DISV(	SELINST+6, SELINST+14*
^TMP($J	EDITVAL+23!*, EDITVAL+35
^XTV(8989.51 - [#8989.51]	EDIT1+1, EDIT1+6, EDITVAL+8, EDITVAL+11, EDITVAL+12, EDITVAL+13, EDITVAL+14, EDITVAL+18, SHWINST+2, SELINST+3 , SELINST+13, SHWDESC+1

Label References

Name	Line Occurrences
$$ERR	EDIT1+2, EDIT1+9, EDIT1+13, SHWINST+3
EDITVAL	EDIT1+7, SELINST+4
PDIR	EDITVAL+26

Naked Globals

Name	Field # of Occurrence
^(	EDITVAL+11, EDITVAL+12, EDITVAL+18, EDITVAL+35, SHWDESC+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CNT	SHWINST~, SHWINST+5, SHWINST+19
DFLT	EDITVAL~, EDITVAL+17, EDITVAL+23, PDIR+8
DIC	EDITVAL+32~, EDITVAL+33, PDIR+1~, PDIR+4
DIC("S"	PDIR+5*, PDIR+16!
DIC(0	PDIR+4*
DIR	EDITVAL+6~, SHWINST+1~, SELINST+2~
DIR("?"	EDITVAL+18, EDITVAL+19, PDIR+9
DIR("??"	EDITVAL+20*
DIR("A"	EDITVAL+16, PDIR+6, SELINST+9
DIR("B"	EDITVAL+17, PDIR+6, SELINST+8
DIR("S"	EDITVAL+12*, PDIR+5
DIR(0	EDITVAL+8, EDITVAL+9, EDITVAL+10, EDITVAL+11, EDITVAL+21, EDITVAL+22, EDITVAL+24, EDITVAL+28, EDITVAL+29, PDIR+2 , PDIR+4, SHWINST+19, SELINST+8
DIRUT	EDITVAL+31, SHWINST+1~, SELINST+10
DIWESUB	EDITVAL+32~, EDITVAL+33*
DTA	EDITVAL~, EDITVAL+26, EDITVAL+27, EDITVAL+28, EDITVAL+29, EDITVAL+30, EDITVAL+33
DTA(	EDITVAL+35*
DTA("X"	EDITVAL+26*
DTIME	PDIR+7
DTOUT	EDITVAL+26, EDITVAL+27, PDIR+3, PDIR+7*, PDIR+15, SHWINST+1~
DUOUT	EDITVAL+26, EDITVAL+27, PDIR+3, PDIR+7*, PDIR+15, SHWINST+1~, SHWINST+17
DUZ	SELINST+6, SELINST+14
ENT	EDIT1+3, EDIT1+5, EDIT1+8, EDIT1+13, SHWINST~, SHWINST+3, SELINST~, SELINST+6, SELINST+7, SELINST+14
ERR	EDIT1+2, EDIT1+3, EDIT1+8, EDIT1+9, EDIT1+13, SHWINST+1~, SHWINST+3, SELINST+2~, ERR+1
I	EDITVAL+35, PDIR+11~, PDIR+12, PDIR+13, PDIR+14, SHWINST+1~, SHWINST+7, SHWINST+8, SHWINST+9, SHWINST+10 , SHWINST+17, SHWINST+18, SHWINST+19, SHWDESC+1*
INST	EDIT1+3, EDIT1+5, EDIT1+8, EDIT1+13, SELINST~, SELINST+4, SELINST+5, SELINST+6, SELINST+7, SELINST+9 , SELINST+10*, SELINST+13, SELINST+14
>> INSTLST	PDIR+10
>> INSTLST(	PDIR+12, PDIR+13, PDIR+14
LC	SHWINST+1~, SHWINST+6, SHWINST+9, SHWINST+11, SHWINST+12, SHWINST+13, SHWINST+14, SHWINST+15, SHWINST+18
LST	SHWINST~, SHWINST+3, SHWINST+4, SHWINST+5
LST(	SHWINST+8, SHWINST+9, SHWINST+10, SHWINST+17, SHWINST+18, SHWINST+19
PAR	EDIT1+1, EDIT1+3, EDIT1+5, EDIT1+6, EDIT1+7, EDIT1+8, EDIT1+13, EDITVAL~, EDITVAL+8, EDITVAL+11 , EDITVAL+12, EDITVAL+13, EDITVAL+14, EDITVAL+18, SHWINST~, SHWINST+2, SHWINST+3, SELINST~, SELINST+3, SELINST+4 , SELINST+6, SELINST+7, SELINST+13, SELINST+14, SHWDESC~, SHWDESC+1
RC	SHWINST+1~, SHWINST+6, SHWINST+10, SHWINST+11, SHWINST+12, SHWINST+13, SHWINST+14, SHWINST+18
RCPOS	SHWINST+1~, SHWINST+15*, SHWINST+16, SHWINST+18
SCR	SHWINST~, SHWINST+5
SUB	EDITVAL+6~, EDITVAL+7*, EDITVAL+8, EDITVAL+11, EDITVAL+12, EDITVAL+18
TERM	EDITVAL+6~, EDITVAL+13, EDITVAL+14, EDITVAL+15, EDITVAL+16, SHWINST+1~, SHWINST+2, SHWINST+4, SHWINST+5, SHWINST+6 , SHWINST+16, SELINST+2~, SELINST+3*, SELINST+9
TYP	EDITVAL~, EDITVAL+7, EDITVAL+13, EDITVAL+14, EDITVAL+15, EDITVAL+16, EDITVAL+19
U	EDIT1+3, EDIT1+5, EDIT1+7, EDIT1+8, EDIT1+12, EDIT1+13, EDITVAL+8, EDITVAL+9, EDITVAL+11, EDITVAL+13 , EDITVAL+14, EDITVAL+17, EDITVAL+18, EDITVAL+22, EDITVAL+24, EDITVAL+28, EDITVAL+29, EDITVAL+30, EDITVAL+33, PDIR+4 , PDIR+7, PDIR+8, PDIR+9, PDIR+12, PDIR+13, PDIR+14, SHWINST+2, SHWINST+9, SHWINST+10, SHWINST+18 , SELINST+3, SELINST+4, SELINST+5, SELINST+7, SELINST+9, SELINST+14, ERR+1
VALTYPE	EDIT1+1~*, EDIT1+2, EDIT1+4
WP	EDITVAL+6~, EDITVAL+22*, EDITVAL+31
X	EDIT1+1~, EDIT1+3, EDIT1+5, EDIT1+6, EDIT1+7, EDITVAL+6~, EDITVAL+26, PDIR+1, PDIR+2, PDIR+3 , PDIR+7, PDIR+8, PDIR+9, PDIR+10, PDIR+12, PDIR+13, PDIR+14*, PDIR+15, SHWINST+1~
Y	EDIT1+7, EDIT1+8, EDIT1+12, EDIT1+13, EDITVAL+7, EDITVAL+26, EDITVAL+28, EDITVAL+29, EDITVAL+32~, PDIR+2 , PDIR+3, PDIR+7, PDIR+15, PDIR+16, SHWINST+1~, SELINST+10
Y(0	EDITVAL+28, EDITVAL+29

Customize PDF page

Package: Toolkit

Routine: XPAREDT2

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: