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

Package: Patient Care Component

Routine: APCHSUTL


Information

APCHSUTL ; IHS/CMI/LAB - UTILITIES FOR APCHS -- SUMMARY PRODUCTION COMPONENTS

Source Information

Source file <APCHSUTL.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
DRG Grouper 2 ($$ICDD,$$ICDDX,$$ICDOP)^ICDEX  $$CPT^ICPTCOD  
VA Fileman 2 EN^DIFGG  ^DIR  
IHS Patient 1 ($$VSTD,$$VSTP)^AUPNVUTL  

Caller Graph

Caller Graph Total: 35

Package Total Caller Graph
Patient Care Component 25 APCDLIM  APCHS10  APCHS2  APCHS2B  APCHS2C  APCHS2E  APCHS2F  APCHS2G  
APCHS2H  APCHS3C  APCHS4  APCHS6  APCHS61  APCHS6A  APCHS7  APCHS73  
APCHS74  APCHS77  APCHS78  APCHS7C  APCHS7N  APCHS7O  APCHS8  APCHS81  
APCHS8A  
Clinical Scheduling for Windows 5 BSDX41D  BSDX41E  BSDX41F  BSDX41H  BSDX41I  
IHS RPMS CHR System 2 BCHDHS  BCHDHS1  
Mental Health Social Services 2 AMHHS  AMHHS1  
IHS Mods To Text Integration Utilities 1 BTIULO1  

Entry Points

Name Comments DBIA/ICR reference
CONT
PRTTXT ;PEP - PUBLISHED ENTRY POINT
; GENERALIZED TEXT PRINTER
GEN1 ;
PRTICD ;ENTRY POINT
PRTICDE ;ENTRY POINT
GETSITE ;ENTRY POINT
PRTTXT1 ;
PRTTXT2
GETNARR ;ENTRY POINT
DSPLST ; COMMON CODE FOR BUILD HLTH SUM & HLTH SUM MNX LISTS
LC ;ENTRY POINT - FOR APCHSLST HLTH SUM COMPONENTS
GETICDDX ;ENTRY POINT
LM ;ENTRY POINT - FOR APCHSLST MEASUREMENT PANEL TYPES
FLOW ;
LI ;ENTRY POINT - FOR APCHSLST HLTH SUM FLOWSHEET ITEMS
LS ;ENTRY POINT - FOR APCHSLST HLTH SUM TYPES
GENFG ;generate filegrams for export
LF ;ENTRY POINT - FOR APCHSLST HLTH SUM FLOWSHEETS
GETCPT ;ENTRY POINT
GETSITEV ;ENTRY POINT
GETFRAG
WANTPN(T) ;EP
QUIT
TYPE ;
GETICDOP ;ENTRY POINT
MEASPAN ;

External References

Name Field # of Occurrence
$$VSTD^AUPNVUTL GETICDDX+4
$$VSTP^AUPNVUTL GETICDOP+3
EN^DIFGG GEN1+4
^DIR CONT, CONT+1
$$ICDD^ICDEX GETICDDX+5, GETICDOP+4
$$ICDDX^ICDEX GETICDDX+2
$$ICDOP^ICDEX GETICDOP+2
$$CPT^ICPTCOD GETCPT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?APCHSICL
  • Line Location: PRTTXT2+0
Function Call: WRITE
  • Prompt: APCHSF,!
  • Line Location: PRTTXT2+0
Function Call: WRITE
  • Prompt: !,"NO ",$P(@(APCHSLST_"0)"),U),"S DEFINED.",!
  • Line Location: DSPLST+2
Function Call: WRITE
  • Prompt: @IOF,!!,"Existing ",$P(@(APCHSLST_"0)"),U)
  • Line Location: DSPLST+3
Function Call: WRITE
  • Prompt: "S"
  • Line Location: DSPLST+4
Function Call: WRITE
  • Prompt: ":",!
  • Line Location: DSPLST+5
