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: APCHS82

Package: Patient Care Component

Routine: APCHS82


Information

APCHS82 ; IHS/CMI/LAB - PART 4 OF APCHS -- SUMMARY PRODUCTION COMPONENTS ; 12 Sep 2011 5:35 PM

Source Information

Source file <APCHS82.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
IHS VA Utilities 1 $$VAL^XBDIQ1  
Kernel 1 $$FMDIFF^XLFDT  
Patient Care Component 1 $$DATE^APCDPG  
VA Fileman 1 ^DIWP  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Patient Care Component 2 APCHS2  APCHS2I  
Health Summary Components 1 BHSMEAIP  

Entry Points

Name Comments DBIA/ICR reference
GOAL ; ******************** GOAL / STEPS *********
WP(X,R) ;EP - Entry point to print wp fields pass node in APCHWP
COMMON1 ;
AGOAL ;
; <SETUP>
STEP
STEPDSP ;
COMMON
GOALSCH ;
SS(%) ;
DISPREVS ;
GOALX
GOALDSP ;
; <SETUP GOAL>

External References

Name Field # of Occurrence
$$DATE^APCDPG STEPDSP+15, STEPDSP+16, STEP+15, DISPREVS+5
^DIWP WP+5
$$VAL^XBDIQ1 STEPDSP+5, STEPDSP+9, STEPDSP+27, STEPDSP+34, STEPDSP+40
$$FMDIFF^XLFDT GOALSCH+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "ACTIVE GOALS (ALL ACTIVE AND MAINTAINING GOALS)",!
  • Line Location: COMMON+8
Function Call: WRITE
  • Prompt: !,"INACTIVE GOALS (ALL GOALS STOPPED OR MET IN PAST 12 MONTHS)",!
  • Line Location: COMMON+9
Function Call: WRITE
  • Prompt: !,"GOALS NOT SET (LAST 5 OR 12 MONTHS)",!
  • Line Location: COMMON+10
Function Call: WRITE
  • Prompt: !,"GOAL ID: "
  • Line Location: STEPDSP+3
Function Call: WRITE
  • Prompt: X,?20,"Status: ",$S($P(APCHSN,U,1)="N":"GOAL NOT SET",1:$$VAL^XBDIQ1(9000093,APCHSIEN,.11)),!
  • Line Location: STEPDSP+5
Function Call: WRITE
  • Prompt: ?9,X,!
  • Line Location: STEPDSP+17
Function Call: WRITE
  • Prompt: ?9,"Provider: ",$$VAL^XBDIQ1(9000093,APCHSIEN,.08),!
  • Line Location: STEPDSP+40
