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

Package: Hospital Based Home Care

Routine: HBHCRP24


Information

HBHCRP24 ; LR VAMC(IRMS)/MJT-HBHC file 631 rpt, All active (admitted but not D/C) cases ;Jul 27, 2021@16:15

Source Information

Source file <HBHCRP24.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Hospital Based Home Care 2 (HDRRANGE,START,TODAY)^HBHCUTL  ENDRPT^HBHCUTL1  
VA FileMan 2 DD^%DT  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 HBHCRP24  

Entry Points

Name Comments DBIA/ICR reference
DQ ; De-queue
LOOP ; Loop thru ^HBHC(631) "AD" (admission date) cross-ref to build report
EXIT ; Exit module
PROCESS ; Process record & build ^TMP("HBHC",$J) global
PRTLOOP ; Print loop
PRINT ; Print report

External References

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,HBHCZ,!,"Program Census Total: ",HBHCTOT,!,HBHCZ
  • Line Location: LOOP+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !,$E(HBHCNAME,1,14),?16,$P(HBHCTMP,U),?23,HBHCDAT,?38,$S(($L($P($P(HBHCTMP,U,2),","))>8):$E($P(HBHCTMP,U,2),1,8),1:$P($P(HBHCTMP,U,2),",")),?49,$E(Y,1,18),?70,$P(HBHCTMP,U,4),!,HBHCY
  • Line Location: PRINT+5
Routine Call
  • %ZIS
  • Line Location:
    • HBHCRP24+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(40.7 - [#40.7] PROCESS+7
^DPT - [#2] PROCESS+4
^HBHC(631 - [#631] LOOP+2, PROCESS+5
^HBHC(631.4 - [#631.4] PROCESS+5
^HBHC(632 - [#632] PROCESS+6, PROCESS+7
^SC - [#44] PROCESS+7
^TMP("HBHC" DQ+2!, LOOP+3, LOOP+4, EXIT+3!, PROCESS+11*, PRTLOOP+1, PRINT+3
^VA(200 - [#200] PROCESS+5

Label References

Name Line Occurrences
EXIT HBHCRP24+4, HBHCRP24+5, HBHCRP24+6
PRINT PRTLOOP+1
PROCESS LOOP+2
PRTLOOP LOOP+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS HBHCRP24+5*
HBHCADDT LOOP+1*, LOOP+2*, EXIT+2!, PROCESS+11, PRTLOOP+1*, PRINT+2, PRINT+3
HBHCBEG1 HBHCRP24+4, LOOP+1, EXIT+2!
HBHCBEG2 EXIT+2!
HBHCCASE EXIT+2!, PROCESS+4*, PROCESS+5*, PROCESS+11
HBHCCC HBHCRP24+5*, DQ+7*, EXIT+2!, PRINT+1
HBHCCOLM DQ+5*, EXIT+2!
HBHCDAT EXIT+2!, PROCESS+4*, PROCESS+6*, PRINT+2*, PRINT+5
HBHCDATE EXIT+2!, PROCESS+4*, PROCESS+6*, PROCESS+7, PROCESS+8, PROCESS+9, PROCESS+10*, PROCESS+11
HBHCDFN LOOP+2*, EXIT+2!, PROCESS+5
HBHCDISC EXIT+2!, PROCESS+8*, PROCESS+9*, PROCESS+10*, PROCESS+11
HBHCDPT EXIT+2!, PROCESS+4*, PROCESS+6
HBHCDPT0 EXIT+2!, PROCESS+4*, PROCESS+11
HBHCEND1 HBHCRP24+4, LOOP+2, EXIT+2!, PROCESS+1
HBHCEND2 EXIT+2!
HBHCHDR DQ+4*, EXIT+2!
HBHCHEAD DQ+4*, DQ+5, EXIT+2!
HBHCI EXIT+2!, PROCESS+6*
HBHCNAME EXIT+2!, PRTLOOP+1*, PRINT+3, PRINT+5
HBHCNOD0 LOOP+2*, EXIT+2!, PROCESS+1, PROCESS+4
>> HBHCNOD1 PROCESS+5*
HBHCPAGE EXIT+2!
HBHCSTOP EXIT+2!, PROCESS+3~*, PROCESS+7*, PROCESS+8, PROCESS+9
HBHCTDY EXIT+2!
HBHCTMP EXIT+3!, PRINT+3*, PRINT+4, PRINT+5
HBHCTMP1 DQ+3*, EXIT+3!, PROCESS+8
HBHCTMP2 DQ+3*, EXIT+3!, PROCESS+9
HBHCTOT DQ+3*, LOOP+4, EXIT+3!, PRINT+6*
HBHCY DQ+3*, EXIT+3!, PRINT+5
HBHCZ LOOP+4, EXIT+3!
IO DQ+1, DQ+6, DQ+7
IO("Q" HBHCRP24+6
IO("S" DQ+6, DQ+7
IO(0 DQ+6, DQ+7
IOF PRINT+1
IOP HBHCRP24+5!
IOSL PRINT+1
>> POP HBHCRP24+5
U LOOP+2, PROCESS+1, PROCESS+4, PROCESS+5, PROCESS+6, PROCESS+7, PROCESS+11, PRINT+4, PRINT+5
X LOOP+1, EXIT+3!
X1 LOOP+1*, EXIT+3!
X2 LOOP+1*, EXIT+3!
Y EXIT+3!, PRINT+2*, PRINT+4*, PRINT+5
>> ZTDESC HBHCRP24+6*
ZTIO HBHCRP24+5!
>> ZTRTN HBHCRP24+6*, PRINT+1
ZTSAVE HBHCRP24+5!
ZTSAVE("HBHC*" HBHCRP24+6*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All