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

Package: IHS Emergency Dept Dashboard

Routine: BEDDUTID


Information

BEDDUTID ;VNGT/HS/BEE-BEDD Utility Routine 2 ; 08 Nov 2011 12:00 PM

Source Information

Source file <BEDDUTID.m>

Call Graph

Call Graph Total: 22

Package Total Call Graph
VA Fileman 6 ^%DT  ^DIC  FILE^DICN  FILE^DIE  $$IENS^DILF  $$GET1^DIQ  
IHS Emergency Dept Dashboard 5 DXLKP^BEDDPOV  ($$DATE,$$FMTE,$$FNOW,$$GETF)^BEDDUTIL  DC^BEDDUTIS  CLIN^BEDDUTL2  SAVEDX^BEDDUTW  
Kernel 4 ^%ZTER  $$HTE^XLFDT  $$VERSION^XPDUTL  DUZ^XUP  
Emergency Room 3 $$CKHLOC^AMERBSD  $$POV^AMERUTIL  VER^AMERVER  
IHS Patient 3 $$AGE^AUPNPAT  MOD^AUPNVSIT  $$ICDDX^AUPNVUTL  
DRG Grouper 1 $$IMP^ICDEXA  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS Emergency Dept Dashboard 2 BEDDPOV  BEDDUTIL  

Entry Points

Name Comments DBIA/ICR reference
ERR ;EP - Capture the error
XDATE(X)
DXLKP(VALUE,OBJID,DUZ,FILTER) ;EP - Lookup to File 80 (DX)
PLCHLD(OBJID,VIEN) ;EP - Look for Diagnosis Default
KEYCK(DUZ) ;EP - Determine if user has BEDDZMGR Key
EDCON(AMERVSIT,EDCONS) ;EP - Get list of ER Consults
UPPER(X) ;EP - Convert to uppercase
HTIME(TM) ;EP - Given seconds portion of $H value, return time
PROC(AMERVSIT,ERPROC) ;EP - Get list of ER Procedures Performed
CCLN(CLIN) ;EP - Return Clinic Mnemonic
MDTRN(DFN) ;EP - Update Patient's MODE OF TRANSPORT
DX(AMERVSIT,ERDX) ;EP - Get list of ER DX'S
ESAVE(DFN,AMERVSIT,VIEN,BEDDARY) ;EP - Dashboard Edit Screen Save
PRIMDX(VIEN,OBJID) ;EP - Retrieve/Save the Primary EHR DX
TRNF(TRNF) ;EP - Return List of Transfer Facilities
EMV(VIEN) ;EP - Return V EMERGENCY VISIT RECORD entry
DISP(DISP) ;EP - Return List of Dispositions
AGE(DFN) ;EP - Return Patients Age
ADDDX(VIEN,DXI,DUZ) ;EP - Add DX TO V POV FILE
PROV(PROV) ;EP - Return List of Providers
DSUM() ;EP - Return if Discharge Summary Global is defined
CLIN(CLIN) ;EP - Return List of Applicable Clinics
SCLN(CLN) ;EP - Convert Clinic
INST(INST) ;EP - Return list of Followup Instructions
DSAVE(DFN,AMERVSIT,VIEN,OBJID,DUZ,SITE,BEDDARY) ;EP - Dashboard Discharge Screen Save

External References

