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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: HBHCRP14

Package: Hospital Based Home Care

Routine: HBHCRP14


Information

HBHCRP14 ; VAMC(IRMS)/MJT-HBHC report locates records in ^HBHC(631, ^HBHC(632 files with pseudo SSNs, populates ^HBHC(634.5 (pseudo SSN error(s)) file, report includes: patient name & SSN for pseudo SSN records ;9403

Source Information

Source file <HBHCRP14.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Hospital Based Home Care 2 (HDRPAGE,TODAY)^HBHCUTL  ENDRPT^HBHCUTL1  
VA FileMan 1 FILE^DICN  

Entry Points

Name Comments DBIA/ICR reference
DQ ; De-queue
EXIT ; Exit module
FILE ; File entry
; Quit if cancelled appointment
PRINT ; Print report

External References

Name Field # of Occurrence
^%ZIS HBHCRP14+2
^%ZISC EXIT+2
^%ZTLOAD HBHCRP14+3
FILE^DICN FILE+3
HDRPAGE^HBHCUTL DQ+6, DQ+7, PRINT+1, PRINT+2
TODAY^HBHCUTL DQ+5
ENDRPT^HBHCUTL1 DQ+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!!,"Another user has the pseudo SSN file locked.",!!
  • Line Location: DQ+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DQ+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !,$P(HBHCDPT0,U),?40,$E($P(HBHCDPT0,U,9),1,3)_"-"_$E($P(HBHCDPT0,U,9),4,5)_"-"_$E($P(HBHCDPT0,U,9),6,10)
  • Line Location: PRINT+3
Routine Call
  • %ZIS
  • Line Location:
    • HBHCRP14+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^HBHC(634.5 - [#634.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] DQ+8, PRINT+3
^HBHC( DQ+8, FILE+2
^HBHC(634.5 - [#634.5] DQ+2, DQ+3!*, EXIT+1, PRINT+3

Label References

Name Line Occurrences
EXIT HBHCRP14+2, HBHCRP14+3, DQ+2
FILE DQ+8
PRINT DQ+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS HBHCRP14+2*
DD EXIT+3!, FILE+3!
DIC EXIT+3!, FILE+3*
DIC(0 FILE+3*
DINUM EXIT+3!, FILE+3*
DO EXIT+3!, FILE+3!
HBHCCC HBHCRP14+2*, DQ+7*, EXIT+3!, PRINT+1
HBHCCOLM DQ+5*, EXIT+3!
HBHCDFN DQ+8*, EXIT+3!, FILE+2, PRINT+3*
HBHCDPT DQ+8*, EXIT+3!, FILE+3
HBHCDPT0 EXIT+3!, PRINT+3*
HBHCFILE DQ+8*, EXIT+3!, FILE+2
HBHCHDR DQ+5*, EXIT+3!
HBHCHEAD DQ+5*, EXIT+3!
HBHCPAGE DQ+5*, EXIT+3!
HBHCTDY EXIT+3!
HBHCY DQ+5*, EXIT+3!
HBHCZ EXIT+3!
IO DQ+1, DQ+6, DQ+7
>> IO("Q" HBHCRP14+3
>> IO("S" DQ+6, DQ+7
>> IO(0 DQ+6, DQ+7
IOF DQ+7, PRINT+1, PRINT+2
IOP HBHCRP14+2!
IOSL PRINT+1, PRINT+2
>> POP HBHCRP14+2
U DQ+8, FILE+2, PRINT+3
X EXIT+3!, FILE+3*
>> ZTDESC HBHCRP14+3*
ZTIO HBHCRP14+2!
>> ZTRTN HBHCRP14+3*, PRINT+1
ZTSAVE HBHCRP14+2!
ZTSAVE("HBHC*" HBHCRP14+3*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All