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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: APCDFQAP

Package: Patient Care Component

Routine: APCDFQAP


Information

APCDFQAP ; IHS/CMI/LAB - PRINT DE QA ;

Source Information

Source file <APCDFQAP.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 2 DD^%DT  ^DIR  
DRG Grouper 1 $$ICDDX^ICDEX  
IHS Patient 1 $$HRN^AUPNPAT  
IHS VA Utilities 1 $$VAL^XBDIQ1  
Patient Care Component Reports 1 $$VD^APCLV  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Patient Care Component 1 APCDFQA  

Entry Points

Name Comments DBIA/ICR reference
HEAD
HEAD1 ;
POV ;
POVW ;
START ;
WRT ;
DONE ;
POV1 ;

External References

Name Field # of Occurrence
DD^%DT START+2, WRT+2
$$VD^APCLV WRT+9, WRT+10, POVW+3, POVW+4
$$HRN^AUPNPAT WRT+5, WRT+6, WRT+7
^DIR DONE+1, HEAD+1
$$ICDDX^ICDEX WRT+9, WRT+10, POVW+3, POVW+4
$$VAL^XBDIQ1 WRT+9, WRT+10, POVW+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"No Visits to report!",!
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !,"No visits to report",!
  • Line Location: START+8
Function Call: WRITE
  • Prompt: !!,APCDHRN,?12,APCDDATE
  • Line Location: WRT+9
Function Call: WRITE
  • Prompt: ?31,$P($$ICDDX^ICDEX(+^AUPNVPOV(APCDPOVD,0),$$VD^APCLV(APCDVDFN)),U,2),?40,$$VAL^XBDIQ1(9000010.07,APCDPOVD,.24)
  • Line Location: WRT+9
Function Call: WRITE
  • Prompt: !?31,$P($$ICDDX^ICDEX(+^AUPNVPOV(APCDPOVD,0),$$VD^APCLV(APCDVDFN)),U,2),?40,$$VAL^XBDIQ1(9000010.07,APCDPOVD,.24)
  • Line Location: POVW+3
Function Call: WRITE
  • Prompt: ?47,$E(APCDNQ,1,34)
  • Condition for execution: APCDNQ]""
  • Line Location: POVW+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: ?32,APCDLHDR,?74,"Page ",APCDPG,!
  • Line Location: HEAD1+2
Function Call: WRITE
  • Prompt: ?(80-$L($P(^DIC(4,DUZ(2),0),U))/2),$P(^DIC(4,DUZ(2),0),U),!
  • Line Location: HEAD1+3
Function Call: WRITE
  • Prompt: ?15,"Visit POSTING Dates: "_APCDBDD_" and "_APCDEDD,!
  • Line Location: HEAD1+4
Function Call: WRITE
  • Prompt: ?(80-APCDLENG)/2,"Data Entry Operator: ",$P(^VA(200,APCDPROV,0),U),!
  • Line Location: HEAD1+6
Function Call: WRITE
  • Prompt: ?(80-APCDLENG)/2,"Clinic: ",$S(APCDCLN]"":$P(^DIC(40.7,APCDCLN,0),U),1:"ALL")
  • Line Location: HEAD1+8
Function Call: WRITE
  • Prompt: !,"Total Visits Found: ",APCDVCNT
  • Line Location: HEAD1+9
Function Call: WRITE
  • Prompt: " Total Number of Random Visits Selected: ",APCDMAX
  • Line Location: HEAD1+9
Function Call: WRITE
  • Prompt: !!?2,"HR#",?12,"Visit Date",?31,"ICD",?40,"ICD-9",?47,"Provider Narrative"
  • Line Location: HEAD1+10
Function Call: WRITE
  • Prompt: !,APCD80D
  • Line Location: HEAD1+11
Routine Call
  • DIR
  • Line Location:
    • DONE+1
    • HEAD+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPAT - [#9000001] WRT+7
^AUPNVPOV - [#9000010.07] POV+1, POV1+2, WRT+9, WRT+10, POVW+3, POVW+4
^AUPNVPOV("AD" POV+1
^AUPNVSIT - [#9000010] START+10
^DIC(4 - [#4] HEAD1+3
^DIC(40.7 - [#40.7] HEAD1+7, HEAD1+8
^VA(200 - [#200] HEAD1+5, HEAD1+6
^XTMP("APCDFQA" START+8, START+10, DONE+2!, POV1+1, POV1+2

Label References

Name Line Occurrences
DONE START+6, START+8, START+11, START+12
HEAD START+5, START+8, START+12, WRT+1, POVW+2
HEAD1 HEAD
POV START+10
POV1 POV+1
POVW WRT+11
WRT POV+2

Naked Globals

Name Field # of Occurrence
^(0 START+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APCD80D START+1*, HEAD1+11
>> APCDBD START+2
>> APCDBDD START+2*, HEAD1+4
>> APCDBT START+8, START+10, DONE+2, POV1+1, POV1+2
>> APCDCLN HEAD1+7, HEAD1+8
>> APCDDATE WRT+2*, WRT+9
>> APCDED START+2
>> APCDEDD START+2*, HEAD1+4
>> APCDGOT START+7*, START+10
>> APCDHRN WRT+5*, WRT+6*, WRT+7*, WRT+8*, WRT+9
>> APCDJOB START+8, START+10, DONE+2, POV1+1, POV1+2
>> APCDLENG HEAD1+5*, HEAD1+6, HEAD1+7*, HEAD1+8
>> APCDLHDR HEAD1+2
>> APCDMAX START+3*, START+4*, START+6, START+7, HEAD1+9
>> APCDNQ WRT+10*, POVW+3*
>> APCDPAT WRT+3*, WRT+5, WRT+6, WRT+7
>> APCDPG START+5*, START+6*, HEAD, HEAD1+1*, HEAD1+2
>> APCDPOV POV+1*, POV1+1, POV1+2
APCDPOVA POV+1!
APCDPOVA( POV1+1*, POV1+2*, POVW+1, POVW+3
APCDPOVA(1 WRT+9
>> APCDPOVC POV+1*, POV1+1*, POV1+2*, WRT+1
>> APCDPOVD WRT+9*, WRT+10, POVW+3*, POVW+4
>> APCDPOVN POVW+1*, POVW+3
>> APCDPROV HEAD1+5, HEAD1+6
APCDQUIT START+9!, START+10, START+11, START+12, DONE+1, WRT+1, POVW+1, POVW+2, HEAD+1*
>> APCDRSM HEAD1+9
>> APCDVCNT START+3, START+4, START+7, START+10, HEAD1+9
>> APCDVDFN START+10*, POV+1, WRT+9, WRT+10, POVW+3, POVW+4
>> APCDVREC START+10*, WRT+2, WRT+3, WRT+5
>> APCDX START+10*
DIR DONE+1!, HEAD+1!
DIR(0 DONE+1*, HEAD+1*
>> DTOUT HEAD+1
DUZ(2 WRT+6, HEAD1+3
IO DONE+1, HEAD+1
IO(0 DONE+1, HEAD+1
IOF DONE+3, HEAD1+1
IOSL START+12, WRT+1, POVW+2
IOST DONE+1, HEAD+1
U POV1+2, WRT+3, WRT+5, WRT+9, WRT+10, POVW+3, POVW+4, HEAD1+3, HEAD1+5, HEAD1+6
, HEAD1+7, HEAD1+8
>> Y START+2*, WRT+2*, HEAD+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All