Name Field # of Occurrence
^%DT XDATE+10
^%ZTER ERR+1
$$CKHLOC^AMERBSD ESAVE+27
$$POV^AMERUTIL PLCHLD+17
VER^AMERVER ESAVE+47
$$AGE^AUPNPAT AGE+7
MOD^AUPNVSIT DSAVE+37, ESAVE+44
$$ICDDX^AUPNVUTL PLCHLD+26
DXLKP^BEDDPOV DXLKP+37
$$DATE^BEDDUTIL DSAVE+22, DSAVE+24, ESAVE+17
$$FMTE^BEDDUTIL EDCON+25, XDATE+13
$$FNOW^BEDDUTIL ADDDX+24
$$GETF^BEDDUTIL ADDDX+25
DC^BEDDUTIS DSAVE+34
CLIN^BEDDUTL2 CLIN+3
SAVEDX^BEDDUTW PRIMDX+23
^DIC PLCHLD+23
FILE^DICN ADDDX+31, ADDDX+44
FILE^DIE MDTRN+15, DSAVE+31, ESAVE+41
$$IENS^DILF EDCON+23, PROC+24, DX+24
$$GET1^DIQ EDCON+24, EDCON+25, EDCON+26, PROC+25, DX+25, DX+26, MDTRN+12, MDTRN+13, PRIMDX+16, PRIMDX+17
, PRIMDX+18, PRIMDX+19, PRIMDX+20, DISP+13, TRNF+13, INST+12, PROV+20, CCLN+1, SCLN+6, DXLKP+28
, DXLKP+29, DXLKP+30, PLCHLD+12
$$IMP^ICDEXA PLCHLD+21
$$HTE^XLFDT HTIME+6
$$VERSION^XPDUTL PLCHLD+21
DUZ^XUP ADDDX+19, DSAVE+17, DXLKP+16

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^VA(200 - [#200] GET1^DIQ
^DIC(40.7 - [#40.7] GET1^DIQ
^ICD9 - [#80] Classic Fileman Calls,  GET1^DIQ
^AUPNVSIT - [#9000010] GET1^DIQ
^AUPNVPOV - [#9000010.07] Classic Fileman Calls,  GET1^DIQ
9009080.019 GET1^DIQ
9009080.04 GET1^DIQ
9009080.05 GET1^DIQ
^AMERADM - [#9009081] GET1^DIQ
^AMER(2.1 - [#9009082.1] GET1^DIQ
^AMER(3 - [#9009083] GET1^DIQ
^AUTNPOV - [#9999999.27] Classic Fileman Calls,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMER(2 - [#9009082] DISP+10, INST+10
^AMER(2.1 - [#9009082.1] TRNF+10, TRNF+11
^AMER(3 - [#9009083] DISP+11, INST+11, SCLN+7
^AMERVSIT - [#9009080] EDCON+21, PROC+22, DX+22
^AUPNVER("AD" EMV+2
^AUPNVPOV("AD" ADDDX+37, PRIMDX+10, PRIMDX+13
^AUTNPOV("B" ADDDX+28
^DIC(19.1 - [#19.1] KEYCK+8
^DIC(40.7 - [#40.7] SCLN+5
^ICD9("AB" ADDDX+40
^TMP("BEDDDSC" DSUM+2
^VA(200 - [#200] KEYCK+9, PROV+15, PROV+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT XDATE+2~, XDATE+10*
AMERVSIT EDCON~, EDCON+8, EDCON+21, EDCON+23, PROC~, PROC+8, PROC+22, PROC+24, DX~, DX+8
, DX+22, DX+24, DSAVE~, ESAVE~, ESAVE+36
AMUPD MDTRN+10~, MDTRN+15, DSAVE+31, ESAVE+39
AMUPD(9000010 ESAVE+30*, ESAVE+33*
AMUPD(9009080 ESAVE+36*
AMUPD(9009081 MDTRN+14*, DSAVE+21*, DSAVE+22*, DSAVE+23*, DSAVE+24*, DSAVE+25*, ESAVE+15*, ESAVE+16*, ESAVE+17*, ESAVE+18*
, ESAVE+19*, ESAVE+20*
AUPNVSIT DSAVE+13~, DSAVE+37*, ESAVE+40~
BEDDARY DSAVE~, DSAVE+34, ESAVE~
BEDDARY("AdPvTm" DSAVE+24, ESAVE+20
BEDDARY("AdmPrv" DSAVE+25, ESAVE+18
BEDDARY("COMP" ESAVE+15, ESAVE+30
BEDDARY("DecAdmit" ESAVE+33
BEDDARY("Trg" DSAVE+21, ESAVE+16
BEDDARY("TrgN" DSAVE+23, ESAVE+19
BEDDARY("TrgNow" DSAVE+22, ESAVE+17
BEDDARY("txcln" ESAVE+23
BEDDPOV PLCHLD+9~, PLCHLD+17
CDIEN PLCHLD+9~, PLCHLD+24*, PLCHLD+26, PLCHLD+27
CLIN CLIN~, CLIN+3, CCLN~, CCLN+1, SCLN+4~, SCLN+5*, SCLN+6, SCLN+7*, SCLN+8
CLINIC ESAVE+6~, ESAVE+23*, ESAVE+27, ESAVE+36
CLN SCLN~, SCLN+2, SCLN+5
CNT DISP+8~, DISP+17*, DISP+18*, DISP+19, TRNF+8~, TRNF+10*, TRNF+12*, TRNF+13, INST+8~, INST+15*
, INST+16*, INST+17, PROV+8~, PROV+15*, PROV+23*, PROV+24
CONS EDCON+22~, EDCON+26*, EDCON+27
COTY EDCON+22~, EDCON+24*, EDCON+27
D DISP+12~, DISP+13*, DISP+14
DA EDCON+22~, EDCON+23*, PROC+23~, PROC+24*, DX+23~, DX+24*
DA(1 EDCON+23*, PROC+24*, DX+24*
DATE EDCON+22~, EDCON+25*, EDCON+27
DD ADDDX+31!, ADDDX+44!
DFLTDX PLCHLD+9~, PLCHLD+20*, PLCHLD+21*, PLCHLD+27
DFN ADDDX+11~, ADDDX+25*, ADDDX+43, MDTRN~, MDTRN+12, MDTRN+13, MDTRN+14, AGE~, AGE+7, DSAVE~
, DSAVE+20, DSAVE+21, DSAVE+22, DSAVE+23, DSAVE+24, DSAVE+25, DSAVE+34, DXLKP+27~, DXLKP+28*, DXLKP+29
, ESAVE~, ESAVE+12, ESAVE+15, ESAVE+16, ESAVE+17, ESAVE+18, ESAVE+19, ESAVE+20, ESAVE+47
DIC ADDDX+29~, ADDDX+30*, ADDDX+41~, ADDDX+42*, PLCHLD+9~, PLCHLD+23*
DIC("DR" ADDDX+43*
DIC(0 ADDDX+30*, ADDDX+42*, PLCHLD+23*
DIEN DISP+8~, DISP+11*, DISP+13, DISP+14
DINUM ADDDX+29~, ADDDX+41~
DISP DISP~, DISP+9!
DISP( DISP+19*
DLAYGO ADDDX+29~, ADDDX+30*, ADDDX+41~, ADDDX+42*
DO ADDDX+31!, ADDDX+44!
DSIEN DISP+8~, DISP+10*, DISP+11
DSP DISP+8~, DISP+17*, DISP+19
DSP( DISP+14*, DISP+17, DISP+19
DT PROV+21, DXLKP+31, PLCHLD+13
DUZ KEYCK~, KEYCK+5, KEYCK+9, ADDDX~, ADDDX+18, ADDDX+19, DSAVE~, DSAVE+16, DSAVE+17, DSAVE+34
, DXLKP~, DXLKP+15, DXLKP+16
DX DX+23~, DX+25*, DX+27, PRIMDX+6~, PRIMDX+8*, PRIMDX+22*, PRIMDX+23, PRIMDX+24
DXI ADDDX~, ADDDX+9*, ADDDX+28, ADDDX+30
DXN DX+23~, DX+26*, DX+27
DXNM PLCHLD+9~, PLCHLD+26*, PLCHLD+27
EDCONS EDCON~, EDCON+8*, EDCON+18!, EDCON+19*, EDCON+27*
EDCONS( EDCON+27*
EIEN EDCON+17~, EDCON+21*, EDCON+23, PROC+18~, PROC+22*, PROC+24, DX+18~, DX+22*, DX+24
ERDX DX~, DX+8*, DX+19!, DX+20*, DX+27*
ERDX( DX+27*
ERPROC PROC~, PROC+8*, PROC+19!, PROC+20*, PROC+26*
ERPROC( PROC+26*
ERR ESAVE+25~, ESAVE+27*
ERROR MDTRN+10~, DSAVE+39, ESAVE+49
EXEC DXLKP+2~, DXLKP+20*, DXLKP+21*, DXLKP+22*, DXLKP+23*
FCIEN TRNF+8~, TRNF+10*, TRNF+11
FIEN TRNF+8~, TRNF+11*, TRNF+13
FILTER DXLKP~, DXLKP+8*, DXLKP+37
I9 ADDDX+11~, ADDDX+40*, ADDDX+42
ICD PRIMDX+12*, PRIMDX+14~, PRIMDX+15*, PRIMDX+17*, PRIMDX+20, PRIMDX+21, PRIMDX+22
ICDN PRIMDX+12*, PRIMDX+14~, PRIMDX+15*, PRIMDX+20*, PRIMDX+22
IENS EDCON+22~, EDCON+23*, EDCON+24, EDCON+25, EDCON+26, PROC+23~, PROC+24*, PROC+25, DX+23~, DX+24*
, DX+25, DX+26
IIEN INST+8~, INST+11*, INST+12, INST+13
INIEN INST+8~, INST+10*, INST+11
INS INST+8~, INST+12*, INST+13, INST+15*, INST+17
INS( INST+13*, INST+15, INST+17
INST INST~, INST+9!
INST( INST+17*
KIEN KEYCK+7~, KEYCK+8*, KEYCK+9
MD MDTRN+10~, MDTRN+12*
MDO MDTRN+10~, MDTRN+13*, MDTRN+14
NOW ADDDX+11~, ADDDX+24*, ADDDX+43
OBJID PRIMDX~, PRIMDX+22, DSAVE~, DSAVE+34, DXLKP~, DXLKP+5, PLCHLD~, PLCHLD+2
PDX ADDDX+11~, ADDDX+37*, ADDDX+43
PIEN PROV+8~, PROV+16*, PROV+20, PROV+24
PNAME PROV+8~, PROV+15*, PROV+16, PROV+24
PROC PROC+23~, PROC+25*, PROC+26
PROV PROV~, PROV+14!
PROV( PROV+24*
RIEN PRIMDX+11~, PRIMDX+13*, PRIMDX+16, PRIMDX+17, PRIMDX+18
RPFI PRIMDX+12*, PRIMDX+14~, PRIMDX+15*, PRIMDX+18*, PRIMDX+19, PRIMDX+22
RPFIN PRIMDX+12*, PRIMDX+14~, PRIMDX+15*, PRIMDX+19*, PRIMDX+22
SEX DXLKP+2~, DXLKP+29*, DXLKP+32*, DXLKP+37
SITE DSAVE~, DSAVE+34
STS ADDDX+11~, ADDDX+18*, DSAVE+13~, DSAVE+16*, DXLKP+2~, DXLKP+15*
T HTIME+2~, HTIME+5*, HTIME+6*, HTIME+7
TERM PROV+19~, PROV+20*, PROV+21
TM HTIME~, HTIME+5
TRNF TRNF~, TRNF+9!
TRNF( TRNF+13*
U ADDDX+9*, INST+13, PLCHLD+26
VALUE DXLKP~, DXLKP+37
VDT DXLKP+2~, DXLKP+26*, DXLKP+30*, DXLKP+31*, DXLKP+37, PLCHLD+9~, PLCHLD+12*, PLCHLD+13*, PLCHLD+21, PLCHLD+26
VIEN ADDDX~, ADDDX+9*, ADDDX+25, ADDDX+37, ADDDX+43, EMV~, EMV+2, PRIMDX~, PRIMDX+10, PRIMDX+13
, DSAVE~, DSAVE+34, DSAVE+37, DXLKP+2~, DXLKP+19*, DXLKP+26, DXLKP+28, DXLKP+30, ESAVE~, ESAVE+24
, ESAVE+27, ESAVE+30, ESAVE+33, ESAVE+47, PLCHLD~, PLCHLD+12, PLCHLD+17
X ADDDX+14*, ADDDX+15*, ADDDX+29~, ADDDX+30*, ADDDX+41~, ADDDX+42*, EDCON+11*, EDCON+12*, PROC+12*, PROC+13*
, DX+12*, DX+13*, MDTRN+7*, MDTRN+8*, PRIMDX+3*, PRIMDX+4*, AGE+4*, AGE+5*, DSAVE+10*, DSAVE+11*
, PROV+8~, PROV+11*, PROV+12*, XDATE~, XDATE+4*, XDATE+7*, XDATE+9*, DXLKP+11*, DXLKP+12*, PLCHLD+6*
, PLCHLD+7*, PLCHLD+9~, PLCHLD+20*, PLCHLD+21*, UPPER~, UPPER+1
XCLIN SCLN+4~, SCLN+6*, SCLN+7
XIEN ADDDX+11~, ADDDX+28*, ADDDX+33*, ADDDX+34, ADDDX+43
Y ADDDX+29~, ADDDX+32, ADDDX+33, ADDDX+41~, XDATE+11*, XDATE+13, PLCHLD+9~, PLCHLD+23, PLCHLD+24
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables |  All