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

Package: Health Summary

Routine: GMTSPXU1


Information

GMTSPXU1 ; SLC/SBW,TC - PCE Utilities sub-routines ;06/25/15 15:51

Source Information

Source file <GMTSPXU1.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
DRG Grouper 2 ($$CODEC,$$CSI,$$SNAM)^ICDEX  ($$ICDDATA,$$ICDDESC)^ICDXCODE  
VA FileMan 2 ^DIR  ^DIWP  
CPT HCPCS Codes 1 $$CPT^ICPTCOD  
Lexicon Utility 1 $$IMPDATE^LEXU  

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

Package Total Caller Graph
Health Summary 7 GMTSDGA  GMTSDGC1  GMTSDGC2  GMTSDGP  GMTSPLST  GMTSPXOP  GMTSPXTP  

Entry Points

Name Comments DBIA/ICR reference
GETICDDX(GMTSICD,GMTSICF,GMMOD,GMTSDATE,GMTSCSYS) ; Entry point to get ICD data
GETICDOP(GMTSICD,GMTSICF,GMMOD,GMTSDATE,GMTSSHCS) ; Entry point to get ICD data
GETCPT(GMTSCPT) ; Entry point to get CPT data
TXTFMT(GMTSICD,GMTSNARR,GMICL,GMTAB,DIWL,GMTSQTY,GMTSPRIM) ; Formats GMTSICD & GMTSNARR together
ORDERPRO(GMPROV,GMLEN) ; Re-order and format providers for visit
LM ; Entry Point - for GMTS Measurement Panel
DSPLST ; Common code for Health Summary MNX Lists
CONT ; Continue
QUIT ; Quit
GETICDCD(DATE,TYPE) ;
; TYPE is either "PROC" or "DIAG"
; DATE is the date you want to check the coding system for
CODESYS(GMTSCODA,GMTSFILE) ; create coding system and label based on IEN

External References

Name Field # of Occurrence
^DIR CONT+3, CONT+4
^DIWP TXTFMT+9, TXTFMT+13
$$CODEC^ICDEX CODESYS+15
$$CSI^ICDEX CODESYS+10
$$SNAM^ICDEX CODESYS+12
$$ICDDATA^ICDXCODE GETICDDX+3, GETICDOP+3
$$ICDDESC^ICDXCODE GETICDDX+8, GETICDOP+8
$$CPT^ICPTCOD GETCPT+2
$$IMPDATE^LEXU GETICDCD+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"NO ",$P(@(GMTSLST_"0)"),U),"S DEFINED.",!
  • Line Location: DSPLST+2
Function Call: WRITE
  • Prompt: @IOF,!!,"Existing ",$P(@(GMTSLST_"0)"),U),"S:",!
  • Line Location: DSPLST+3
Function Call: WRITE
  • Prompt: !,?5,GMTSCNT
  • Line Location: CONT+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CONT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: CONT+4
