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

Package: Medicine

Routine: MCRPEC


Information

MCRPEC ;HCIOFO/JCC-ECHO Report Print ;4/28/97 10:55

Source Information

Source file <MCRPEC.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Medicine 2 HEAD^MCARP  $$RPTAGE^MCARUTL4  
VA Fileman 2 $$GET1^DIQ  ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Medicine 2 MCARP  MCMAGDSP  

Entry Points

Name Comments DBIA/ICR reference
PAGE ;

External References

Name Field # of Occurrence
$$GET1^DIQ MCRPEC+9, MCRPEC+21, MCRPEC+22, MCRPEC+43, MCRPEC+44, MCRPEC+45, MCRPEC+56, MCRPEC+60, MCRPEC+64, MCRPEC+65
, MCRPEC+66, MCRPEC+69, MCRPEC+75, MCRPEC+91, MCRPEC+95, MCRPEC+99, MCRPEC+101, MCRPEC+104, MCRPEC+107
^DIR PAGE+4
HEAD^MCARP PAGE+7
$$RPTAGE^MCARUTL4 MCRPEC+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"AGE: ",MCAGE,?25,"SEX: ",$S(MCSEX="M":"MALE",1:"FEMALE"),?50,"WARD/CLINIC: ",MCWAR
  • Line Location: MCRPEC+10
Function Call: WRITE
  • Prompt: !,"HEIGHT (INCH): ",MCHTS,?25,"WEIGHT (POUND): ",MCLBS,?50,"BSA: ",MCBSA
  • Line Location: MCRPEC+14
Function Call: WRITE
  • Prompt: !!,"TEST RESULTS:"
  • Line Location: MCRPEC+16
Function Call: WRITE
  • Prompt: !!,"M-MODE MEASUREMENTS"
  • Line Location: MCRPEC+23
Function Call: WRITE
  • Prompt: ?20,$J(MCP7,4)," (40-55mm)"
  • Line Location: MCRPEC+25
Function Call: WRITE
  • Prompt: ?60,$J(MCP9,4)," (0-10mm)"
  • Line Location: MCRPEC+26
Function Call: WRITE
  • Prompt: ?20,$J(MCP8,4)," (25-30mm)"
  • Line Location: MCRPEC+28
Function Call: WRITE
  • Prompt: ?60,$J(MCP3,4)," (25-35mm)"
  • Line Location: MCRPEC+29
Function Call: WRITE
  • Prompt: ?20,$J(MCP19,4)," (25-45%)"
  • Line Location: MCRPEC+31
Function Call: WRITE
  • Prompt: ?60,$J(MCP4,4)," (20-35mm)"
  • Line Location: MCRPEC+32
Function Call: WRITE
  • Prompt: ?20,$J(MCP1,4)," (8-11mm)"
  • Line Location: MCRPEC+34
Function Call: WRITE
  • Prompt: ?60,$J(MCP5,4)," (10-25mm)"
  • Line Location: MCRPEC+35
Function Call: WRITE
  • Prompt: ?20,$J(MCP2,4)," (8-11mm)"
  • Line Location: MCRPEC+37
Function Call: WRITE
  • Prompt: ?60,$J(MCP6,4)," (2-4mm)"
  • Line Location: MCRPEC+38
Function Call: WRITE
  • Prompt: ?20,$J(MCP328,4,0)
  • Line Location: MCRPEC+40
Function Call: WRITE
  • Prompt: !!,"2-D ECHO MEASUREMENTS"
  • Line Location: MCRPEC+46
Function Call: WRITE
  • Prompt: ?19,$J(MCP32,5,0),"%"
  • Line Location: MCRPEC+48
Function Call: WRITE
  • Prompt: $J(MCP11,4)," ml"
  • Line Location: MCRPEC+49
Function Call: WRITE
  • Prompt: $J(MCP10,4)," ml"
  • Line Location: MCRPEC+50
Function Call: WRITE
  • Prompt: ?20,$J(MCP5,5,0)," ml/min"
  • Line Location: MCRPEC+52
Function Call: WRITE
  • Prompt: ?19,$J(MCP4,5,0),"%"
  • Line Location: MCRPEC+54
Function Call: WRITE
  • Prompt: !,?4,$$GET1^DIQ(691.04,D1_","_MCIEN_",",.01),", ",$$GET1^DIQ(691.04,D1_","_MCIEN_",",1)
  • Line Location: MCRPEC+60
Function Call: WRITE
  • Prompt: !,?4,$$GET1^DIQ(691.05,D1_","_MCIEN_",",.01),", ",$$GET1^DIQ(691.05,D1_","_MCIEN_",",1)
  • Line Location: MCRPEC+75
Function Call: WRITE
  • Prompt: ?20,$J(MC347,5)," mm Hg"
  • Line Location: MCRPEC+77
