ORY141ED ; SLC/MKB - EDO inits for patch OR*3*141 ;8/19/02 10:45
Source file <ORY141ED.m>
Package | Total | Caller Graph |
---|---|---|
Order Entry Results Reporting | 1 | ORY141 |
Name | Comments | DBIA/ICR reference |
---|---|---|
PRE | ; -- preinit: remove old DD's
|
|
AE1 | ||
DLGS | ; -- Send bulletin re modified dialogs
|
|
DLGSEND(X) | ; -- Send order dialog X?
|
|
ERR(X) | ; -- Track orders unable to convert
|
|
EVENT(X) | ; -- Find (or create) event in #100.5 for
; X = A/D/T ^ [TS] ^ DIV ptr |
|
CLEAR | ; -- Clear Event code field
|
|
PRTCLS | ;;MENU;REPL;WITH;MNEMONIC
|
|
C | ; -- Rebuild C index on #100.5 to uppercase
|
|
PARAMS | ; -- Remove old parameters, template
|
|
B1 | ||
AEVNT | ; -- postinit: convert Event field #15 of Orders file #100
; from code (A/D/T) to pointer to #100.2 ; (incl a report of bad data, lapsed orders) |
|
CANCEL | ; -- Cancel order for deceased patient
|
|
POST | ; -- postinit: convert orders, remove old parameters
|
|
101 | ; -- replace items on protocol menus
|
|
BULLETIN | ; -- send bulletin when finished
|
|
SET(PAT,OLD,NEW) | ; -- set xref nodes in XTMP for bulletin
|
Name | Field # of Occurrence |
---|---|
DELIX^DDMOD | PRE+4 |
^DIE | 101+8 |
^DIK | PARAMS+3, PARAMS+6 |
EN^DIU2 | PRE+3 |
STATUS^ORCSAVE2 | AEVNT+17, AEVNT+18, CANCEL+2 |
AUDIT^OREV | EVENT+22 |
$$NEW^OREVNT | AE1+3 |
$$DIV^OREVNTX | AEVNT+15 |
EN^ORYDLG | DLGS+3 |
$$SITE^VASITE | AEVNT+8 |
$$FMADD^XLFDT | PRE+6, AEVNT+7 |
$$NOW^XLFDT | PRE+5, AEVNT+8 |
$$LJ^XLFSTR | B1+12 |
$$REPEAT^XLFSTR | B1+8 |
$$UP^XLFSTR | C+3 |
DEST^XMA21 | PRE+8 |
^XMD | B1+22 |
$$GET^XPAR | AEVNT+6 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^OR(100 - [#100] | DELIX^DDMOD |
^XTV(8989.51 - [#8989.51] | Classic Fileman Calls |
^XTV(8989.52 - [#8989.52] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(100.5 | POST+4! |
^DIC(100.6 | POST+4! |
^DIC(4 - [#4] | SET+6 |
^DIC(42 - [#42] | AEVNT+10 |
^DIC(45.7 - [#45.7] | EVENT+18, SET+4 |
^DPT - [#2] | AEVNT+10, SET+2 |
^OR(100 - [#100] | AEVNT+9, AEVNT+12, AEVNT+13, AE1+6*, AE1+7!, AE1+8*, CANCEL+1*, CANCEL+2*, CLEAR+1*, CLEAR+2! |
^ORD(100.01 - [#100.01] | POST+1*, POST+2*, POST+3* |
^ORD(100.02 - [#100.02] | CANCEL+1 |
^ORD(100.03 - [#100.03] | CANCEL+1 |
^ORD(100.5 - [#100.5] | EVENT+4, EVENT+5, EVENT+6, EVENT+8, EVENT+12, EVENT+14, EVENT+15, EVENT+17*, EVENT+19*, EVENT+20* , EVENT+21*, SET+7, C+2, C+4, C+5!* |
^ORD(101 - [#101] | PRE+1, 101+3, 101+4, 101+5 |
^TMP("ORTXT" | BULLETIN+4*, B1+1*, B1+2*, B1+3*, B1+4*, B1+5*, B1+7*, B1+8*, B1+10*, B1+12* , B1+20*, B1+23! |
^TMP($J | C+1!, C+4*, C+5, C+6! |
^VA(200 - [#200] | PRE+8 |
^XTMP("ORYED" | PRE+5!, PRE+6*, PRE+10*, AEVNT+4, AEVNT+21*, AEVNT+22, AE1, AE1+1*, AE1+2, AE1+4* , AE1+5, AE1+9!, ERR+3*, SET+8*, BULLETIN+3, B1, B1+6, B1+9, B1+13, B1+16 |
^XTV(8989.51 - [#8989.51] | PARAMS+5 |
^XTV(8989.52 - [#8989.52] | PARAMS+3 |
Name | Line Occurrences |
---|---|
$$EVENT | AE1+1 |
101 | POST+5 |
AEVNT | POST+5 |
BULLETIN | AE1+9 |
C | POST+5 |
CANCEL | AEVNT+19 |
CLEAR | AEVNT+13, AEVNT+16, AEVNT+17, AEVNT+18, AEVNT+19 |
DLGS | POST+5 |
ERR | AEVNT+16, AEVNT+17, AEVNT+18, AEVNT+19 |
PARAMS | POST+5 |
SET | AE1+4 |
Name | Field # of Occurrence |
---|---|
^( | AEVNT+10, AEVNT+21*, SET+2, SET+8*, B1+9, B1+13 |
^(0 | CLEAR+1* |
^(1 | EVENT+19*, EVENT+21* |
^(3 | AEVNT+13 |
^(8 | CLEAR+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | EVENT+11~, PARAMS+2~, PARAMS+3*, PARAMS+5*, PARAMS+6, 101+1~, 101+5*, C+1~, C+3*, C+4* |
DA(1 | 101+7* |
DIE | 101+1~, 101+7* |
DIFROM | BULLETIN+1~ |
DIK | PARAMS+2~, PARAMS+3*, PARAMS+5* |
DIU | PRE+2~, PRE+3* |
DIU(0 | PRE+3* |
DIV | EVENT+2~, EVENT+3*, EVENT+5, EVENT+18, EVENT+19, SET+1~, SET+6*, BULLETIN+1~, B1+6*, B1+8 , B1+9, B1+13 |
DIVNM | SET+1~, SET+6*, SET+8 |
DR | 101+1~, 101+8* |
DT | AEVNT+7 |
DUZ | PRE+8, PRE+9, BULLETIN+2 |
EVT | SET+1~, SET+3*, SET+8, BULLETIN+1~, B1+9*, B1+11, B1+13 |
HDR | EVENT+11~, EVENT+14*, EVENT+16*, EVENT+17 |
I | EVENT+2~, EVENT+4*, EVENT+5, EVENT+6, EVENT+8, EVENT+9*, EVENT+11~, EVENT+12*, EVENT+15*, EVENT+16 , BULLETIN+1~, B1*, B1+1*, B1+2*, B1+3*, B1+4*, B1+5*, B1+7*, B1+8*, B1+10* , B1+12*, B1+20*, DLGS+1~, DLGS+2* |
J | BULLETIN+1~, B1+20* |
LAST | EVENT+11~, EVENT+14*, EVENT+15 |
MAX | BULLETIN+1~, B1+14*, B1+17 |
MSG | ERR+1~, ERR+2*, ERR+3 |
MVT | EVENT+2~, EVENT+7*, EVENT+8 |
NAME | EVENT+11~, EVENT+18*, EVENT+19, EVENT+20 |
NEW | SET~, SET+7 |
NEWEVT | BULLETIN+1~, B1+9*, B1+12 |
NEWNM | SET+1~, SET+7*, SET+8 |
OLD | SET~, SET+3, SET+4, SET+6, SET+8 |
OR0 | AEVNT+5~, AEVNT+13*, AEVNT+14, AEVNT+17, AEVNT+18 |
OR3 | AEVNT+5~, AEVNT+13*, AEVNT+16, ERR+1 |
ORD | DLGS+1~, DLGS+3 |
ORD( | DLGS+2* |
ORDERS | BULLETIN+1~, B1+15*, B1+18*, B1+19*, B1+20 |
ORDERS( | B1+18*, B1+19*, B1+20 |
ORDIED | AEVNT+5~, AEVNT+10*, AEVNT+19 |
ORDIV | AEVNT+5~, AEVNT+15*, AEVNT+20 |
OREVT | AEVNT+5~, AEVNT+11*, AEVNT+12, AEVNT+17, AEVNT+20, AE1+1*, AE1+3, AE1+4, CLEAR+2, ERR+3 |
ORGLOB | EVENT+2~, EVENT+22* |
ORI | PARAMS+2~, PARAMS+4*, PARAMS+5, 101+1~, 101+2* |
ORIFN | AEVNT+5~, AEVNT+11*, AEVNT+12*, AEVNT+13, AEVNT+17, AEVNT+18, AEVNT+21, AE1+5*, AE1+6, AE1+7 , AE1+8, CANCEL+1, CANCEL+2, CLEAR+1, CLEAR+2, ERR+3, BULLETIN+1~, B1+15*, B1+16*, B1+17 , B1+18 |
ORL | AEVNT+5~, AEVNT+10*, AEVNT+14 |
ORLAPSE | AEVNT+5~, AEVNT+6*, AEVNT+7*, AEVNT+18 |
ORMENU | 101+1~, 101+3*, 101+5, 101+7 |
ORMNEM | 101+1~, 101+6* |
ORNEW | 101+1~, 101+6* |
ORNOW | PRE+2~, PRE+5*, PRE+6, AEVNT+5~, AEVNT+8*, CANCEL+1, EVENT+19 |
OROLD | 101+1~, 101+4*, 101+5 |
ORPARAM | AEVNT+5~, AEVNT+6*, AEVNT+7, EVENT+19 |
ORPTEVT | AEVNT+5~, AE1+3*, AE1+4, AE1+6, AE1+8 |
ORSITE | AEVNT+5~, AEVNT+8*, AEVNT+15 |
ORTS | AEVNT+5~, AEVNT+17*, AEVNT+20, ERR+3 |
ORVP | AEVNT+5~, AEVNT+9*, AEVNT+10, AEVNT+12, AEVNT+21, AE1+2*, AE1+3, AE1+4, AE1+5, AE1+7 , AE1+8, CLEAR+2, ERR+3, BULLETIN+1~, B1+14*, B1+16 |
ORX | AEVNT+5~, AEVNT+14*, AEVNT+15, AEVNT+20*, AEVNT+21, AE1*, AE1+1, AE1+2, AE1+4, AE1+5 , AE1+7, BULLETIN+1~, B1+13*, B1+14*, B1+16, 101+1~, 101+2*, 101+3, 101+4, 101+6 |
ORY | EVENT+2~, EVENT+3! |
ORY( | EVENT+8* |
ORZ | BULLETIN+1~, B1+8*, B1+10* |
PAT | SET~, SET+2, SET+8, BULLETIN+1~, B1+13*, B1+14, B1+19 |
PNM | SET+1~, SET+2*, SET+8 |
STS | ERR+1~*, ERR+2 |
TOTAL | EVENT+11~, EVENT+14*, EVENT+16 |
TS | EVENT+2~, EVENT+3*, EVENT+6, EVENT+18, EVENT+21, SET+1~, SET+3*, SET+4*, SET+5*, SET+8 , BULLETIN+1~, B1+9*, B1+11, B1+13 |
U | PRE+6, PRE+8, AEVNT+13, AEVNT+14, AEVNT+16, AEVNT+17, AEVNT+18, AEVNT+20, AE1+6, AE1+7 , CANCEL+1, CANCEL+2, CLEAR+1, EVENT+3, EVENT+5, EVENT+7, EVENT+14, EVENT+16, EVENT+18, EVENT+19 , ERR+1, ERR+3, SET+2, SET+3, SET+4, SET+5, SET+6, SET+7 |
X | PRE+2~, DLGSEND~, DLGSEND+1, DLGSEND+2, DLGSEND+3, DLGSEND+4, DLGSEND+5, DLGSEND+6, DLGSEND+7, DLGSEND+8 , DLGSEND+9, DLGSEND+10, EVENT~, EVENT+3*, EVENT+4, EVENT+7, EVENT+18, EVENT+19, EVENT+20, ERR~ , ERR+1*, ERR+2, BULLETIN+1~, B1+11*, B1+12, B1+15*, B1+17*, B1+18*, B1+19*, B1+20* , 101+1~, C+1~, C+2*, C+3, C+4 |
X0 | EVENT+2~, EVENT+5*, EVENT+7, SET+4*, SET+5 |
X1 | C+1~, C+3*, C+4 |
XMDUN | PRE+2~, PRE+8* |
XMDUZ | PRE+2~, PRE+8*, BULLETIN+1~, BULLETIN+2* |
XMMG | BULLETIN+1~ |
XMOUT | PRE+2~, PRE+9 |
XMSUB | BULLETIN+1~, B1+21* |
XMTEXT | BULLETIN+1~, B1+22* |
XMY | PRE+2~, PRE+10, BULLETIN+1~, BULLETIN+3* |
XMY( | PRE+9*, BULLETIN+2* |
XMZ | BULLETIN+1~ |
Y | EVENT+2~, EVENT+3*, EVENT+9*, EVENT+10, EVENT+13*, EVENT+16*, EVENT+19, EVENT+20, EVENT+21, EVENT+22 , EVENT+23, 101+1~ |
Name | Field # of Occurrence |
---|---|
$T(PRTCLS+ORI | 101+2 |