SROESXA ;BIR/ADM - SURGERY E-SIG UTILITY ; [ 03/02/04 09:23 AM ]
Source file <SROESXA.m>
Package | Total | Call Graph |
---|---|---|
Surgery | 3 | ^SROARPT $$STATUS^SROESUTL $$SITE^SROUTL0 |
Kernel | 2 | ^%ZTLOAD (DELETEA,SETUP)^XQALERT |
Text Integration Utility | 2 | $$WHATITLE^TIUPUTU (DELETE,MAKE,UPDATE)^TIUSRVP |
VA Fileman | 2 | ^DIC EN^DIQ1 |
Registration | 1 | (DEM,IN5)^VADPT |
Name | Comments | DBIA/ICR reference |
---|---|---|
LOC | ; get patient location
|
|
STATUS(SRSTAT) | ; update status
|
|
END | ||
AESA | ; set logic for AESA cross-reference
|
|
ALERT | ; issue alert to anesthesia personnel
|
|
KAESA | ; kill logic for the AESA cross-reference
|
|
AR | ; create stub entry in TIU for anesthesia report
|
|
DELRT | ||
ACTION | ; action alert
|
|
INUSE(SRTN) | ; is anesthesia report in use at this division?
|
|
KSTUB | ; delete stubs in TIU for unsigned anesthesia report
|
Name | Field # of Occurrence |
---|---|
^%ZTLOAD | AESA+4, KAESA+2 |
^DIC | LOC+6 |
EN^DIQ1 | LOC+4 |
^SROARPT | ACTION+1 |
$$STATUS^SROESUTL | ACTION+2 |
$$SITE^SROUTL0 | INUSE+2, AR+5 |
$$WHATITLE^TIUPUTU | AR+4 |
DELETE^TIUSRVP | KSTUB+4 |
MAKE^TIUSRVP | AR+13 |
UPDATE^TIUSRVP | STATUS+1 |
DEM^VADPT | ALERT+3 |
IN5^VADPT | LOC+2 |
DELETEA^XQALERT | ALERT+1, DELRT |
SETUP^XQALERT | ALERT+5 |
FileNo | Call Tags |
---|---|
^SC - [#44] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | AR+12 |
^SRF - [#130] | AESA+2, AR+2, AR+3, AR+5, AR+6, AR+9, AR+14*, ALERT+2, ALERT+3, ALERT+4 , KSTUB+2, KSTUB+5*, ACTION+2 |
^SRF("TIU" | AR+14, KSTUB+5 |
^SRO(133 - [#133] | INUSE+2, LOC+5 |
^SRS - [#131.7] | LOC+3 |
Name | Line Occurrences |
---|---|
$$INUSE | AESA+3 |
ALERT | AR+15 |
DELRT | KSTUB+6, ACTION+2 |
END | AR+2, AR+3, KSTUB+6 |
LOC | AR+5 |
STATUS | KSTUB+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | AESA+2, LOC+4!*, KAESA+1 |
DFN | AR+1~, AR+5*, AR+7, AR+12, AR+13, ALERT+3* |
DIC | AR+1~, LOC+4!*, LOC+6*! |
DIC(0 | LOC+6* |
DIQ | LOC+4!* |
DIQ(0 | LOC+4* |
DR | LOC+4!* |
SR0 | AR+1~, AR+5*, AR+7, AR+10, LOC+2, LOC+3 |
SRALRT | ACTION+1~* |
SRATT | AR+1~, AR+6*, AR+8 |
SRAY | AR+1~, AR+13, STATUS+1! |
SRAY( | AR+7*, AR+9*, STATUS+1* |
SRAY(1202 | AR+8* |
SRAY(1204 | AR+8* |
SRAY(1205 | AR+7* |
SRAY(1208 | AR+8* |
SRAY(1209 | AR+8* |
SRAY(1211 | AR+12* |
SRAY(1301 | AR+7* |
SRAY(1405 | AR+7* |
SRAY(1701 | AR+7* |
SRD | AR+1~, AR+3* |
SRDEF | LOC+1~, LOC+3*, LOC+5*, LOC+6*, LOC+7 |
SRDIV | AESA+1~, INUSE+1~, INUSE+2*, AR+5*, LOC+5 |
SRDOC | AR+1~, STATUS+1 |
SRERR | KSTUB+1~, KSTUB+4 |
SRINUSE | AESA+1~, INUSE+1~, INUSE+2*, INUSE+3 |
>> SRLAB | ALERT+4*, ALERT+5 |
SRLOC | AR+1~, AR+7, AR+11, LOC+3*, LOC+4*, LOC+7* |
>> SRNM | ALERT+3*, ALERT+4 |
SRODA | KSTUB+1~, KSTUB+2* |
SROR | LOC+1~, LOC+3*, LOC+7 |
SRPRIN | AR+1~, AR+6*, AR+8 |
SRSTAT | STATUS~, STATUS+1 |
SRT | LOC+1~ |
SRT(42 | LOC+4 |
SRTIU | AR+1~, AR+13, AR+14, STATUS+1, KSTUB+1~, KSTUB+2*, KSTUB+4, ACTION+2* |
SRTN | AESA+1~, AESA+2*, AESA+3, INUSE~, INUSE+2, AR+2, AR+3, AR+5, AR+6, AR+7 , AR+9, AR+14, ALERT+1, ALERT+2, ALERT+3, ALERT+4, ALERT+5, KAESA+1~*, KSTUB+2, KSTUB+5 , ACTION+1~*, ACTION+2, DELRT |
SRV | AR+1~ |
SRWARD | LOC+1~, LOC+3*, LOC+4 |
SRX | AR+1~, AR+4* |
TITLE | AR+1~, AR+4*, AR+13 |
>> VA("BID" | ALERT+3 |
>> VADM(1 | ALERT+3 |
VAIP | LOC+1~ |
VAIP("D" | LOC+2* |
VAIP(5 | LOC+3 |
VDT | AR+1~, AR+10*, AR+12, AR+13 |
VLOC | AR+1~, AR+10*, AR+11*, AR+12, AR+13 |
VSIT | AR+1~, AR+10*, AR+11, AR+13 |
VSTR | AR+1~, AR+12*, AR+13 |
X | AR+1~, AR+6*, AR+9*, LOC+1~, LOC+6*, ALERT+2~* |
>> XQA( | ALERT+2* |
>> XQADATA | ALERT+5*, ACTION+1 |
XQAID | ALERT+1*!, ALERT+5*, DELRT~* |
XQAKILL | ALERT+1*!, ACTION+1!, DELRT~* |
>> XQAMSG | ALERT+5* |
>> XQAROU | ALERT+5* |
Y | AR+1~, LOC+1~, LOC+6, ALERT+2~* |
Z | ALERT+2~* |
ZTDESC | AESA+1~, AESA+4*, KAESA+1~, KAESA+2* |
ZTDTH | AESA+1~, AESA+4*, KAESA+1~, KAESA+2* |
ZTIO | AESA+1~, AESA+4*, KAESA+1~, KAESA+2* |
>> ZTREQ | END* |
ZTRTN | AESA+1~, AESA+4*, KAESA+1~, KAESA+2* |
ZTSAVE | AESA+1~, KAESA+1~ |
ZTSAVE("SRTN" | AESA+4*, KAESA+2* |
ZTSK | AESA+1~, KAESA+1~ |