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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: APCDCAFP

Package: Patient Care Component

Routine: APCDCAFP


Information

APCDCAFP ; IHS/CMI/LAB - ;

Source Information

Source file <APCDCAFP.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
IHS VA Utilities 3 ^XBFMK  $$EXTSET^XBFUNC  EN^XBVK  
VA Fileman 3 ^DIC  YN^DICN  ^DIR  
IHS Patient 1 KILL^AUPNPAT  
Kernel 1 HOME^%ZIS  
Patient Care Component 1 EN^APCDCAF  

Entry Points

Name Comments DBIA/ICR reference
SORT ;how to sort list of visits
LOC() ;EP - Return location name from file 4 based on DUZ(2).
INFORM ;inform user what this report is all about
PROC1 ; call listmanager
GETPAT ;
START ;
USR() ;EP - Return name of current user from ^VA(200.
EOP ;EP - End of page.
XIT ;
D(D) ;
CTR(X,Y) ;EP - Center X in a field Y wide.
PROC ;EP - called from xbdbque

External References

Name Field # of Occurrence
HOME^%ZIS START+2
EN^APCDCAF PROC1+2
KILL^AUPNPAT XIT+4
^DIC GETPAT+3
YN^DICN GETPAT+5
^DIR START+7, SORT+3, EOP+5
^XBFMK XIT+3
$$EXTSET^XBFUNC INFORM+14
EN^XBVK XIT+2, XIT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @(IOF),!!
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !!,"The EHR/PCC Coding Audit Start Date has not been set",!,"in the PCC Master Control file."
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !
  • Line Location: GETPAT+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: SORT+1
Function Call: WRITE
  • Prompt: !,$$CTR($$LOC)
  • Line Location: INFORM+1
Function Call: WRITE
  • Prompt: !!,$$CTR("PCC/EHR CODING AUDIT FOR ONE PATIENT")
  • Line Location: INFORM+2
Function Call: WRITE
  • Prompt: !!,"This option is used to review visits created by EHR users for one patient."
  • Line Location: INFORM+3
Function Call: WRITE
  • Prompt: !,"The visits displayed in the list are those with an INCOMPLETE or blank"
  • Line Location: INFORM+4
Function Call: WRITE
  • Prompt: !,"chart audit status. This list can be sorted by date, primary provider"
  • Line Location: INFORM+5
Function Call: WRITE
  • Prompt: !,"clinic code, hospital location (scheduling clinic), and facility."
  • Line Location: INFORM+6
Function Call: WRITE
  • Prompt: !,"Once the visit has been reviewed, the review status can be set as reviewed/"
  • Line Location: INFORM+7
Function Call: WRITE
  • Prompt: !,"complete or incomplete. All visits set as reviewed/complete will be passed"
  • Line Location: INFORM+8
Function Call: WRITE
  • Prompt: !,"to the IHS/RPMS billing package."
  • Line Location: INFORM+9
Function Call: WRITE
  • Prompt: !,"Contract Health visits are excluded."
  • Line Location: INFORM+10
Function Call: WRITE
  • Prompt: !,"Visits that do not have a primary provider are ",$S($P(^APCDSITE(DUZ(2),0),U,28):"included in ",1:"excluded from "),"the list."
  • Line Location: INFORM+11
Function Call: WRITE
  • Prompt: !,"Visits with the following service categories are NOT included in the list:"
  • Line Location: INFORM+12
Function Call: WRITE
  • Prompt: !?10,"- Event (Historical)"
  • Line Location: INFORM+13
Function Call: WRITE
  • Prompt: !?10,"- ",$$EXTSET^XBFUNC(9000010,.07,X)
  • Line Location: INFORM+14
Function Call: WRITE
  • Prompt: !!,"PLEASE NOTE: A visit will NOT pass to Billing until it is marked"
  • Line Location: INFORM+15
Function Call: WRITE
  • Prompt: !,"as reviewed/completed."
  • Line Location: INFORM+16
Function Call: WRITE
  • Prompt: !
  • Line Location: INFORM+17
Routine Call
  • %ZIS
  • Line Location:
    • START+2
Routine Call
  • DIC
  • Line Location:
    • GETPAT+3
Routine Call
  • DIR
  • Line Location:
    • START+7
    • SORT+3
    • EOP+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPAT - [#9000001] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCCCTRL - [#9001000] START+5, PROC1+1
^APCDSITE - [#9001001.2] INFORM+11, INFORM+14
^DIC(4 - [#4] LOC+1
^VA(200 - [#200] USR+1

Label References

Name Line Occurrences
$$CTR INFORM+1, INFORM+2
$$LOC INFORM+1
INFORM START+4
XIT START+1, START+5, GETPAT+4, SORT+4, PROC1+3

Naked Globals

Name Field # of Occurrence
^(0 USR+1, LOC+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % GETPAT+5*
>> APCDBD PROC1+1*
>> APCDCAFP PROC1+1*
>> APCDED PROC1+1*
>> APCDPARM GETPAT+5
>> APCDPATF GETPAT+2*, GETPAT+6*
>> APCDPEHR PROC1+1*
>> APCDSORT SORT+1*, SORT+5*
D D~, D+1, D+2
DA START+7!, SORT+3!
>> DFN GETPAT+6*, PROC1+1
DFOUT EOP+4!
DIC GETPAT+3*!
DIC(0 GETPAT+3*
DIR START+7!, SORT+2!, SORT+3!, XIT+1!, EOP+3~
DIR("A" START+7*, SORT+3*, EOP+5*
DIR("B" SORT+3*
DIR(0 START+7*, SORT+2*, EOP+5*
DIRUT SORT+4, EOP+4!
DLOUT EOP+4!
DT PROC1+1
DTOUT EOP+4!
DUOUT EOP+4!
DUZ USR+1
DUZ(2 START+5, PROC1+1, LOC+1, INFORM+11, INFORM+14
IO("S" EOP+2
IOF START+2, START+3
IOM CTR+1
IOST EOP+1
>> IOT EOP+2
U START+5, GETPAT+5, PROC1+1, USR+1, LOC+1, INFORM+11
X CTR~, CTR+1, INFORM+14*
Y GETPAT+4, GETPAT+6, SORT+5, CTR~, CTR+1
>> ZTQUEUED EOP+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All