Function Call: WRITE
  • Prompt: ?65,$J(MC353,5)," mm Hg"
  • Line Location: MCRPEC+78
Function Call: WRITE
  • Prompt: ?20,$J(MCP7,5,0)," mm Hg"
  • Line Location: MCRPEC+80
Function Call: WRITE
  • Prompt: ?65,$J(MCP12,5,0)," mm Hg"
  • Line Location: MCRPEC+81
Function Call: WRITE
  • Prompt: ?20,$J(MCP8,5,1)," cm-sq"
  • Line Location: MCRPEC+83
Function Call: WRITE
  • Prompt: ?65,$J(MC3565,5,1)," cm-sq"
  • Line Location: MCRPEC+84
Function Call: WRITE
  • Prompt: ?20,$J(MCP9,5,0)," mm Hg"
  • Line Location: MCRPEC+86
Function Call: WRITE
  • Prompt: ?65,$J(MCP14,5,1)," cm-sq"
  • Line Location: MCRPEC+87
Function Call: WRITE
  • Prompt: !!,"FINDINGS:"
  • Line Location: MCRPEC+89
Function Call: WRITE
  • Prompt: !,?4,$$GET1^DIQ(691.06,D1_","_MCIEN_",",.01)
  • Line Location: MCRPEC+91
Function Call: WRITE
  • Prompt: !!,"DIAGNOSIS:"
  • Line Location: MCRPEC+93
Function Call: WRITE
  • Prompt: !,?4,$$GET1^DIQ(691.15,D1_","_MCIEN_",",.01)
  • Line Location: MCRPEC+95
Function Call: WRITE
  • Prompt: !!,"OTHER CONCLUSION:"
  • Line Location: MCRPEC+97
Function Call: WRITE
  • Prompt: !,?4,$$GET1^DIQ(691.07,D1_","_MCIEN_",",.01)
  • Line Location: MCRPEC+99
Function Call: WRITE
  • Prompt: !!,"CARDIOLOGY ATTENDING:",?26,MCPAT
  • Line Location: MCRPEC+102
Function Call: WRITE
  • Prompt: !!,"CARDIOLOGY FELLOW:",?26,MCPAT
  • Line Location: MCRPEC+105
Function Call: WRITE
  • Prompt: !!,"SUMMARY:",!,?4,$$GET1^DIQ(691,MCIEN,.03)
  • Line Location: MCRPEC+107
Function Call: WRITE
  • Prompt: !!,"PROCEDURE SUMMARY:",!,?4,$P($G(^MCAR(691,MCIEN,.2)),U,2)
  • Line Location: MCRPEC+109
