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 ;06/02/2016

Source Information

Source file <PXAPIDEL.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
PCE Patient Care Encounter 6 $$SOURCE^PXAPIUTL  PAUSE^PXCEHELP  (EN1,EVENT)^PXKMAIN  $$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) ;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.
STOP
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

External References

Name Field # of Occurrence
WAIT^DICD STOP+46
^DIR DELVFILE+68
$$SOURCE^PXAPIUTL DELVFILE+49, DELVFILE+70
PAUSE^PXCEHELP STOP+10, DELCR+21
EN1^PXKMAIN STOP+47
EVENT^PXKMAIN STOP+48
$$STOPCODE^PXUTLSTP STOP+9, DELCR+20
$$SDAPI^SDAMA301 VERAPT+10
LISTVST^SDOERPC VERAPT+17
$$PKG2IEN^VSIT DELVFILE+42
$$DEC^VSITKIL DELCR+12
$$KILL^VSITKIL DELCR+25

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," ...deleting Stop Codes"
  • Line Location: STOP+8
Function Call: WRITE
  • Prompt: !!,$C(7),"Cannot edit at this time, try again later."
  • Line Location: STOP+10
Function Call: WRITE
  • Prompt: !," ...deleting "
  • Line Location: STOP+38
Function Call: WRITE
  • Prompt: $S("CPT"=PXAVFILE:"Procedure","IMM"=PXAVFILE:"Immunizations","PED"=PXAVFILE:"Patient Education","ICR"=PXAVFILE:"Contra/Refusal Event",1:"")
  • Line Location: STOP+39
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+40
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+68

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT - [#9000010] DELVFILE+36, STOP+5, STOP+6, STOP+7, STOP+16, DELCR+9, DELCR+10, VERAPT+3, VERAPT+4
^AUPNVSIT("AD" STOP+4, DELCR+8
^DIC(9.4 - [#9.4] DELVFILE+43
^SCE("AVSIT" DELCR+18
^TMP("PXK" DELVFILE+52!, STOP+12*, STOP+13*, STOP+14*, STOP+16*, STOP+21*, STOP+22*, STOP+33*, STOP+34*, STOP+35*
STOP+45, STOP+49!
^TMP($J VERAPT+2!, VERAPT+11, VERAPT+12, VERAPT+16!

Label References

Name Line Occurrences
$$VERAPT DELCR+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR DELVFILE+63~
DIR("A" DELVFILE+66*
DIR("B" DELVFILE+67*
DIR(0 DELVFILE+65*
>> INDEX STOP+22*
>> PACKAGE DELVFILE+39*, DELVFILE+40, DELVFILE+41, DELVFILE+42
PXAASK DELVFILE~, DELVFILE+62
PXACOUNT DELVFILE+53~, DELVFILE+59*, STOP+4*, STOP+18*, DELCR+8*
PXAECHO DELVFILE~, STOP+1, STOP+25, STOP+46, DELCR+3
PXAFILE DELVFILE+53~, STOP+26*, STOP+28, STOP+29, STOP+30, STOP+31, STOP+32, STOP+33
PXAIEN DELVFILE+54~, STOP+3*, STOP+4*, STOP+5, STOP+6, STOP+7, STOP+9, STOP+27*, STOP+28*, STOP+35
DELCR+7*, DELCR+8*, DELCR+9, DELCR+10, DELCR+20
PXAINDX DELVFILE+53~, STOP+28*, STOP+33, STOP+34, STOP+35
PXAKILL DELCR+23~, DELCR+25*, DELCR+26
PXALEN DELVFILE+54~, DELVFILE+57*, DELVFILE+58, DELVFILE+59, STOP+18
PXAMYSOR DELVFILE+54~, DELVFILE+70*, STOP+9, STOP+13, DELCR+20
PXAPIECE DELVFILE+54~, STOP+15*, STOP+16
PXAPKG DELVFILE~, DELVFILE+40*, DELVFILE+41*, DELVFILE+42*, DELVFILE+43, STOP+12, STOP+31
PXARET DELVFILE+53~, DELVFILE+55*, DELVFILE+59, DELVFILE+60*, DELVFILE+61, DELVFILE+62, DELVFILE+69*, STOP+29*, DELCR+26
PXASOURC DELVFILE~, DELVFILE+47*, DELVFILE+48*, DELVFILE+49*, DELVFILE+50, STOP+32
PXAUSER DELVFILE~, STOP+5, STOP+30, DELCR+9
PXAVFILE DELVFILE+53~, DELVFILE+59*, DELVFILE+60, STOP+18*, STOP+19, STOP+23, STOP+33, STOP+34, STOP+35, STOP+39
STOP+40
PXAVISIT DELVFILE~, DELVFILE+35, DELVFILE+36, STOP+4, STOP+9, STOP+14, STOP+16, DELCR+1, DELCR+8, DELCR+12
DELCR+18, DELCR+20, DELCR+25, VERAPT~, VERAPT+3, VERAPT+4, VERAPT+17
PXAWFLAG DELVFILE+53~, STOP+1*, STOP+8, STOP+10, STOP+25*, STOP+36, STOP+37*, DELCR+3*, DELCR+19, DELCR+21
PXAWHICH DELVFILE~, DELVFILE+56*, DELVFILE+57, DELVFILE+59, STOP+2, STOP+18, DELCR+4, DELCR+24
PXKERROR STOP+44~, DELCR+26
PXPCNT DELCR+12~*, DELCR+17
PXST STOP+9~*, DELCR+20~*
SCDXPOV VERAPT~, VERAPT+1~, VERAPT+3, VERAPT+11, VERAPT+20*, VERAPT+21
SDAPP VERAPT+1~, VERAPT+12*, VERAPT+13
SDARRAY VERAPT+1~, VERAPT+10
SDARRAY("FLDS" VERAPT+9*
SDARRAY(1 VERAPT+6*
SDARRAY(2 VERAPT+8*
SDARRAY(4 VERAPT+7*
SDATE VERAPT+1~, VERAPT+5*, VERAPT+6, VERAPT+11, VERAPT+12
SDCL VERAPT+1~, VERAPT+5*, VERAPT+8, VERAPT+11, VERAPT+12
SDCOUNT VERAPT+10~*
SDD DELCR+1~*, DELCR+2
SDENC VERAPT+13~*, VERAPT+20
SDFN VERAPT+1~, VERAPT+6*, VERAPT+7, VERAPT+11, VERAPT+12
SDOEP VERAPT+15~, VERAPT+17, VERAPT+18*, VERAPT+19*, VERAPT+20
>> SOURCE DELVFILE+46*, DELVFILE+47, DELVFILE+48, DELVFILE+49
SVSTSTR VERAPT+1~, VERAPT+4*, VERAPT+5, VERAPT+6
U STOP+6, STOP+7, DELCR+10, VERAPT+5, VERAPT+6, VERAPT+13
X DELVFILE+63~
Y DELVFILE+63~, DELVFILE+69
>> ZTQUEUED DELVFILE+42, DELVFILE+43, DELVFILE+50, STOP+1, STOP+25, STOP+46, 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