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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BHSPLST1

Package: Health Summary Components

Routine: BHSPLST1


Information

BHSPLST1 ;IHS/MSC/MGH - Health Summary for Problem list;28-Apr-2016 14:48;DU

Source Information

Source file <BHSPLST1.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Health Summary 2 REGDT4^GMTSU  CKP^GMTSUP  
IHS Patient 2 $$CAT^AUPNVPLC  $$ICDDX^AUPNVUTL  
DRG Grouper 1 $$ICDDX^ICDEX  
Health Summary Components 1 (GETPLICD,GETSITE,PRTICD,PRTICDE,PRTTXT)^BHSUTL  
IHS VA Utilities 1 $$VAL^XBDIQ1  
VA Fileman 1 $$GET1^DIQ  

Entry Points

Name Comments DBIA/ICR reference
EPROB
IPROB
NOTEDSP ; DISPLAY NOTES UNDER APCHSPRBLEM
OPROB
CPROB
PPROB
APROB
PROBSCH ;
PROBDSP ;
; <SETUP PROBLEM>
DSPFACN ; DISPLAY NOTES FOR SELECTED APSHCFACILITY
COMMON ;
PROBX
ECODEDSP ;
DSPN ; DISPLAY SINGLE NOTE
SPROB
PROB ; ******************** PROBLEM / NOTES * 9000011 *********

External References

Name Field # of Occurrence
$$CAT^AUPNVPLC PROBDSP+15
$$ICDDX^AUPNVUTL ECODEDSP+9
GETPLICD^BHSUTL PROBDSP+5, ECODEDSP+11
GETSITE^BHSUTL PROBDSP+9, DSPFACN+2
PRTICD^BHSUTL PROBDSP+21
PRTICDE^BHSUTL ECODEDSP+15
PRTTXT^BHSUTL DSPN+8
$$GET1^DIQ PROBSCH+3, PROBDSP+7, PROBDSP+8, PROBDSP+28, PROBDSP+34, PROBDSP+40
REGDT4^GMTSU PROBDSP+12, PROBDSP+13, PROBDSP+16, DSPN+5
CKP^GMTSUP COMMON+5, COMMON+7, PROBDSP+20, ECODEDSP+1, ECODEDSP+4, DSPN+7
$$ICDDX^ICDEX ECODEDSP+9, ECODEDSP+12
$$VAL^XBDIQ1 PROBDSP+14, PROBDSP+18

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: COMMON+5
Function Call: WRITE
  • Prompt: ?13,"ENT. MODIFIED",!
  • Line Location: COMMON+8
Function Call: WRITE
  • Prompt: BHSPLN
  • Line Location: PROBDSP+21
Function Call: WRITE
  • Prompt: ?33,"CAUSE: ",!
  • Line Location: ECODEDSP+2