Routine Call
  • DIR
  • Line Location:
    • PAGE+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^SC - [#44] GET1^DIQ
^MCAR(691 - [#691] GET1^DIQ
691.04 GET1^DIQ
691.05 GET1^DIQ
691.06 GET1^DIQ
691.15 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] MCRPEC+9
^MCAR(691 - [#691] MCRPEC+7, MCRPEC+9, MCRPEC+12, MCRPEC+19, MCRPEC+43, MCRPEC+60, MCRPEC+67, MCRPEC+70, MCRPEC+75, MCRPEC+91
, MCRPEC+95, MCRPEC+99, MCRPEC+101, MCRPEC+104, MCRPEC+109

Label References

Name Line Occurrences
PAGE MCRPEC+11, MCRPEC+15, MCRPEC+17, MCRPEC+24, MCRPEC+27, MCRPEC+30, MCRPEC+33, MCRPEC+36, MCRPEC+39, MCRPEC+41
, MCRPEC+47, MCRPEC+51, MCRPEC+53, MCRPEC+55, MCRPEC+57, MCRPEC+59, MCRPEC+60, MCRPEC+74, MCRPEC+75, MCRPEC+79
, MCRPEC+82, MCRPEC+85, MCRPEC+88, MCRPEC+90, MCRPEC+91, MCRPEC+94, MCRPEC+95, MCRPEC+98, MCRPEC+99, MCRPEC+103
, MCRPEC+106, MCRPEC+108

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D1 MCRPEC+5~, MCRPEC+60*, MCRPEC+75*, MCRPEC+91*, MCRPEC+95*, MCRPEC+99*
DIR PAGE+2~
DIR(0 PAGE+4*
>> DN MCRPEC+4*, PAGE+6*, PAGE+7
I MCRPEC+20*~, MCRPEC+68*~
IOSL PAGE+1
IOST PAGE+4
MC34 MCRPEC+63~, MCRPEC+64*, MCRPEC+71
MC347 MCRPEC+63~, MCRPEC+65*, MCRPEC+71, MCRPEC+77
MC353 MCRPEC+63~, MCRPEC+66*, MCRPEC+71, MCRPEC+78
MC3565 MCRPEC+63~, MCRPEC+69*, MCRPEC+71, MCRPEC+84
MCAGE MCRPEC+5~, MCRPEC+8*, MCRPEC+10
>> MCARGDA MCRPEC+3, MCRPEC+6
MCBSA MCRPEC+5~, MCRPEC+13*, MCRPEC+14
MCDISP MCRPEC+5~, MCRPEC+19*, MCRPEC+20*, MCRPEC+21*, MCRPEC+22*, MCRPEC+23, MCRPEC+45*, MCRPEC+46, MCRPEC+71*, MCRPEC+72
MCHTS MCRPEC+5~, MCRPEC+13*, MCRPEC+14
MCIEN MCRPEC+5~, MCRPEC+6*, MCRPEC+7, MCRPEC+8, MCRPEC+9, MCRPEC+12, MCRPEC+19, MCRPEC+21, MCRPEC+22, MCRPEC+43
, MCRPEC+44, MCRPEC+45, MCRPEC+56, MCRPEC+60, MCRPEC+64, MCRPEC+65, MCRPEC+66, MCRPEC+67, MCRPEC+69, MCRPEC+70
, MCRPEC+75, MCRPEC+91, MCRPEC+95, MCRPEC+99, MCRPEC+101, MCRPEC+104, MCRPEC+107, MCRPEC+109
MCLBS MCRPEC+5~, MCRPEC+13*, MCRPEC+14
MCN13 MCRPEC+5~, MCRPEC+12*, MCRPEC+13
MCN4 MCRPEC+18~, MCRPEC+19*, MCRPEC+20
MCN8 MCRPEC+63~, MCRPEC+67*, MCRPEC+68
>> MCOUT MCRPEC+11, MCRPEC+15, MCRPEC+17, MCRPEC+23, MCRPEC+24, MCRPEC+27, MCRPEC+30, MCRPEC+33, MCRPEC+36, MCRPEC+39
, MCRPEC+41, MCRPEC+46, MCRPEC+47, MCRPEC+51, MCRPEC+53, MCRPEC+55, MCRPEC+57, MCRPEC+59, MCRPEC+60, MCRPEC+62
, MCRPEC+72, MCRPEC+74, MCRPEC+75, MCRPEC+76, MCRPEC+79, MCRPEC+82, MCRPEC+85, MCRPEC+88, MCRPEC+90, MCRPEC+91
, MCRPEC+92, MCRPEC+94, MCRPEC+95, MCRPEC+96, MCRPEC+98, MCRPEC+99, MCRPEC+100, MCRPEC+103, MCRPEC+106, MCRPEC+108
, PAGE+6*
MCP1 MCRPEC+5~, MCRPEC+34
MCP10 MCRPEC+42~, MCRPEC+43*, MCRPEC+45, MCRPEC+50
MCP11 MCRPEC+42~, MCRPEC+43*, MCRPEC+45, MCRPEC+49
MCP12 MCRPEC+5~, MCRPEC+71, MCRPEC+81
MCP14 MCRPEC+5~, MCRPEC+71, MCRPEC+87
MCP19 MCRPEC+18~, MCRPEC+21*, MCRPEC+31
MCP2 MCRPEC+5~, MCRPEC+37
MCP3 MCRPEC+5~, MCRPEC+29
MCP32 MCRPEC+42~, MCRPEC+44*, MCRPEC+45, MCRPEC+48
MCP328 MCRPEC+18~, MCRPEC+22*, MCRPEC+40
MCP4 MCRPEC+32, MCRPEC+42~, MCRPEC+43*, MCRPEC+45, MCRPEC+54
MCP5 MCRPEC+35, MCRPEC+42~, MCRPEC+43*, MCRPEC+45, MCRPEC+52
MCP6 MCRPEC+5~, MCRPEC+38
MCP7 MCRPEC+5~, MCRPEC+25, MCRPEC+71, MCRPEC+80
MCP8 MCRPEC+5~, MCRPEC+28, MCRPEC+71, MCRPEC+83
MCP9 MCRPEC+26, MCRPEC+63~, MCRPEC+70*, MCRPEC+71, MCRPEC+86
MCPAT MCRPEC+5~, MCRPEC+7*, MCRPEC+9, MCRPEC+101*, MCRPEC+102, MCRPEC+104*, MCRPEC+105
MCSEX MCRPEC+5~, MCRPEC+9*, MCRPEC+10
MCWAR MCRPEC+5~, MCRPEC+9*, MCRPEC+10
MCY PAGE+2~, PAGE+3*, PAGE+4*, PAGE+5*, PAGE+6
U MCRPEC+7, MCRPEC+9, MCRPEC+13, MCRPEC+20, MCRPEC+43, MCRPEC+68, MCRPEC+70, MCRPEC+101, MCRPEC+104, MCRPEC+109
, PAGE+5, PAGE+6
>> Y PAGE+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All