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

Package: IHS GPRA Information System

Routine: BGPMUHP1


Information

BGPMUHP1 ; IHS/MSC/JSM - MU EH measure output routines;13-May-2011 16:13;MGH

Source Information

Source file <BGPMUHP1.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
IHS GPRA Information System 2 (SUM495,SUM497)^BGPMUHD8  (HDRBLK,HEADER,HEADERL)^BGPMUPH  
IHS Patient 1 ($$AGE,$$HRN)^AUPNPAT  
VA Fileman 1 $$GET1^DIQ  

Entry Points

Name Comments DBIA/ICR reference
P2 ;Write individual measure
497(TF) ;Get the numbers for this measure
P1 ;Write individual measure
P1D ;Do the Details
P2D ;Do the Details
DATA(NODE) ;GET DATA
ED2 ;EH output routine for 0497 ED-2 (BGPMUH01)
495(TF) ;Get the numbers for this measure
ED1 ;EH output routine for 0495 ED-1 (BGPMUH01)
XML495 ;Populate the BGPXML array with data for each population/numerator
; BGPXMLOUT(i)=Measure number^""^Denominator Count^Numerator Count^Exclusion Count
XML497 ;Populate the BGPXML array with data for each population/numerator
; BGPXMLOUT(i)=Measure number^""^Denominator Count^Numerator Count^Exclusion Count

External References

Name Field # of Occurrence
$$AGE^AUPNPAT DATA+5
$$HRN^AUPNPAT DATA+4
SUM495^BGPMUHD8 P1+36
SUM497^BGPMUHD8 P2+36
HDRBLK^BGPMUPH P1+14, P2+14
HEADER^BGPMUPH P1+13, P1+22, P1+29, P2+13, P2+22, P2+29
HEADERL^BGPMUPH P1D+2, P1D+12, P1D+26, P1D+38, P2D+2, P2D+12, P2D+26, P2D+38, DATA+10
$$GET1^DIQ DATA+3, DATA+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Median Elpsd Time (min)",?33,$P(STRING1,U,1),?44,$P(STRING2,U,1),?56,PRP1,?65,$P(STRING3,U,1),?72,PRB1
  • Line Location: P1+15
Function Call: WRITE
  • Prompt: !,"BTW ED Arrival &"
  • Line Location: P1+16
Function Call: WRITE
  • Prompt: !,"ED Departure -"
  • Line Location: P1+17
Function Call: WRITE
  • Prompt: !,"All ED Pts Excl"
  • Line Location: P1+18
Function Call: WRITE
  • Prompt: !,"Pts w/Mental Disorder"
  • Line Location: P1+19
Function Call: WRITE
  • Prompt: !,"or Observation Status"
  • Line Location: P1+20
Function Call: WRITE
  • Prompt: !
  • Line Location: P1+21
Function Call: WRITE
  • Prompt: !,"Median Elpsd Time (min)",?33,$P(STRING1,U,2),?44,$P(STRING2,U,2),?56,PRP2,?65,$P(STRING3,U,2),?72,PRB2
  • Line Location: P1+23
Function Call: WRITE
  • Prompt: !,"BTW ED Arrival &"
  • Line Location: P1+24
Function Call: WRITE
  • Prompt: !,"ED Departure -"
  • Line Location: P1+25
Function Call: WRITE
  • Prompt: !,"ED Observation Status"
  • Line Location: P1+26
Function Call: WRITE
  • Prompt: !,"Pts only"
  • Line Location: P1+27
Function Call: WRITE
  • Prompt: !
  • Line Location: P1+28
Function Call: WRITE
  • Prompt: !,"Median Elpsd Time (min)",?33,$P(STRING1,U,3),?44,$P(STRING2,U,3),?56,PRP3,?65,$P(STRING3,U,3),?72,PRB3
  • Line Location: P1+30
Function Call: WRITE
  • Prompt: !,"BTW ED Arrival &"
  • Line Location: P1+31
Function Call: WRITE
  • Prompt: !,"ED Departure -"
  • Line Location: P1+32
Function Call: WRITE
  • Prompt: !,"ED Mental Disorder"
  • Line Location: P1+33
Function Call: WRITE
  • Prompt: !,"Pts only"
  • Line Location: P1+34
Function Call: WRITE
  • Prompt: !!,"Elapsed times are stratified as follows: A) All ED patients excluding patients"
  • Line Location: P1D+3
Function Call: WRITE
  • Prompt: !,"with mental disorders or placed into observation status, B) ED patients placed"
  • Line Location: P1D+4
Function Call: WRITE
  • Prompt: !,"into observation status, and C) ED patients with a mental disorder."
  • Line Location: P1D+5
