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

Package: Hospital Based Home Care

Routine: HBHCRP16


Information

HBHCRP16 ; LR VAMC(IRMS)/MJT-HBHC report on file 631, Admit/Reject Action field=Reject for date range, sorted by name, includes: patient name, Last Four, & evaluation date ; 12/21/05 3:30pm

Source Information

Source file <HBHCRP16.m>

Call Graph

Call Graph

Call Graph Total: 6

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

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Hospital Based Home Care 1 HBHCRP16  

Entry Points

Name Comments DBIA/ICR reference
PROCESS ; Process record & build ^TMP("HBHC",$J) global
PRTLOOP ; Print loop
EXIT ; Exit module
PRINT ; Print report
LOOP ; Loop thru ^HBHC(631,"AI") evaluation date cross-ref to build report, rejects will only contain evaluation date data until HBHC/PCE patch installed
DQ ; De-queue

External References

Name Field # of Occurrence
C^%DTC LOOP+1
^%ZIS HBHCRP16+4
^%ZISC EXIT+1
^%ZTLOAD HBHCRP16+5
HDR132^HBHCUTL DQ+4, DQ+5, PRINT+1
START^HBHCUTL HBHCRP16+2
TODAY^HBHCUTL DQ+4
END132^HBHCUTL1 LOOP+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,HBHCZ,!,"Program Rejections Total: ",HBHCTOT,!,HBHCZ
  • Line Location: LOOP+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !,HBHCNAME,?37,$P(HBHCTMP,U),?55,$E(HBHCDATE,4,5)_"-"_$E(HBHCDATE,6,7)_"-"_$E(HBHCDATE,2,3),?70,$P(HBHCTMP,U,2),!,HBHCY
  • Line Location: PRINT+3
Routine Call
  • %ZIS
  • Line Location:
    • HBHCRP16+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] PROCESS+4
^HBHC(631 - [#631] LOOP+2, LOOP+4, PROCESS+1
^HBHC(631.1 - [#631.1] PROCESS+4
^TMP("HBHC" DQ+2!, LOOP+5, EXIT+2!, PROCESS+5*, PRTLOOP+2, PRINT+2

Label References

Name Line Occurrences
EXIT HBHCRP16+3, HBHCRP16+4, HBHCRP16+5
PRINT PRTLOOP+2
PROCESS LOOP+2, LOOP+4
PRTLOOP LOOP+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

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