©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
MCORMN3 ;WISC/MLH-NON-INTERACTIVE INQUIRY ;4/16/97 15:21
Source file <MCORMN3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| WD | ; word-processing field
|
|
| LEVEL | ; handle data at this level
|
|
| WP2 | ; Note: We cannot be sure of the value of MCDIC.
|
|
| SPECS | ;Naked Reference for this paragraph reference to ^DD(FILE#,FIELD,0)
|
|
| Q | ||
| FIELD | ; process single field
|
|
| COLON | ; process set of fields delimited by colon
|
|
| SUBFIL | ; process data in a sub-file
|
|
| PROC | ;process a single datum
|
|
| SPEC | ;
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | COLON+2, FIELD+1, FIELD+3, PROC+3, SPECS+2, SPECS+3 |
| ^DIC - [#1] | MCORMN3+8 |
| Name | Line Occurrences |
|---|---|
| COLON | LEVEL+4 |
| FIELD | LEVEL+4, COLON+2 |
| LEVEL | SUBFIL+4 |
| PROC | FIELD+1, FIELD+4 |
| Q | MCORMN3+8, LEVEL+1 |
| SPEC | PROC+3 |
| SPECS | SPECS+2, SPECS+3 |
| SUBFIL | FIELD+3 |
| WD | FIELD+3 |
| WP2 | WD+2 |
| Name | Field # of Occurrence |
|---|---|
| ^( | LEVEL+1, WP2+2, SPECS+2, SPECS+3 |
| ^("GL" | MCORMN3+8 |
| ^(0 | LEVEL+1, FIELD+1, FIELD+3, SPECS+1, SPECS+2, SPECS+3 |
| ^(2 | SPEC+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> D0 | PROC+2* |
| >> D1 | PROC+2* |
| >> I | LEVEL+4* |
| MCATT | WD+1~, WD+3*, WD+4* |
| MCC | Q!, FIELD+1*, FIELD+2*, FIELD+4, FIELD+5*, PROC+3*, WP2+1, SUBFIL+3, SPEC+1, SPECS+1* , SPECS+2*, SPECS+3* |
| MCD0 | MCORMN3+3*, Q!, PROC+2 |
| >> MCD1 | PROC+2 |
| >> MCDA | MCORMN3+3, LEVEL+1, FIELD+4, FIELD+5, SUBFIL+2, SUBFIL+3*, SUBFIL+4* |
| >> MCDA( | SUBFIL+1, SUBFIL+2*, SUBFIL+3, SUBFIL+4, SUBFIL+5! |
| >> MCDA(0 | MCORMN3+3*, Q! |
| MCDI | LEVEL+1*, Q!, COLON+2, FIELD+1, PROC+3, SUBFIL+1~, SUBFIL+3* |
| >> MCDIC | MCORMN3+3, MCORMN3+8*, LEVEL+1, FIELD+4, FIELD+5, WP2+1, SUBFIL+2, SUBFIL+3*, SUBFIL+4* |
| >> MCDIC( | SUBFIL+2*, SUBFIL+4, SUBFIL+5! |
| MCDIL | MCORMN3+3*, Q!, SUBFIL+1*, SUBFIL+2, SUBFIL+3, SUBFIL+4, SUBFIL+5, SUBFIL+6* |
| >> MCDIQ | MCORMN3+6*, FIELD+6, PROC+5, WP2+2 |
| >> MCDIQ(0 | MCORMN3+5*, FIELD+6, PROC+1, PROC+4 |
| MCDIQ0 | MCORMN3+2~, MCORMN3+3*, MCORMN3+5*, MCORMN3+6*, MCORMN3+7*, Q |
| MCDIQ1 | LEVEL+4*, Q!, COLON+1, COLON+2*, FIELD+1, PROC+3, SUBFIL+1~ |
| >> MCDIQ2 | COLON+1*, COLON+2 |
| >> MCDR | MCORMN3+3, LEVEL+4, SUBFIL+2*, SUBFIL+4* |
| >> MCDR( | SUBFIL+1, SUBFIL+2 |
| MCDRS | Q! |
| MCDRS( | SUBFIL+2*, SUBFIL+4, SUBFIL+5! |
| MCE | MCORMN3+7*, Q!, PROC+5, WP2+2 |
| MCF | Q!, FIELD+1*, WD+3 |
| MCI | Q!, SUBFIL+1~ |
| MCJ | Q!, FIELD+1*, FIELD+3, PROC+2, PROC+3, SUBFIL+1, SUBFIL+2, SUBFIL+3 |
| MCPCT | Q!, SPECS+1* |
| MCWP | WD+1~*, WD+3, WP2+2* |
| MCX | Q!, FIELD+1*, FIELD+3, FIELD+5, PROC+2*, WD+2, WP2+1*, WP2+2 |
| MCY | Q!, FIELD+1*, FIELD+4*, FIELD+5*, FIELD+6, PROC+2!*, PROC+3, PROC+4, PROC+5, SPECS+1* , SPECS+2*, SPECS+3* |
| U | LEVEL+1, FIELD+1, FIELD+3, FIELD+5, PROC+2, PROC+3, WD+3, SPECS+1, SPECS+2, SPECS+3 |
| >> X | PROC+2* |
| Y | PROC+2*! |