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

Package: Patient Care Component

Routine: APCHS2


Information

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

Source Information

Source file <APCHS2.m>

Call Graph

Call Graph Total: 17

Package Total Call Graph
Immunization Tracking 5 IMMBI^BIAPCHS  $$VER^BILOGO  (IMMFORC,IMMHX)^BIRPC  CONTRAS^BIRPC5  KILLALL^BIUTL8  
Patient Care Component 5 $$BI^APCHS11C  DISPREF^APCHS3C  WP^APCHS82  $$DATE^APCHSMU  GETSITEV^APCHSUTL  
Kernel 2 $$FMDIFF^XLFDT  ($$REPEAT,$$STRIP)^XLFSTR  
VA Fileman 2 ^%DT  EN^DDIOL  
DRG Grouper 1 $$ICDDX^ICDEX  
IHS Patient 1 $$DOB^AUPNPAT  
IHS VA Utilities 1 $$VAL^XBDIQ1  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Patient Care Component 1 APCHS11C  

Entry Points

Name Comments DBIA/ICR reference
IMMBI ;IHS/CMI/LAB - new subroutine for new imm package
MEAS ; ******************** MEASUREMENTS * 9000010.01 *******
; <SETUP>
IMMUN ; ******************** IMMUNIZATIONS * 9000010.11 *******
MEASDSP
PHCP(P) ;EP
PAD(D,L,C) ;EP
MEASDTYP
IMMDTYP
IMMUNX
IMMDSP2
IMMDSP
MEASX
CONTRAS ;
IMMBI2 ;EP
IMMGSET
HX ;
AGE(DFN,D,F) ;(DFN) Given DFN, return Age. ; AUPN*93.2*3
REF ; display refusals/contraindications from imm package and from PCC

External References

Name Field # of Occurrence
^%DT HX+14
$$BI^APCHS11C IMMUN+2
DISPREF^APCHS3C REF+15
WP^APCHS82 MEASDSP+19
$$DATE^APCHSMU REF+12
GETSITEV^APCHSUTL IMMDSP2+2
$$DOB^AUPNPAT AGE+3, AGE+7
IMMBI^BIAPCHS IMMBI2+7
$$VER^BILOGO IMMUN+1
IMMFORC^BIRPC IMMBI+7
IMMHX^BIRPC HX+3
CONTRAS^BIRPC5 CONTRAS+5
KILLALL^BIUTL8 IMMBI2+22
EN^DDIOL IMMBI+16, CONTRAS+9, HX+7
$$ICDDX^ICDEX PHCP+7
$$VAL^XBDIQ1 MEASDSP+7, MEASDSP+8, MEASDSP+11, REF+12, PHCP+11, PHCP+21
$$FMDIFF^XLFDT AGE+7
$$REPEAT^XLFSTR PAD+12
$$STRIP^XLFSTR MEASDSP+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: MEAS+5
Function Call: WRITE
  • Prompt: !
  • Line Location: MEASDTYP+2
Function Call: WRITE
  • Prompt: !
  • Line Location: MEASDSP+14
Function Call: WRITE
  • Prompt: !
  • Line Location: MEASDSP+23
Function Call: WRITE
  • Prompt: APCHSITX
  • Condition for execution: APCHSNPG
  • Line Location: IMMDSP2+8
Function Call: WRITE
  • Prompt: ?(APCHSITL+1),$P(^AUPNVIMM(APCHSDFN,0),U,4),?15,APCHSDAT,?25,$$AGE(APCHSPAT,$P(+^AUPNVSIT(APCHSVDF,0),"."),"P"),?34,APCHSITE,?65,APCHSIR,!
  • Line Location: IMMDSP2+8
Function Call: WRITE
  • Prompt: ?3,"IMMUNIZATION FORECAST:",!!
  • Line Location: IMMBI+9
Function Call: WRITE
  • Prompt: !
  • Line Location: IMMBI+16
Function Call: WRITE
  • Prompt: !
  • Line Location: CONTRAS+13
Function Call: WRITE
  • Prompt: X,!
  • Line Location: CONTRAS+26
Function Call: WRITE
  • Prompt: !?3,"IMMUNIZATION HISTORY:",!
  • Line Location: HX+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HX+13