Function Call: WRITE
  • Prompt: "Note: "_BHSFCN_" "_$P(BHSN,U)_" on "_NTEDTE
  • Line Location: DSPN+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPROB - [#9000011] GET1^DIQ
9000011.13 GET1^DIQ
9000011.17 GET1^DIQ
9000011.18 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPROB - [#9000011] PROBSCH+4, PROBSCH+5, PROBDSP+3, PROBDSP+4, PROBDSP+24, PROBDSP+26, PROBDSP+30, PROBDSP+32, PROBDSP+36, PROBDSP+38
, NOTEDSP+1, DSPFACN+1, DSPFACN+2, DSPFACN+3
^AUPNPROB("AA" COMMON+4, PROBSCH+1

Label References

Name Line Occurrences
COMMON APROB, CPROB, SPROB, OPROB, EPROB, IPROB
DSPFACN NOTEDSP+1
DSPN DSPFACN+3
ECODEDSP PROBDSP+22
NOTEDSP PROBDSP+41
PROBDSP COMMON+9
PROBSCH COMMON+4
PROBX COMMON+5

Naked Globals

Name Field # of Occurrence
^( PROBSCH+2, DSPFACN+3
^(0 DSPFACN+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BHSAX PROBX+1!, PROBDSP+26*, PROBDSP+27, PROBDSP+32*, PROBDSP+33, PROBDSP+38*, PROBDSP+39
BHSCL PROBX+1!, PROBDSP+14*, PROBDSP+15
BHSDFN COMMON+9*, PROBX!, PROBSCH+2*, PROBSCH+3, PROBSCH+4, PROBSCH+5, PROBSCH+6, PROBDSP+3, PROBDSP+4, PROBDSP+7
, PROBDSP+8, PROBDSP+14, PROBDSP+18, PROBDSP+24, PROBDSP+26, PROBDSP+27, PROBDSP+30, PROBDSP+32, PROBDSP+33, PROBDSP+36
, PROBDSP+38, PROBDSP+39, NOTEDSP+1, DSPFACN+1, DSPFACN+2, DSPFACN+3
BHSDFT COMMON+1!, PROBX!
BHSDFT( COMMON+9, PROBSCH+6*
BHSDOO PROBX!, PROBDSP+2*, PROBDSP+16*, PROBDSP+17
BHSDTM PROBX!, PROBDSP+12*, PROBDSP+19
BHSDTN PROBX!, PROBDSP+13*, PROBDSP+19
BHSFAC COMMON+4*, PROBX!, PROBSCH+1
BHSFCN PROBX!, DSPFACN+2*, DSPN+6*, DSPN+7
BHSFPP COMMON+9*, PROBX!
BHSICD PROBX!, PROBDSP+5*, ECODEDSP+7*, ECODEDSP+8, ECODEDSP+12, ECODEDSP+13
BHSICF PROBX+1!, ECODEDSP+9, ECODEDSP+12, ECODEDSP+13
BHSICL PROBX+1!, PROBDSP+21*, ECODEDSP+14*, DSPN+8*
BHSILN PROBX+1!, PROBDSP+21*, ECODEDSP+14*
BHSITE PROBX+2!, PROBDSP+9*, DSPFACN+2*
BHSN PROBX+1!, PROBDSP+3*, PROBDSP+5, PROBDSP+9, PROBDSP+10, PROBDSP+12, PROBDSP+13, PROBDSP+15, PROBDSP+16, PROBDSP+22
, ECODEDSP+7, ECODEDSP+9, ECODEDSP+12, DSPFACN+3*, DSPN+2, DSPN+3, DSPN+4, DSPN+7
BHSNAB PROBX+2!, PROBDSP+11, DSPFACN+2
BHSNAR PROBX+1!, PROBSCH+3*, PROBSCH+6, DSPN+4*, DSPN+8
BHSNDF COMMON+1*, PROBX!, PROBSCH+6*, DSPFACN+3*
BHSNFL PROBX+2!
BHSNFP PROBX!, NOTEDSP+1*, DSPFACN+1, DSPFACN+2, DSPFACN+3
BHSNRQ PROBX!, PROBDSP+6*, PROBDSP+7*, PROBDSP+8*, ECODEDSP+9*, ECODEDSP+12*, ECODEDSP+13*
BHSNSH PROBX+2!
BHSNTE PROBX+1!, PROBDSP+2*, PROBDSP+15*, PROBDSP+17*, PROBDSP+18*
BHSP PROBX+1!, ECODEDSP+3*, ECODEDSP+7, ECODEDSP+9, ECODEDSP+12
BHSPAT COMMON+3*, COMMON+4, PROBX+2!, PROBSCH+1
BHSPBN PROBX!
BHSPER PPROB*, COMMON+2*, PROBX+2!, PROBSCH+5
BHSPLN PROBX!, PROBDSP+19*, PROBDSP+21
BHSPNM PROBX!, PROBDSP+10*, PROBDSP+11*, PROBDSP+19
BHSPRB PROBX!, PROBSCH+1*, PROBSCH+2
BHSQ COMMON+4*, COMMON+9*, PROBX+1!, PROBSCH+1*, NOTEDSP+1*, DSPFACN+3*, DSPN+6*
BHSTAT APROB*, CPROB*, SPROB*, OPROB*, EPROB*, IPROB*, PPROB*, PROBX!, PROBSCH+4
BHSTXT PROBX+1!, ECODEDSP+6*, DSPN+8*
BHSVD PROBX+2!, PROBDSP+4*
BHSVSC PROBX+2!
BHSX PROBX+2!
>> DFN COMMON+3
>> GMTSNPG COMMON+5, PROBDSP+20, ECODEDSP+5
>> GMTSQIT COMMON+5, COMMON+7, COMMON+9, PROBDSP+20, ECODEDSP+1, ECODEDSP+3, ECODEDSP+4, DSPN+7
I PROBX+2!, PROBDSP+27*, PROBDSP+28, PROBDSP+33*, PROBDSP+34, PROBDSP+39*, PROBDSP+40
NTEDTE DSPN+1~, DSPN+5*, DSPN+7
U PROBSCH+4, PROBSCH+5, PROBDSP+4, PROBDSP+5, PROBDSP+9, PROBDSP+10, PROBDSP+12, PROBDSP+13, PROBDSP+15, PROBDSP+16
, PROBDSP+22, ECODEDSP+7, ECODEDSP+9, ECODEDSP+12, DSPN+2, DSPN+3, DSPN+4, DSPN+7
X PROBX+2!, PROBDSP+8*, PROBDSP+12*, PROBDSP+13*, PROBDSP+16*, DSPN+4*, DSPN+5
Y PROBX+2!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All