ECXUSUR1 ;ALB/TJL-Surgery Pre-Extract Unusual Volume Report ;6/15/17 15:44
Source file <ECXUSUR1.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;
|
|
STUFF | ;gather data
|
|
FILE | ; Store unusual records for display later
|
|
TIME | ; given date/time get increment
|
|
TIMEDIF(START,FINISH) | ; Set values to be compared, in seconds
|
|
CHKTM(ST,END) | ;161 Identify any incorrect or missing times
|
|
EXIT |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> A1 | STUFF+21*, STUFF+23, STUFF+24, STUFF+39*, STUFF+40, STUFF+41, STUFF+50*, STUFF+51, STUFF+52, TIME+3 |
>> A2 | STUFF+22*, STUFF+23, STUFF+24, STUFF+38*, STUFF+40, STUFF+41, STUFF+49*, STUFF+51, STUFF+52, TIME+3 |
CON | TIME+1~, TIME+2*, TIME+4, TIME+7 |
COUNT | EN+1~, EN+3*, FILE+22*, FILE+23 |
DATA1 | STUFF+1~, STUFF+7* |
DATA2 | STUFF+1~, STUFF+8*, STUFF+38, STUFF+39, STUFF+59 |
DATAOP | STUFF+1~, STUFF+9*, FILE+12 |
DATAPA | STUFF+1~, STUFF+10*, STUFF+49, STUFF+50 |
>> EC0 | STUFF+6*, STUFF+15 |
>> ECCAN | STUFF+58*, STUFF+59*, FILE+21 |
>> ECD | EN+3*, EN+4*, EN+6, STUFF+4, FILE+2 |
>> ECD0 | EN+5*, EN+6*, EN+7, STUFF+6, STUFF+7, STUFF+8, STUFF+9, STUFF+10, STUFF+11, STUFF+12 , STUFF+58, FILE+21, TIME+2 |
ECDIV | STUFF+2~, STUFF+12*, STUFF+13 |
>> ECED | EN+3*, EN+4 |
ECHEAD | EN+1~, EN+2*, FILE+15 |
>> ECNL | STUFF+19*, STUFF+26*, STUFF+27*, STUFF+55, STUFF+59, FILE+9 |
>> ECNO | STUFF+11*, STUFF+20, STUFF+21, STUFF+22, STUFF+25 |
>> ECNT | STUFF+19*, STUFF+23*, STUFF+55 |
>> ECODE0 | STUFF+36*, STUFF+46*, STUFF+53*, STUFF+55*, STUFF+65, STUFF+66, FILE+17, FILE+18, FILE+19, FILE+21 |
>> ECSD1 | EN+3 |
>> ECSS | STUFF+15*, STUFF+16*, STUFF+17*, FILE+15 |
>> ECTHLD | STUFF+65 |
>> ECXA | FILE+9, FILE+15 |
>> ECXADMDT | FILE+15 |
>> ECXDATE | STUFF+4*, STUFF+5, FILE+6, FILE+15 |
>> ECXDFN | EN+7*, STUFF+5, FILE+2 |
>> ECXENC | FILE+15*, FILE+21 |
>> ECXERR | STUFF+4*, STUFF+68, FILE+23*, EXIT* |
>> ECXFLAG | STUFF+61 |
ECXNONL | STUFF+1~, STUFF+19*, STUFF+25*, STUFF+26, STUFF+30 |
>> ECXOBS | FILE+9*, FILE+15 |
ECXPDIV | STUFF+2~, STUFF+3*, STUFF+13*, FILE+21 |
>> ECXPORT | FILE+12, FILE+21 |
ECXPROC | EN+1~, FILE+12*, FILE+21 |
>> ECXQ | STUFF+4* |
>> ECXSSN | FILE+15 |
ECXSTOP | STUFF+1~, STUFF+19*, STUFF+30*, FILE+15 |
>> ECXTS | FILE+9, FILE+15 |
END | CHKTM~, CHKTM+1 |
FILE | STUFF+62~, STUFF+63*, STUFF+65*, STUFF+66*, STUFF+68 |
FINISH | TIMEDIF~, TIMEDIF+2 |
J | STUFF+1~, STUFF+37*, STUFF+38, STUFF+39, STUFF+42, STUFF+43 |
OK | FILE+1~, FILE+2*, FILE+3 |
PIECE | STUFF+62~, STUFF+64*, STUFF+65, STUFF+66 |
>> QFLG | EN+3*, EN+4, EN+7 |
ST | CHKTM~, CHKTM+1 |
START | TIMEDIF~, TIMEDIF+2 |
SURDT | FILE+1~, FILE+6*, FILE+21 |
SURNAME | FILE+1~, FILE+4*, FILE+21 |
SURPAT | FILE+1~, FILE+2 |
SURPAT("NAME" | FILE+4 |
SURPAT("SSN" | FILE+5 |
SURSSN | FILE+1~, FILE+5*, FILE+21 |
TIME | STUFF+23*, STUFF+24, STUFF+40*, STUFF+41, STUFF+44*, STUFF+46!, STUFF+51*, STUFF+52, STUFF+53!, TIME+5* , TIME+6*, TIME+8*, TIME+9* |
TIMEDIF | EN+1~, STUFF+44, TIME+5, TIME+8, TIMEDIF+2*, TIMEDIF+3* |
U | EN+7, STUFF+15, STUFF+16, STUFF+20, STUFF+21, STUFF+22, STUFF+25, STUFF+26, STUFF+30, STUFF+38 , STUFF+39, STUFF+46, STUFF+49, STUFF+50, STUFF+53, STUFF+55, STUFF+58, STUFF+59, STUFF+65, STUFF+66 , FILE+12, FILE+17, FILE+18, FILE+19, FILE+21, TIME+2 |
VOL | FILE+1~, FILE+17*, FILE+18*, FILE+19*, FILE+21 |
>> ZTSTOP | FILE+23* |