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

Package: Patient Care Component

Routine: APCHS5


Information

APCHS5 ; IHS/CMI/LAB - PART 5 OF APCHS -- SUMMARY PRODUCTION COMPONENTS ;

Source Information

Source file <APCHS5.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
IHS Patient 1 $$REFR^AUPNVUTL  
IHS VA Utilities 1 $$VAL^XBDIQ1  
Kernel 1 $$FMTE^XLFDT  
Patient Care Component 1 (MAID,MCARE,RR,THIRD)^APCHS5A  
VA Fileman 1 ^DIWP  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
IHS Changes To ADT 2 ADGPI  BDGPI1  
Case Management System 1 ACMLCMS  

Entry Points

Name Comments DBIA/ICR reference
REFUSAL ;EP - refusal component
ELDER2 ;elder care last 2 of each
ELDER1 ;
INS ; ******************* INSURANCE * 9000003, 9000004, 9000006 *********
D(X) ;
LER ;refusal component
VAL(P,F,V,I) ;
INSX

External References

Name Field # of Occurrence
MAID^APCHS5A INS+4
MCARE^APCHS5A INS+4
RR^APCHS5A INS+4
THIRD^APCHS5A INS+4
$$REFR^AUPNVUTL REFUSAL+26, LER+22
^DIWP REFUSAL+32, LER+36
$$VAL^XBDIQ1 VAL+5, REFUSAL+25, REFUSAL+39, REFUSAL+40, LER+14, LER+22
$$FMTE^XLFDT REFUSAL+25, REFUSAL+39, LER+29

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "INSURANCE",?32,"NUMBER",?44,"SUFF",?49,"COV",?54,"EL DATE",?63,"SIG DATE",?72,"END DATE",!
  • Line Location: INS+3
Function Call: WRITE
  • Prompt: "ADL",!
  • Line Location: ELDER1+3
Function Call: WRITE
  • Prompt: !,"IADL",!
  • Line Location: ELDER1+8
Function Call: WRITE
  • Prompt: !,APCHSN,?28,$$D($P($G(APCHSX(1)),U)),?40,$P($G(APCHSX(1)),U,2),!
  • Line Location: ELDER1+15
Function Call: WRITE
  • Prompt: "ADL",!
  • Line Location: ELDER2+3
Function Call: WRITE
  • Prompt: ?28,$$D($P($G(APCHSX(2)),U)),?40,$P($G(APCHSX(2)),U,2),!
  • Line Location: ELDER2+8
Function Call: WRITE
  • Prompt: !,"IADL",!
  • Line Location: ELDER2+10
Function Call: WRITE
  • Prompt: ?28,$$D($P($G(APCHSX(2)),U)),?40,$P($G(APCHSX(2)),U,2),!
  • Line Location: ELDER2+15
Function Call: WRITE
  • Prompt: !,APCHSN,?28,$$D($P($G(APCHSX(1)),U)),?40,$P($G(APCHSX(1)),U,2),!
  • Line Location: ELDER2+19
Function Call: WRITE
  • Prompt: ?28,$$D($P($G(APCHSX(2)),U)),?40,$P($G(APCHSX(2)),U,2),!
  • Line Location: ELDER2+21
