Routine: PXAPIDEL

Package	Total	Call Graph
PCE Patient Care Encounter	7	$$SOURCE^PXAPIUTL PAUSE^PXCEHELP (EN1,EVENT)^PXKMAIN ($$LOCK,UNLOCK)^PXLOCK $$STOPCODE^PXUTLSTP $$PKG2IEN^VSIT ($$DEC,$$KILL)^VSITKIL
Scheduling	2	$$SDAPI^SDAMA301 LISTVST^SDOERPC
VA FileMan	2	WAIT^DICD ^DIR

Package	Total	Caller Graph
PCE Patient Care Encounter	3	PXAPI PXBAPI1 PXICLN9B

Entry Points

Name	Comments	DBIA/ICR reference
DELVFILE(PXAWHICH,PXAVISIT,PXAPKG,PXASOURC,PXAASK,PXAECHO,PXAUSER,ERRRET,PXAPROB)	;Deletes the requested data related to the visit. ; PXAWHICH is a ^ delimited string with the last two or three letters ; of the v-files to delete entries from and VISIT for the ; administrative data on the visit and STOP for the stop codes. ; (e.g. for immunization the v-file is AUPNVIMM so IMM is ; passed.) Or "ALL" to delete all of the data from the ; V-Files, the Stop Code and Visit. ; PXAVISIT is pointer to a visit for which the related data is be ; deleted. ; PACKAGE (optional) if passed will only delete items created by ; this package ; SOURCE (optional) if passed will only delete items created by ; this source ; PXAASK (optional) if passed and not 0 or "" then will ask the user ; if they are sure that they want to delete ; (suggest 1 if want to ask). ; PXAECHO (optional) if passed and not 0 or "" then will display to ; the user what is being deleted (suggest 1 if want to echo). ; PXAUSER (optional) this is the duz of a user if you only want to ; delete entries that this user created. If it is not passed ; or is 0 or "" then it will not matter who created the ; entries being deleted. ; ERRRET (optional) passed by reference. If present will return PXKERROR ; array elements to the caller. ; PXAPROB (optional) A dotted variable name. When errors and warnings ; occur, They will be passed back in the form of an array ; with the general description of the problem.
STOP	;Do Stop Codes first
DELCR	;Do CREDIT Stop Code if it is the only entry except OE entry, not assoc. with apt
VERAPT(PXAVISIT,SCDXPOV)	;FUNCTION CALLED TO VERIFY IF VISIT IS ASSOCIATED WITH APPOINTMENT
ADDERR(PXMSG)	;

External References