Routine Call
  • DIR
  • Line Location:
    • CONT+3
    • CONT+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("PXHSV" ORDERPRO+3, ORDERPRO+4
^UTILITY($J TXTFMT+4!

Label References

Name Line Occurrences
$$GETICDCD GETICDOP+14
DSPLST LM+1
QUIT CONT+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CODE GETICDDX+1~, GETICDDX+11*, GETICDDX+14, GETICDDX+15, GETICDDX+16, GETICDOP+2~, GETICDOP+11*, GETICDOP+14*, GETICDOP+15, GETICDOP+16
, GETICDOP+17
DATE GETICDCD~, GETICDCD+8
DESC GETICDDX+1~, GETICDDX+13*, GETICDDX+14, GETICDDX+17, GETICDOP+2~, GETICDOP+13*, GETICDOP+15, GETICDOP+18
DIR DSPLST+1!, CONT+2~, CONT+4!, QUIT+1!
DIR(0 CONT+2*, CONT+4*
DIWF TXTFMT+2~
DIWL TXTFMT~
DIWR TXTFMT+2~, TXTFMT+3*
DT GETICDDX+2, GETICDOP+1
GMCNT ORDERPRO+1~, ORDERPRO+2*, ORDERPRO+6*, ORDERPRO+7
GMICL TXTFMT~, TXTFMT+3
GMLEN ORDERPRO~, ORDERPRO+7
GMMOD GETICDDX~, GETICDDX+2*, GETICDDX+18*, GETICDOP~, GETICDOP+1*
GMNODE ORDERPRO+1~, ORDERPRO+4*, ORDERPRO+5, ORDERPRO+7
GMP ORDERPRO+1~, ORDERPRO+3*, ORDERPRO+4, ORDERPRO+7
GMPROV ORDERPRO~
GMPROV( ORDERPRO+7*
GMTAB TXTFMT~, TXTFMT+3
GMTSCNT DSPLST+3*, CONT+1*, CONT+2, QUIT+1!
GMTSCODA CODESYS~, CODESYS+10, CODESYS+15
GMTSCODE CODESYS+9~, CODESYS+15*, CODESYS+16, CODESYS+17
GMTSCPT GETCPT~, GETCPT+1*, GETCPT+2
GMTSCSYS GETICDDX~, GETICDDX+2*, GETICDDX+3, GETICDDX+8, CODESYS+9~, CODESYS+10*, CODESYS+11, CODESYS+12*, CODESYS+13, CODESYS+17
GMTSDATE GETICDDX~, GETICDDX+2*, GETICDDX+3, GETICDDX+8, GETICDOP~, GETICDOP+1*, GETICDOP+3, GETICDOP+8, GETICDOP+14
GMTSFILE CODESYS~, CODESYS+10, CODESYS+15
GMTSICD GETICDDX~, GETICDDX+2*, GETICDDX+3, GETICDDX+4, GETICDDX+5, GETICDDX+6, GETICDDX+7, GETICDDX+9, GETICDDX+10, GETICDDX+11
, GETICDDX+12, GETICDDX+13, GETICDDX+14*, GETICDDX+15*, GETICDDX+16*, GETICDDX+17*, GETICDDX+18*, GETICDDX+19*, GETICDOP~, GETICDOP+1*
, GETICDOP+3, GETICDOP+4, GETICDOP+5, GETICDOP+6, GETICDOP+7, GETICDOP+9, GETICDOP+10, GETICDOP+11, GETICDOP+12, GETICDOP+13
, GETICDOP+15*, GETICDOP+16*, GETICDOP+17*, GETICDOP+18*, GETICDOP+19*, TXTFMT~, TXTFMT+1, TXTFMT+5
GMTSICDA GETICDDX+1~, GETICDDX+8, GETICDOP+2~, GETICDOP+8
GMTSICDA(1 GETICDDX+9, GETICDDX+10, GETICDOP+9, GETICDOP+10
GMTSICF GETICDDX~, GETICDDX+2*, GETICDDX+14, GETICDDX+15, GETICDDX+16, GETICDDX+17, GETICDDX+19, GETICDOP~, GETICDOP+1*, GETICDOP+15
, GETICDOP+16, GETICDOP+17, GETICDOP+18, GETICDOP+19
>> GMTSIVD ORDERPRO+3, ORDERPRO+4
GMTSLST LM+1*, DSPLST+2, DSPLST+3, CONT+1, QUIT+1!
GMTSNARR TXTFMT~, TXTFMT+1, TXTFMT+5, TXTFMT+6, TXTFMT+10
GMTSP ORDERPRO+1~, ORDERPRO+3*, ORDERPRO+4
GMTSPRIM TXTFMT~, TXTFMT+7, TXTFMT+12
GMTSQTY TXTFMT~, TXTFMT+8, TXTFMT+11
GMTSRET CODESYS+9~, CODESYS+11*, CODESYS+13*, CODESYS+16*, CODESYS+17*, CODESYS+18
GMTSSHCS GETICDOP~, GETICDOP+1*, GETICDOP+14
>> GMTSVDF ORDERPRO+3, ORDERPRO+4
ICDI GETICDDX+1~, GETICDDX+8*, GETICDOP+2~, GETICDOP+8*
ICDX GETICDDX+1~, GETICDDX+3*, GETICDDX+4, GETICDDX+5, GETICDDX+6, GETICDDX+7, GETICDDX+8, GETICDOP+2~, GETICDOP+3*, GETICDOP+4
, GETICDOP+5, GETICDOP+6, GETICDOP+7, GETICDOP+8
ICPT GETCPT+1~, GETCPT+2*, GETCPT+3
IOF DSPLST+3, CONT+3
IOSL CONT+2
NAME GETICDDX+1~, GETICDDX+12*, GETICDDX+15, GETICDOP+2~, GETICDOP+12*, GETICDOP+16
OUT GETICDCD+3~, GETICDCD+7*, GETICDCD+8*, GETICDCD+9*, GETICDCD+10*, GETICDCD+11
REC GETICDDX+1~, GETICDOP+2~
REC( GETICDOP+4*, GETICDOP+5*, GETICDOP+6*, GETICDOP+7*, GETICDOP+9*, GETICDOP+10*, GETICDOP+11, GETICDOP+12, GETICDOP+13
REC(80 GETICDDX+4*, GETICDDX+5*, GETICDDX+6*, GETICDDX+7*, GETICDDX+9*, GETICDDX+10*, GETICDDX+11, GETICDDX+12, GETICDDX+13
RET GETICDCD+3~, GETICDCD+6*, GETICDCD+11*, GETICDCD+12
TYPE GETICDCD~, GETICDCD+4*, GETICDCD+5*, GETICDCD+8, GETICDCD+9, GETICDCD+10
U ORDERPRO+7, DSPLST+2, DSPLST+3, CODESYS+16, CODESYS+17
X TXTFMT+2~, TXTFMT+5*, TXTFMT+6*, TXTFMT+7*, TXTFMT+8*, TXTFMT+11*, TXTFMT+12*, QUIT+1!
Y CONT+1, CONT+2!, QUIT+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All