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

Package: Patient Care Component

Routine: APCHHMRU


Information

APCHHMRU ; IHS/CMI/LAB - NO DESCRIPTION PROVIDED 15-NOV-2000 ;

Source Information

Source file <APCHHMRU.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
IHS VA Utilities 3 $$VAL^XBDIQ1  ^XBFMK  EN^XBVK  
Registration 3 EN^VALM  TERM^VALM0  (CLEAR,FULL)^VALM1  
VA Fileman 3 ^DIC  (,IX)^DIK  ^DIR  
Kernel 1 DISP^XQORM1  
Patient Care Component 1 INP^APCHSMU  

Entry Points

Name Comments DBIA/ICR reference
HELP ; -- help code
DISPHM ;
S1 ;
BACK ;go back to listman
EXPND ; -- expand code
HM ;EP - update methods
WF(H,G,A) ;
HDR ; -- header code
MIN ;min age apch2
INIT ; -- init variables and list array
WAGE(H,G,A) ;
DHM ;delete pov
EN ; -- main entry point for APCH MODIFY HMR
CONTA ;
S(Y,F,C,T) ;set up array
FREQ ;
EP ;EP - called from option to select and display a hmr
MAX ;
AHM ;add a new pov
EXIT ; -- exit code
MOD ;EP - called from protocol
W(A) ;

External References

Name Field # of Occurrence
INP^APCHSMU MIN+5, MAX+5, FREQ+5
^DIC EP+4
^DIK DHM+12
IX^DIK CONTA+14
^DIR HM+4, HM+6, AHM+2, MIN+3, MAX+3, FREQ+3, CONTA+1, DHM+3, DHM+9
EN^VALM EN+1
TERM^VALM0 BACK+1
CLEAR^VALM1 EN+2
FULL^VALM1 EN+3, MOD+2
$$VAL^XBDIQ1 INIT+5
^XBFMK EP+3
EN^XBVK EXIT+1
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option will allow a site to specify sex, age ranges and frequencies for",!,"a health maintenance reminder.",!!
  • Line Location: EP+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !,"Protocol entry not defined."
  • Line Location: MOD+1
Function Call: WRITE
  • Prompt: !,"You may add a new sex, age range, frequency combination or edit and existing",!,"one for the ",$P(^APCHSURV(APCHHMR,0),U)," reminder.",!
  • Line Location: HM+2
Function Call: WRITE
  • Prompt: !
  • Line Location: HM+6
Function Call: WRITE
  • Prompt: !!,"Bye."
  • Line Location: HM+7
Function Call: WRITE
  • Prompt: !!,"Bye."
  • Line Location: HM+8
Function Call: WRITE
  • Prompt: !?5,APCHC,") ",?9,APCHSEXR,?22,$$WAGE(APCHHMR,APCHGIEN,APCHA),?50,$$WF(APCHHMR,APCHGIEN,APCHA)
  • Line Location: DISPHM+7
Function Call: WRITE
  • Prompt: !!,"Now enter the minimum age in the age range. It must be entered in the following",!,"format: 1Y, 2M, 30D, 10Y, where Y=years, M=months, D=days"
  • Line Location: MIN+1
Function Call: WRITE
  • Prompt: !!,"Now enter the maximum age in the age range. It must be entered in the following",!,"format: 1Y, 2M, 30D, 10Y, where Y=years, M=months, D=days"
  • Line Location: MAX+1
Function Call: WRITE
  • Prompt: !!,"Now enter the frequency for ",$S(APCH1="F":"FEMALES",APCH1="M":"MALES",APCH1="B":"ALL GENDERS",APCH1="U":"UNKNOWN"),", ages ",$$W(APCH2)," to ",$$W(APCH3),!,"It must be in the form: 2Y for every 2 years, 3M for every 3 months, etc.",!
  • Line Location: FREQ+1
