©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
MCARDC ;WISC/TJK-MODIFIED DIC ROUTINE FOR MEDICINE SCREENS ;1/14/94 11:07
Source file <MCARDC.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PGM | ||
| B | ||
| DIX | ||
| DIY | ||
| GOT | ||
| NO | ||
| RTN | ;
|
|
| 1 | ;
|
|
| NUM | ||
| ASK | ||
| A | ||
| IX | ||
| C | ||
| EN | ||
| D | ||
| G | ||
| F | ;
|
|
| K | ||
| M | ||
| N | ||
| Q | ||
| P | ||
| S | ||
| R | ||
| T | ||
| Y | ||
| X | ;
|
|
| MN |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | X+1, M+4, NUM, PGM, R+2 |
| ^DIC - [#1] | EN |
| ^DISV( | RTN+1, R* |
| Name | Line Occurrences |
|---|---|
| @( | EN, X+2 |
| A | N+1 |
| ASK | A |
| B | M |
| D | B, A |
| DIX | DIY |
| DIY | T+1, DIX |
| EN | IX |
| F | NUM, P+1, 1+1 |
| G | B, DIY |
| GOT | RTN+1, T+1, N+1, NUM, 1+1 |
| K | T+1 |
| M | M+4, P |
| MN | T+1, DIY+1 |
| N | RTN+1 |
| NO | RTN+1, N |
| NUM | RTN+1 |
| P | NUM |
| PGM | EN, X+2 |
| Q | NO |
| S | RTN+1, N+1, NUM, 1+1, MN+1 |
| T | M+4 |
| Y | DIY+1, K, K+2 |
| Name | Field # of Occurrence |
|---|---|
| ^( | RTN+1, T+1, DIX, M+4, NUM, MN |
| ^("ACT" | R+2 |
| ^("A[" | NUM |
| ^("DIC" | PGM |
| ^(0 | M+4, PGM, S |
| ^(7.5 | X+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> C | R+1* |
| D | MCARDC+2*, M+1*, M+2*, M+4, MN, MN+1, DIY, R+1!*, Q!, D* , IX |
| DD | F+1*, N+1*, NUM*, P*, Q! |
| DF | MCARDC+2!, NUM, PGM, Q!, D, IX* |
| DFOUT | MCARDC+2! |
| >> DIADD | ASK+1 |
| >> DIC | EN*, RTN+1, T, DIX, M+1, M+4, NUM, PGM, S, S+2 , Y, R, R+1, R+3 |
| >> DIC("S" | MN, S+2 |
| >> DIC("W" | Q! |
| >> DIC(0 | ASK, T+1, DIX, M, N+1, P, PGM, MN, DIY, K , K+2, G, GOT, R, R+1, A |
| DICR | EN! |
| >> DICRS | G |
| DID | M+1, M+3, Q! |
| DID(1 | M+1, M+3*, D* |
| DINUM | Q! |
| DIPGM | EN, X+2, PGM!* |
| DIPGM(0 | EN*, X+2* |
| DISMN | K+1, Q! |
| DIX | T*, DIX*, MN, MN+1, DIY, K+2, G*, Q! |
| DIY | MN*, MN+1*, S*, S+1*, K+2, G*, C*, GOT, Q!, A! |
| DIY( | K+1!, K+2*, C |
| DJC | R+1*! |
| >> DJCP | Y |
| DO | EN!, X+1, M+4, N+1, NUM, MN, S, Q! |
| DO("SCR" | MN, S+2 |
| DO(2 | X+1, M+4, NUM, GOT, R+1, R+2 |
| DS | MCARDC+2!, F+1*, T+1*, B, N+1*, NUM*, P*, DIY, K, K+1 , K+2*, R+1*, Q!, A! |
| DS( | K, K+1!, K+2*, C |
| DS(1 | G |
| DTOUT | MCARDC+2! |
| DUOUT | MCARDC+2!, N* |
| DUZ | RTN+1, R |
| DZ | N+1*, MN*, MN+1, K*, K+1*, Q! |
| U | EN*, ASK+1, X+1, M+1, M+4, N, PGM, R+1 |
| >> X | ASK+1*, X+1, RTN+1, T, DIX, M+4, N, N+1, N+2, NUM , DIY, K+2, G, C*, GOT |
| >> Y | RTN+1*, T*, T+1, DIX*, M+4*, N+1*, NUM*, MN, Y*, Y+1* , DIY, K, K+2, C*, GOT*, R, R+1*, R+3*, NO* |
| >> Y(0 | R+1* |
| >> YMLH | T+1* |
| >> YY | M+4* |