Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: PXAPIDEL

Package: PCE Patient Care Encounter

Routine: PXAPIDEL


Information

PXAPIDEL ;ISL/dee - PCE's code for the DELVFILE api ;Dec 19, 2018@07:53:52

Source Information

Source file <PXAPIDEL.m>

Call Graph

Call Graph

Call Graph Total: 11

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  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All