Function Call: WRITE
  • Prompt: !!,"The following are the abbreviations used in the denominator and numerator"
  • Line Location: P1D+6
Function Call: WRITE
  • Prompt: !,"columns:"
  • Line Location: P1D+7
Function Call: WRITE
  • Prompt: !,"N/A=Not Applicable - No Denominators for this Measure"
  • Line Location: P1D+8
Function Call: WRITE
  • Prompt: !,"ED=ED Patient, Excl Mental Disorder & Observation Status"
  • Line Location: P1D+9
Function Call: WRITE
  • Prompt: !,"MD=ED Mental Disorder Patient"
  • Line Location: P1D+10
Function Call: WRITE
  • Prompt: !,"OS=ED Observation Status Patient"
  • Line Location: P1D+11
Function Call: WRITE
  • Prompt: !!,"A) All ED patients excluding patients with mental disorders or placed into"
  • Line Location: P1D+13
Function Call: WRITE
  • Prompt: !,"observation status"
  • Line Location: P1D+14
Function Call: WRITE
  • Prompt: !!,"PATIENT NAME",?25,"HRN",?33,"COMMUNITY",?43,"SEX",?47,"AGE",?51,"DENOMINATOR",?64,"NUMERATOR"
  • Line Location: P1D+16
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: P1D+17
Function Call: WRITE
  • Prompt: !!,"Total # of ED visits on list: "_PTCT
  • Line Location: P1D+23
Function Call: WRITE
  • Prompt: !!,"B) ED patients placed into observation status"
  • Line Location: P1D+27
Function Call: WRITE
  • Prompt: !!,"PATIENT NAME",?25,"HRN",?33,"COMMUNITY",?43,"SEX",?47,"AGE",?51,"DENOMINATOR",?64,"NUMERATOR"
  • Line Location: P1D+28
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: P1D+29
Function Call: WRITE
  • Prompt: !!,"Total # of ED visits on list: "_PTCT
  • Line Location: P1D+35
Function Call: WRITE
  • Prompt: !!,"C) ED patients with a mental disorder"
  • Line Location: P1D+39
Function Call: WRITE
  • Prompt: !!,"PATIENT NAME",?25,"HRN",?33,"COMMUNITY",?43,"SEX",?47,"AGE",?51,"DENOMINATOR",?64,"NUMERATOR"
  • Line Location: P1D+40
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: P1D+41
Function Call: WRITE
  • Prompt: !!,"Total # of ED visits on list: "_PTCT
  • Line Location: P1D+47
Function Call: WRITE
  • Prompt: !,"Median Elpsd Time (min)",?33,$P(STRING1,U,1),?44,$P(STRING2,U,1),?56,PRP1,?65,$P(STRING3,U,1),?72,PRB1
  • Line Location: P2+15
Function Call: WRITE
  • Prompt: !,"BTW ED Admit Decision"
  • Line Location: P2+16
Function Call: WRITE
  • Prompt: !,"& ED Departure -"
  • Line Location: P2+17
Function Call: WRITE
  • Prompt: !,"All ED Pts Excl Pts"
  • Line Location: P2+18
Function Call: WRITE
  • Prompt: !,"w/Mental Disorder or"
  • Line Location: P2+19
Function Call: WRITE
  • Prompt: !,"Observation Status"
  • Line Location: P2+20
Function Call: WRITE
  • Prompt: !
  • Line Location: P2+21
Function Call: WRITE
  • Prompt: !,"Median Elpsd Time (min)",?33,$P(STRING1,U,2),?44,$P(STRING2,U,2),?56,PRP2,?65,$P(STRING3,U,2),?72,PRB2
  • Line Location: P2+23
Function Call: WRITE
  • Prompt: !,"BTW ED Admit Decision"
  • Line Location: P2+24
Function Call: WRITE
  • Prompt: !,"& ED Departure -"
  • Line Location: P2+25
Function Call: WRITE
  • Prompt: !,"ED Observation Status"
  • Line Location: P2+26
Function Call: WRITE
  • Prompt: !,"Pts only"
  • Line Location: P2+27
Function Call: WRITE
  • Prompt: !
  • Line Location: P2+28
Function Call: WRITE
  • Prompt: !,"Median Elpsd Time (min)",?33,$P(STRING1,U,3),?44,$P(STRING2,U,3),?56,PRP3,?65,$P(STRING3,U,3),?72,PRB3
  • Line Location: P2+30
Function Call: WRITE
  • Prompt: !,"BTW ED Admit Decision"
  • Line Location: P2+31
Function Call: WRITE
  • Prompt: !,"& ED Departure -"
  • Line Location: P2+32