Function Call: WRITE
  • Prompt: ?22,"Reaction: ",$P(APCHY,APCHV,6),!
  • Line Location: HX+17

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPH - [#9000013] PHCP+4, PHCP+5, PHCP+14, PHCP+15
^AUPNPH("AC" PHCP+3, PHCP+13
^AUPNVIMM - [#9000010.11] IMMDSP2+1, IMMDSP2+8
^AUPNVIMM("AA" IMMUN+4, IMMUN+7, IMMDTYP, IMMDSP
^AUPNVMSR - [#9000010.01] MEASDSP+1, MEASDSP+2, MEASDSP+12, MEASDSP+13, MEASDSP+14, MEASDSP+15, MEASDSP+17
^AUPNVMSR("AA" MEAS+2, MEAS+6, MEASDTYP+1, MEASDSP
^AUPNVSIT - [#9000010] MEASDSP+2, IMMDSP2+8
^AUTTIMM - [#9999999.14] IMMDTYP
^AUTTMSR - [#9999999.07] MEASDTYP
^BICONT - [#9002084.81] REF+5, REF+6
^BIPC - [#9002084.11] REF+3, REF+7, REF+12
^BIPC("AC" REF+1, REF+2
^DD(9000010.11 IMMGSET
^DPT - [#2] AGE+2
^GMRD(120.52 - [#120.52] MEASDSP+17
^ICD9 - [#80] PHCP+17

Label References

Name Line Occurrences
$$AGE IMMDSP2+8, HX+16
$$PAD CONTRAS+20, CONTRAS+23, CONTRAS+24
$$PHCP IMMBI2+17
HX CONTRAS+9
IMMBI IMMUN+2
IMMBI2 IMMUN+1
IMMDSP IMMDTYP
IMMDSP2 IMMDSP
IMMDTYP IMMUN+7
IMMGSET IMMDSP2+3, IMMDSP2+4
MEASDSP MEASDTYP+1
MEASDTYP MEAS+6
REF IMMUN+1, IMMUN+2

Naked Globals

Name Field # of Occurrence
^(0 MEASDTYP

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% AGE+6~, AGE+7*, AGE+8, AGE+11*, AGE+13
%1 AGE+11~*
%DT HX+14!*
APCH31 IMMBI+5~, IMMBI+6*, IMMBI+13, IMMBI+19, CONTRAS+8, CONTRAS+12, HX+6, HX+8
APCHBIDE HX+1~, HX+3, HX+20!
APCHBIDE( HX+1*
APCHBIER IMMBI+5~, IMMBI+13*, IMMBI+15, IMMBI+16, CONTRAS+8*, CONTRAS+9, HX+6*, HX+7
APCHC CONTRAS+12~*, CONTRAS+13, CONTRAS+17
APCHCONT CONTRAS+2~*, CONTRAS+5, CONTRAS+8, CONTRAS+12
APCHI IMMBI+21~*, IMMBI+23, HX+9~, HX+11*
APCHIMM IMMBI+5~, IMMBI+6*, IMMBI+7, IMMBI+13, IMMBI+19*, IMMBI+21, HX+3, HX+6, HX+8*, HX+11
, HX+20!
APCHSARR IMMBI2+6~*, IMMBI2+7
APCHSARR( IMMBI2+10, IMMBI2+11, IMMBI2+12, IMMBI2+15, IMMBI2+16, IMMBI2+21
>> APCHSBRK MEAS+3, IMMUN+5, IMMBI+1, IMMBI2+5
>> APCHSCKP MEAS+5, MEASDTYP+2, MEASDSP+3, MEASDSP+21, IMMUN+5, REF+11, IMMDTYP, IMMDSP2+8, IMMBI+1, IMMBI+15
, IMMBI+22, CONTRAS+9, CONTRAS+13, CONTRAS+26, HX+7, HX+13, HX+15, IMMBI2+5, IMMBI2+15
>> APCHSCVD MEASDSP+3, IMMDSP2
APCHSDAT MEASX!, MEASDSP+3*, MEASDSP+10, IMMUNX!, IMMDSP2*, IMMDSP2+8
APCHSDFN MEASX!, MEASDTYP+1*, MEASDSP*, MEASDSP+1, MEASDSP+2, MEASDSP+7, MEASDSP+8, MEASDSP+11, MEASDSP+12, MEASDSP+13
, MEASDSP+14, MEASDSP+15, MEASDSP+17, IMMUNX!, IMMDSP*, IMMDSP2+1, IMMDSP2+8
APCHSDG HX+14~*, HX+16
>> APCHSDLM MEASDTYP+1, REF+10
APCHSFN REF+15*, REF+16!
APCHSIC IMMUNX+1!, IMMDSP2+4*, IMMDSP2+5, IMMDSP2+6
APCHSIMC IMMUNX+1!
APCHSIMR IMMUNX+1!
APCHSIR IMMUNX+1!, IMMDSP2+3*, IMMDSP2+5*, IMMDSP2+6*, IMMDSP2+8
APCHSITE IMMUNX+2!, IMMDSP2+2*, IMMDSP2+8
APCHSITL IMMUNX!, IMMDTYP*, IMMDSP2+8
APCHSITP IMMUN+7*, IMMUNX!, IMMDTYP, IMMDSP
APCHSITX IMMUNX!, IMMDTYP*, IMMDSP2+8
APCHSIVD MEASDTYP+1*, MEASDSP, MEASDSP+3, IMMUNX!, IMMDTYP*, IMMDSP, IMMDSP2
APCHSMT MEAS+6*, MEASX!, MEASDTYP, MEASDTYP+1, MEASDSP
APCHSMT2 MEASX!, MEASDTYP*, MEASDSP+4
APCHSMT3 MEASX!, MEASDTYP*, MEASDTYP+2, MEASDSP+4*
APCHSN IMMUNX+1!, IMMDSP2+1*, IMMDSP2+2, IMMDSP2+3, IMMDSP2+4
APCHSNAB IMMUNX+2!
APCHSND2 MEAS+6*, MEASX!, MEASDTYP+1*
>> APCHSNDM MEAS+6
APCHSNFL IMMUNX+2!
>> APCHSNPG MEASDSP+4, IMMUN+5, IMMDSP2+8, IMMBI+1, IMMBI2+5
APCHSNSH IMMUNX+2!, IMMDSP2+2
>> APCHSP IMMDSP2+3, IMMDSP2+4, IMMGSET+2*
>> APCHSPAT MEAS+2, MEAS+6, MEASDTYP+1, MEASDSP, IMMUN+4, IMMUN+7, REF+1, REF+2, IMMDTYP, IMMDSP
, IMMDSP2+8, IMMBI+7, CONTRAS+5, HX+3, HX+16, IMMBI2+7, IMMBI2+17
>> APCHSQ MEAS+6*, IMMUN+7*, IMMDTYP*, IMMDSP*, IMMGSET+2*
>> APCHSQIT MEAS+5, MEAS+6, MEASDTYP+2, MEASDSP+3, MEASDSP+20, MEASDSP+21, IMMUN+5, REF+11, IMMDTYP, IMMDSP2+8
, IMMBI+1, IMMBI+15, IMMBI+21, IMMBI+22, CONTRAS+9, CONTRAS+13, CONTRAS+26, HX+7, HX+11, HX+13
, HX+15, IMMBI2+5, IMMBI2+15
APCHSS REF+16!
APCHST REF+15*, REF+16!
APCHSVDF IMMUNX!, IMMDSP2+2*, IMMDSP2+8
APCHSVSC IMMUNX+2!
>> APCHSX MEASDSP+17*
APCHV HX+9~, HX+10*, HX+12, HX+13, HX+14, HX+16, HX+17, HX+20!
APCHWP MEASDSP+18!
APCHWP( MEASDSP+20, MEASDSP+24
APCHX MEASDSP+20*, MEASDSP+24, REF+2*, REF+3, REF+7, REF+12, IMMBI+21~*, HX+9~
APCHY REF+1*, REF+2, HX+9~, HX+11*, HX+12, HX+13, HX+14, HX+16, HX+17, HX+20!
APCHZ HX+9~, HX+10*, HX+13*, HX+20!
C MEASDSP+15*, MEASDSP+16, MEASDSP+20*, MEASDSP+22*, MEASDSP+23, PAD~, PAD+11*, PAD+12
D REF+7*, REF+8, REF+9*, REF+10, AGE~, AGE+4*, AGE+7, PAD~, PAD+9, PAD+10
, PAD+12
DFN AGE~, AGE+1, AGE+2, AGE+3, AGE+7
DT AGE+4
F AGE~, AGE+5*, AGE+8, IMMBI2+9~*, IMMBI2+10~*, IMMBI2+12*, IMMBI2+17
G PHCP+2~, PHCP+3*, PHCP+9*, PHCP+11, PHCP+13, PHCP+19*, PHCP+21
I CONTRAS+17*, CONTRAS+20, HX+1~*, PHCP+2~, PHCP+5*, PHCP+6, PHCP+7*, PHCP+8, PHCP+11, PHCP+15*
, PHCP+16, PHCP+17*, PHCP+18, PHCP+21
L PAD~, PAD+10*, PAD+12
N IMMBI2+9~*, IMMBI2+10*, IMMBI2+11, IMMBI2+12, IMMBI2+14*, IMMBI2+15*, IMMBI2+16, IMMBI2+21
P PHCP~, PHCP+3, PHCP+13
>> R REF+3*, REF+4, REF+5, REF+6
U MEASDTYP, MEASDSP+1, MEASDSP+2, MEASDSP+12, MEASDSP+13, MEASDSP+17, REF+3, REF+6, REF+7, REF+12
, IMMDTYP, IMMDSP2+2, IMMDSP2+3, IMMDSP2+4, IMMDSP2+8, IMMGSET, CONTRAS+17, HX+11, PHCP+5, PHCP+7
, PHCP+15, PHCP+17
V MEASDSP+2*, CONTRAS+19~*, CONTRAS+23, CONTRAS+24
X MEASDSP+7*, MEASDSP+9*, MEASDSP+10, MEASDSP+15*, MEASDSP+17*, MEASDSP+19, IMMDSP2+3*, IMMDSP2+4*, IMMGSET+1, IMMGSET+2
, CONTRAS+19*, CONTRAS+20*, CONTRAS+23*, CONTRAS+24*, CONTRAS+26, HX+14~*, IMMBI2+17*, IMMBI2+20, PHCP+2~, PHCP+3*
, PHCP+4, PHCP+5, PHCP+9, PHCP+13*, PHCP+14, PHCP+15, PHCP+19
Y MEASDSP+3*, MEASDSP+17*, IMMDSP2*, IMMDSP2+3*, IMMDSP2+4*, IMMGSET*, IMMGSET+1*, IMMGSET+2, CONTRAS+17*, CONTRAS+23
, CONTRAS+24, HX+14, PHCP+2~
Z PHCP+2~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All