©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
MCORMN2 ;WISC/MLH-NON-INTERACTIVE INQUIRY ;3/18/97 13:02
Source file <MCORMN2.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] | MCORMN2+9 |
| Name | Line Occurrences |
|---|---|
| COLON | LEVEL+6 |
| FIELD | LEVEL+6, COLON+2 |
| LEVEL | SUBFIL+4 |
| PROC | FIELD+1, FIELD+4 |
| Q | MCORMN2+9, 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" | MCORMN2+9 |
| ^(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+5*, LEVEL+6* |
| 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 | MCORMN2+4*, Q!, PROC+2 |
| >> MCD1 | PROC+2 |
| >> MCDA | MCORMN2+4, 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 | MCORMN2+4*, Q! |
| MCDI | LEVEL+1*, Q!, COLON+2, FIELD+1, PROC+3, SUBFIL+1~, SUBFIL+3* |
| >> MCDIC | MCORMN2+4, MCORMN2+9*, LEVEL+1, FIELD+4, FIELD+5, WP2+1, SUBFIL+2, SUBFIL+3*, SUBFIL+4* |
| >> MCDIC( | SUBFIL+2*, SUBFIL+4, SUBFIL+5! |
| MCDIL | MCORMN2+4*, Q!, SUBFIL+1*, SUBFIL+2, SUBFIL+3, SUBFIL+4, SUBFIL+5, SUBFIL+6* |
| >> MCDIQ | MCORMN2+7*, FIELD+6, PROC+5, WP2+2 |
| >> MCDIQ(0 | MCORMN2+6*, FIELD+6, PROC+1, PROC+4 |
| MCDIQ0 | MCORMN2+2~, MCORMN2+4*, MCORMN2+6*, MCORMN2+7*, MCORMN2+8*, Q |
| MCDIQ1 | LEVEL+6*, Q!, COLON+1, COLON+2*, FIELD+1, PROC+3, SUBFIL+1~ |
| >> MCDIQ2 | COLON+1*, COLON+2 |
| >> MCDR | SUBFIL+2*, SUBFIL+4* |
| >> MCDR( | SUBFIL+1, SUBFIL+2 |
| >> MCDRDR | LEVEL+5*, LEVEL+6* |
| >> MCDRDR( | LEVEL+6 |
| >> MCDRDR(0 | MCORMN2+4 |
| MCDRS | Q! |
| MCDRS( | SUBFIL+2*, SUBFIL+4, SUBFIL+5! |
| MCE | MCORMN2+8*, 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*! |