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

Package: Contract Health Management Information System

Routine: ACHSMD0A


Information

ACHSMD0A ; IHS/ITSC/PMF - PRINT COVERAGE ON MDOL (2/2) ;

Source Information

Source file <ACHSMD0A.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Contract Health Management Information System 1 $$PARM^ACHS  
IHS Patient 1 $$GETMBI^AUPNMBI  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Contract Health Management Information System 1 ACHSMD0  

Entry Points

Name Comments DBIA/ICR reference
END ;
PVT ;
PVT1 ;
RRE ;
MCD ;
EN(ACHSDOS) ;EP - From ACHSMD0
MCR ;
MDY(X) ;

External References

Name Field # of Occurrence
$$PARM^ACHS ACHSMD0A+5
$$GETMBI^AUPNMBI MCR+5, RRE+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!!
  • Line Location: ACHSMD0A+5
Function Call: WRITE
  • Prompt: !,X_$P(^AUPNMCR(DFN,11,I,0),U,6)
  • Line Location: MCR+9
Function Call: WRITE
  • Prompt: !,X_ACHSMBI
  • Line Location: MCR+10
Function Call: WRITE
  • Prompt: !?ACHSTAB,$P(^AUTNINS($P(^TMP("ACHSRP31",$J,"MCD",I),U,4),0),U),?30,$P(^TMP("ACHSRP31",$J,"MCD",I),U,5),$P(^(I),U,6),?60,$P(^(I),U,3),?65,$$MDY($P(^(I),U)),?72,$$MDY($P(^(I),U,2))
  • Line Location: MCD+11
Function Call: WRITE
  • Prompt: !?ACHSTAB,$P(^AUTNINS($P(^AUPNRRE(DFN,0),U,2),0),U),?30
  • Line Location: RRE+8
Function Call: WRITE
  • Prompt: $P(^AUTTRRP($P(^AUPNRRE(DFN,0),U,3),0),U)
  • Condition for execution: $P(^AUPNRRE(DFN,0),U,3)]""
  • Line Location: RRE+9
Function Call: WRITE
  • Prompt: $P(^AUPNRRE(DFN,0),U,4)
  • Line Location: RRE+9
Function Call: WRITE
  • Prompt: ACHSMBI
  • Line Location: RRE+10
Function Call: WRITE
  • Prompt: ?60,$P(^AUPNRRE(DFN,11,JJ,0),U,3),?65,$$MDY($P(^(0),U)),?72,$$MDY($P(^(0),U,2))
  • Line Location: RRE+11
Function Call: WRITE
  • Prompt: ?64-$L(X),$E(X,1,64-$X)
  • Line Location: PVT1+6
Function Call: WRITE
  • Prompt: !?ACHSTAB,$E($P(^AUTNINS($P(^AUPNPRVT(DFN,11,I,0),U),0),U),1,26)
  • Line Location: PVT1+7
Function Call: WRITE
  • Prompt: ?65,$$MDY($P(^AUPNPRVT(DFN,11,I,0),U,6)),?72,$$MDY($P(^(0),U,7))
  • Line Location: PVT1+15

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPN3PPH - [#9000003.1] PVT1+8, PVT1+10, PVT1+11, PVT1+12
^AUPNMCD - [#9000004] MCD+5, MCD+6
^AUPNMCD("B" MCD+1, MCD+5
^AUPNMCR - [#9000003] MCR+3, MCR+4, MCR+6, MCR+7, MCR+8, MCR+9, MCR+11
^AUPNPRVT - [#9000006] PVT+1, PVT1+1, PVT1+3, PVT1+7, PVT1+8, PVT1+9, PVT1+15
^AUPNRRE - [#9000005] RRE+1, RRE+4, RRE+5, RRE+7, RRE+8, RRE+9, RRE+11
^AUTNINS - [#9999999.18] MCR+4, MCD+15, RRE+8, PVT1+7
^AUTTMCS - [#9999999.32] MCR+6
^AUTTPIC - [#9999999.65] PVT1+12
^AUTTRRP - [#9999999.33] RRE+9
^DIC(5 - [#5] MCD+9
^TMP("ACHSRP31" MCD+2!, MCD+6*, MCD+9*, MCD+12, MCD+14, MCD+15, MCD+16!

Label References

Name Line Occurrences
$$MDY MCR+11, MCD+15, RRE+11, PVT1+15
END PVT+1, PVT1+2
MCD MCR+3
PVT RRE+1
PVT1 PVT1+3, PVT1+16
RRE MCD+1

Naked Globals

Name Field # of Occurrence
^( MCD+9, MCD+14, MCD+15
^(0 MCR+6, MCR+8, MCR+11, MCD+9, RRE+7, RRE+11, PVT1+3, PVT1+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACHS MCD+9*, MCD+12*
ACHSDOS EN~, MCR+8, MCD+14, RRE+7, PVT1+3
ACHSMBI EN+2~, EN+3*, MCR+2~, MCR+5*, MCR+6*, MCR+10, RRE+3*, RRE+9, RRE+10
ACHSTAB EN+2~, EN+3*, MCR+4, MCD+15, RRE+8, PVT1+7
>> DFN MCR+3, MCR+4, MCR+5, MCR+6, MCR+7, MCR+8, MCR+9, MCR+11, MCD+1, MCD+5
, RRE+1, RRE+3, RRE+4, RRE+5, RRE+7, RRE+8, RRE+9, RRE+11, PVT+1, PVT1+1
, PVT1+3, PVT1+7, PVT1+8, PVT1+9, PVT1+15
DT MCR+5, RRE+3
I MCR+7*, MCR+8, MCR+9, MCR+11, MCD+5*, MCD+6, MCD+10*, MCD+12*, MCD+14, MCD+15
, RRE+5*, PVT+2*, PVT1+1*, PVT1+2, PVT1+3, PVT1+7, PVT1+8, PVT1+9, PVT1+15, END+1!
>> I2 PVT1+9*, PVT1+10, PVT1+11, PVT1+12
JJ MCD+5*, MCD+6, MCD+8*, MCD+9*, RRE+4*, RRE+5*, RRE+6, RRE+7, RRE+11, END+1!
U MCR+4, MCR+6, MCR+8, MCR+9, MCR+11, MCD+6, MCD+9, MCD+14, MCD+15, RRE+5
, RRE+7, RRE+8, RRE+9, RRE+11, PVT1+3, PVT1+7, PVT1+8, PVT1+9, PVT1+10, PVT1+11
, PVT1+12, PVT1+15
X MCR+4*, MCR+9, MCR+10, PVT1+12*, PVT1+13, MDY~, MDY+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All