Function Call: WRITE
  • Prompt: !,"ED Mental Disorder"
  • Line Location: P2+33
Function Call: WRITE
  • Prompt: !,"Pts only"
  • Line Location: P2+34
Function Call: WRITE
  • Prompt: !!,"Elapsed times are stratified as follows: A) All ED patients excluding patients"
  • Line Location: P2D+3
Function Call: WRITE
  • Prompt: !,"with mental disorders or placed into observation status, B) ED patients placed"
  • Line Location: P2D+4
Function Call: WRITE
  • Prompt: !,"into observation status, and C) ED patients with a mental disorder."
  • Line Location: P2D+5
Function Call: WRITE
  • Prompt: !!,"The following are the abbreviations used in the denominator and numerator"
  • Line Location: P2D+6
Function Call: WRITE
  • Prompt: !,"columns:"
  • Line Location: P2D+7
Function Call: WRITE
  • Prompt: !,"N/A=Not Applicable - No Denominators for this Measure"
  • Line Location: P2D+8
Function Call: WRITE
  • Prompt: !,"ED=ED Patient, Excl Mental Disorder & Observation Status"
  • Line Location: P2D+9
Function Call: WRITE
  • Prompt: !,"MD=ED Mental Disorder Patient"
  • Line Location: P2D+10
Function Call: WRITE
  • Prompt: !,"OS=ED Observation Status Patient"
  • Line Location: P2D+11
Function Call: WRITE
  • Prompt: !!,"A) All ED patients excluding patients with mental disorders or placed into"
  • Line Location: P2D+13
Function Call: WRITE
  • Prompt: !,"observation status"
  • Line Location: P2D+14
Function Call: WRITE
  • Prompt: !!,"PATIENT NAME",?25,"HRN",?33,"COMMUNITY",?43,"SEX",?47,"AGE",?51,"DENOMINATOR",?64,"NUMERATOR"
  • Line Location: P2D+16
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: P2D+17
Function Call: WRITE
  • Prompt: !!,"Total # of ED visits on list: "_PTCT
  • Line Location: P2D+23
Function Call: WRITE
  • Prompt: !!,"B) ED patients placed into observation status"
  • Line Location: P2D+27
Function Call: WRITE
  • Prompt: !!,"PATIENT NAME",?25,"HRN",?33,"COMMUNITY",?43,"SEX",?47,"AGE",?51,"DENOMINATOR",?64,"NUMERATOR"
  • Line Location: P2D+28
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: P2D+29
Function Call: WRITE
  • Prompt: !!,"Total # of ED visits on list: "_PTCT
  • Line Location: P2D+35
Function Call: WRITE
  • Prompt: !!,"C) ED patients with a mental disorder"
  • Line Location: P2D+39
