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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: APCHS2G

Package: Patient Care Component

Routine: APCHS2G


Information

APCHS2G ; IHS/CMI/LAB - PART 2B OF APCHS -- SUMMARY PRODUCTION COMPONENTS ;

Source Information

Source file <APCHS2G.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
IHS VA Utilities 1 ($$VAL,$$VALI)^XBDIQ1  
Patient Care Component 1 (GETICDDX,GETSITEV,PRTICD,PRTTXT)^APCHSUTL  
Patient Care Component Reports 1 $$PRIMPROV^APCLV  

Entry Points

Name Comments DBIA/ICR reference
NOPOV ;
PHN(V) ;if one provider is phn quit on 1 otherwise quit on ""
GETCLN ;
ONEDATE ;
COMMON ;
OUTPTX ; <CLEANUP>
DSPVIS ;
OUTPT ; ********** OUTPATIENT ENCOUNTERS * 9000010/9000010.07 **********
; <SETUP>
HASPOV ;

External References

Name Field # of Occurrence
GETICDDX^APCHSUTL HASPOV+1
GETSITEV^APCHSUTL ONEDATE+10
PRTICD^APCHSUTL COMMON+13
PRTTXT^APCHSUTL COMMON+21, COMMON+22, COMMON+23, COMMON+24
$$PRIMPROV^APCLV PHN+4
$$VAL^XBDIQ1 HASPOV+2, COMMON+18, COMMON+19
$$VALI^XBDIQ1 PHN+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: APCHSDAT
  • Line Location: COMMON+2
Function Call: WRITE
  • Prompt: ?10,APCHSFAC
  • Line Location: COMMON+11
Function Call: WRITE
  • Prompt: ?23,APCHSCLI
  • Condition for execution: APCHSCLI]""
  • Line Location: COMMON+11
Function Call: WRITE
  • Prompt: ?APCHSICL,"Intervention: ",$$VAL^XBDIQ1(9000010.32,APCHSPHN,.05)
  • Line Location: COMMON+18
Function Call: WRITE
  • Prompt: !?APCHSICL,"Complexity: ",$$VAL^XBDIQ1(9000010.32,APCHSPHN,.06)
  • Line Location: COMMON+19
