BEDDUTIU ;VNGT/HS/BEE-BEDD Utility Routine 3 ; 08 Nov 2011 12:00 PM
Source file <BEDDUTIU.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 6 | ^%DT C^%DTC ^DIC FILE^DICN $$IENS^DILF $$GET1^DIQ |
Kernel | 3 | ^%ZTER ($$DT,$$HTFM)^XLFDT DUZ^XUP |
IHS Emergency Dept Dashboard | 2 | ($$FMTE,$$FNOW)^BEDDUTIL $$DATE^BEDDUTIU |
Emergency Room | 1 | LOG^AMERBUSA |
VueCentric Framework | 1 | DEVICE^CIAVUTIO |
Name | Comments | DBIA/ICR reference |
---|---|---|
PRV(VIEN,AMERDA,PRMNRS) | ;EP - Log ER VISIT Provider entries in V PROVIDER
|
|
CONS(CONS) | ;EP - Return List of Consult Types
|
|
CLIN(CLIN) | ;EP - Return Clinic ^AMER(3) ien
|
|
ERR | ;EP - Capture the error
|
|
PROC(PROC) | ;EP - Return List of ER Procedures
|
|
SPOV(DFN,VIEN,POV,PNAR,VDT,PS) | ;EP - Log the Provider in V PROVIDER
|
|
ADMCMP(DFN) | ;EP - Return Presenting Complaint
|
|
ADMAMN(DFN) | ;EP - Return Admission Ambulance Number
|
|
ADMVTP(DFN) | ;EP - Return Admission Visit Type
|
|
ADMFTRN(DFN) | ;EP - Return Admission Transferred From
|
|
SAFE(SAFE) | ;EP - Return List of Safety Measures
|
|
ADMAMB(DFN) | ;EP - Return Admission Ambulance Billing
|
|
DTCMP(DATE,ADJ) | ;EP - Add or subtract days from supplied date
|
|
NARR(NAR) | ;EP - Get Provider Narrative IEN
|
|
ADMDTM(DFN) | ;EP - Return Current Admission Date/Time
|
|
ADMTRN(DFN) | ;EP - Return Admission Transferred
|
|
SCEN(SCEN) | ;EP - Return List of Injury Setting
|
|
SPRV(DFN,VIEN,PRV,VDT,PS) | ;EP - Log the Provider in V PROVIDER
|
|
DATE(X) | ||
POV(VIEN,AMERDA) | ;EP - Log ER VISIT Provider entries in V POV
|
|
ADMMAT(DFN) | ;EP - Return Admission Medical Attendant Present
|
|
PRPOV(VIEN,AMERDA,PRPOV) | ;EP - Log ER Procedure providers entries in V PROVIDER
|
|
ADMAMC(DFN) | ;EP - Return Admission Ambulance Company
|
|
MTRN(MTRN) | ;EP - Return Mode of Transport List
|
|
ASAVE(DUZ,ADM) | ;EP - Admit a Patient to the ER
|
|
TFRM(TFRM) | ;EP - Return List of Transfer From Values
|
|
DEVLST(DEVICE) | ;EP - Return List of Devices
|
|
ADMMOT(DFN) | ;EP - Return Admission Mode of Transport
|
|
VTYP(VTYP) | ;EP - Return List of ER Visit Types
|
|
DTCHK(DATE,ADMDT,CHK,BGDT) | ;EP - Date checking function
|
|
ADMCHK(DFN) | ;EP - Determine if patient is already admitted
|
|
ICAU(ICAU) | ;EP - Return List of Injury Causes
|
|
ACMP(ACMP) | ;EP - Return Ambulance Company Name List
|
|
LOG(DUZ,AMCAT,AMACT,AMCALL,AMDESC,AMERVDFN) | ;EP - File entry into BUSA
|
Name | Field # of Occurrence |
---|---|
^%DT | DATE+5 |
C^%DTC | DTCMP+10 |
^%ZTER | ERR+1 |
LOG^AMERBUSA | LOG+12 |
$$FMTE^BEDDUTIL | ADMDTM+1 |
$$FNOW^BEDDUTIL | DTCHK+24 |
$$DATE^BEDDUTIU | DTCHK+19, DTCHK+20, DTCHK+21 |
DEVICE^CIAVUTIO | DEVLST+4 |
^DIC | NARR+9 |
FILE^DICN | SPRV+6, SPOV+11 |
$$IENS^DILF | POV+27 |
$$GET1^DIQ | ICAU+13, SCEN+13, SAFE+13, PROC+12, VTYP+12, MTRN+12, ACMP+12, ADMDTM+1, ADMCMP+1, ADMVTP+1 , ADMTRN+1, ADMFTRN+1, ADMMOT+1, ADMMAT+1, ADMAMN+1, ADMAMB+1, ADMAMC+1, CLIN+5, PRV+16, PRV+19 , PRV+20, PRV+25, PRV+26, PRV+31, PRV+32, PRV+37, PRV+38, PRV+44, PRPOV+14, PRPOV+26 , POV+14, POV+17, POV+18, POV+19, POV+20, POV+28, POV+30 |
$$DT^XLFDT | DTCMP+8 |
$$HTFM^XLFDT | PRPOV+23 |
DUZ^XUP | LOG+9 |
FileNo | Call Tags |
---|---|
^DIC(40.7 - [#40.7] | GET1^DIQ |
^ICD9 - [#80] | GET1^DIQ |
^AUPNVPRV - [#9000010.06] | Classic Fileman Calls |
^AUPNVPOV - [#9000010.07] | Classic Fileman Calls |
^AMERVSIT - [#9009080] | GET1^DIQ |
9009080.05 | GET1^DIQ |
^AMERADM - [#9009081] | GET1^DIQ |
^AMER(3 - [#9009083] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AMER(2 - [#9009082] | ICAU+10, SCEN+10, SAFE+10, PROC+10, VTYP+10, MTRN+10, ACMP+10 |
^AMER(2.1 - [#9009082.1] | TFRM+10, TFRM+11 |
^AMER(2.9 - [#9009082.9] | CONS+10, CONS+11 |
^AMER(3 - [#9009083] | ICAU+11, SCEN+11, SAFE+11, PROC+11, VTYP+11, MTRN+11, ACMP+11, CLIN+7 |
^AMERADM("B" | ADMCHK+3 |
^AMERVSIT - [#9009080] | POV+24 |
^AUPNVPOV - [#9000010.07] | POV+11 |
^AUPNVPOV("AD" | POV+8, POV+11 |
^AUPNVPRV - [#9000010.06] | PRV+13, PRPOV+11 |
^AUPNVPRV("AD" | PRV+10, PRV+13, PRPOV+8, PRPOV+11 |
Name | Line Occurrences |
---|---|
$$NARR | SPOV+5 |
SPOV | POV+21, POV+31 |
SPRV | PRV+22, PRV+28, PRV+34, PRV+40, PRV+46, PRPOV+31 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | DATE+2~, DATE+5* |
%H | DTCMP+6~ |
ACIEN | ACMP+8~, ACMP+10*, ACMP+11 |
ACMP | ACMP~, ACMP+9! |
ACMP( | ACMP+17* |
ACN | ACMP+8~, ACMP+12*, ACMP+13, ACMP+15*, ACMP+17 |
ACN( | ACMP+13*, ACMP+15, ACMP+17 |
ADJ | DTCMP~, DTCMP+9*, DTCMP+10 |
ADM | ASAVE~ |
ADMDT | DTCHK~, DTCHK+15*, DTCHK+20*, DTCHK+30, DTCHK+32 |
AIEN | ACMP+8~, ACMP+11*, ACMP+12, ACMP+13 |
AMACT | LOG~, LOG+12 |
AMCALL | LOG~, LOG+12 |
AMCAT | LOG~, LOG+12 |
AMDESC | LOG~, LOG+12 |
AMERDA | PRV~, PRV+3, PRV+16, PRV+19, PRV+20, PRV+25, PRV+26, PRV+31, PRV+32, PRV+37 , PRV+38, PRV+44, PRPOV~, PRPOV+3, PRPOV+14, PRPOV+26, POV~, POV+3, POV+14, POV+17 , POV+18, POV+20, POV+24, POV+27 |
AMERVDFN | LOG~, LOG+12 |
BGDT | DTCHK~, DTCHK+16*, DTCHK+21*, DTCHK+34 |
CDT | DTCHK+12~, DTCHK+24*, DTCHK+27 |
CHK | DTCHK~, DTCHK+17*, DTCHK+27, DTCHK+30, DTCHK+32, DTCHK+34 |
CIEN | ICAU+8~, ICAU+11*, ICAU+13, CONS+8~, CONS+11*, CONS+13 |
CLIN | CLIN~, CLIN+3, CLIN+5*, CLIN+7*, CLIN+8 |
CNT | ICAU+8~, ICAU+11*, ICAU+12*, ICAU+13, SCEN+8~, SCEN+11*, SCEN+12*, SCEN+13, SAFE+8~, SAFE+11* , SAFE+12*, SAFE+13, CONS+8~, CONS+10*, CONS+12*, CONS+13, PROC+8~, PROC+15*, PROC+16*, PROC+17 , VTYP+8~, VTYP+15*, VTYP+16*, VTYP+17, TFRM+8~, TFRM+10*, TFRM+12*, MTRN+8~, MTRN+15*, MTRN+16* , MTRN+17, ACMP+8~, ACMP+15*, ACMP+16*, ACMP+17 |
CONS | CONS~, CONS+9! |
CONS( | CONS+13* |
CTIEN | ICAU+8~, ICAU+10*, ICAU+11 |
CTTYP | CONS+8~, CONS+10*, CONS+11, CONS+13 |
DA | POV+26~, POV+27* |
DA(1 | POV+27* |
DATE | DTCMP~, DTCMP+8*, DTCMP+10, DTCHK~, DTCHK+14*, DTCHK+19*, DTCHK+27, DTCHK+30, DTCHK+32, DTCHK+34 |
DD | SPRV+2~, SPRV+3!, SPRV+7!, SPOV+2~, SPOV+7!, SPOV+12! |
DEVICE | DEVLST~, DEVLST+2!, DEVLST+4 |
DFN | ADMDTM~, ADMDTM+1, ADMCMP~, ADMCMP+1, ADMVTP~, ADMVTP+1, ADMTRN~, ADMTRN+1, ADMFTRN~, ADMFTRN+1 , ADMMOT~, ADMMOT+1, ADMMAT~, ADMMAT+1, ADMAMN~, ADMAMN+1, ADMAMB~, ADMAMB+1, ADMAMC~, ADMAMC+1 , ADMCHK~, ADMCHK+2, ADMCHK+3, PRV+16*, PRV+22, PRV+28, PRV+34, PRV+40, PRV+46, PRPOV+14* , PRPOV+31, SPRV~, SPRV+5, POV+14*, POV+21, POV+31, SPOV~, SPOV+9 |
DIC | SPRV+2~, SPRV+4*, SPOV+2~, SPOV+8*, NARR+6~, NARR+8* |
DIC("DR" | SPRV+5*, SPOV+9* |
DIC(0 | SPRV+4*, SPOV+8*, NARR+8* |
DIEN | POV+5~, POV+24*, POV+27 |
DINUM | SPRV+2~, SPRV+3!, SPRV+7!, SPOV+2~, SPOV+7!, SPOV+12! |
DLAYGO | NARR+6~, NARR+8* |
DO | SPRV+2~, SPRV+3!, SPRV+7!, SPOV+2~, SPOV+7!, SPOV+12! |
DUZ | LOG~, LOG+8, LOG+9, ASAVE~ |
ICAU | ICAU~, ICAU+9! |
ICAU( | ICAU+13* |
IENS | POV+26~, POV+27*, POV+28, POV+30 |
MIEN | MTRN+8~, MTRN+11*, MTRN+12, MTRN+13 |
MTIEN | MTRN+8~, MTRN+10*, MTRN+11 |
MTR | MTRN+8~, MTRN+12*, MTRN+13, MTRN+15*, MTRN+17 |
MTR( | MTRN+13*, MTRN+15, MTRN+17 |
MTRN | MTRN~, MTRN+9! |
MTRN( | MTRN+17* |
NAR | NARR~, NARR+4, NARR+7 |
NIEN | SPOV+2~, SPOV+5*, SPOV+9 |
PCIEN | PROC+8~, PROC+10*, PROC+11 |
PDT | PRV+7~, PRV+20*, PRV+22, PRV+26*, PRV+28, PRV+32*, PRV+34, PRV+38*, PRV+40, PRV+44* , PRV+46, PRPOV+5~, PRPOV+19*, PRPOV+22*, PRPOV+23*, PRPOV+26*, PRPOV+31 |
PIEN | PROC+8~, PROC+11*, PROC+12, PROC+13, PRV+7~, PRV+13*, PRPOV+5~, PRPOV+11*, POV+5~, POV+11* |
PNAR | POV+18*, POV+19*, POV+21, POV+26~, POV+30*, POV+31, SPOV~, SPOV+5 |
POV | POV+5~, POV+17*, POV+19, POV+21, POV+26~, POV+28*, POV+29, POV+31, SPOV~, SPOV+8 |
PRC | PROC+8~, PROC+12*, PROC+13, PROC+15*, PROC+17 |
PRC( | PROC+13*, PROC+15, PROC+17 |
PRMNRS | PRV~, PRV+5*, PRV+43 |
PROC | PROC~, PROC+9! |
PROC( | PROC+17* |
PRPOV | PRPOV~ |
PRPOV( | PRPOV+16, PRPOV+19, PRPOV+22 |
PRV | PRV+7~, PRV+19*, PRV+22, PRV+25*, PRV+28, PRV+31*, PRV+34, PRV+37*, PRV+40, PRV+43* , PRV+46, PRPOV+5~, PRPOV+16*, PRPOV+19, PRPOV+22, PRPOV+31, SPRV~, SPRV+4 |
PS | PRV+7~, PRV+21*, PRV+22, PRV+27*, PRV+28, PRV+33*, PRV+34, PRV+39*, PRV+40, PRV+45* , PRV+46, PRPOV+5~, PRPOV+28*, PRPOV+31, SPRV~, SPRV+5, POV+5~, SPOV~, SPOV+9 |
SAFE | SAFE~, SAFE+9! |
SAFE( | SAFE+13* |
SCEN | SCEN~, SCEN+9! |
SCEN( | SCEN+13* |
SIEN | SCEN+8~, SCEN+11*, SCEN+13, SAFE+8~, SAFE+11*, SAFE+13 |
STIEN | SCEN+8~, SCEN+10*, SCEN+11, SAFE+8~, SAFE+10*, SAFE+11 |
TFIEN | TFRM+8~, TFRM+10*, TFRM+11, TFRM+12 |
TFR | TFRM+8~ |
TFRM | TFRM~, TFRM+9! |
TFRM( | TFRM+12* |
TIEN | TFRM+8~, TFRM+11*, TFRM+12 |
U | PRPOV+19, PRPOV+22 |
VDT | SPRV~, SPRV+5, POV+20*, POV+21, POV+31, SPOV~, SPOV+9 |
VIEN | VTYP+8~, VTYP+11*, VTYP+12, VTYP+13, PRV~, PRV+2, PRV+10, PRV+13, PRV+22, PRV+28 , PRV+34, PRV+40, PRV+46, PRPOV~, PRPOV+2, PRPOV+8, PRPOV+11, PRPOV+31, SPRV~, SPRV+5 , POV~, POV+2, POV+8, POV+11, POV+21, POV+31, SPOV~, SPOV+9 |
VPOV | POV+5~ |
VPOV( | POV+11*, POV+21*, POV+29, POV+31* |
VPROV | PRV+7~, PRPOV+5~ |
VPROV( | PRV+13*, PRV+22*, PRV+28*, PRV+34*, PRV+40*, PRV+46*, PRPOV+11*, PRPOV+31* |
VTIEN | VTYP+8~, VTYP+10*, VTYP+11 |
VTY | VTYP+8~, VTYP+12*, VTYP+13, VTYP+15*, VTYP+17 |
VTY( | VTYP+13*, VTYP+15, VTYP+17 |
VTYP | VTYP~, VTYP+9! |
VTYP( | VTYP+17* |
X | LOG+2~, LOG+4*, LOG+5*, SPRV+2~, SPRV+4*, SPOV+2~, SPOV+8*, NARR+6~, NARR+7*, DTCMP+6~ , DTCMP+11, DATE~, DATE+4* |
X1 | DTCMP+6~, DTCMP+10* |
X2 | DTCMP+6~, DTCMP+10* |
Y | SPRV+2~, SPOV+2~, NARR+6~, NARR+9, NARR+10, DATE+2~, DATE+6*, DATE+8 |