Routine: ECED3

Package	Total	Call Graph
Event Capture	9	PCEE^ECBEN2U ($$GETPRO,$$PRLST,KILLV,SRCHTM)^ECDSUTIL CLIN^ECEDF (DXEDT,HDR,HDR1,MSG,MSGC,SETE)^ECEDU PROS^ECHECK1 ($$FILPRV,ASKPRV)^ECPRVMUT $$FNDVST^ECUTL ($$ASKIF,$$CHKDSS,$$ELGLST,$$INOUTPT,$$MULTELG,DSPSTAT,ELIGERR,INOUTERR)^ECUTL0 ($$ASKCLASS,EDCLASS)^ECUTL1
VA FileMan	3	(,DD)^%DT ^DIE ^DIK
CPT HCPCS Codes	1	$$CPT^ICPTCOD
PCE Patient Care Encounter	1	$$DELVFILE^PXAPI

Package	Total	Caller Graph
Event Capture	1	ECED1

Entry Points

Name	Comments	DBIA/ICR reference
EDIT	; enter or edit procedure
ASK	;edit cat
NEW	; create new procedure
NEWC
LIST
PICK
P	; get procedure
P1	;
NEWP
P2	;ask mul proc
PROS	;
LISTP
SETP	;set proc info
DIE	;edit record
SET	; sets data
DEL	; delete existing procedure
DELP
SELC	; select category
GETCLN	;- Get assoc clinic from event code screen

External References

Name	Field # of Occurrence
^%DT	DIE+17
DD^%DT	DIE+15
^DIE	DIE+11, DIE+20, DIE+26, DIE+32, DIE+72, DIE+77
^DIK	DIE+5, DELP
PCEE^ECBEN2U	SET+4
$$GETPRO^ECDSUTIL	NEWP+3
$$PRLST^ECDSUTIL	P2+11
KILLV^ECDSUTIL	NEWP+4, NEWP+6, P2+5, P2+10, P2+12, P2+16
SRCHTM^ECDSUTIL	P2+1
CLIN^ECEDF	DIE+85
DXEDT^ECEDU	DIE+37
HDR^ECEDU	PICK+1
HDR1^ECEDU	LISTP
MSG^ECEDU	P2+12
MSGC^ECEDU	SELC+3, SELC+4
SETE^ECEDU	EDIT+4
PROS^ECHECK1	P+1
$$FILPRV^ECPRVMUT	DIE+62
ASKPRV^ECPRVMUT	DIE+61
$$FNDVST^ECUTL	DEL+8
$$ASKIF^ECUTL0	DIE+45
$$CHKDSS^ECUTL0	DIE+30, DIE+40
$$ELGLST^ECUTL0	DIE+49
$$INOUTPT^ECUTL0	DIE+23
$$MULTELG^ECUTL0	DIE+41
DSPSTAT^ECUTL0	DIE+53
ELIGERR^ECUTL0	DIE+47
INOUTERR^ECUTL0	DIE+24
$$ASKCLASS^ECUTL1	DIE+56
EDCLASS^ECUTL1	DIE+56
$$CPT^ICPTCOD	SETP+3
$$DELVFILE^PXAPI	DEL+11

Interaction Calls

