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

Package: Hospital Based Home Care

Routine: HBHCRP20


Information

HBHCRP20 ; LR VAMC(IRMS)/MJT-HBHC report on file 632, unique patients by date range summary ; Apr 2000

Source Information

Source file <HBHCRP20.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Hospital Based Home Care 2 (HDRRANGE,START,TODAY)^HBHCUTL  ENDRPT^HBHCUTL1  
VA FileMan 1 C^%DTC  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Hospital Based Home Care 1 HBHCRP20  

Entry Points

Name Comments DBIA/ICR reference
DQ ; De-queue
LOOP ; Loop thru ^HBHC(632) "C" (appointment date) cross-ref to build report
EXIT ; Exit module
PROCESS ; Process record & build ^TMP("HBHC",$J) global
SET ; Set ^TMP("HBHC",$J
CNTLOOP ; Count loop
COUNT ; Count
; patients with multiple visits

External References

Name Field # of Occurrence
C^%DTC LOOP+1
^%ZIS HBHCRP20+4
^%ZISC EXIT+1
^%ZTLOAD HBHCRP20+5
HDRRANGE^HBHCUTL DQ+5, DQ+6
START^HBHCUTL HBHCRP20+2
TODAY^HBHCUTL DQ+5
ENDRPT^HBHCUTL1 LOOP+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Total Patients with Single Appointment Only:",?46,$J(HBHCCNT1,4)
  • Line Location: LOOP+4
Function Call: WRITE
  • Prompt: !,"Total Patients with Multiple Appointments:",?46,$J(HBHCCNT,4)
  • Line Location: LOOP+5
Function Call: WRITE
  • Prompt: !!,"Total Unique Patients: ",$J((HBHCCNT+HBHCCNT1),5)
  • Line Location: LOOP+6
Routine Call
  • %ZIS
  • Line Location:
    • HBHCRP20+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] PROCESS+1
^HBHC(632 - [#632] LOOP+2
^TMP("HBHC" DQ+2!, EXIT+2!, PROCESS+2, PROCESS+3*, SET+1*, CNTLOOP+1, COUNT+2, COUNT+4

Label References

Name Line Occurrences
CNTLOOP LOOP+3
COUNT CNTLOOP+1
EXIT HBHCRP20+3, HBHCRP20+4, HBHCRP20+5
PROCESS LOOP+2
SET PROCESS+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS HBHCRP20+4*
HBHCAPDT LOOP+1*, LOOP+2*, EXIT+2!, PROCESS+3, SET+1
HBHCBEG1 HBHCRP20+3, LOOP+1, EXIT+2!
HBHCBEG2 EXIT+2!
HBHCCC HBHCRP20+4*, DQ+6*, EXIT+2!
HBHCCNT DQ+3*, LOOP+5, LOOP+6, EXIT+2!, COUNT+2*
HBHCCNT1 DQ+3*, LOOP+4, LOOP+6, EXIT+2!, COUNT+4*
HBHCCOLM DQ+4*, EXIT+2!
HBHCDFN LOOP+2*, EXIT+2!
HBHCDPT0 EXIT+2!, PROCESS+1*, PROCESS+2, PROCESS+3, SET+1
HBHCEND1 HBHCRP20+3, LOOP+2, EXIT+2!
HBHCEND2 EXIT+2!
HBHCHEAD DQ+3*, DQ+4, EXIT+2!
HBHCNAME EXIT+2!, CNTLOOP+1*, COUNT+2, COUNT+4
HBHCNOD0 LOOP+2*, EXIT+2!, PROCESS+1
HBHCPAGE EXIT+2!
HBHCSSN EXIT+2!, CNTLOOP+1*, COUNT+2, COUNT+4
HBHCTDY EXIT+2!
HBHCY DQ+3*, EXIT+2!
HBHCZ EXIT+2!
IO DQ+1, DQ+5, DQ+6
IO("Q" HBHCRP20+5
IO("S" DQ+5, DQ+6
IO(0 DQ+5, DQ+6
IOP HBHCRP20+4!
>> POP HBHCRP20+4
U LOOP+2, PROCESS+1, PROCESS+2, PROCESS+3, SET+1, COUNT+2, COUNT+4
X LOOP+1, EXIT+2!
X1 LOOP+1*, EXIT+2!
X2 LOOP+1*, EXIT+2!
Y EXIT+2!
>> ZTDESC HBHCRP20+5*
ZTIO HBHCRP20+4!
>> ZTRTN HBHCRP20+5*
ZTSAVE HBHCRP20+4!
ZTSAVE("HBHC*" HBHCRP20+5*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All