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

Package: Patient Care Component Reports

Routine: APCLBV11


Information

APCLBV11 ; IHS/CMI/LAB - continuation of APCLV1 ;

Source Information

Source file <APCLBV11.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
IHS Patient Registration 1 $$GETMCR^AGUTL  
Patient Care Component Reports 1 (HD,HEAD,VISIT)^APCLBV1  
VA Fileman 1 DD^%DT  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Patient Care Component Reports 1 APCLBV1  
Phoenix Devel Center 1 AZXBV1  

Entry Points

Name Comments DBIA/ICR reference
22 ;
42 ;
43 ;
53 ;
52 ;
1 ;EP
3 ;
2 ;EP
5 ;ENTRY POINT
4 ;ENTRY POINT
6 ;ENTRY POINT
PRVT1 ;
431

External References

Name Field # of Occurrence
DD^%DT 2+4, 22+5, 431+1, 53+5
$$GETMCR^AGUTL 2+6
HD^APCLBV1 1+4, 2+2, 4+2, 5+2, 6+2
HEAD^APCLBV1 1+1, 2+1, 22+4, 4+1, 43+5, 431, 5+1, 53+1, 6+1
VISIT^APCLBV1 1+9, 2+10, 4+6, 5+5, 6+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?8,APCLCOPN(X)
  • Line Location: 1+7
Function Call: WRITE
  • Prompt: ?40,"Sponsor: ",$P(APCLX,U,4),?65,"SSN: "
  • Line Location: PRVT1+3
Function Call: WRITE
  • Prompt: $E(X,1,3),"-",$E(X,4,5),"-",$E(X,6,9)
  • Line Location: PRVT1+3
Function Call: WRITE
  • Prompt: !?8,"Medicare Name: ",APCLMN,?56,"DOB: ",DOB
  • Line Location: 2+8
Function Call: WRITE
  • Prompt: !?8,"Coverage:",?19,$P(APCLREC,U,3)
  • Line Location: 22+5
Function Call: WRITE
  • Prompt: ?23,"Beg. Date: ",?34,Y
  • Line Location: 22+5
Function Call: WRITE
  • Prompt: ?23,"Beg. Date: ",?34,Y
  • Line Location: 22+5
Function Call: WRITE
  • Prompt: !
  • Line Location: 4+5
Function Call: WRITE
  • Prompt: !?8,"(MCD) ",APCLMN,?61,APCLMDOB
  • Line Location: 43+8
Function Call: WRITE
  • Prompt: !?8,"Medicaid #: ",$P(APCLREC,U,3),?50,"State: ",$S($P(APCLREC,U,4)="":"",1:$P(^DIC(5,$P(APCLREC,U,4),0),U))
  • Line Location: 43+9
Function Call: WRITE
  • Prompt: !?8,"Name/Insured: ",$P(APCLREC,U,5),?50,"Sex of Insured: ",$P(APCLREC,U,7)
  • Line Location: 43+10
Function Call: WRITE
  • Prompt: !?8,"Elig Beg Date: "
  • Line Location: 431+1
Function Call: WRITE
  • Prompt: ?20,Y,?35,"Coverage: ",$P(APCLNREC,U,3),?50,"Elig End Date: "
  • Line Location: 431+1
Function Call: WRITE
  • Prompt: ?20,Y,?35,"Coverage: ",$P(APCLNREC,U,3),?50,"Elig End Date: "
  • Line Location: 431+1
Function Call: WRITE
  • Prompt: !?8,"INSURER: ",$P(^AUTNINS($P(APCLREC,U),0),U)
  • Line Location: 53+2
Function Call: WRITE
  • Prompt: !?8,"POLICY #: ",$S($P($G(^AUPNPRVT(DFN,11,APCLMDFN,2)),U,1)]"":$P(^AUPNPRVT(DFN,11,APCLMDFN,2),U,1),$P(APCLREC,U,8):$P(^AUPN3PPH($P(APCLREC,U,8),0),U,4),1:$P(APCLREC,U,2)),?47,"COVERAGE TYPE: ",$P(APCLREC,U,3)
  • Line Location: 53+3
Function Call: WRITE
  • Prompt: !?8,"INSURED: ",$P(APCLREC,U,4),?47,"REL: ",$S($P(APCLREC,U,5)]"":$P(^AUTTRLSH($P(APCLREC,U,5),0),U),1:"")
  • Line Location: 53+4
Function Call: WRITE
  • Prompt: !?8,"ELIG BEG DATE: "
  • Line Location: 53+5
Function Call: WRITE
  • Prompt: Y,?47,"ELIG END DATE: "
  • Line Location: 53+5
Function Call: WRITE
  • Prompt: Y,?47,"ELIG END DATE: "
  • Line Location: 53+5
Function Call: WRITE
  • Prompt: !
  • Line Location: 53+6
Function Call: WRITE
  • Prompt: !
  • Line Location: 6+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPN3PPH - [#9000003.1] 53+3
^AUPNMCD - [#9000004] 4+3, 42+1, 42+2, 43+6, 43+7
^AUPNMCD("B" 4+3
^AUPNMCR - [#9000003] 2+3, 2+4, 2+6, 2+9, 22+1, 22+2, 22+3
^AUPNPAT - [#9000001] 1+5, 1+6
^AUPNPRVT - [#9000006] PRVT1+3, 5+3, 53+3
^AUPNPRVT("AB" PRVT1+2
^AUTNINS - [#9999999.18] 53+2
^AUTNINS("B" 1+2, 1+3
^AUTTBEN - [#9999999.25] 1+8
^AUTTMCS - [#9999999.32] 2+6
^AUTTRLSH - [#9999999.36] 53+4
^DIC(5 - [#5] 43+9

Label References

Name Line Occurrences
2 3+1
22 2+9
42 4+3
43 42+2
431 43+4
52 5+3
PRVT1 1+8

Naked Globals

Name Field # of Occurrence
^(0 2+6, 2+9, 22+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APCLCHMP 1+2*, 1+3*, 1+8, PRVT1+1, PRVT1+2
>> APCLCOPN( 1+7
>> APCLED 22+2, 43+1, 52+2
>> APCLGOT 42+2*, 43+3*, 43+4
>> APCLMDFN 2+9*, 22+1, 22+2, 22+3, 4+3*, 42+1, 42+2, 43+6, 43+7, 5+3*
, 53+3
>> APCLMDOB 2+4*, 43+7*, 43+8
>> APCLMEDN 2+6*, 22+5
>> APCLMN 2+3*, 2+8, 43+6*, 43+8
>> APCLNDFN 42+2*, 43+1
>> APCLNREC 42+2*, 43+2, 431+1
>> APCLQUIT 1+1, 2+1, 2+9, 22+4, 4+1, 4+3, 4+4, 42+2, 43+5, 431
, 5+1, 5+3, 5+4, 53+1, 6+1, 6+3
>> APCLREC 2+9*, 22+5, 4+3*, 43+9, 43+10, 5+3*, 52+1, 52+2, 52+3, 53+2
, 53+3, 53+4, 53+5
>> APCLRNUM 2+7
>> APCLSD 22+3, 43+2, 52+3
>> APCLVAL 2+7*, 22+1
>> APCLX PRVT1+3*
>> DFN 1+5, 1+6, PRVT1+2, PRVT1+3, 2+3, 2+4, 2+6, 2+9, 22+1, 22+2
, 22+3, 4+3, 5+3, 53+3
>> DOB 2+8
IOSL 1+1, 2+1, 22+4, 4+1, 43+5, 431, 5+1, 53+1, 6+1
U 1+6, 1+8, PRVT1+3, 2+3, 2+4, 2+6, 22+1, 22+2, 22+3, 22+5
, 43+2, 43+6, 43+7, 43+9, 43+10, 431+1, 52+1, 52+2, 52+3, 53+2
, 53+3, 53+4, 53+5
>> X 1+6*, 1+7, 1+8, PRVT1+3*
>> Y PRVT1+2*, PRVT1+3, 2+4*, 22+5*, 431+1*, 53+5*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All