Function Call: WRITE
  • Prompt: !!,"PATIENT NAME",?25,"HRN",?33,"COMMUNITY",?43,"SEX",?47,"AGE",?51,"DENOMINATOR",?64,"NUMERATOR"
  • Line Location: P2D+40
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: P2D+41
Function Call: WRITE
  • Prompt: !!,"Total # of ED visits on list: "_PTCT
  • Line Location: P2D+47
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: DATA+12
Function Call: WRITE
  • Prompt: !,NAME,?25,HRN,?33,COMM,?44,SEX,?47,AGE,?51,DEN,?64,NUM
  • Line Location: DATA+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^AUPNPAT - [#9000001] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] DATA+7
^TMP("BGPMU0495" ED1+2!, 495+2, 495+3, 495+4, P1D+19, P1D+21, P1D+31, P1D+33, P1D+43, P1D+45
, XML495+2, XML495+3, XML495+4, XML495+5!
^TMP("BGPMU0497" ED2+2!, 497+2, 497+3, 497+4, P2D+19, P2D+21, P2D+31, P2D+33, P2D+43, P2D+45
, XML497+2, XML497+3, XML497+4, XML497+5!

Label References

Name Line Occurrences
$$495 P1+3, P1+4, P1+5
$$497 P2+3, P2+4, P2+5
DATA P1D+22, P1D+34, P1D+46, P2D+22, P2D+34, P2D+46
P1 ED1+1
P1D P1+35
P2 ED2+1
P2D P2+35

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AGE DATA+1~, DATA+5*, DATA+13
ARRAY 495+1~, 495+5*, 495+6, 497+1~, 497+5*, 497+6
>> BGPED DATA+5
>> BGPIC P1+35, P2+35
>> BGPIOSL P1+22, P1+29, P1D+12, P1D+26, P1D+38, P2+22, P2+29, P2D+12, P2D+26, P2D+38
, DATA+9
>> BGPLIST( P1+35, P2+35
>> BGPMUTF P1D+18*, P2D+18*
>> BGPQUIT P1+13, P1+22, P1+29, P1D+12, P1D+26, P1D+38, P2+13, P2+22, P2+29, P2D+12
, P2D+26, P2D+38, DATA+10
>> BGPXML(1 XML495+2*, XML497+2*
>> BGPXML(2 XML495+3*, XML497+3*
>> BGPXML(3 XML495+4*, XML497+4*
COMM DATA+1~, DATA+8*, DATA+13
DEN DATA+1~, DATA+6*, DATA+13
DFN DATA+1~, DATA+2*, DATA+4, DATA+5, DATA+7, DATA+8
DUZ(2 DATA+4
HRN DATA+1~, DATA+4*, DATA+13
>> LINE P1D+17*, P1D+29*, P1D+41*, P2D+17*, P2D+29*, P2D+41*, DATA+12*
LIST1 P1+1~, P2+1~
LIST2 P1+1~, P2+1~
LIST3 P1+1~, P2+1~
NAME DATA+1~, DATA+3*, DATA+13
NODE P1D+21*, P1D+22, P1D+33*, P1D+34, P1D+45*, P1D+46, P2D+21*, P2D+22, P2D+33*, P2D+34
, P2D+45*, P2D+46, DATA~, DATA+2, DATA+3, DATA+6
NUM DATA+1~, DATA+6*, DATA+13
POP P1D+1~, P1D+18*, P1D+19, P1D+21, P1D+30*, P1D+31, P1D+33, P1D+42*, P1D+43, P1D+45
, P2D+1~, P2D+18*, P2D+19, P2D+21, P2D+30*, P2D+31, P2D+33, P2D+42*, P2D+43, P2D+45
POP1 P1+2~, 495+2*, 495+5, P2+2~, 497+2*, 497+5
POP2 P1+2~, 495+3*, 495+5, P2+2~, 497+3*, 497+5
POP3 P1+2~, 495+4*, 495+5, P2+2~, 497+4*, 497+5
PRB1 P1+2~, P1+9*, P1+15, P2+2~, P2+9*, P2+15
PRB2 P1+2~, P1+10*, P1+23, P2+2~, P2+10*, P2+23
PRB3 P1+2~, P1+11*, P1+30, P2+2~, P2+11*, P2+30
PRP1 P1+2~, P1+6*, P1+15, P2+2~, P2+6*, P2+15
PRP2 P1+2~, P1+7*, P1+23, P2+2~, P2+7*, P2+23
PRP3 P1+2~, P1+8*, P1+30, P2+2~, P2+8*, P2+30
PT P1D+1~, P1D+19*, P1D+21, P1D+31*, P1D+33, P1D+43*, P1D+45, P2D+1~, P2D+19*, P2D+21
, P2D+31*, P2D+33, P2D+43*, P2D+45
PTCT P1D+1~, P1D+18*, P1D+20*, P1D+23, P1D+24*, P1D+32*, P1D+35, P1D+36*, P1D+44*, P1D+47
, P2D+1~, P2D+18*, P2D+20*, P2D+23, P2D+24*, P2D+32*, P2D+35, P2D+36*, P2D+44*, P2D+47
SEX DATA+1~, DATA+7*, DATA+13
STRING1 P1+2~, P1+3*, P1+6, P1+7, P1+8, P1+9, P1+10, P1+11, P1+15, P1+23
, P1+30, P2+2~, P2+3*, P2+6, P2+7, P2+8, P2+9, P2+10, P2+11, P2+15
, P2+23, P2+30
STRING2 P1+2~, P1+4*, P1+6, P1+7, P1+8, P1+15, P1+23, P1+30, P2+2~, P2+4*
, P2+6, P2+7, P2+8, P2+15, P2+23, P2+30
STRING3 P1+2~, P1+5*, P1+9, P1+10, P1+11, P1+15, P1+23, P1+30, P2+2~, P2+5*
, P2+9, P2+10, P2+11, P2+15, P2+23, P2+30
TF 495~, 495+2, 495+3, 495+4, 497~, 497+2, 497+3, 497+4
U P1+6, P1+7, P1+8, P1+9, P1+10, P1+11, P1+15, P1+23, P1+30, 495+5
, P2+6, P2+7, P2+8, P2+9, P2+10, P2+11, P2+15, P2+23, P2+30, 497+5
, DATA+2, DATA+3, DATA+6, DATA+7, XML495+2, XML495+3, XML495+4, XML497+2, XML497+3, XML497+4
X P1+1~, P2+1~
Y P1+1~, P2+1~
Z P1+1~, P2+1~
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All