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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: HMPDSR

Package: Enterprise Health Management Platform

Routine: HMPDSR


Information

HMPDSR ;SLC/MKB,ASMR/RRB - Surgical Procedures;Aug 29, 2016 20:06:27

Source Information

Source file <HMPDSR.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Enterprise Health Management Platform 3 ($$ESC,$$FAC)^HMPD  $$TEXT^HMPDTIU  LOGDPT^HMPLOG  
CPT HCPCS Codes 2 ($$CPT,$$CPTD)^ICPTCOD  $$MOD^ICPTMOD  
Surgery 1 (LIST,ONE)^SROESTV  
VA FileMan 1 ($$GET1,GETS)^DIQ  

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

Package Total Caller Graph
Enterprise Health Management Platform 1 HMPDJ07  

Entry Points

Name Comments DBIA/ICR reference
EN(DFN,BEG,END,MAX,ID) ; -- find patient's surgeries
ENQ ; end
ONE(NUM,SURG) ; -- return a surgery in SURG("attribute")=value
; Expects DFN, @HMPY@(NUM) from LIST^SROESTV
EN1(IEN,SURG) ; -- return a surgery in SURG("attribute")=value
CPT(IEN) ; -- return code^description for CPT code, or "^" if error
XML(SURG) ; -- Return surgery as XML
LOOP() ; -- build sub-items string from NAMES and X
ADD(X) ; -- Add a line @HMP@(n)=X

External References