Function Call: WRITE
  • Prompt: !
  • Line Location: CONT+1
Function Call: WRITE
  • Prompt: !,"REMEMBER TO KILL APCHTMP BEFORE DOING THIS",!
  • Line Location: MEASPAN+1
Function Call: WRITE
  • Prompt: !,"measurement panel fg missing"
  • Line Location: MEASPAN+3
Function Call: WRITE
  • Prompt: !,"panel ",APCHX," missing.",!
  • Line Location: MEASPAN+5
Function Call: WRITE
  • Prompt: !,"flowsheet fg missing"
  • Line Location: FLOW+3
Function Call: WRITE
  • Prompt: !,"flowsheet ",APCHX," missing.",!
  • Line Location: FLOW+5
Function Call: WRITE
  • Prompt: !,"health summary type fg missing"
  • Line Location: TYPE+2
Function Call: WRITE
  • Prompt: !,"type ",APCHX," missing.",!
  • Line Location: TYPE+4
Function Call: WRITE
  • Prompt: !,"all done"
  • Line Location: TYPE+8
Function Call: WRITE
  • Prompt: !,"error on ",APCHT," item ",APCHX,!
  • Line Location: GEN1+5
Routine Call
  • DIR
  • Line Location:
    • CONT
    • CONT+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCHSCTL - [#9001015] WANTPN+1, WANTPN+2, GETNARR+1
^APCHSCTL("B" TYPE+3
^APCHSFLC("B" FLOW+4
^APCHSMPN("B" MEASPAN+4
^AUPNVSIT - [#9000010] GETSITEV+1, GETSITE+4, GETSITE+5
^AUTNPOV - [#9999999.27] GETNARR+1
^AUTTLOC - [#9999999.06] GETSITE+2
^DIC(4 - [#4] GETSITE+4
^DIPT("B" MEASPAN+2, FLOW+2, TYPE+1
^ICD0 - [#80.1] GETICDOP+3
^ICD9 - [#80] GETICDDX+4

Label References

Name Line Occurrences
DSPLST LC+1, LS+1, LM+1, LI+1, LF+1
GEN1 MEASPAN+7, FLOW+7, TYPE+6
GETFRAG PRTTXT2
PRTTXT PRTICD+5, PRTICDE+4
PRTTXT1 PRTTXT+4
PRTTXT2 PRTTXT+4
QUIT CONT
TYPE FLOW+1

Naked Globals

Name Field # of Occurrence
^(0 GETSITE+4
^(2 GETNARR+1
^(21 GETSITE+4, GETSITE+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APCHC MEASPAN+2*, MEASPAN+6*, FLOW+2*, FLOW+6*, TYPE+1*, TYPE+5*, TYPE+8!
>> APCHCSVD GETICDDX+2, GETICDDX+5, GETICDOP+2, GETICDOP+4
APCHSC PRTTXT+6!, GETFRAG+1*, GETFRAG+2*, GETFRAG+3
>> APCHSCKP PRTTXT2
APCHSCNT DSPLST+5*, CONT*, QUIT!
>> APCHSCVD GETICDDX+4, GETICDOP+3
APCHSDLT PRTTXT+3*, PRTTXT+6!, PRTTXT2*
APCHSDSC GETICDDX+1~, GETICDDX+5*, GETICDOP+1~, GETICDOP+4*
APCHSDSC(1 GETICDDX+6, GETICDOP+5
APCHSF PRTTXT+6!, PRTTXT2, GETFRAG*, GETFRAG+3*
>> APCHSICD GETICDDX+2, GETICDDX+4, GETICDDX+6*, GETICDDX+7*, GETICDDX+8*, GETICDOP+2, GETICDOP+3, GETICDOP+5*, GETICDOP+6*, GETICDOP+7*
, GETCPT+1, GETCPT+2*, GETCPT+3*, GETCPT+4*, PRTICD+1*, PRTICD+2, PRTICDE+1*
>> APCHSICF GETICDDX+6, GETICDDX+7, GETICDDX+8, GETICDOP+5, GETICDOP+6, GETICDOP+7, GETCPT+2, GETCPT+3, GETCPT+4, PRTICD+1
, PRTICDE+1
>> APCHSICL PRTTXT+3, PRTTXT2*
APCHSILN PRTTXT+3*, PRTTXT+6!, PRTTXT2*, GETFRAG, GETFRAG+1, GETFRAG+2
>> APCHSITE GETSITEV+1*, GETSITE+1*, GETSITE+2, GETSITE+4, GETSITE+5, GETSITE+7
APCHSLST LC+1*, LS+1*, LM+1*, LI+1*, LF+1*, DSPLST+2, DSPLST+3, DSPLST+4, CONT, QUIT!
>> APCHSNAB GETSITE+7*
>> APCHSNFL GETSITE+4*
>> APCHSNRQ PRTICD+1*, PRTTXT1+1*, PRTTXT1+2, GETNARR+1*, GETNARR+2*
>> APCHSNSH GETSITE+5*
APCHSNTE PRTICD+3*, PRTICD+4*, PRTICDE+2*, PRTICDE+3*, PRTTXT+2*, PRTTXT+5!, PRTTXT1+2*
>> APCHSP GETSITEV+1*, GETSITE+2*, GETSITE+4, GETSITE+5, GETSITE+7
>> APCHSQ PRTTXT+4*
>> APCHSQIT PRTTXT2
APCHSTXT PRTICD+2*, PRTTXT+4, PRTTXT+6!, PRTTXT1+1*, PRTTXT1+2*, GETFRAG*, GETFRAG+1, GETFRAG+3*
>> APCHSTYP GETNARR+1
APCHSVDF GETSITEV+1, GETSITE+3*, GETSITE+4, GETSITE+5, GETSITE+6!
>> APCHSVSC GETSITEV+1*
APCHT MEASPAN+2*, FLOW+2*, TYPE+1*, TYPE+8!, GEN1+2, GEN1+5
>> APCHX MEASPAN+2*, MEASPAN+4, MEASPAN+5, FLOW+2*, FLOW+4, FLOW+5, TYPE+1*, TYPE+3, TYPE+4, GEN1+5
APCHXY GETICDDX+1~, GETICDDX+2*, GETICDDX+3, GETICDDX+4*, GETICDDX+5, GETICDDX+6, GETICDDX+7, GETICDDX+8, GETICDOP+1~, GETICDOP+2*
, GETICDOP+3*, GETICDOP+4, GETICDOP+5, GETICDOP+6, GETICDOP+7
>> DIFG("FE" MEASPAN+4*, MEASPAN+5, FLOW+4*, FLOW+5, TYPE+3*, TYPE+4
>> DIFG("FGR" GEN1+2*
>> DIFG("FUNC" GEN1+1*
>> DIFGER GEN1+5
>> DIFGT MEASPAN+2*, MEASPAN+3, FLOW+2*, FLOW+3, TYPE+1*, TYPE+2
>> DILC GEN1+3*
DIR DSPLST+1!, CONT+1!, QUIT!
DIR(0 CONT*, CONT+1*
IOF DSPLST+3, CONT
IOM PRTTXT+3
IOSL CONT
T WANTPN~, WANTPN+1, WANTPN+2
U GETICDDX+3, GETICDDX+4, GETICDDX+5, GETICDDX+6, GETICDDX+7, GETICDDX+8, GETICDOP+3, GETICDOP+4, GETICDOP+5, GETICDOP+6
, GETICDOP+7, GETCPT+2, GETCPT+3, GETCPT+4, WANTPN+2, GETNARR+1, GETSITEV+1, GETSITE+4, GETSITE+5, GETSITE+7
, DSPLST+2, DSPLST+3, DSPLST+4
X QUIT!
Y GETCPT+1*, GETCPT+2, GETCPT+3, GETCPT+4, CONT, QUIT!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All