ECUTL ;ALB/GTS/JAM - Event Capture Utilities ;23 Jul 2008
Source file <ECUTL.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 |
---|---|---|
FNDVST(ECVST,ECRECNUM,EC2PCE) | ; Search EC Patient records for associated Visits
|
|
FNDVSTQ | ||
RSEND(ECIEN,ECPCE) | ; Prepare EC Patient record for resending to PCE
|
|
RSENDQ | ||
MODSCN() | ;Screen CPT Procedure Modifier
|
|
ASKMOD(PROC,MOD,PRDT,ECMOD,ECERR) | ; Ask CPT modifiers for CPT procedure
; Input PROC = CPT Procedure ; MOD = Default modifier ; PRDT = Date/Time of procedure. Checks modifier status |
|
AGAIN | ||
ASKMODQ | ||
VALMOD(PROC,X,PRDT) | ;Validate modifiers
|
|
MODHLP | ;Help for CPT modifiers
|
|
MOD(ECIEN,MFT,OUTARR) | ;Returns modifiers associated with an EC Patient IEN
; Input: ECIEN - IEN entry in file 721/^ECH( ; MFT - format to provide modifier ; "I" - ien format ; "E" - .01 format (default) |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^ECH - [#721] | GETS^DIQ |
^ICPT - [#81] | Classic Fileman Calls |
^DIC(81.3 - [#81.3] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^EC(725 - [#725] | MODSCN+3 |
^ECH - [#721] | RSEND+12, RSEND+14, MODSCN+4, MODSCN+5, MOD+11, MOD+12, MOD+15 |
^ECH("C" | FNDVST+18 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
D | MODHLP+1~, MODHLP+7* |
DA | RSEND+10~, RSEND+18*, MODSCN+4, MODSCN+5 |
DATA | ASKMOD+8~, ASKMOD+16*, ASKMOD+20*, ASKMOD+21, ASKMOD+22 |
DEF | ASKMOD+8~, ASKMOD+9*, ASKMOD+22*, ASKMOD+26, AGAIN+6, AGAIN+8*, AGAIN+9* |
DEFX | AGAIN~, AGAIN+2*, AGAIN+8, VALMOD+6* |
DIC | ASKMOD+8~, ASKMOD+12*, VALMOD+1~, VALMOD+2*, MODHLP+1~, MODHLP+7* |
DIC("S" | ASKMOD+13*, VALMOD+4*, MODHLP+8* |
DIC("W" | VALMOD+3*, MODHLP+7* |
DIC(0 | ASKMOD+12*, VALMOD+2*, MODHLP+8* |
DIE | RSEND+10~, RSEND+18* |
DIR | ASKMOD+8~, AGAIN+3! |
DIR("?" | AGAIN+1* |
DIR("A" | AGAIN+1* |
DIR("B" | ASKMOD+26*, AGAIN+8*, AGAIN+9! |
DIR(0 | AGAIN+2* |
DIROUT | ASKMOD+8~, AGAIN+4, VALMOD+1~ |
DR | RSEND+10~, RSEND+18* |
DSC | ASKMOD+8~, ASKMOD+22* |
DTOUT | ASKMOD+8~, AGAIN+4, VALMOD+1~ |
DUOUT | ASKMOD+8~, AGAIN+4, VALMOD+1~ |
EC2PCE | FNDVST~, FNDVST+19 |
ECCPT | MODSCN+1~, MODSCN+2*, MODSCN+3*, MODSCN+5 |
ECDT | MODSCN+4, MOD+13~, MOD+15*, MOD+22 |
ECERR | FNDVST+12~, FNDVST+14*, FNDVST+15*, FNDVST+16, FNDVST+20*, FNDVSTQ, RSEND+10~, RSEND+11*, RSEND+12*, RSEND+13 , RSENDQ, ASKMOD~, ASKMOD+9*, ASKMOD+10*, ASKMOD+14*, AGAIN+4*, ASKMODQ |
ECIEN | FNDVST+12~, FNDVST+17*, FNDVST+18*, FNDVST+19, RSEND~, RSEND+12, RSEND+14, RSEND+18, RSEND+20, MOD~ , MOD+10, MOD+11, MOD+12, MOD+15, MOD+16 |
ECMERR | MOD+13~, MOD+17 |
ECMOD | ASKMOD~ |
ECMOD( | ASKMOD+22*, ASKMOD+24, ASKMOD+25, AGAIN+4!, AGAIN+6!, AGAIN+8, AGAIN+9*, MODHLP+2, MODHLP+4 |
>> ECP | MODSCN+2, MODSCN+3 |
ECPCE | RSEND~ |
ECPCE( | RSEND+20* |
ECPDT | MODSCN+1~, MODSCN+4*, MODSCN+6 |
ECPROCDT | RSEND+10~, RSEND+14*, RSEND+20 |
ECPT | MODSCN+1~, MODSCN+5*, MODSCN+6 |
ECRECNUM | FNDVST~, FNDVST+13*, FNDVST+19 |
ECVAR | FNDVST+12~, FNDVST+14*, FNDVST+19*, FNDVST+20 |
ECVST | FNDVST~, FNDVST+15, FNDVST+18 |
ECY | AGAIN~, AGAIN+7, AGAIN+9, VALMOD+6* |
ECY(0 | AGAIN+9 |
I | ASKMOD+8~, ASKMOD+19*, ASKMOD+24* |
IEN | ASKMOD+8~, ASKMOD+22*, MOD+13~, MOD+20*, MOD+24 |
MFT | MOD~, MOD+14*, MOD+19 |
MOD | ASKMOD~, ASKMOD+19, MODHLP+1~, MODHLP+4*, MOD+13~, MOD+21*, MOD+22, MOD+24 |
MODAR | ASKMOD+8~, ASKMOD+17! |
MODAR("" | ASKMOD+17 |
MODARY | MOD+13~ |
MODARY( | MOD+18, MOD+19, MOD+20, MOD+21 |
MODESC | MOD+13~, MOD+22*, MOD+23*, MOD+24 |
OUTARR | MOD~, MOD+25 |
OUTARR( | MOD+24* |
PRDT | ASKMOD~, ASKMOD+11*, ASKMOD+16, ASKMOD+20, VALMOD~ |
PROC | ASKMOD~, ASKMOD+10, ASKMOD+12, ASKMOD+16, ASKMOD+20, ASKMOD+22, ASKMOD+24, ASKMOD+25, AGAIN+4, AGAIN+6 , AGAIN+8, AGAIN+9, VALMOD~, MODHLP+2, MODHLP+4 |
SEQ | MOD+13~, MOD+18*, MOD+19, MOD+20, MOD+21 |
SUB | ASKMOD+8~, ASKMOD+19*, ASKMOD+20, ASKMOD+21, ASKMOD+22, ASKMOD+24*, ASKMOD+25, MOD+13~, MOD+19*, MOD+24 |
U | MODSCN+4, MODSCN+5, ASKMOD+21, ASKMOD+22, ASKMOD+25, AGAIN+9, VALMOD+6, MOD+15, MOD+22, MOD+24 |
X | ASKMOD+12*, AGAIN~, AGAIN+3, AGAIN+6, VALMOD~, VALMOD+5! |
Y | MODSCN+6, ASKMOD+14, AGAIN~, VALMOD+5, VALMOD+6 |