Name	Field # of Occurrence
WAIT^DICD	STOP+54
^DIR	DELVFILE+91
$$SOURCE^PXAPIUTL	DELVFILE+67, DELVFILE+101
PAUSE^PXCEHELP	STOP+9, DELCR+21
EN1^PXKMAIN	STOP+55
EVENT^PXKMAIN	STOP+57
$$LOCK^PXLOCK	DELVFILE+97
UNLOCK^PXLOCK	DELCR+31
$$STOPCODE^PXUTLSTP	STOP+8, DELCR+20
$$SDAPI^SDAMA301	VERAPT+12
LISTVST^SDOERPC	VERAPT+19
$$PKG2IEN^VSIT	DELVFILE+54
$$DEC^VSITKIL	DELCR+12
$$KILL^VSITKIL	DELCR+26

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,ERROR("LOCK") Line Location: DELVFILE+99
Function Call: WRITE	Prompt: !," ...deleting Stop Codes" Line Location: STOP+7
Function Call: WRITE	Prompt: !!,$C(7),"Cannot edit at this time, try again later." Line Location: STOP+9
Function Call: WRITE	Prompt: !," ...deleting " Line Location: STOP+46
Function Call: WRITE	Prompt: $S("CPT"=PXAVFILE:"Procedure","IMM"=PXAVFILE:"Immunizations","PED"=PXAVFILE:"Patient Education","ICR"=PXAVFILE:"Contra/Refusal Event",1:"") Line Location: STOP+47
Function Call: WRITE	Prompt: $S("POV"=PXAVFILE:"Diagnoses","PRV"=PXAVFILE:"Providers","SK"=PXAVFILE:"Skin Test","TRT"=PXAVFILE:"Treatments","HF"=PXAVFILE:"Health Factors","XAM"=PXAVFILE:"Exams",1:"") Line Location: STOP+48
Function Call: WRITE	Prompt: $S("SC"=PXAVFILE:"Standard Codes",1:"") Line Location: STOP+49
Function Call: WRITE	Prompt: !," ...deleting Credit Stop Codes" Line Location: DELCR+19
Function Call: WRITE	Prompt: !!,$C(7),"Cannot edit/delete at this time, try again later." Line Location: DELCR+21
Routine Call	DIR Line Location: DELVFILE+91

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	DELVFILE+47, STOP+4, STOP+5, STOP+6, STOP+16, DELCR+9, DELCR+10, VERAPT+3, VERAPT+4
^AUPNVSIT("AD"	STOP+3, DELCR+8
^AUPNVSK("APT"	STOP+33
^DIC(9.4 - [#9.4]	DELVFILE+58
^SCE("AVSIT"	DELCR+18
^TMP("PXK"	DELVFILE+73!, STOP+12, STOP+13, STOP+14, STOP+16, STOP+21, STOP+22, STOP+41, STOP+42, STOP+43* , STOP+53, STOP+58!
^TMP($J	VERAPT+2!, VERAPT+13, VERAPT+14, VERAPT+18!

Label References

Name	Line Occurrences
$$VERAPT	DELCR+1
ADDERR	DELVFILE+46, DELVFILE+48, DELVFILE+57, DELVFILE+61, DELVFILE+71, DELVFILE+83, DELVFILE+100, STOP+10, STOP+37, STOP+40 , DELCR+22, DELCR+30

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DIR	DELVFILE+86~
DIR("A"	DELVFILE+89*
DIR("B"	DELVFILE+90*
DIR(0	DELVFILE+88*
DUZ	DELVFILE+97, DELCR+31
ERROR	DELVFILE+96~, DELVFILE+97
ERROR("LOCK"	DELVFILE+99, DELVFILE+100
ERRRET	DELVFILE~, STOP+56*
INDEX	DELVFILE+74~, STOP+22*
LOCK	DELVFILE+96~, DELVFILE+97*, DELVFILE+98
>> PACKAGE	DELVFILE+51*, DELVFILE+52, DELVFILE+53, DELVFILE+54
PXAASK	DELVFILE~, DELVFILE+85
PXACOUNT	DELVFILE+74~, DELVFILE+80, STOP+3, STOP+18, DELCR+8
PXAECHO	DELVFILE~, DELVFILE+94, STOP+25, STOP+54, DELCR+3
PXAFILE	DELVFILE+74~, STOP+26*, STOP+28, STOP+29, STOP+30, STOP+31, STOP+38, STOP+41
PXAIEN	DELVFILE+75~, STOP+2, STOP+3, STOP+4, STOP+5, STOP+6, STOP+8, STOP+10, STOP+27, STOP+28 , STOP+33, STOP+35, STOP+40, STOP+43, DELCR+7, DELCR+8, DELCR+9, DELCR+10, DELCR+20, DELCR+22
PXAINDX	DELVFILE+74~, STOP+28*, STOP+41, STOP+42, STOP+43
PXAKILL	DELCR+24~, DELCR+26*, DELCR+27, DELCR+28, DELCR+32
PXALEN	DELVFILE+75~, DELVFILE+78*, DELVFILE+79, DELVFILE+80, STOP+18
PXAMYSOR	DELVFILE+75~, DELVFILE+101*, STOP+8, STOP+13, DELCR+20
PXAPIECE	DELVFILE+75~, STOP+15*, STOP+16
PXAPKG	DELVFILE~, DELVFILE+52, DELVFILE+53, DELVFILE+54*, DELVFILE+58, STOP+12, STOP+30
PXAPROB	DELVFILE~
PXAPROB(	ADDERR+2*
PXARET	DELVFILE+74~, DELVFILE+76, DELVFILE+80, DELVFILE+82, DELVFILE+84, DELVFILE+85, DELVFILE+92, DELVFILE+93, STOP+34, STOP+39* , DELCR+32
PXASOURC	DELVFILE~, DELVFILE+65, DELVFILE+66, DELVFILE+67*, DELVFILE+68, STOP+31
PXAUSER	DELVFILE~, STOP+4, STOP+29, DELCR+9
PXAVFILE	DELVFILE+74~, DELVFILE+80, DELVFILE+81, DELVFILE+83, STOP+18, STOP+19, STOP+23, STOP+33, STOP+40, STOP+41 , STOP+42, STOP+43, STOP+47, STOP+48, STOP+49
PXAVISIT	DELVFILE~, DELVFILE+45, DELVFILE+47, DELVFILE+48, DELVFILE+97, STOP+3, STOP+8, STOP+14, STOP+16, DELCR+1 , DELCR+8, DELCR+12, DELCR+18, DELCR+20, DELCR+26, DELCR+31, VERAPT~, VERAPT+3, VERAPT+4, VERAPT+19
PXAWFLAG	DELVFILE+74~, DELVFILE+94, DELVFILE+99, STOP+7, STOP+9, STOP+25, STOP+44, STOP+45, DELCR+3, DELCR+19 , DELCR+21
PXAWHICH	DELVFILE~, DELVFILE+77*, DELVFILE+78, DELVFILE+80, STOP+1, STOP+18, DELCR+4, DELCR+25
PXERRCNT	DELVFILE+40~, DELVFILE+42, ADDERR+1, ADDERR+2
PXERRMSG	DELVFILE+40~, DELVFILE+55, DELVFILE+56, DELVFILE+57, DELVFILE+59, DELVFILE+60, DELVFILE+61, DELVFILE+69, DELVFILE+70, DELVFILE+71 , STOP+35, STOP+36, STOP+37, DELCR+28, DELCR+29*, DELCR+30
PXKERROR	STOP+52~, STOP+56, STOP+58!, DELCR+32
PXMSG	ADDERR~, ADDERR+2
PXPCNT	DELCR+12~*, DELCR+17
PXST	STOP+8~, DELCR+20~
SCDXPOV	VERAPT~, VERAPT+1~, VERAPT+3, VERAPT+7, VERAPT+13, VERAPT+22*, VERAPT+23
SDAPP	VERAPT+1~, VERAPT+14*, VERAPT+15
SDARRAY	VERAPT+1~, VERAPT+12
SDARRAY("FLDS"	VERAPT+11*
SDARRAY(1	VERAPT+8*
SDARRAY(2	VERAPT+10*
SDARRAY(4	VERAPT+9*
SDATE	VERAPT+1~, VERAPT+5*, VERAPT+8, VERAPT+13, VERAPT+14
SDCL	VERAPT+1~, VERAPT+5*, VERAPT+7, VERAPT+10, VERAPT+13, VERAPT+14
SDCOUNT	VERAPT+12~*
SDD	DELCR+1~*, DELCR+2
SDENC	VERAPT+15~*, VERAPT+22
SDFN	VERAPT+1~, VERAPT+8*, VERAPT+9, VERAPT+13, VERAPT+14
SDOEP	VERAPT+17~, VERAPT+19, VERAPT+20, VERAPT+21, VERAPT+22
>> SOURCE	DELVFILE+64*, DELVFILE+65, DELVFILE+66, DELVFILE+67
SVSTSTR	VERAPT+1~, VERAPT+4*, VERAPT+5, VERAPT+8
U	STOP+5, STOP+6, DELCR+10, VERAPT+5, VERAPT+8, VERAPT+15
X	DELVFILE+86~
Y	DELVFILE+86~, DELVFILE+92
>> ZTQUEUED	DELVFILE+56, DELVFILE+60, DELVFILE+70, DELVFILE+94, STOP+25, STOP+54, DELCR+3

Marked Items

Name	Field # of Occurrence
$T(FORMAT^@(6)	STOP+26

Customize PDF page

Package: PCE Patient Care Encounter

Routine: PXAPIDEL

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items