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 |
| FileNo | Call Tags |
|---|---|
| ^DG(40.8 - [#40.8] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(40.8 - [#40.8] | STUFF+21 |
| ^DIC(45.3 - [#45.3] | STUFF+28 |
| ^ECX(728.44 - [#728.44] | STUFF+38, STUFF+42 |
| ^SRF - [#130] | EN+7, STUFF+8, STUFF+9, STUFF+10, STUFF+11, STUFF+12, STUFF+13, STUFF+18, STUFF+19, STUFF+73 , TIME+2 |
| ^SRF("AC" | EN+4, EN+6 |
| ^SRO(137.45 - [#137.45] | STUFF+27 |
| ^TMP($J | FILE+21* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> A1 | STUFF+33*, STUFF+35, STUFF+36, STUFF+52*, STUFF+53, STUFF+55, STUFF+65*, STUFF+66, STUFF+67, TIME+3 |
| >> A2 | STUFF+34*, STUFF+35, STUFF+36, STUFF+51*, STUFF+53, STUFF+55, STUFF+64*, STUFF+66, STUFF+67, TIME+3 |
| CON | TIME+1~, TIME+2*, TIME+4, TIME+7 |
| COUNT | EN+1~, EN+3*, FILE+22*, FILE+23 |
| DA | STUFF+4~, STUFF+22* |
| DATA1 | STUFF+1~, STUFF+9* |
| DATA2 | STUFF+1~, STUFF+10*, STUFF+51, STUFF+52, STUFF+74 |
| DATA3 | STUFF+3~, STUFF+13*, STUFF+14, STUFF+15 |
| DATAOP | STUFF+1~, STUFF+11*, FILE+12 |
| DATAPA | STUFF+1~, STUFF+12*, STUFF+64, STUFF+65 |
| DIC | STUFF+4~, STUFF+22* |
| DIQ | STUFF+4~, STUFF+22* |
| DIQ(0 | STUFF+22* |
| DR | STUFF+4~, STUFF+22* |
| >> EC0 | STUFF+8*, STUFF+27 |
| >> ECCAN | STUFF+73*, STUFF+74*, FILE+21 |
| >> ECD | EN+3*, EN+4*, EN+6, STUFF+6, FILE+2 |
| >> ECD0 | EN+5*, EN+6*, EN+7, STUFF+8, STUFF+9, STUFF+10, STUFF+11, STUFF+12, STUFF+13, STUFF+18 , STUFF+19, STUFF+73, FILE+21, TIME+2 |
| ECDIV | STUFF+2~, STUFF+19*, STUFF+21 |
| ECDIVIEN | STUFF+4~, STUFF+21*, STUFF+22, STUFF+23, STUFF+24 |
| >> ECED | EN+3*, EN+4 |
| ECHEAD | EN+1~, EN+2*, FILE+15 |
| >> ECNL | STUFF+31*, STUFF+38*, STUFF+39*, STUFF+70, STUFF+74, FILE+9 |
| >> ECNO | STUFF+18*, STUFF+32, STUFF+33, STUFF+34, STUFF+37 |
| >> ECNT | STUFF+31*, STUFF+35*, STUFF+70 |
| ECNTIME | STUFF+3~, STUFF+49*, STUFF+57* |
| >> ECODE0 | STUFF+48*, STUFF+61*, STUFF+62*, STUFF+68*, STUFF+70*, STUFF+80, STUFF+81, FILE+17, FILE+18, FILE+19 , FILE+21 |
| ECSA | STUFF+3~, STUFF+14*, STUFF+16 |
| ECSAPC | STUFF+3~, STUFF+16* |
| >> ECSD1 | EN+3 |
| >> ECSS | STUFF+27*, STUFF+28*, STUFF+29*, FILE+15 |
| >> ECTHLD | STUFF+80 |
| >> ECXA | FILE+9, FILE+15 |
| >> ECXADMDT | FILE+15 |
| >> ECXDATE | STUFF+6*, STUFF+7, STUFF+16, STUFF+17, FILE+6, FILE+15 |
| >> ECXDFN | EN+7*, STUFF+7, FILE+2 |
| ECXDIV | STUFF+4~, STUFF+22! |
| ECXDIV( | STUFF+23, STUFF+24 |
| >> ECXENC | FILE+15*, FILE+21 |
| >> ECXERR | STUFF+6*, STUFF+83, FILE+23*, EXIT* |
| >> ECXFLAG | STUFF+76 |
| ECXNONL | STUFF+1~, STUFF+31*, STUFF+37*, STUFF+38, STUFF+42 |
| >> ECXOBS | FILE+9*, FILE+15 |
| ECXPA | STUFF+3~, STUFF+15*, STUFF+17 |
| ECXPAPC | STUFF+3~, STUFF+17* |
| ECXPDIV | STUFF+2~, STUFF+5*, STUFF+23*, STUFF+25 |
| ECXPDVNM | STUFF+4~, STUFF+24*, STUFF+25 |
| >> ECXPORT | FILE+12, FILE+21 |
| ECXPROC | EN+1~, FILE+12*, FILE+21 |
| >> ECXQ | STUFF+6* |
| >> ECXSSN | FILE+15 |
| ECXSTOP | STUFF+1~, STUFF+31*, STUFF+42*, FILE+15 |
| >> ECXTS | FILE+9, FILE+15 |
| END | CHKTM~, CHKTM+1 |
| FILE | STUFF+77~, STUFF+78*, STUFF+80*, STUFF+81*, STUFF+83 |
| FINISH | TIMEDIF~, TIMEDIF+2 |
| INST | STUFF+4~ |
| J | STUFF+1~, STUFF+50*, STUFF+51, STUFF+52, STUFF+54, STUFF+56, STUFF+57, STUFF+58 |
| OK | FILE+1~, FILE+2*, FILE+3 |
| PIECE | STUFF+77~, STUFF+79*, STUFF+80, STUFF+81 |
| PRODVSTR | STUFF+4~, STUFF+25*, FILE+21 |
| >> 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+35*, STUFF+36, STUFF+53*, STUFF+54*, STUFF+55, STUFF+57, STUFF+59*, STUFF+61!, STUFF+66*, STUFF+67 , STUFF+68!, TIME+5*, TIME+6*, TIME+8*, TIME+9* |
| TIMEDIF | EN+1~, STUFF+59, TIME+5, TIME+8, TIMEDIF+2*, TIMEDIF+3* |
| U | EN+7, STUFF+14, STUFF+15, STUFF+27, STUFF+28, STUFF+32, STUFF+33, STUFF+34, STUFF+37, STUFF+38 , STUFF+42, STUFF+51, STUFF+52, STUFF+61, STUFF+62, STUFF+64, STUFF+65, STUFF+68, STUFF+70, STUFF+73 , STUFF+74, STUFF+80, STUFF+81, 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* |