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

Package: Patient Care Component Reports

Routine: APCLBPP


Information

APCLBPP ; IHS/CMI/LAB - print dx by age ;

Source Information

Source file <APCLBPP.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 DD^%DT  ^DIR  
Patient Care Component Reports 1 DONE^APCLOSUT  

Entry Points

Name Comments DBIA/ICR reference
CENTER(APCLX,APCLY) ;
HEAD ;
STATS ;
SMYHDR ; Summary header
DTLHDR ; Detail header
START ;
DONE
SELHDR ; Header showing what was selected
PAT ;

External References

Name Field # of Occurrence
DD^%DT START+3
DONE^APCLOSUT DONE
^DIR HEAD+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"NO PATIENT DATA TO REPORT",!
  • Line Location: START+6
Function Call: WRITE
  • Prompt: ?35,$J($FN(APCLTPT-APCLTOPT,","),6),?49,$J($FN(APCLTOPT,","),6)
  • Line Location: STATS+9
Function Call: WRITE
  • Prompt: ?62,$J(APCLPCT,3),?76,$J(100-APCLPCT,3)
  • Line Location: STATS+9
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !!,$P(^VA(200,DUZ,0),"^",2),$$CENTER($P(^DIC(4,DUZ(2),0),"^"),78),?71,"Page ",APCLPG,!
  • Line Location: SELHDR+2
Function Call: WRITE
  • Prompt: ?22,"BLOOD PRESSURE OUT OF CONTROL REPORT"
  • Line Location: SELHDR+3
Function Call: WRITE
  • Prompt: !,$$CENTER($S(APCLRTYP="D":"LIST OF BLOOD PRESSURE OUT OF CONTROL PATIENTS",1:"BLOOD PRESSURE IN/OUT OF CONTROL STATISTICS"))
  • Line Location: SELHDR+4
Function Call: WRITE
  • Prompt: !,$$CENTER($S($D(APCLCOMM):"selected",1:"ALL")_" COMMUNITIES, "_$S($D(APCLCLNT):"selected",1:"all")_" CLINICS, ")
  • Line Location: SELHDR+7
Function Call: WRITE
  • Prompt: !,$$CENTER("Visit Dates: "_APCLSDD_" to "_APCLEDD)
  • Line Location: SELHDR+10
Function Call: WRITE
  • Prompt: !,?62,"B/P",?72,"MEAN"
  • Line Location: DTLHDR+3
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?17,"HRN #",?25,"AGE",?30,"SEX",?35,"COMMUNITY",?47,"CLINIC",?61,"COUNT",?73,"B/P"
  • Line Location: DTLHDR+4
Function Call: WRITE
  • Prompt: !,APCL80
  • Line Location: DTLHDR+5
Function Call: WRITE
  • Prompt: !,$$CENTER("IN CONTROL --> MEAN SYSTOLIC < 140 MEAN DIASTOLIC < 90")
  • Line Location: SMYHDR+3
Function Call: WRITE
  • Prompt: !!,?21,"B/P MEAN",?40,"# OF PATIENTS",?64,"% OF PATIENTS"
  • Line Location: SMYHDR+4
Function Call: WRITE
  • Prompt: !,?5,"COMMUNITY",?20,"IN",?28,"OUT",?39,"IN",?52,"OUT",?63,"IN",?76,"OUT"
  • Line Location: SMYHDR+5
Function Call: WRITE
  • Prompt: !,APCL80
  • Line Location: SMYHDR+6
Routine Call
  • DIR
  • Line Location:
    • HEAD+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIBT( SELHDR+5
^DIC(4 - [#4] SELHDR+2
^VA(200 - [#200] SELHDR+2
^XTMP("APCLBP" START+8, START+13, PAT+1, STATS+2, STATS+5, DONE+1!

Label References

Name Line Occurrences
$$CENTER SELHDR+2, SELHDR+4, SELHDR+5, SELHDR+6, SELHDR+7, SELHDR+8, SELHDR+10, SMYHDR+3
DONE START+17
DTLHDR START+7, START+10, PAT+2
HEAD START+6, DTLHDR+1, SMYHDR+1
PAT START+8
SELHDR START+6, DTLHDR+2, SMYHDR+2
SMYHDR START+12, START+15, STATS+1
STATS START+13, START+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APCL80 START+1*, DTLHDR+5, SMYHDR+6
>> APCLAGER SELHDR+6
>> APCLBPC STATS+3*, STATS+7
>> APCLBPTI STATS+4*, STATS+5, STATS+7, STATS+9, STATS+10
>> APCLBPX STATS+5*, STATS+6
APCLBTH START+8, START+13, PAT+1, STATS+2, STATS+5, DONE+1!
>> APCLCLNT SELHDR+7
>> APCLCMTY PAT+4*, PAT+5
>> APCLCOMM SELHDR+7
>> APCLED START+2
>> APCLEDD START+2*, START+3*, SELHDR+10
>> APCLIBEN SELHDR+8
>> APCLIDEN PAT+3
APCLJOB START+8, START+13, PAT+1, STATS+2, STATS+5, DONE+1!
>> APCLPCT STATS+9*
>> APCLPG START+2*, HEAD+1, SELHDR+1*, SELHDR+2, DTLHDR+1, SMYHDR+1
>> APCLPTOT START+6, START+11
APCLQUIT START+4!, START+8, START+9, START+13, START+14, PAT+1, PAT+2, STATS+1, HEAD+1*
>> APCLRTYP START+7, SELHDR+4
>> APCLSD START+2
>> APCLSDD START+2*, START+3*, SELHDR+10
>> APCLSEAT SELHDR+5
>> APCLSEX SELHDR+6
>> APCLSEXP START+2*
>> APCLSRT START+8*, START+13*, START+16*, PAT+1, STATS+2, STATS+5, STATS+7
>> APCLTBP STATS+6*, STATS+7
>> APCLTOBC STATS+6*, STATS+7, STATS+8
>> APCLTOBP STATS+6*, STATS+7, STATS+8
>> APCLTOP STATS+6*
>> APCLTOPT STATS+3*, STATS+9
>> APCLTPT STATS+3*, STATS+9
APCLX PAT+1*, PAT+3, PAT+4, PAT+5, STATS+2*, STATS+3, CENTER~, CENTER+2
APCLY CENTER~, CENTER+1*, CENTER+2
>> DFN PAT+1*
DIR HEAD+1!
DIR(0 HEAD+1*
>> DTOUT HEAD+1
DUZ SELHDR+2
DUZ(2 SELHDR+2
IO HEAD+1
IO(0 HEAD+1
IOF SELHDR+1
IOSL START+10, START+15, PAT+2, STATS+1
IOST HEAD+1
U PAT+3, PAT+4, PAT+5, STATS+3, STATS+6, SELHDR+5
>> Y START+3*, HEAD+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All