Function Call: WRITE
  • Prompt: !
  • Line Location: COMMON+20

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCHSCTL - [#9001015] GETCLN+2
^AUPNVCHS("AD" COMMON+9
^AUPNVPHN - [#9000010.32] COMMON+18, COMMON+19, COMMON+20, COMMON+21, COMMON+22, COMMON+23, COMMON+24
^AUPNVPHN("AD" COMMON+15, COMMON+16
^AUPNVPOV - [#9000010.07] DSPVIS+3
^AUPNVPOV("AD" DSPVIS+2, DSPVIS+3
^AUPNVPRV - [#9000010.06] PHN+7
^AUPNVPRV("AD" PHN+3, PHN+7
^AUPNVSIT - [#9000010] ONEDATE+6, PHN+2
^AUPNVSIT("AA" OUTPT+2, OUTPT+7, ONEDATE+4
^DD(9000010.06 PHN+8, PHN+9, PHN+10
^DD(9000010.07 COMMON+8
^DIC(40.7 - [#40.7] GETCLN+7, GETCLN+8, GETCLN+9
^DIC(6 - [#6] PHN+9
^DIC(7 - [#7] PHN+10
^VA(200 - [#200] PHN+8

Label References

Name Line Occurrences
$$PHN ONEDATE+9
COMMON NOPOV+2
DSPVIS ONEDATE+10
GETCLN ONEDATE+10
HASPOV DSPVIS+3
NOPOV DSPVIS+2
ONEDATE OUTPT+8

Naked Globals

Name Field # of Occurrence
^(2 GETCLN+2
^(9999999 GETCLN+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PHN+7~, PHN+10*, PHN+11
%1 PHN+7~*, PHN+11*, PHN+12
APCHCSVD OUTPTX+2!, ONEDATE+2*
>> APCHSBRK OUTPT+3
APCHSCCL OUTPTX+2!, ONEDATE+1*, GETCLN+5*, GETCLN+8*, GETCLN+10*, COMMON+5, COMMON+6
>> APCHSCKP OUTPT+3, COMMON+1, COMMON+18, COMMON+19
APCHSCLI OUTPTX+1!, GETCLN+3*, GETCLN+5*, GETCLN+6*, GETCLN+7, GETCLN+8*, GETCLN+9*, GETCLN+10, COMMON+5*, COMMON+6*
, COMMON+7*, COMMON+11
>> APCHSCVD ONEDATE+2
APCHSDAT OUTPT+10, OUTPTX+1!, ONEDATE+2*, ONEDATE+3, COMMON+2
APCHSDCL OUTPTX+2!, GETCLN+3*, GETCLN+4*, COMMON+12, COMMON+21, COMMON+22, COMMON+23, COMMON+24
>> APCHSDLM OUTPT+7
APCHSDTU OUTPT+10, OUTPTX+1!, ONEDATE+3*, DSPVIS+1*
APCHSFAC OUTPTX+1!, COMMON+3*, COMMON+4*, COMMON+11
APCHSICD OUTPTX+1!, NOPOV+1*, HASPOV+1*, COMMON+7, COMMON+8*, COMMON+13*
APCHSICL OUTPTX+1!, COMMON+12*, COMMON+18, COMMON+19, COMMON+21*, COMMON+22*, COMMON+23*, COMMON+24*
APCHSITE OUTPTX+2!
APCHSIVD OUTPT+7*, OUTPTX+1!, ONEDATE+2, ONEDATE+4
APCHSMOD OUTPTX+1!, NOPOV+1*, HASPOV+3*, COMMON+8
APCHSMTX OUTPTX+1!, COMMON+8*
>> APCHSN ONEDATE+6*, ONEDATE+7, ONEDATE+8, GETCLN+5, GETCLN+6, DSPVIS+3*, HASPOV+1, HASPOV+2, HASPOV+3
APCHSNAB OUTPTX+2!
>> APCHSNDM OUTPT+7, OUTPT+10*
APCHSNDT OUTPTX+1!, ONEDATE+3*, COMMON+1*, COMMON+2*, COMMON+18*, COMMON+19*
APCHSNFL OUTPTX+2!
>> APCHSNPG OUTPT+3, COMMON+1, COMMON+18, COMMON+19
APCHSNRQ OUTPTX+1!, NOPOV+1*, HASPOV+2*, COMMON+21*, COMMON+22*, COMMON+23*, COMMON+24*
APCHSNSH OUTPTX+2!, COMMON+3, COMMON+4
>> APCHSNTE COMMON+9*
APCHSOVT OUTPTX+1!
>> APCHSPAT OUTPT+2, OUTPT+7, ONEDATE+4
APCHSPDN OUTPTX+1!, DSPVIS+3*, HASPOV+2
APCHSPFN OUTPT+6*, OUTPTX+1!, COMMON+2*, COMMON+3, COMMON+4*
APCHSPHN OUTPTX+1!, COMMON+16*, COMMON+17, COMMON+18, COMMON+19, COMMON+20, COMMON+21, COMMON+22, COMMON+23, COMMON+24
APCHSPVD OUTPT+5*, OUTPT+10*, OUTPTX+1!, ONEDATE+3
>> APCHSQ ONEDATE+4*, DSPVIS+3*
APCHSQIT OUTPT+3, OUTPT+7, OUTPT+9, OUTPTX+2!, ONEDATE+4, ONEDATE+11, COMMON+1, COMMON+18, COMMON+19
APCHSSCL OUTPTX+1!, ONEDATE+5*, COMMON+2*, COMMON+4*, COMMON+5, COMMON+6*, COMMON+7
>> APCHSTXT COMMON+21*, COMMON+22*, COMMON+23*, COMMON+24*
>> APCHSTYP GETCLN+2
APCHSVDF OUTPTX+1!, ONEDATE+4*, ONEDATE+6, ONEDATE+9, DSPVIS+2, DSPVIS+3, COMMON+9, COMMON+15, COMMON+16
APCHSVSC OUTPTX+2!, COMMON+13
P PHN+7~*, PHN+8, PHN+9, PHN+10
U ONEDATE+7, ONEDATE+8, GETCLN+2, GETCLN+5, GETCLN+6, GETCLN+8, GETCLN+9, PHN+7, PHN+8, PHN+9
, PHN+10, HASPOV+1, HASPOV+2, HASPOV+3, COMMON+8, COMMON+18, COMMON+19, COMMON+20
V PHN~, PHN+1, PHN+2, PHN+3, PHN+4, PHN+7
Y OUTPTX+2!, ONEDATE+2*, PHN+7~*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All