BEDDPOV ;GDIT/HS/BEE-BEDD Utility Routine 4 ; 08 Nov 2011 12:00 PM
Source file <BEDDPOV.m>
Package | Total | Call Graph |
---|---|---|
IHS Patient | 3 | $$IMP^AUPNSICD MOD^AUPNVSIT $$ICDDX^AUPNVUTL |
Kernel | 3 | ^%ZTER $$DT^XLFDT DUZ^XUP |
DRG Grouper | 2 | $$ICDDX^ICDCODE $$ICDDX^ICDEX |
IHS Emergency Dept Dashboard | 2 | INJURY^BEDDINJ $$UPPER^BEDDUTID |
Lexicon Utility | 2 | LOOK^LEXA CONFIG^LEXSET |
VA Fileman | 2 | FILE^DIE $$GET1^DIQ |
Emergency Room | 1 | ($$AICD,$$POV,LEX,POV)^AMERUTIL |
GUI Objects | 1 | $$UPDATE^BGOUTL |
Patient Care Component | 1 | ^APCDALVR |
Package | Total | Caller Graph |
---|---|---|
IHS Emergency Dept Dashboard | 2 | BEDD2PST BEDDUTID |
Name | Comments | DBIA/ICR reference |
---|---|---|
DEL(VPOVIEN,DUZ) | ;Delete a POV entry
|
|
ERR | ;EP - Capture the error
|
|
LIST(VIEN,DUZ,DXLIST) | ;EP - Return list of V POV entries on file for visit
|
|
LEX(BEDDTXT,APCDD,SEX,BEDDLEX,FILTER) | ;EP - Perform Lexicon lookup
|
|
XITL | ||
DXLKP(VALUE,APCDD,SEX,FILTER) | ;EP - Lookup to File 80 (DX)
|
|
SAVE(VPOVIEN,ICDIEN,PNARR,PS,CODE,INJ,VIEN,DUZ,DFN) | ;Add/Update POV entry
|
|
ICD9(XTEXT,APCDDATE,LEX) | ;Perform Lexicon ICD9 lookup
|
|
XIT | ||
GETPOV(VIEN) | ;Return POV information for visit
|
|
ICD10(XTEXT,APCDDATE,LEX) | ;Perform Lexicon ICD10 lookup
|
|
ICD(ICDIEN,VDT) | ;Return ICD information
|
|
GETDX(VPOV) | ;EP - Retrieve V POV information for a particular entry
|
|
XSAVE | ||
FNDNARR(NARR,CREATE) | ;File narrative and return IEN
|
Name | Field # of Occurrence |
---|---|
^%ZTER | ERR+1 |
$$AICD^AMERUTIL | ICD+16, GETDX+28 |
$$POV^AMERUTIL | LIST+23 |
LEX^AMERUTIL | LEX+51 |
POV^AMERUTIL | GETPOV+15 |
^APCDALVR | SAVE+91 |
$$IMP^AUPNSICD | LEX+28 |
MOD^AUPNVSIT | DEL+21, SAVE+107 |
$$ICDDX^AUPNVUTL | LEX+35, LEX+41, LEX+47 |
INJURY^BEDDINJ | SAVE+40 |
$$UPPER^BEDDUTID | LEX+19 |
$$UPDATE^BGOUTL | FNDNARR+7 |
FILE^DIE | DEL+18, SAVE+104 |
$$GET1^DIQ | GETDX+12, GETDX+13, GETDX+17, GETDX+18, GETDX+19, GETDX+20, GETDX+24, GETDX+25, DEL+15, SAVE+27 , SAVE+30, SAVE+47, SAVE+68 |
$$ICDDX^ICDCODE | ICD+17, GETDX+29 |
$$ICDDX^ICDEX | ICD+16, GETDX+28 |
LOOK^LEXA | ICD10+6 |
CONFIG^LEXSET | ICD10+4 |
$$DT^XLFDT | LEX+23 |
DUZ^XUP | LIST+20, DEL+12, SAVE+11 |
FileNo | Call Tags |
---|---|
^AUPNVSIT - [#9000010] | GET1^DIQ |
^AUPNVPRV - [#9000010.06] | GET1^DIQ |
^AUPNVPOV - [#9000010.07] | GET1^DIQ |
^AMER(3 - [#9009083] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNVPRV("AD" | SAVE+25 |
^AUTNPOV - [#9999999.27] | FNDNARR+4 |
^AUTNPOV("B" | FNDNARR+4 |
^TMP("BEDDDX" | DXLKP+21!, DXLKP+27* |
^TMP("LEXFND" | ICD10+3! |
^TMP("LEXSCH" | ICD10+3! |
Name | Line Occurrences |
---|---|
$$FNDNARR | SAVE+17 |
LEX | DXLKP+24 |
XITL | LEX+33, LEX+39, LEX+45 |
XSAVE | LIST+19, DEL+11, SAVE+10 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | LEX+34~, LEX+35*, LEX+36, LEX+40~, LEX+41*, LEX+42, LEX+46~, LEX+47*, LEX+48 |
AMERPOV | LIST+12~, LIST+23 |
AMERPOV( | LIST+26, LIST+28 |
APCDALVR | SAVE+2~, SAVE+73~ |
APCDALVR("APCDADFN" | SAVE+94 |
APCDALVR("APCDAFLG" | SAVE+94, SAVE+95 |
APCDALVR("APCDATMP" | SAVE+88* |
APCDALVR("APCDLOC" | SAVE+85* |
APCDALVR("APCDPAT" | SAVE+76* |
APCDALVR("APCDTPOV" | SAVE+82* |
APCDALVR("APCDVSIT" | SAVE+79* |
APCDCAT | SAVE+2~ |
APCDCLN | SAVE+2~ |
APCDD | DXLKP~, DXLKP+24, LEX~, LEX+24*, LEX+28, LEX+51 |
APCDDATE | ICD9~, ICD10~, ICD10+4, ICD10+6, SAVE+2~ |
APCDIMP | LEX+13~, LEX+28*, LEX+35, LEX+39, LEX+41, LEX+47 |
APCDLOC | SAVE+2~, SAVE+68*, SAVE+85 |
APCDLOOK | SAVE+2~ |
APCDPAT | SAVE+2~ |
APCDTCD | SAVE+3~, SAVE+42*, SAVE+101 |
APCDTDI | SAVE+3~, SAVE+41*, SAVE+100 |
APCDTPA | SAVE+3~, SAVE+52*, SAVE+53*, SAVE+54*, SAVE+55*, SAVE+56*, SAVE+57*, SAVE+58*, SAVE+59*, SAVE+60* , SAVE+61*, SAVE+62*, SAVE+63*, SAVE+64*, SAVE+65*, SAVE+102 |
APCDTPCC | XIT! |
APCDTYPE | SAVE+2~ |
APCDVSIT | SAVE+2~ |
AUPNVSIT | DEL+2~, DEL+15*, SAVE+3~, SAVE+107* |
BEDDLEX | DXLKP+11~, DXLKP+24, LEX~ |
BEDDLEX( | DXLKP+27, LEX+66* |
BEDDLEX(1 | LEX+36*, LEX+42*, LEX+48* |
BEDDTXT | LEX~, LEX+16, LEX+19*, LEX+33, LEX+39, LEX+45, LEX+51 |
CNT | GETPOV+4~, GETPOV+17*, GETPOV+19 |
CODE | LEX+58~, LEX+61*, LEX+66, LIST+27~, GETDX+2~, GETDX+18*, GETDX+33, SAVE~, SAVE+82 |
CODEIEN | GETDX+2~, GETDX+17*, GETDX+28, GETDX+29, GETDX+33 |
CREATE | FNDNARR~, FNDNARR+3*, FNDNARR+5 |
D | XIT! |
DD | XIT! |
DESC | LEX+58~, LEX+62*, LEX+66, LIST+27~, GETDX+2~, GETDX+30*, GETDX+33 |
DFN | SAVE~, SAVE+76 |
DIC | LEX+13~, ICD10+2~ |
DIC("S" | ICD10+5* |
DIPGM | XIT! |
DO | XIT! |
DT | LEX+23*, LEX+24, ICD+15 |
DUZ | LIST~, LIST+19, LIST+20, DEL~, DEL+11, DEL+12, SAVE~, SAVE+10, SAVE+11, SAVE+33 |
DUZ(2 | SAVE+85 |
DXCNT | GETPOV+4~, GETPOV+12*, GETPOV+18*, GETPOV+21 |
DXLIST | LIST~ |
DXLIST( | LIST+29* |
ERROR | DEL+2~, DEL+23, SAVE+3~ |
FDA | FNDNARR+1~, FNDNARR+7 |
FDA( | FNDNARR+6* |
FILTER | DXLKP~, DXLKP+18*, DXLKP+24, LEX~, LEX+25*, LEX+33, LEX+39, LEX+45, LEX+51 |
I | DXLKP+11~, DXLKP+27*, LEX+13~, LEX+57*, LEX+59, LEX+66, LEX+67 |
ICD | SAVE+3~ |
ICDIEN | ICD~, ICD+16, ICD+17, LIST+27~, SAVE~, SAVE+103 |
ICDINFO | ICD+9~, ICD+16*, ICD+17*, ICD+19, GETDX+2~, GETDX+28*, GETDX+29*, GETDX+30 |
ICDV | LEX+13~ |
IEN | LEX+58~, LEX+60*, LEX+66, SAVE+22~, SAVE+25*, SAVE+27, SAVE+30, FNDNARR+1~, FNDNARR+3*, FNDNARR+4* , FNDNARR+5, FNDNARR+7 |
IEN(1 | FNDNARR+8 |
IN | SAVE+2~ |
INJ | GETDX+2~, GETDX+23*, GETDX+24*, GETDX+25*, GETDX+33, SAVE~, SAVE+36 |
INJPL | SAVE+37~, SAVE+43*, SAVE+44*, SAVE+47*, SAVE+53, SAVE+54, SAVE+55, SAVE+56, SAVE+57, SAVE+58 , SAVE+59, SAVE+60, SAVE+61, SAVE+62, SAVE+63, SAVE+64, SAVE+65 |
INJURY | SAVE+3~, SAVE+40 |
INJURY("ICIEN" | SAVE+42 |
INJURY("INDAT" | SAVE+41 |
INJURY("INSET" | SAVE+44 |
LEX | DXLKP+11~, LEX+13~, ICD9~, ICD10~ |
LEX("LIST" | ICD10+3! |
N | LIST+27~, LIST+28*, LIST+29 |
NARR | LIST+27~, GETDX+2~, GETDX+20*, GETDX+33, FNDNARR~, FNDNARR+2, FNDNARR+3*, FNDNARR+4, FNDNARR+6 |
ND | LEX+58~, LEX+59*, LEX+60, LEX+61, LEX+62 |
PNARR | SAVE~, SAVE+17*, SAVE+99 |
POV | LIST+12~, LIST+26*, LIST+28, LIST+29, GETPOV+4~, GETPOV+15 |
POV( | GETPOV+17, GETPOV+19 |
POVUPD | SAVE+3~ |
POVUPD( | SAVE+98*, SAVE+99*, SAVE+100*, SAVE+101*, SAVE+102*, SAVE+103* |
PRMCNT | GETPOV+4~, GETPOV+12*, GETPOV+19*, GETPOV+21 |
PROV | SAVE+2~, SAVE+20*, SAVE+25, SAVE+30*, SAVE+33* |
PS | LIST+27~, GETDX+2~, GETDX+19*, GETDX+33, SAVE~, SAVE+26~, SAVE+27*, SAVE+98 |
RESULT | GETDX+2~, GETDX+15*, GETDX+33*, GETDX+35 |
RET | LEX+13~, LEX+51, FNDNARR+1~, FNDNARR+7*, FNDNARR+8 |
RET( | LEX+57, LEX+59, LEX+67! |
SEX | DXLKP~, DXLKP+17*, DXLKP+24, LEX~, LEX+51 |
STS | LIST+12~, LIST+19*, LIST+23*, DEL+11*, SAVE+2~, SAVE+10*, SAVE+14*, SAVE+95*, XSAVE |
TRC | FNDNARR+1~, FNDNARR+3*, FNDNARR+4 |
U | LEX+22*, LEX+36, LEX+42, LEX+48, LEX+60, LEX+61, LEX+62, LEX+66, LIST+29, GETDX+30 , GETDX+33, FNDNARR+4 |
VALUE | DXLKP~, DXLKP+24 |
VDATE | GETDX+2~, GETDX+13*, GETDX+28, GETDX+29 |
VDT | ICD~, ICD+15*, ICD+16, ICD+17 |
VIEN | LIST~, LIST+10, LIST+23, GETDX+2~, GETDX+12*, GETDX+13, SAVE~, SAVE+21, SAVE+25, SAVE+40 , SAVE+68, SAVE+79, SAVE+107, GETPOV~, GETPOV+2, GETPOV+15 |
VPOV | GETDX~, GETDX+5, GETDX+12, GETDX+17, GETDX+18, GETDX+19, GETDX+20, GETDX+24, GETDX+25, GETDX+33 |
VPOVIEN | LIST+27~, DEL~, DEL+4, DEL+15, DEL+17, SAVE~, SAVE+71, SAVE+94*, SAVE+98, SAVE+99 , SAVE+100, SAVE+101, SAVE+102, SAVE+103 |
VPOVUPD | DEL+2~ |
VPOVUPD( | DEL+17* |
X | DXLKP+14*, DXLKP+15*, LEX+13~, XIT!, ICD+9~, ICD+12*, ICD+13*, LIST+15*, LIST+16*, GETDX+8* , GETDX+9*, DEL+7*, DEL+8*, SAVE+2~, SAVE+6*, SAVE+7*, GETPOV+8*, GETPOV+9* |
XTEXT | ICD9~, ICD10~, ICD10+6 |
Y | XIT! |