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

Package: Hospital Based Home Care

Routine: HBHXMNT1


Information

HBHXMNT1 ;VAMC(IRMS)/MJT-HBHC maintenance routine: reindexes "AD" cross-ref on ^HBHC(631, locates & deletes records in ^HBHC(634 w/pseudo SSNs, calls HBHXMNT2 to produce report(s) of patients w/pseudo SSN ;9403

Source Information

Source file <HBHXMNT1.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Hospital Based Home Care 1 ^HBHXMNT2  
VA FileMan 1 (,ENALL)^DIK  

Entry Points

Name Comments DBIA/ICR reference
EXIT ; Exit module
PROCESS ; Process record

External References

Name Field # of Occurrence
^DIK PROCESS+4
ENALL^DIK HBHXMNT1+3
^HBHXMNT2 EXIT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,"Beginning Post-Initialization Process",!!!,"- Reindexing ""AD"", Admission Date (#17) field, cross-reference, in HBHC",!,"Patient (#631) file, to clean up possible dangling cross-reference."
  • Line Location: HBHXMNT1+2
Function Call: WRITE
  • Prompt: !!,"""AD"" reindexing complete."
  • Line Location: HBHXMNT1+4
Function Call: WRITE
  • Prompt: !!!,"- Locating patient records in HBHC Patient (#631) & HBHC Visit (#632) files",!,"that have a pseudo social security number (SSN). These are invalid for HBHC"
  • Line Location: HBHXMNT1+5
Function Call: WRITE
  • Prompt: !,"purposes. This routine also locates & deletes any records in the HBHC",!,"Transmit (#634) file containing pseudo SSNs. Two reports of Patient Names are"
  • Line Location: HBHXMNT1+6
Function Call: WRITE
  • Prompt: !,"printed listing those patients that must be resolved. See Patch Narrative",!,"for detailed resolution instructions."
  • Line Location: HBHXMNT1+7
Function Call: WRITE
  • Prompt: !!,"Please select a PRINTER for device. HBHC will need these Pseudo SSN Reports",!,"to resolve the invalid SSNs."
  • Line Location: EXIT+2

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^HBHC(631 - [#631] HBHXMNT1+3!
^HBHC(634 - [#634] HBHXMNT1+8, PROCESS+1

Label References

Name Line Occurrences
PROCESS HBHXMNT1+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA HBHXMNT1+3!, EXIT+1!, PROCESS+4!*
DIK HBHXMNT1+3!*, EXIT+1!, PROCESS+4!*
DIK(1 HBHXMNT1+3*
HBHCDATA EXIT+1!, PROCESS+3*, PROCESS+4
HBHCDFN HBHXMNT1+8*, EXIT+1!, PROCESS+1, PROCESS+4
HBHCFORM EXIT+1!, PROCESS+1*, PROCESS+2
HBHCINFO EXIT+1!, PROCESS+1*, PROCESS+3
HBHCPOS EXIT+1!, PROCESS+2*, PROCESS+3
IOF HBHXMNT1+2
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