Name Field # of Occurrence
$$GET1^DIQ ONE+9, ONE+10, ONE+11, ONE+23, EN1+9, EN1+10, EN1+11, EN1+23
GETS^DIQ ONE+13, ONE+17, EN1+13, EN1+17
$$ESC^HMPD XML+13, XML+17, LOOP+2
$$FAC^HMPD ONE+9, EN1+9
$$TEXT^HMPDTIU ONE+25, EN1+25
LOGDPT^HMPLOG EN+2
$$CPT^ICPTCOD CPT+2
$$CPTD^ICPTCOD CPT+4
$$MOD^ICPTMOD ONE+15, EN1+15
LIST^SROESTV EN+9, EN+11
ONE^SROESTV EN1+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SRF - [#130] GET1^DIQ
^SRO(136 - [#136] GET1^DIQ,  GETS^DIQ
^TIU(8925 - [#8925] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("HMPTEXT" ENQ+1!, ONE+3!, EN1+2!

Label References

Name Line Occurrences
$$CPT ONE+12, ONE+20, EN1+12, EN1+20
$$LOOP XML+9, XML+19
ADD XML+2, XML+3, XML+5, XML+10, XML+11, XML+12, XML+13, XML+14, XML+15, XML+20
EN1 EN+6
ENQ EN+6
ONE EN+13
XML EN+6, EN+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ATT XML+1~, XML+3*, XML+4, XML+5, XML+6, XML+7, XML+8, XML+9, XML+10, XML+14
, XML+15, XML+16, XML+17, XML+18, XML+19
BEG EN~, EN+3*, EN+11
DFN EN~, EN+2*, EN+11
END EN~, EN+3*, EN+11
>> HMP ADD+2
HMPCNT EN+1~
>> HMPI ADD+1*, ADD+2
HMPITM EN+1~, EN+6, EN+13!, EN+14
HMPMOD ONE+2~, EN1+1~
HMPMOD( ONE+14, ONE+15, EN1+14, EN1+15
HMPN EN+1~, EN+12*, EN+13
HMPOTH ONE+2~, EN1+1~
HMPOTH( ONE+18, ONE+19, EN1+18, EN1+19
>> HMPTEXT ONE+25, EN1+25
>> HMPTOTL XML+2*
HMPX ONE+2~, ONE+4*, ONE+5, ONE+7, ONE+8, EN1+1~, EN1+4*, EN1+5, EN1+7, EN1+8
, CPT+1~
HMPX( CPT+7
HMPX(1 CPT+5, CPT+6
HMPY EN+1~, EN+11, EN+12, EN+15, ONE+4, ONE+21, EN1+1~
HMPY( EN1+4, EN1+21
I ONE+2~, ONE+14*, ONE+15, ONE+16, ONE+18*, ONE+19, ONE+20, ONE+21*, ONE+24, ONE+25
, EN1+1~, EN1+14*, EN1+15, EN1+16, EN1+18*, EN1+19, EN1+20, EN1+21*, EN1+24, EN1+25
, CPT+1~, CPT+6*, CPT+7*, XML+1~, XML+6*, XML+7, XML+10
ID EN~, EN+6
IEN ONE+2~, ONE+4*, ONE+5, ONE+9, ONE+10, ONE+11, ONE+13, ONE+17, EN1~, EN1+4
, EN1+5, EN1+9, EN1+10, EN1+11, EN1+13, EN1+17, EN1+21, CPT~, CPT+1*, CPT+2
J XML+1~, XML+13*
LT ONE+22~*, ONE+24, ONE+26, EN1+22~*, EN1+24, EN1+26
MAX EN~, EN+3*, EN+11
N CPT+1~, CPT+4*, CPT+5
NAMES XML+1~, XML+7*, XML+8*, XML+18*, LOOP+2
NT ONE+22~, ONE+23*, ONE+24, ONE+26, EN1+22~, EN1+23*, EN1+24, EN1+26
NUM ONE~, ONE+4, ONE+21
P LOOP+1~, LOOP+2*
SHOWADD EN+10~*, EN1+1~, EN1+3*
STR LOOP+1~*, LOOP+2*, LOOP+3
SURG ONE~, ONE+3!, EN1~, EN1+2!, XML~
SURG( XML+3, XML+4, XML+6, XML+7, XML+10, XML+16
SURG("category" ONE+27*, EN1+27*
SURG("dateTime" ONE+7*, EN1+7*
SURG("document" ONE+24*, ONE+25*, EN1+24*, EN1+25*
SURG("encounter" ONE+10*, EN1+10*
SURG("facility" ONE+9*, EN1+9*
SURG("id" ONE+5*, EN1+5*
SURG("modifier" ONE+16*, EN1+16*
SURG("name" ONE+7*, EN1+7*
SURG("opReport" ONE+26*, EN1+26*
SURG("otherProcedure" ONE+20*, EN1+20*
SURG("provider" ONE+8*, EN1+8*
SURG("status" ONE+5*, ONE+6*, EN1+5*, EN1+6*
SURG("type" ONE+12*, EN1+12*
TAG LOOP+1~, LOOP+2*
U ONE+4, ONE+5, ONE+7, ONE+8, ONE+16, ONE+22, ONE+24, ONE+26, EN1+5, EN1+7
, EN1+8, EN1+16, EN1+22, EN1+24, EN1+26, CPT+3, CPT+4, CPT+8, LOOP+2
X ONE+2~, ONE+5*, ONE+6*, ONE+7, ONE+8*, ONE+9*, ONE+11*, ONE+12, ONE+15*, ONE+19*
, ONE+20, ONE+21*, ONE+22, ONE+23, ONE+24, ONE+25, ONE+26, EN1+1~, EN1+5*, EN1+6*
, EN1+7, EN1+8*, EN1+9*, EN1+11*, EN1+12, EN1+15*, EN1+19*, EN1+20, EN1+21*, EN1+22
, EN1+23, EN1+24, EN1+25, EN1+26, CPT+1~, CPT+6*, CPT+7*, CPT+8, XML+1~, XML+7*
, XML+10*, XML+13, XML+16*, XML+17, XML+19, LOOP+2, ADD~, ADD+2
X0 CPT+1~, CPT+2*, CPT+3
Y ONE+2~, ONE+15*, ONE+16, EN1+1~, EN1+15*, EN1+16, CPT+1~, CPT+3*, CPT+4, CPT+8*
, CPT+9, XML+1~, XML+3, XML+4*, XML+9*, XML+10*, XML+11*, XML+12*, XML+13*, XML+16*
, XML+17*, XML+19*

Marked Items

Name Field # of Occurrence
$T(LIST^SROESTV EN+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All