Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

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) ;

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
Info |  Source |  Entry Points |  Interaction Calls