Name	Line Occurrences
Function Call: READ	Variable: X Timeout: DTIME Line Location: EDIT+1
Function Call: WRITE	Prompt: !!,"Press <RET> to edit the selected procedure, or enter D to delete",!,"the procedure.",! Line Location: EDIT+2
Function Call: READ	Variable: X Timeout: DTIME Line Location: ASK+4
Function Call: WRITE	Prompt: !,"CATEGORY: "_ECCN Line Location: NEW+3
Function Call: WRITE	Prompt: !,CNT_". ",?5,$P(ECC(CNT),"^",2) Line Location: LIST+0
Function Call: READ	Variable: X Timeout: DTIME Line Location: PICK+0
Function Call: READ	Variable: X Timeout: DTIME Line Location: PICK+1
Function Call: WRITE	Prompt: !!,"Select the number corresponding to the procedure category, or ^ to quit.",!!,"Press <RET> to continue ",! Line Location: PICK+1
Function Call: READ	Variable: X Timeout: DTIME Line Location: P+5
Function Call: WRITE	Prompt: !,"Procedure: " Line Location: P1+1
Function Call: WRITE	Prompt: $S(ECCPT="":"",1:ECPTCD_" ")_$E(ECPN,1,50) Line Location: P1+2
Function Call: WRITE	Prompt: !,"Available Procedures within "_ECDN_": ",! Line Location: LISTP+0
Function Call: WRITE	Prompt: ?72,"National",!,?5,"Procedure Name",?40,"Synonym",?72,"Number",! Line Location: LISTP+1
Function Call: WRITE	Prompt: !,CNT_".",?5,$E($P(^TMP("ECPRO",$J,CNT),"^",4),1,30),?38,$E($P(^(CNT),"^",3),1,30),?72,$P(^(CNT),"^",5) Line Location: LISTP+3
Function Call: WRITE	Prompt: " "_$S(ECCPT="":"",1:ECPTCD_" ")_$E(ECPN,1,50) Line Location: SETP+4
Function Call: WRITE	Prompt: !,?8," Procedure code replaced, all modifiers deleted " Line Location: DIE+3
Function Call: WRITE	Prompt: !!,"You should edit this patient procedure and enter an active clinic.",!! Line Location: DIE+85
Function Call: WRITE	Prompt: !!,"Press <RET> to continue " Line Location: DIE+86
Function Call: READ	Variable: X Timeout: DTIME Line Location: DEL+1
Function Call: WRITE	Prompt: !!,"Enter YES to delete this procedure, or <RET> to quit this option." Line Location: DEL+2
Function Call: WRITE	Prompt: !!,"Deleting Procedure... " Line Location: DELP+0
Function Call: WRITE	Prompt: !!,"Press <RET> to continue " Line Location: DELP+2
Function Call: READ	Variable: X Timeout: DTIME Line Location: SELC+1
Function Call: WRITE	Prompt: @IOF,!,$S(EC1:"Available Procedures",1:"Categories")_" within ",ECDN," : ",! Line Location: SELC+2
Routine Call	DIE Line Location: DIE+11 DIE+20 DIE+26 DIE+32 DIE+72 DIE+77

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ECH - [#721]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(8 - [#8]	DIE+44
^EC(725 - [#725]	SETP+1, DIE+1
^ECH - [#721]	DIE+1, DIE+5, DIE+6!, DIE+43, DIE+67, DIE+80, DIE+81, DIE+82, SET+1, SET+2 , DEL+4
^ECJ - [#720.3]	SETP+6, DIE+76, GETCLN+3
^ECJ("AP"	DIE+75, GETCLN+3
^ECL("AD"	DIE+76
^SC - [#44]	SETP+7, SETP+8, DIE+82, GETCLN+4
^TMP("ECLKUP"	SETP+9*
^TMP("ECPRO"	P+2, P1+1, LISTP+3, SETP+1, SETP+6, SELC+4

Label References

Name	Line Occurrences
@(	P2+4
DEL	EDIT+3, DEL+2
DELP	DEL+4
DIE	P1+1, NEWP+6, P2+6, P2+13
EDIT	EDIT+2
GETCLN	DIE+68
LIST	PICK+1
NEWC	ASK+6
NEWP	P2+3
P	ASK+2, ASK+3, ASK+5, NEW+3, NEW+4, LIST+1
SELC	LIST, LISTP+3
SET	DIE+83, DIE+84
SETP	P1+1, P2+8, P2+14

Naked Globals

Name	Field # of Occurrence
^(	LISTP+3, SETP+1
^(0	SETP+7, DIE+1*, SET+2, GETCLN+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	DIE+16*, DIE+17!
%DT("A"	DIE+16*
%DT("B"	DIE+16*
%DT(0	DIE+16*
>> CNT	NEWC, LIST, PICK+1, P1+1, NEWP, P2+7, P2+11, P2+12, P2+13, PROS+1 , LISTP+3*, SETP+1, SETP+6, SETP+9
DA	DIE+1, DIE+4, DIE+5, DIE+6!, DIE+43, DIE+56, DIE+61, DIE+62, DIE+67, SET+1 , SET+2!, DELP!
DA(1	DIE+4*
DIE	DIE+7!, DIE+12!, DIE+34!, DIE+64!, DIE+77!, DIE+80!
DIE("NO^"	DIE+7*
DIK	DIE+4, DIE+6!, DELP!
>> DIR("?"	NEWP+2*
>> DIR("B"	NEWP+1*
DR	DIE+7!, DIE+9, DIE+10, DIE+11!, DIE+19, DIE+20!, DIE+25, DIE+27!, DIE+31, DIE+33! , DIE+71, DIE+72!, DIE+77*!
DTIME	EDIT+1, ASK+4, PICK, PICK+1, P+5, DIE+86, DEL+1, DELP+2, SELC+1
DTOUT	DIE+12, DIE+18!, DIE+34, DIE+64, DIE+78
DUZ	SET+2
>> EC	DIE+80, DEL+4, DELP
>> EC(	DIE+80, DEL+4, DELP
>> EC(0	DIE+80*, DIE+81, DIE+82
>> EC1	ASK+1, LIST, P+1, NEWP, LISTP+2*, SELC+1, SELC+2, SELC+3, SELC+4, SELC+6
>> EC4	SETP+6, SETP+7, SETP+8, DIE+68, DIE+69, DIE+70, DIE+82, GETCLN+2, GETCLN+3, GETCLN+4
>> EC4N	SETP+7, DIE+31, GETCLN+4
>> ECC	NEW+2, NEW+3, PICK+2, DIE+1, DIE+75, SELC+6*, GETCLN+3
>> ECC(	NEW+1, NEW+2, LIST, PICK+1, PICK+2, SELC+3, SELC+6
>> ECC(1	ASK+2
>> ECC(2	ASK+3
>> ECCH	DEL+4*
ECCLFLDS	DIE+56, DIE+58!
ECCLFLDS(""	DIE+56
>> ECCN	ASK+4, NEW+2, NEW+3, PICK+2, SELC+6*
>> ECCPT	P1+2, SETP+1, SETP+2, SETP+3, SETP+4, DIE+1, DIE+9, DIE+81*
>> ECD	DIE+30, DIE+40, DIE+75, GETCLN+3
ECDA	DIE+4*, DIE+5, DIE+6!
>> ECDFN	DIE+23, DIE+41, DIE+56
>> ECDN	LIST, P+4, LISTP, SELC+2
>> ECDT	SETP+3, DIE+61
>> ECDX	DIE+81*
ECDX1	DIE+1*, DIE+50!
ECELANS	DIE+45*, DIE+46, DIE+49, DIE+50!
ECELCOD	DIE+43*, DIE+44, DIE+48, DIE+50!
ECELDSP	DIE+44*, DIE+45, DIE+47, DIE+48, DIE+50!
>> ECELIG	DIE+41, DIE+48, DIE+49*
ECFIL	DIE+62*, DIE+63!
>> ECFLG	ASK+1*
>> ECFN	DIE+1, DIE+80, DIE+81, DIE+82
ECHOICE	NEW+1, NEW+2, NEW+3!, NEW+4, LIST, LIST+1, PICK+1!, NEWP!, PROS+1!, LISTP+3 , SELC+1, SELC+5*
ECI	GETCLN+1~, GETCLN+3*
>> ECID	SETP+8, DIE+82
>> ECINP	DIE+1, DIE+81, DIE+84, SET+3
>> ECL	DIE+75, GETCLN+3
>> ECLN	P+3
>> ECMN	DIE+10
ECNEWDT	DIE+19*, DIE+23, DIE+50!
ECOLD	ASK+1, NEW+2, NEW+3!, NEWC, PICK+2!
ECOLDN	ASK+1, NEW+2, NEW+3!, PICK+2*!
>> ECOUT	EDIT+1, ASK+4, PICK, P+2, P+5, NEWP+4, DIE+12, DIE+18, DIE+30, DIE+34 , DIE+37, DIE+56, DIE+57, DIE+61, DIE+62, DIE+64, DIE+76, DIE+78, DEL+1*
>> ECP	SETP+1*, DIE+1, DIE+2, DIE+75, GETCLN+2, GETCLN+3
>> ECPCE	DIE+37, DIE+56, DIE+83, DIE+84, SET+3
>> ECPCL	DIE+85
>> ECPCNT	NEWP, P2+2, P2+3, P2+4, P2+6, P2+7, P2+11
>> ECPN	P1+2, NEWP+1, NEWP+6, SETP+1*, SETP+4
>> ECPNAME	P2+11
ECPO	DIE+1*, DIE+2, DIE+6!
>> ECPR	DIE+1*, DIE+15, DIE+16
>> ECPROCED	NEWP+6
ECPRV	DIE+63!
ECPRVARY	DIE+61, DIE+62, DIE+63!
ECPRVN	DIE+63!
>> ECPTCD	P1+2, SETP+2, SETP+3, SETP+4
>> ECPTSTAT	DIE+23*, DIE+24, DIE+25, DIE+30, DIE+40, DIE+53, DIE+56
ECSCR	DIE+75*, DIE+76, DIE+78!, DIE+80!
ECSTOP	LIST+1, PICK+1!, NEWP!, PROS+1!, SELC+1*
>> ECU	SET+2*
ECVAR1	DEL+8~*!
ECVST	DEL+4*, DEL+8, DEL+11!
ECVV	DEL+11*, DELP!
>> ECX	NEWP, NEWP+3, NEWP+4, NEWP+6, P2+1
ECZZ	DIE+81*!
>> I	LIST*
IOF	SELC+2
IOSL	LIST, LISTP+3
>> JJ	LISTP*
>> MM	NEW+1*
>> NATN	P1+3, SETP+1*, SETP+5
>> OK	ASK+1, NEWP, P2+9, P2+15
>> SYN	P1+3, SETP+1*, SETP+5
U	SETP+3, DIE+1
VAEL	DIE+50!
VAEL(1	DIE+41, DIE+48
VALQUIET	DEL+11*!
>> X	EDIT+1, EDIT+2, EDIT+3, ASK+4, ASK+5, ASK+6, NEW+1, NEWC, LIST, PICK* , PICK+1, PICK+2, P+5, PROS+1, LISTP+3, LISTP+4, DIE+86, DEL+1, DEL+2, DEL+3 , DELP+2, SELC+1, SELC+2, SELC+3, SELC+4, SELC+6
Y	DIE+12, DIE+15*, DIE+16!, DIE+18!, DIE+19, DIE+20!, DIE+34, DIE+78

Customize PDF page

Package: Event Capture

Routine: ECED3

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: