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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: APCLACC1

Package: Patient Care Component Reports

Routine: APCLACC1


Information

APCLACC1 ; IHS/CMI/LAB - process active user report ;

Source Information

Source file <APCLACC1.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 3 ^DIC  ^DIE  ^DIR  
Kernel 1 $$FMTE^XLFDT  
Patient Care Component Reports 1 DONE^APCLOSUT  

Entry Points

Name Comments DBIA/ICR reference
HEAD
MAJTOT ;print major sort totals
HEAD1 ;
MINOR1 ;
START ;
DONE ;
TEMPLATE ;create template
MAJTOT1
MINOR ;

External References

Name Field # of Occurrence
DONE^APCLOSUT DONE+1
^DIC TEMPLATE+2
^DIE TEMPLATE+7
^DIR HEAD+1
$$FMTE^XLFDT TEMPLATE+2, HEAD1+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?50,"------",?67,"------",!
  • Line Location: START+13
Function Call: WRITE
  • Prompt: ?39,"Total:",?50,$J(APCL1,6),?67,$J(APCL2,6),!
  • Line Location: START+14
Function Call: WRITE
  • Prompt: !,APCLMAJ
  • Line Location: MINOR+2
Function Call: WRITE
  • Prompt: !
  • Condition for execution: APCLSUB=1
  • Line Location: MINOR+2
Function Call: WRITE
  • Prompt: !?5,$E(APCLMIN,1,45)
  • Line Location: MINOR1+7
Function Call: WRITE
  • Prompt: ?APCLT,$J((@APCLVAR),6)
  • Line Location: MINOR1+7
Function Call: WRITE
  • Prompt: !?50,"------",?67,"------",!
  • Line Location: MAJTOT+3
Function Call: WRITE
  • Prompt: ?39,"Subtotal:"
  • Line Location: MAJTOT+4
Function Call: WRITE
  • Prompt: ?APCLI,$J($P(^XTMP("APCLACCR",APCLJOB,APCLBT,"SUBTOTAL",APCLMAJ),U,APCLP),6)
  • Line Location: MAJTOT1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: MAJTOT1+1
Function Call: WRITE
  • Prompt: !!,"SEARCH TEMPLATE CREATION FAILED."
  • Line Location: TEMPLATE+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: $P(^DIC(4,DUZ(2),0),U),?60,APCLDTP,?72,"Page ",APCLPG,!
  • Line Location: HEAD1+2
Function Call: WRITE
  • Prompt: !,"Registration and Active Patient Counts for ",$S(APCLIND=1:"Indian",1:"all")," Patients registered ",$S(APCLFS="F":"at ",1:"in ")
  • Line Location: HEAD1+3
Function Call: WRITE
  • Prompt: !,%
  • Line Location: HEAD1+5
Function Call: WRITE
  • Prompt: !?((80-$L(%))/2),%
  • Line Location: HEAD1+7
Function Call: WRITE
  • Prompt: $S(APCLSORT="C":"Tribe of Membership.",1:"Community of Residence.")
  • Line Location: HEAD1+9
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD1+10
Function Call: WRITE
  • Prompt: "Active Patient were those seen between ",APCLFYBY," and ",APCLFYEY,".",!
  • Line Location: HEAD1+13
Function Call: WRITE
  • Prompt: !!!,"***** SEARCH TEMPLATE 'ACTIVE USERS AS OF "_$$FMTE^XLFDT(APCLFYE,"2E")_"' HAS BEEN CREATED ****"
  • Line Location: HEAD1+14
Function Call: WRITE
  • Prompt: !,$S(APCLSORT="C":"Current Community of Residence",APCLSORT="T":"Tribe of Membership",1:"Service Unit of Residence"),?50,"Reg Pts Living",?67,"Active"
  • Line Location: HEAD1+15
Function Call: WRITE
  • Prompt: !,APCL80D
  • Line Location: HEAD1+17
Routine Call
  • DIE
  • Line Location:
    • TEMPLATE+7
Routine Call
  • DIC
  • Line Location:
    • TEMPLATE+2
Routine Call
  • DIR
  • Line Location:
    • HEAD+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUTTLOC - [#9999999.06] START+6
^AUTTSU - [#9999999.22] START+4, START+6
^DIBT( TEMPLATE+4!, TEMPLATE+8*
^DIC(4 - [#4] START+6, HEAD1+2
^XTMP("APCLACC SU" DONE+2!
^XTMP("APCLACC" START+10, DONE+2!, MINOR+3, MINOR1+2, MINOR1+3, TEMPLATE+8
^XTMP("APCLACCR" DONE+2!, MINOR1+1*, MINOR1+2*, MAJTOT1

Label References

Name Line Occurrences
DONE START+8, START+11, START+12
HEAD START+7, START+12, MINOR+1, MINOR1+6
HEAD1 HEAD
MAJTOT MINOR+5
MAJTOT1 MAJTOT+2
MINOR START+10
MINOR1 MINOR+3
TEMPLATE START+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % HEAD1+4*, HEAD1+5, HEAD1+6*, HEAD1+7
>> APCL1 START+7*, START+14
>> APCL2 START+7*, START+14
>> APCL80D START+2*, HEAD1+17
>> APCLBT START+10, DONE+2, MINOR+3, MINOR1+1, MINOR1+2, MINOR1+3, MAJTOT1, TEMPLATE+8
>> APCLDTP HEAD1+2
>> APCLFS START+4, START+6, HEAD1+3, HEAD1+4
>> APCLFYBY HEAD1+13
>> APCLFYE TEMPLATE+2, HEAD1+14
>> APCLFYEY HEAD1+13
>> APCLI MINOR1+2*, MINOR1+3*, MINOR1+4*, MINOR1+7*, MAJTOT1*
>> APCLIND HEAD1+3
>> APCLJOB START+10, DONE+2, MINOR+3, MINOR1+1, MINOR1+2, MINOR1+3, MAJTOT1, TEMPLATE+8
>> APCLMAJ START+9*, START+10*, MINOR+2, MINOR+3, MINOR1+1, MINOR1+2, MINOR1+3, MAJTOT1
>> APCLMIN MINOR+3*, MINOR1+2, MINOR1+3, MINOR1+7
>> APCLP MINOR1+3*, MAJTOT1*
>> APCLPG START+7*, HEAD, HEAD1+1*, HEAD1+2
APCLQUIT START+9!, START+10, START+11, START+12, MINOR+1, MINOR+3, MINOR+4, MINOR1+6, HEAD+1*
>> APCLRPTT START+8, HEAD1+8, HEAD1+9, HEAD1+14
>> APCLSORT HEAD1+8, HEAD1+9, HEAD1+15, HEAD1+16
>> APCLSSUR HEAD1+11, HEAD1+12
>> APCLSTMP TEMPLATE+5*, TEMPLATE+6, TEMPLATE+8
>> APCLSU( START+4, START+6
>> APCLSUB MINOR+1, MINOR+2, MINOR1+5, MAJTOT+2, HEAD1+8, HEAD1+9, HEAD1+16
APCLSUP START+1!
APCLSUP( START+4*, START+6*, HEAD1+6
>> APCLT MINOR1+7*
>> APCLVAR MINOR1+3*, MINOR1+7*
>> APCLVAR1 MINOR1+4*
>> APCLVAR2 MINOR1+4*
D0 TEMPLATE+2!
DA TEMPLATE+2!, TEMPLATE+6*, TEMPLATE+8!
DD TEMPLATE+2!
DIC TEMPLATE+2!*
DIC(0 TEMPLATE+2*
DIE TEMPLATE+6*, TEMPLATE+8!
DIR HEAD+1!
DIR(0 HEAD+1*
DO TEMPLATE+2!
DR TEMPLATE+6*, TEMPLATE+8!
DT TEMPLATE+6
>> DTOUT HEAD+1
DUZ TEMPLATE+6
DUZ(2 HEAD1+2
>> I START+10*
IO HEAD+1
IO(0 HEAD+1
IOF HEAD1+1
IOSL START+12, MINOR+1, MINOR1+6
IOST HEAD+1
U START+4, START+6, MINOR1+2, MINOR1+3, MAJTOT1, HEAD1+2
>> X START+4*, START+6*, TEMPLATE+2*, HEAD1+6*
>> Y TEMPLATE+3, TEMPLATE+4, TEMPLATE+5, TEMPLATE+8*, HEAD+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All