Function Call: WRITE
  • Prompt: ?28,$$D($P($G(APCHSX(2)),U)),?40,$P($G(APCHSX(2)),U,2),!
  • Line Location: ELDER2+27

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCHSCTL - [#9001015] REFUSAL+27, LER+31
^AUPNMCD("B" INS+1
^AUPNMCR - [#9000003] INS+1
^AUPNPREF - [#9000022] REFUSAL+27, REFUSAL+30, LER+31, LER+34
^AUPNPREF("AA" REFUSAL+15, REFUSAL+18, REFUSAL+19, REFUSAL+20, REFUSAL+21, LER+15, LER+18, LER+19, LER+20, LER+21
^AUPNPRVT - [#9000006] INS+1
^AUPNRRE - [#9000005] INS+1
^AUPNVELD - [#9000010.35] VAL+5
^AUPNVELD("AA" ELDER1+1, ELDER2+1, VAL+5
^BICONT - [#9002084.81] REFUSAL+8, REFUSAL+9, LER+8, LER+9
^BIPC - [#9002084.11] REFUSAL+6, REFUSAL+10, LER+6, LER+10
^BIPC("AC" REFUSAL+4, REFUSAL+5, LER+4, LER+5
^DD(9000010.35 ELDER1+4, ELDER1+9, ELDER2+4, ELDER2+11
^UTILITY($J REFUSAL+29!, REFUSAL+33, REFUSAL+35, REFUSAL+36!, LER+33!, LER+37, LER+39, LER+40!

Label References

Name Line Occurrences
$$D ELDER1+6, ELDER1+11, ELDER1+15, ELDER2+6, ELDER2+8, ELDER2+13, ELDER2+15, ELDER2+19, ELDER2+21
VAL ELDER1+4, ELDER1+9, ELDER1+13, ELDER2+4, ELDER2+11, ELDER2+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% VAL+2~*
>> APCHSBRK INS+2, ELDER1+2, ELDER2+2, REFUSAL+16, LER+16
>> APCHSC LER+23*, LER+24, LER+26, LER+27, LER+28
>> APCHSCKP INS+2, ELDER1+2, ELDER1+5, ELDER1+10, ELDER1+14, ELDER2+2, ELDER2+5, ELDER2+7, ELDER2+12, ELDER2+14
, ELDER2+18, ELDER2+20, ELDER2+22, REFUSAL+16, REFUSAL+24, REFUSAL+34, REFUSAL+38, LER+16, LER+25, LER+38
APCHSCOV INSX!
APCHSD REFUSAL+22~*, REFUSAL+23, REFUSAL+25, REFUSAL+37, REFUSAL+39, LER+23~, LER+26*, LER+27, LER+28, LER+29
>> APCHSDA LER+27*, LER+31, LER+34
>> APCHSDLM REFUSAL+13, REFUSAL+20, LER+13, LER+20
APCHSDTL INSX!
APCHSDTN INSX!
APCHSDTS INSX!
APCHSEDN INSX!
APCHSI INSX!, REFUSAL+22~, REFUSAL+23*, REFUSAL+25, REFUSAL+26, REFUSAL+27, REFUSAL+30, REFUSAL+37*, REFUSAL+39, REFUSAL+40
, LER+23~, LER+24*, LER+26, LER+27, LER+28, LER+29
APCHSIDN INSX!
APCHSINS INSX!
APCHSITB INSX!
APCHSJ INSX!
APCHSN INSX!, ELDER1+4*, ELDER1+6, ELDER1+9*, ELDER1+11, ELDER1+13*, ELDER1+15, ELDER2+4*, ELDER2+6, ELDER2+11*
, ELDER2+13, ELDER2+17*, ELDER2+19
>> APCHSNPG INS+2, ELDER1+2, ELDER2+2, REFUSAL+16, LER+16
>> APCHSP ELDER1+4*, ELDER1+9*, ELDER1+13*, ELDER2+4*, ELDER2+11*, ELDER2+17*
>> APCHSPAT INS+1, ELDER1+1, ELDER1+4, ELDER1+9, ELDER1+13, ELDER2+1, ELDER2+4, ELDER2+11, ELDER2+17, REFUSAL+4
, REFUSAL+5, REFUSAL+15, REFUSAL+18, REFUSAL+19, REFUSAL+20, REFUSAL+21, LER+4, LER+5, LER+15, LER+18
, LER+19, LER+20, LER+21
APCHSPDN INSX!
>> APCHSQIT INS+2, ELDER1+2, ELDER1+4, ELDER1+5, ELDER1+9, ELDER1+10, ELDER1+14, ELDER2+2, ELDER2+4, ELDER2+5
, ELDER2+7, ELDER2+11, ELDER2+12, ELDER2+14, ELDER2+18, ELDER2+20, ELDER2+22, REFUSAL+16, REFUSAL+22, REFUSAL+23
, REFUSAL+24, REFUSAL+33, REFUSAL+34, REFUSAL+37, REFUSAL+38, LER+16, LER+23, LER+24, LER+25, LER+37
, LER+38
>> APCHSRT LER+28*, LER+30
>> APCHSTYP REFUSAL+27, LER+31
APCHSUFF INSX!
APCHSX VAL+1!, REFUSAL+3!, REFUSAL+15, LER+3!, LER+15
APCHSX( VAL+2*, VAL+5*, REFUSAL+14*, REFUSAL+21*, REFUSAL+22, REFUSAL+23, REFUSAL+37
APCHSX("REF" LER+14*, LER+22*, LER+23, LER+24, LER+26, LER+27, LER+28
APCHSX(1 ELDER1+6, ELDER1+11, ELDER1+15, ELDER2+6, ELDER2+13, ELDER2+19
APCHSX(2 ELDER2+8, ELDER2+15, ELDER2+21
>> APCHSY ELDER1+4*, ELDER1+9*, ELDER1+13*, ELDER2+4*, ELDER2+11*, ELDER2+17*
>> APCHSZ REFUSAL+33*, REFUSAL+35, LER+37*, LER+39
C VAL+3~*, VAL+5*
D REFUSAL+10*, REFUSAL+11, REFUSAL+12*, REFUSAL+13, REFUSAL+14, REFUSAL+17~, REFUSAL+20*, REFUSAL+21, LER+10*, LER+11
, LER+12*, LER+13, LER+14, LER+17~, LER+20*, LER+21, LER+22
>> DIWL REFUSAL+31*, REFUSAL+33, REFUSAL+35, LER+35*, LER+37, LER+39
>> DIWR REFUSAL+31*, LER+35*
E REFUSAL+17~, REFUSAL+19*, REFUSAL+20, REFUSAL+21, LER+17~, LER+19*, LER+20, LER+21
F VAL~, VAL+5, REFUSAL+17~, REFUSAL+18*, REFUSAL+19, REFUSAL+20, REFUSAL+21, LER+17~, LER+18*, LER+19
, LER+20, LER+21
I VAL~, VAL+2, VAL+5, REFUSAL+17~, REFUSAL+21*, LER+17~, LER+21*, LER+22
P VAL~, VAL+5
>> R REFUSAL+6*, REFUSAL+7, REFUSAL+8, REFUSAL+9, LER+6*, LER+7, LER+8, LER+9
U ELDER1+4, ELDER1+6, ELDER1+9, ELDER1+11, ELDER1+15, ELDER2+4, ELDER2+6, ELDER2+8, ELDER2+11, ELDER2+13
, ELDER2+15, ELDER2+19, ELDER2+21, VAL+5, REFUSAL+6, REFUSAL+9, REFUSAL+10, REFUSAL+27, REFUSAL+30, LER+6
, LER+9, LER+10, LER+14, LER+22, LER+27, LER+28, LER+31, LER+34
V VAL~, VAL+5
X D~, D+1, D+2, VAL+4~, VAL+5*, REFUSAL+5*, REFUSAL+6, REFUSAL+10, REFUSAL+14, REFUSAL+17~
, REFUSAL+30*, LER+5*, LER+6, LER+10, LER+14, LER+17~, LER+34*
Y VAL+4~, VAL+5*, REFUSAL+4*, REFUSAL+5, LER+4*, LER+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All