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

Package: Hospital Based Home Care

Routine: HBHCRP4


Information

HBHCRP4 ; LR VAMC(IRMS)/MJT-HBHC report on file 632, visit data by date range, sorted alphabetically by provider, then by visit date, includes all fields, & total ; Jan 2000

Source Information

Source file <HBHCRP4.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Hospital Based Home Care 4 (HDRRANGE,START)^HBHCUTL  ENDRPT^HBHCUTL1  (EN,FTOT,PROV,TOT)^HBHCUTL2  (CPT,DX)^HBHCUTL3  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
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 HBHCRP4  

Entry Points

Name Comments DBIA/ICR reference
DQ ; De-queue
LOOP ; Loop thru ^HBHC(632) "C" (visit date) cross-ref to build report
EXIT ; Exit module
PROCESS ; Process record & create ^TMP("HBHC",$J global
SETMOD ; Set TMP global with CPT Modifier info
PRTLOOP ; Print loop
PRINT ; Print report
HDR ; Report header setup
TOT ; Print total
CPTPRT ; CPT print
NEWPAGE ; Check if new page needed

External References

Name Field # of Occurrence
C^%DTC LOOP+1
^%ZIS HBHCRP4+7
^%ZISC EXIT+1
^%ZTLOAD HBHCRP4+8
HDRRANGE^HBHCUTL LOOP+3, HDR+2, NEWPAGE+1
START^HBHCUTL HBHCRP4+5
ENDRPT^HBHCUTL1 LOOP+5
EN^HBHCUTL2 HBHCRP4+3
FTOT^HBHCUTL2 LOOP+4
PROV^HBHCUTL2 HBHCRP4+3
TOT^HBHCUTL2 TOT+2
CPT^HBHCUTL3 PROCESS+9
DX^HBHCUTL3 PROCESS+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No Visits found for Date Range selected."
  • Line Location: LOOP+3
Function Call: WRITE
  • Prompt: !,"Visit Date: ",$E(HBHCDATE,4,5)_"-"_$E(HBHCDATE,6,7)_"-"_(1700+$E(HBHCDATE,1,3)),?26,"Patient Name: ",$P(HBHCTMP(1),U),?67,"Last 4: ",$P(HBHCTMP(1),U,2)
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: "Diagnosis: "
  • Condition for execution: HBHCI=1
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: ?13,^TMP("HBHC",$J,HBHCPRV,HBHCDATE,HBHCDFN,"DX",HBHCI)
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !,HBHCTEXT,^TMP("HBHC",$J,HBHCPRV,HBHCDATE,HBHCDFN,HBHCI,HBHCJ)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !,HBHCY
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !
  • Line Location: CPTPRT+2
Function Call: WRITE
  • Prompt: "CPT Code: "
  • Condition for execution: HBHCI=2
  • Line Location: CPTPRT+2
Function Call: WRITE
  • Prompt: ?13,^TMP("HBHC",$J,HBHCPRV,HBHCDATE,HBHCDFN,HBHCI)
  • Line Location: CPTPRT+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: NEWPAGE+1
Function Call: WRITE
  • Prompt: !,HBHCMSG,!
  • Line Location: NEWPAGE+1
Routine Call
  • %ZIS
  • Line Location:
    • HBHCRP4+7

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
CPTPRT PRINT+7
EXIT HBHCRP4+4, HBHCRP4+6, HBHCRP4+7, HBHCRP4+8
HDR PRTLOOP+2
NEWPAGE PRINT+4, CPTPRT+1
PRINT PRTLOOP+2
PROCESS LOOP+2
PRTLOOP LOOP+4
SETMOD PROCESS+11
TOT PRTLOOP+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% HBHCRP4+4, EXIT+3!
>> %ZIS HBHCRP4+7*
DIC EXIT+2!
DTOUT HBHCRP4+4, EXIT+2!
DUOUT HBHCRP4+4, EXIT+2!
HBHCBEG1 HBHCRP4+6, LOOP+1, EXIT+2!
HBHCBEG2 EXIT+2!
HBHCCC HBHCRP4+7*, EXIT+2!
HBHCCLM1 EXIT+2!, HDR+1*
HBHCCOLM DQ+3*, EXIT+2!
HBHCCPT EXIT+2!
HBHCCPTA EXIT+2!
HBHCCPTA( PROCESS+11, SETMOD+1
HBHCDATE LOOP+1*, LOOP+2*, EXIT+2!, PROCESS+5, PROCESS+8, PROCESS+11, SETMOD+1, PRTLOOP+2*, PRINT+2, PRINT+3
, PRINT+4, PRINT+7, CPTPRT+2
HBHCDFN LOOP+2*, EXIT+2!, PROCESS+1, PROCESS+5, PROCESS+8, PROCESS+11, SETMOD+1, PRTLOOP+2*, PRINT+2, PRINT+4
, PRINT+7, CPTPRT+2
HBHCDPT0 EXIT+2!, PROCESS+1*, PROCESS+5
>> HBHCDX( PROCESS+8
HBHCEND1 HBHCRP4+6, LOOP+2, EXIT+2!
HBHCEND2 EXIT+2!
HBHCFILE EXIT+2!
HBHCFTOT DQ+3*, EXIT+2!
HBHCHEAD DQ+3*, EXIT+2!
HBHCI EXIT+2!, PROCESS+8*, PROCESS+11*, SETMOD+1, PRINT+4*, PRINT+6*, PRINT+7*, CPTPRT+2
HBHCJ EXIT+2!, PROCESS+11*, SETMOD+1, PRINT+7*
HBHCMSG DQ+3*, EXIT+2!, NEWPAGE+1
HBHCNAM LOOP+3!, EXIT+2!, HDR+1*
HBHCNOD0 EXIT+2!, PROCESS+1*, PROCESS+2, PROCESS+3, PROCESS+4
HBHCONE DQ+3*, EXIT+2!
HBHCPAGE EXIT+2!, HDR+1*
HBHCPRV EXIT+2!, PROCESS+4*, PROCESS+5, PROCESS+8, PROCESS+11, SETMOD+1, PRTLOOP+1*, PRTLOOP+2*, PRINT+2, PRINT+4
, PRINT+7, HDR+1, CPTPRT+2
HBHCPRVL LOOP+4, EXIT+2!, PROCESS+3
HBHCPRVL( PROCESS+3
HBHCSUB EXIT+3!, PROCESS+8*, PROCESS+11*, SETMOD+1
HBHCTDY EXIT+3!
HBHCTEXT DQ+3*, EXIT+3!, PRINT+7
HBHCTMP EXIT+3!, PRINT+1!
HBHCTMP(1 PRINT+2*, PRINT+3
HBHCTOT DQ+3*, EXIT+3!, PRINT+3*, TOT+1
HBHCTXT DQ+3*, LOOP+4*, EXIT+3!
HBHCWHO EXIT+3!
HBHCWHOC EXIT+3!
HBHCWHOS EXIT+3!
HBHCXREF EXIT+3!
HBHCY DQ+3*, EXIT+3!, PRINT+8
HBHCZ EXIT+3!
IO DQ+1
IO("Q" HBHCRP4+8
IOF HDR+2, NEWPAGE+1
IOP HBHCRP4+7!
IOSL NEWPAGE+1
>> POP HBHCRP4+7
U PROCESS+1, PROCESS+2, PROCESS+3, PROCESS+4, PROCESS+5, PRINT+3
X LOOP+1, EXIT+3!
X1 LOOP+1*, EXIT+3!
X2 LOOP+1*, EXIT+3!
Y EXIT+3!
>> ZTDESC HBHCRP4+8*
ZTIO HBHCRP4+7!
>> ZTRTN HBHCRP4+8*
ZTSAVE HBHCRP4+7!
ZTSAVE("HBHC*" HBHCRP4+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All