Function Call: WRITE
  • Prompt: !!,"The following will be added:",!,?5,$S(APCH1="F":"FEMALES",APCH1="M":"MALES",APCH1="U":"UNKNOWN",APCH1="B":"ALL GENDERS"),", ages ",$$W(APCH2)," to ",$$W(APCH3)," reminder due every ",$$W(APCH4)
  • Line Location: FREQ+7
Function Call: WRITE
  • Prompt: !!,"Invalid choice."
  • Line Location: DHM+7
Function Call: WRITE
  • Prompt: !,"Okay, not deleted."
  • Line Location: DHM+11
Routine Call
  • VALM
  • Line Location:
    • EN+1
Routine Call
  • DIC
  • Line Location:
    • EP+4
Routine Call
  • DIR
  • Line Location:
    • HM+4
    • HM+6
    • AHM+2
    • MIN+3
    • MAX+3
    • FREQ+3
    • CONTA+1
    • DHM+3
    • DHM+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^APCHSURV - [#9001018] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCHSCTL - [#9001015] INIT+16, INIT+17
^APCHSURV - [#9001018] INIT+4, INIT+7, INIT+9, INIT+10, INIT+11, INIT+12, HM+2, DISPHM+2, DISPHM+5, DISPHM+6
, CONTA+5, CONTA+8*, CONTA+9*, CONTA+10, CONTA+12*, CONTA+13*, WAGE+2, WAGE+3, WF+2
^TMP("APCHHMRU" INIT+1!, INIT+2*, INIT+18, INIT+19!, S1+1*, S1+2*

Label References

Name Line Occurrences
$$W FREQ+1, FREQ+7
$$WAGE DISPHM+7
$$WF DISPHM+7
@( HM+9
AHM HM+4, MIN+4, MAX+4, FREQ+4
BACK MOD+1, MOD+4, DHM+13
DISPHM HM+3, DHM+2
EXIT EP+5, EN+4
FREQ FREQ+5
HDR BACK+4
HM MOD+3, HM+4, HM+10
INIT BACK+3
MAX MAX+5
MIN MIN+5
S INIT+4, INIT+5, INIT+6, INIT+7, INIT+8, INIT+12, INIT+15, INIT+17
S1 S+4, S+6, S+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % S+7*, S+8*, S1+1*, S1+2
A WAGE~, WAGE+2, WAGE+3, WF~, WF+2, W~, W+2, W+3, W+4
APCH1 AHM+1*, AHM+4*, FREQ+1, FREQ+7, CONTA+2!, CONTA+3!, CONTA+5, CONTA+9
APCH2 MIN+2*, MIN+6*, FREQ+1, FREQ+7, CONTA+2!, CONTA+3!, CONTA+13
APCH3 MAX+2*, MAX+6*, FREQ+1, FREQ+7, CONTA+2!, CONTA+3!, CONTA+13
APCH4 FREQ+2*, FREQ+6*, FREQ+7, CONTA+2!, CONTA+3!, CONTA+13
>> APCHA DISPHM+6*, DISPHM+7
>> APCHC HM+4, DISPHM+1*, DISPHM+3*, DISPHM+7*, DHM+3, DHM+6*, DHM+7, DHM+12
>> APCHGIEN DISPHM+4*, DISPHM+5*, DISPHM+6, DISPHM+7
>> APCHHMR EP+6*, INIT+4, INIT+5, INIT+7, INIT+9, INIT+10, INIT+11, INIT+12, INIT+17, MOD+1
, HM+2, DISPHM+2, DISPHM+5, DISPHM+6, DISPHM+7, CONTA+5, CONTA+8, CONTA+9, CONTA+10, CONTA+12
, CONTA+13, CONTA+14
>> APCHQUIT DISPHM+3*, DISPHM+5, DISPHM+6
APCHSEL DISPHM+1!, DISPHM+3!
APCHSEL( DISPHM+7*, DHM+7, DHM+12
>> APCHSEX DISPHM+5*
>> APCHSEXR DISPHM+5*, DISPHM+7
B WAGE+1~, WAGE+4*, WAGE+5*, WAGE+6*, WAGE+10, WF+1~, WF+3*, WF+4*, WF+5*, WF+6
, W+1~, W+2*, W+3*, W+4*, W+5
C INIT+4*, S~, S+6, CONTA+5*, CONTA+8
DA AHM+2!, MIN+3!, MAX+3!, FREQ+3!, CONTA+1!, CONTA+14*, DHM+12*
DA(1 DHM+12*
DA(2 DHM+12*
>> DIC EP+4*
>> DIC("A" EP+4*
>> DIC("S" EP+4*
>> DIC(0 EP+4*
>> DIK CONTA+14*, DHM+12*
DIR BACK+5!, HM+4!, HM+6!, AHM+2!, MIN+3!, MAX+3!, FREQ+3!, CONTA+1!, DHM+3!, DHM+9!
DIR("A" HM+4*, HM+6*, AHM+2*, MIN+3*, MAX+3*, FREQ+3*, CONTA+1*, DHM+3*, DHM+9*
DIR("B" HM+4*, CONTA+1*, DHM+9*
DIR(0 HM+4*, HM+6*, AHM+2*, MIN+3*, MAX+3*, FREQ+3*, CONTA+1*, DHM+3*, DHM+9*
>> DIRUT HM+4*, HM+6*, HM+7, AHM+3, MIN+4, MAX+4, FREQ+4, CONTA+2, DHM+3*, DHM+4
, DHM+9*, DHM+10
>> DUOUT HM+4, HM+6, DHM+3, DHM+9
E WAGE+1~, WAGE+7*, WAGE+8*, WAGE+9*, WAGE+10, WF+1~
F S~, S+1*, S+4*
G CONTA+5*, CONTA+6*, CONTA+8, CONTA+9, CONTA+10, CONTA+12, CONTA+13, WAGE~, WAGE+2, WAGE+3
, WF~, WF+2
H WAGE~, WAGE+2, WAGE+3, WF~, WF+2
I BACK+6!
IOF EP+1, HM+1, DHM+1
>> J INIT+11*, INIT+12, INIT+16*, INIT+17
>> K INIT+17*
>> L S+6*
>> N CONTA+5*, CONTA+6*, CONTA+10*, CONTA+11*, CONTA+12, CONTA+13
T S~, S+2*, S+6*, S+7, S+8
U INIT+4, INIT+10, INIT+12, INIT+17, S1+1, HM+2, DISPHM+5, DISPHM+7, CONTA+5, CONTA+13
, DHM+12, WAGE+2, WAGE+3, WF+2
>> VALMBCK BACK+2*
>> VALMCNT INIT+18*
>> VALMHDR(1 HDR+1*
X INIT+4*, INIT+5*, INIT+6*, INIT+7*, INIT+8*, INIT+12*, INIT+15*, INIT+17*, HELP+1*, S+4*
, S+5*, S+7*, S+8*, S1+2, BACK+6!, MIN+5, MAX+5, FREQ+5, CONTA+5*, CONTA+10*
, WAGE+1~, WAGE+2*, WAGE+4, WAGE+5, WAGE+6, WF+1~, WF+2*, WF+3, WF+4, WF+5
Y EP+5, EP+6, INIT+7*, INIT+9*, INIT+10, INIT+11, INIT+12, S~, S+5, S+6
, S+8, BACK+6!, HM+4, HM+8, HM+9, AHM+4, MIN+6, MAX+6, FREQ+6, CONTA+3
, DHM+5, DHM+6, DHM+11, WAGE+1~, WAGE+3*, WAGE+7, WAGE+8, WAGE+9, WF+1~
Z INIT+10*, INIT+12, BACK+6!, WAGE+1~, WF+1~
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All