Function Call: WRITE
  • Prompt: ?3,"Followup/Reviews for GOAL : "_$S($P(^AUTTLOC(APCHSFAC,0),U,7)]"":$J($P(^(0),U,7),4),1:"??")_$P(APCHSN,U,7),!
  • Line Location: DISPREVS+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCDTPGT - [#9001002.4] STEPDSP+18, STEP+18
^AUPNGOAL - [#9000093] GOALSCH+4, GOALSCH+5, GOALSCH+6, GOALSCH+7, GOALSCH+8, GOALSCH+9, GOALSCH+10, GOALDSP+2, STEPDSP+15, STEPDSP+16
, STEPDSP+18, STEP, STEP+1, STEP+2, STEP+3, STEP+4, STEP+7, STEP+10, STEP+15, STEP+18
, STEP+19, DISPREVS+1, DISPREVS+4, DISPREVS+5
^AUPNGOAL("AA" COMMON+2, GOALSCH+1
^AUPNGOAL("AC" COMMON
^AUTTLOC - [#9999999.06] STEPDSP+4, STEP+2, DISPREVS+2
^UTILITY($J WP+2!, WP+6, WP+8!
^VA(200 - [#200] STEP+19

Label References

Name Line Occurrences
$$SS STEP+7
COMMON1 COMMON+4
GOALDSP COMMON+12
GOALSCH COMMON+2
GOALX COMMON+3
STEPDSP GOALDSP+3
WP STEPDSP+9, STEPDSP+20, STEPDSP+27, STEPDSP+34, STEP+10, DISPREVS+7

Naked Globals

Name Field # of Occurrence
^( GOALSCH+3
^(0 STEPDSP+4, DISPREVS+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% SS~, SS+1, SS+2, SS+3, SS+4, SS+5
>> APCDC STEP+3*, STEP+6*, STEP+7
>> APCHC STEP*, STEP+1*, DISPREVS+3*
APCHCSVD GOALX+2!
APCHG WP+1~, WP+8!
>> APCHL STEP+1*, STEP+2, STEP+3, STEP+4, STEP+7, STEP+10, STEP+15, STEP+18, STEP+19, DISPREVS+3*
, DISPREVS+4*, DISPREVS+5
>> APCHSBRK COMMON+3
>> APCHSCKP COMMON+3, COMMON+7, STEPDSP+1, STEPDSP+6, STEPDSP+11, STEPDSP+14, STEPDSP+22, STEPDSP+29, STEPDSP+36, STEPDSP+39
, STEP+5, STEP+12, STEP+14, STEP+17, DISPREVS+9
APCHSDFT COMMON+1!, GOALX!
APCHSDFT( COMMON+6, COMMON+11, COMMON+12, GOALSCH+15*
APCHSDOO GOALX!
APCHSDTM GOALX!
APCHSDTN GOALX!
APCHSFAC COMMON+2*, GOALX!, GOALSCH+1, GOALSCH+15, STEPDSP+2*, STEPDSP+4, DISPREVS+2
APCHSFCN GOALX!
APCHSFPP COMMON+11*, COMMON+12, GOALX!
APCHSICD GOALX!
APCHSICL GOALX+1!
APCHSIEN COMMON+12*, GOALX!, GOALSCH+3*, GOALSCH+4, GOALSCH+5, GOALSCH+6, GOALSCH+7, GOALSCH+8, GOALSCH+9, GOALSCH+10
, GOALSCH+15, GOALDSP+2, STEPDSP+5, STEPDSP+9, STEPDSP+15, STEPDSP+16, STEPDSP+18, STEPDSP+27, STEPDSP+34, STEPDSP+40
, STEP, STEP+1, STEP+2, STEP+3, STEP+4, STEP+7, STEP+10, STEP+15, STEP+18, STEP+19
, DISPREVS+1, DISPREVS+4, DISPREVS+5
APCHSILN GOALX+1!
APCHSITE GOALX+2!
>> APCHSLR STEP+1*, STEP+2*, STEP+7
APCHSN GOALX+1!, GOALDSP+2*, STEPDSP+2, STEPDSP+4, STEPDSP+5, STEPDSP+15, STEPDSP+16, DISPREVS+2
APCHSNAB GOALX+2!
APCHSNAR GOALX+1!
APCHSNDF COMMON+1*, COMMON+4, GOALX!, GOALSCH+12*
APCHSNFL GOALX+2!
APCHSNFP GOALX!
>> APCHSNPG COMMON+3
APCHSNRQ GOALX!
APCHSNSH GOALX+2!
APCHSNTE GOALX+1!
>> APCHSPAT COMMON, COMMON+2, GOALSCH+1
APCHSPBN GOALX!
APCHSPLN GOALX!
APCHSPNM GOALX!
APCHSPRB GOALX!, GOALSCH+1*, GOALSCH+3, GOALSCH+15
>> APCHSQ COMMON+2*, GOALSCH+1*
>> APCHSQIT COMMON+3, COMMON+6, COMMON+7, COMMON+11, STEPDSP+1, STEPDSP+6, STEPDSP+10, STEPDSP+11, STEPDSP+13, STEPDSP+14
, STEPDSP+21, STEPDSP+22, STEPDSP+24, STEPDSP+28, STEPDSP+29, STEPDSP+31, STEPDSP+35, STEPDSP+36, STEPDSP+38, STEPDSP+39
, STEP+1, STEP+5, STEP+11, STEP+12, STEP+14, STEP+17, DISPREVS+4, DISPREVS+8, DISPREVS+9
APCHSTAT COMMON+6*, COMMON+8, COMMON+9, COMMON+10, COMMON+11, COMMON+12, GOALX!, GOALSCH+2*, GOALSCH+5*, GOALSCH+6*
, GOALSCH+7*, GOALSCH+8*, GOALSCH+9*, GOALSCH+10, GOALSCH+11, GOALSCH+13, GOALSCH+14, GOALSCH+15
APCHSTAT( GOALSCH+13*, GOALSCH+14
APCHSVSC GOALX+2!
APCHSX GOALX+2!
APCHWP STEPDSP+8!, STEPDSP+19!, STEPDSP+26!, STEPDSP+33!, STEP+9!, DISPREVS+6!
APCHWP( STEPDSP+10, STEPDSP+12, STEPDSP+21, STEPDSP+23, STEPDSP+28, STEPDSP+30, STEPDSP+35, STEPDSP+37, STEP+11, STEP+13
, DISPREVS+8, DISPREVS+10, WP+6*
APCHX STEPDSP+10*, STEPDSP+12, STEPDSP+18*, STEPDSP+21*, STEPDSP+23, STEPDSP+28*, STEPDSP+30, STEPDSP+35*, STEPDSP+37, STEP+3*
, STEP+4, STEP+7, STEP+10, STEP+15, STEP+18, STEP+19, WP+1~, WP+3*, WP+8!
>> APCHY STEP+11*, STEP+13, DISPREVS+8*, DISPREVS+10
CNT WP+1~, WP+6*, WP+8!
DIWF WP+7!
DIWL WP+4*, WP+6, WP+7!
DIWR WP+4*, WP+7!
DT GOALSCH+10
>> P STEP+19*, STEP+20
R WP~, WP+4
U GOALSCH+4, GOALSCH+5, GOALSCH+6, GOALSCH+7, GOALSCH+8, GOALSCH+9, GOALSCH+10, STEPDSP+2, STEPDSP+4, STEPDSP+5
, STEPDSP+15, STEPDSP+16, STEPDSP+18, STEP+2, STEP+4, STEP+7, STEP+10, STEP+15, STEP+18, STEP+19
, DISPREVS+2, DISPREVS+5
X STEPDSP+4*, STEPDSP+5, STEPDSP+15*, STEPDSP+16*, STEPDSP+17, STEPDSP+18*, STEP+7*, STEP+8, STEP+15*, STEP+16
, STEP+20*, STEP+21, DISPREVS+5*, DISPREVS+7, WP~
Y GOALX+2!, STEPDSP+18*, STEPDSP+20, STEP+18*, STEP+20
Z WP+6*, WP+7!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All