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

Package: Hospital Based Home Care

Routine: HBHCRP1B


Information

HBHCRP1B ;LR VAMC(IRMS)/MJT - HBHC report on files 634.1, 634.2, & 634.3, (Form 3/4/5 (A/V/D respectively) Error(s)), called by HBHCRP1A, entry points: START, SETUP, PRTLOOP, EXIT ;April 2000

Source Information

Source file <HBHCRP1B.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Hospital Based Home Care 1 (HDRPAGE,TODAY)^HBHCUTL  
Kernel 1 ^%ZISC  

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 HBHCRP1A  

Entry Points

Name Comments DBIA/ICR reference
START ; Entry point
SETUP ; Setup variables
PRTLOOP ; Print loop
SETTXT ; Set text
LOOP2 ; Continuation of PRTLOOP
PRINT ; Print report
CPT ; Write CPT info
MOD ; Write Modifier info
EXIT ; Exit module

External References

Name Field # of Occurrence
^%ZISC EXIT+1
HDRPAGE^HBHCUTL PRTLOOP+1, PRTLOOP+2, PRINT+2
TODAY^HBHCUTL START+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !,$J($P(HBHCINFO,U),8),?10,HBHCNAME,?27,HBHCSSN,?34,HBHCCLN,?55,$P(HBHCINFO,U,2)," ",?75,HBHCTXT
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !,"Error: ",$P(HBHCINFO,U,3)
  • Condition for execution: $P(HBHCINFO,U,3)]""
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !,HBHCY
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !,"Provider: ",$P(HBHCINFO,"$"),?54,"Encounter Prov #:",?72,$J($P(HBHCINFO,"$",2),8)
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: !,"ICD: ",HBHCINFO
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: !,HBHCY
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: !?1,"CPT: ",$P(HBHCINFO,"$"),?45,"QTY: ",$J($P(HBHCINFO,"$",2),3),?55,"CPT Code Prov #:",?72,$J($P(HBHCINFO,"$",3),8)
  • Line Location: CPT+1
Function Call: WRITE
  • Prompt: !,HBHCTEXT,HBHCINFO
  • Line Location: MOD+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("HBHC" START+1!, PRTLOOP+4, LOOP2+1, PRINT+1, PRINT+6, PRINT+8, PRINT+10, EXIT+3!

Label References

Name Line Occurrences
CPT PRINT+10
LOOP2 PRTLOOP+4
MOD PRINT+10
PRINT LOOP2+1
SETTXT PRTLOOP+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EXIT+2!
DIK EXIT+2!
HBHCCC PRTLOOP+2*, PRINT+2, EXIT+2!
HBHCCLN PRTLOOP+4*, LOOP2+1, PRINT+1, PRINT+3, PRINT+6, PRINT+8, PRINT+10, EXIT+2!
HBHCCOLM START+5*, EXIT+2!
HBHCCPT EXIT+2!
HBHCCPTL EXIT+2!
HBHCDAT PRTLOOP+4*, LOOP2+1, PRINT+1, PRINT+6, PRINT+8, PRINT+10, EXIT+2!
HBHCDATE EXIT+2!
HBHCDFN EXIT+2!
HBHCDPT EXIT+2!
HBHCDPT0 EXIT+2!
HBHCDX1 EXIT+2!
HBHCDXL EXIT+2!
HBHCFILE SETUP+1, EXIT+2!
HBHCFL SETUP+1*, EXIT+2!
HBHCFORM SETUP+1*, PRTLOOP+3*, PRTLOOP+4*, SETTXT+1, LOOP2+1, PRINT+1, PRINT+4, PRINT+6, PRINT+8, PRINT+10
EXIT+2!
HBHCHDR START+4*, EXIT+2!
HBHCHEAD START+3*, START+5, EXIT+2!
HBHCI PRINT+6*, PRINT+8*, PRINT+10*, EXIT+2!
HBHCICDP EXIT+2!
HBHCIEN EXIT+2!
HBHCINFO PRINT+1*, PRINT+3, PRINT+6*, PRINT+8*, PRINT+10*, CPT+1, MOD+1, EXIT+2!
HBHCJ PRINT+10*, EXIT+2!
HBHCK EXIT+2!
HBHCMOD EXIT+2!
HBHCMSG EXIT+2!
HBHCNAME LOOP2+1*, PRINT+1, PRINT+3, PRINT+6, PRINT+8, PRINT+10, EXIT+2!
HBHCNOD0 EXIT+2!
HBHCOEP EXIT+3!
HBHCPAGE START+3*, EXIT+3!
HBHCPC SETUP+1*, EXIT+3!
HBHCPRV EXIT+3!
HBHCPRV1 EXIT+3!
HBHCPRVL EXIT+3!
HBHCPRVP EXIT+3!
HBHCSP2 START+3*, EXIT+3!
HBHCSP3 START+3*, EXIT+3!
HBHCSSN LOOP2+1*, PRINT+1, PRINT+3, PRINT+6, PRINT+8, PRINT+10, EXIT+3!
HBHCTDY EXIT+3!
HBHCTEXT START+3*, MOD+1, EXIT+3!
HBHCTXT SETTXT+1*, PRINT+3, EXIT+3!
HBHCY START+3*, PRINT+4, PRINT+11, EXIT+3!
HBHCZ EXIT+3!
IO PRTLOOP+1, PRTLOOP+2
IO("S" PRTLOOP+1, PRTLOOP+2
IO(0 PRTLOOP+1, PRTLOOP+2
IOF PRINT+2
IOSL PRINT+2
U PRINT+3
X EXIT+3!
Y EXIT+3!
>> ZTRTN PRINT+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All