©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
MCARDCM2 ;WISC/TJK-MODIFIED DICM2 ROUTINE FOR MEDICINE SCREENS ;8/22/96 15:21
Source file <MCARDCM2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ALL | ||
| NAME | ;DETERMINE EXTERNAL FORM FROM INTERNAL FOR VP
|
|
| D | ||
| DIC | ;
|
|
| Q | ||
| S | ||
| V | ||
| Y | ||
| DQ |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | V, V+1, V+2, ALL, DIC+11, Y, S, S+1, S+2 |
| ^DIC - [#1] | V+2, DIC+2, DIC+3, DIC+15 |
| Name | Line Occurrences |
|---|---|
| ALL | MCARDCM2+4, ALL+1 |
| DIC | V, V+1, V+2, ALL |
| DQ | DIC+1, DIC+2, DIC+13, DIC+14 |
| Q | MCARDCM2+4, V, V+1, V+2, V+3, ALL, ALL+1 |
| S | S+1, S+2 |
| V | Q |
| Y | NAME+2 |
| Name | Field # of Occurrence |
|---|---|
| ^( | V, V+1, V+2, ALL, S+1, S+2 |
| ^(0 | V, V+1, V+2, ALL, NAME+1, S+1, S+2 |
| ^(1 | DIC+11 |
| ^(2 | Y |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> C | NAME+2*, Y*, S*, S+1*, S+2*, S+3 |
| >> D | DQ* |
| DIC | MCARDCM2+3, DIC+3*, DIC+5, DIC+14, DQ!* |
| DIC( | MCARDCM2+3 |
| DIC("A" | Q+1* |
| DIC("DR" | MCARDCM2+4!, Q+1* |
| DIC("S" | MCARDCM2+4!, DIC+5*, DIC+6*, DIC+11*, Q+1* |
| DIC("V" | DIC+1, DQ* |
| DIC("W" | MCARDCM2+4! |
| DIC(0 | DIC+4, DIC+10*, DIC+12, DIC+15, DQ* |
| >> DICR | ALL+1, DIC+3, DIC+4, DIC+10, DIC+11, DIC+12, DIC+13, DIC+14, DQ, Q , Q+1, QQ |
| >> DICR( | ALL+1*, DIC+4, DIC+10, DIC+11, DIC+12, DIC+13, DIC+14, DQ, Q*, Q+1* , QQ! |
| >> DICR("^" | DIC+14! |
| DIEX | MCARDCM2+4*, V, V+1, V+2, ALL, QQ! |
| >> DINAME | NAME+1*, NAME+2* |
| DIVA | Q+1, QQ! |
| DIVDIC | MCARDCM2+3*, DIC+5, DQ, QQ! |
| DIVDO | MCARDCM2+3*, V, V+1, V+2, ALL, DIC+11, QQ! |
| DIVDR | Q+1, QQ! |
| DIVDS | MCARDCM2+3*, Q+1, QQ! |
| DIVP | V*, V+1*, V+2*, ALL*, ALL+1!, DIC+1, DIC+11, Q!, QQ! |
| DIVP( | DIC+1, DIC+14* |
| DIVP1 | ALL*, DIC+12, DIC+15, QQ! |
| DIVPDIC | V*, V+1*, V+2*, ALL*, DIC+1, DIC+2, DIC+3, DIC+10, DIC+11, DIC+12 , DIC+14, DIC+15, QQ! |
| DIVS | DIC+6, Q+1, QQ! |
| DIVV | DQ, QQ! |
| >> DIY | NAME+1, NAME+2* |
| DJC | NAME+2*!, Y, S, S+1* |
| DO | MCARDCM2+4!, DQ!, QQ! |
| DO(2 | MCARDCM2+3 |
| >> DS | MCARDCM2+3, Q+1* |
| DUOUT | MCARDCM2+4!, ALL, DIC+14, Q, QQ! |
| >> DZ | DIC+13* |
| >> MCPCT | MCARDCM2+3*, V+1*, V+2*, ALL, DIC+3*, DIC+5, DIC+6, DIC+10*, DIC+11*, DIC+14* , DIC+15, NAME+1*, NAME+2, S*, D* |
| MCPCTYY | NAME+2*! |
| MCPCTYYY | NAME+2*! |
| U | V+2, DIC+10, DIC+11, DIC+12, DIC+15, NAME+1, Y, S, S+1, S+2 |
| X | MCARDCM2+4, V*, V+1*, V+2*, V+3!, ALL*, DIC+13*, DIC+14*!, Q+1! |
| Y | MCARDCM2+4*, V+1, V+2, ALL, DIC+1*!, DIC+2*, DIC+13*, DIC+14, DIC+15*, Q , Q+1, QQ, NAME+2*, S*, S+1*, S+2*, S+3, D* |
| Y(0 | DIC+1* |