©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
MCORMN1 ;WISC/DCB-BUILD INTERMEDIATE DATA SET ;4/16/97 15:21
Source file <MCORMN1.m>
| Package | Total | Call Graph |
|---|---|---|
| Medicine | 2 | ^MCORMN2 ^MCORMN3 |
| VA Fileman | 1 | $$GET1^DID |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MULTI | ; Get the Sub-file data
|
|
| SETNODE | ;
|
|
| HITIT | ; Get the data that are out there FROM MULTI.
|
|
| MEDID(MCGFILE,MCENT,PATID,MCPATFLD) | ;
|
|
| GETDATA(MCPROC,MCENT,MCDEST,MCFILE,TYPE) | ;function to get data defined by data set MCDSNAM
|
|
| SORTFLDS | ; sort out the single and multiple fields
|
|
| TTT | ||
| SUBFLD | ; Build the fields
|
|
| MULTIF | ; Get the fields they need
|
|
| GETITEM | ; subroutine to get data defined in data set index MCDSIX for file entry MCENT
|
|
| SORT1 | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | SORT1+4, MULTIF+7, SUBFLD+3 |
| ^DIC - [#1] | TTT |
| ^MCAR( | MULTIF+13, MEDID+7 |
| ^MCAR(690.2 - [#690.2] | GETDATA+10, GETDATA+11, GETDATA+12, GETDATA+14, SORTFLDS+3, SORT1+1, SORT1+2, MULTI+2, MULTIF+1, MULTIF+2 , MULTIF+3, MULTIF+6, SUBFLD+1, SUBFLD+2 |
| ^MCAR(697.2 - [#697.2] | GETDATA+9 |
| Name | Line Occurrences |
|---|---|
| $$MEDID | TTT+1 |
| GETITEM | TTT+2 |
| HITIT | MULTIF+13 |
| MULTI | GETITEM+2 |
| MULTIF | MULTI+2 |
| SETNODE | SUBFLD+5 |
| SORT1 | SORTFLDS+3 |
| SORTFLDS | GETITEM+1 |
| SUBFLD | MULTIF+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| FILE | MEDID+1~ |
| IEN | MEDID+1~, MEDID+2*, MEDID+4, MEDID+7 |
| MCA | GETDATA+1~, MULTIF+11*, MULTIF+13 |
| MCB | GETDATA+1~, MULTIF+11* |
| >> MCD1 | SUBFLD+2* |
| MCDA | GETDATA+1~, SORTFLDS+5* |
| MCDA( | HITIT+1* |
| MCDD | GETDATA+4~, SUBFLD+3*, SETNODE+1 |
| MCDEST | GETDATA~, GETDATA+7*, SORTFLDS+6, SORTFLDS+7, SORT1+7, SORT1+8, SETNODE+2, SETNODE+3 |
| MCDIC | GETDATA+1~, SORTFLDS+5* |
| MCDIQ | GETDATA+1~, SORTFLDS+6*, SORTFLDS+7* |
| MCDIQ(0 | SORTFLDS+5*, MULTIF+11*, MULTIF+12* |
| MCDR | GETDATA+1~, MULTIF+7*, MULTIF+8, MULTIF+10 |
| MCDR( | MULTIF+5*, SUBFLD+4* |
| MCDRDR | GETDATA+1~, SORTFLDS+2!*, SORT1+6*, MULTI+1! |
| MCDRDR( | SORT1+6* |
| MCDRDR(1 | MULTIF+8* |
| MCDSIX | GETDATA+1~, GETDATA+2~, GETDATA+8~, GETDATA+9*, GETDATA+10, GETDATA+12*, GETDATA+13, GETDATA+14, SORTFLDS+3, SORT1+1 , SORT1+2, MULTI+2, MULTIF+1, MULTIF+2, MULTIF+3, MULTIF+6, SUBFLD+1, SUBFLD+2 |
| MCDSIX1 | GETDATA+5~, GETDATA+9*, GETDATA+10*, GETDATA+11, GETDATA+12 |
| MCDSOK | GETDATA+8~ |
| MCDSR | GETDATA+2~, GETDATA+14* |
| MCENT | GETDATA~, TTT+1, SORTFLDS+5, MULTIF+13, MEDID~, MEDID+7 |
| MCERR | GETDATA+2~ |
| MCFIL | GETDATA+2~, GETDATA+4~ |
| MCFILE | GETDATA~, MULTIF+7, MULTIF+11 |
| MCFLD | GETDATA+5~, SORTFLDS+2*, SORTFLDS+3*, SORT1+1, SORT1+6 |
| MCFLDIX | GETDATA+4~, SORT1+1*, SORT1+2 |
| MCFLDNO | GETDATA+4~, SORT1+3*, SORT1+4, SORT1+7, SORT1+8 |
| MCFLDREC | GETDATA+4~, SORT1+2*, SORT1+3, SORT1+8 |
| MCFLDUSE | GETDATA+4~, SORT1+3*, SORT1+7 |
| MCFTMP | GETDATA+2~, MULTIF+11* |
| MCGFILE | GETDATA+5~, GETDATA+14*, TTT, TTT+1, SORTFLDS+5, SORT1+4, SORT1+7, SORT1+8, MULTIF+10, MULTIF+13 , MEDID~, MEDID+4, MEDID+7 |
| MCGPROC | GETDATA+5~, GETDATA+9*, GETDATA+10 |
| MCL2 | GETDATA+2~ |
| MCL3 | GETDATA+2~ |
| MCMM | GETDATA+2~ |
| MCMU | GETDATA+2~ |
| MCPATFLD | GETDATA+5~, GETDATA+9*, TTT+1, MEDID~, MEDID+2 |
| MCPROC | GETDATA~, GETDATA+9 |
| MCREC | GETDATA+5~, MULTIF+1*, MULTIF+2, MULTIF+3, MULTIF+6, SUBFLD+1, SUBFLD+2 |
| MCROOT | GETDATA+1~, GETDATA+3~, TTT* |
| MCSBFILE | GETDATA+5~, MULTI+1*, MULTI+2*, MULTIF+1, MULTIF+5, SUBFLD+3, SUBFLD+4, SETNODE+2, SETNODE+3 |
| MCSF | GETDATA+3~ |
| MCSFIND | GETDATA+3~, MULTIF+12*, MULTIF+13*, HITIT+1 |
| MCSFLD | GETDATA+3~, MULTIF+3*, MULTIF+6*, SUBFLD+1, SUBFLD+3, SUBFLD+4, SETNODE+2, SETNODE+3 |
| MCSFREC | GETDATA+3~, MULTIF+4! |
| MCSREC | GETDATA+5~, SUBFLD+1*, SUBFLD+2 |
| MCSUBFA | GETDATA+3~, MULTIF+4! |
| MCSUBFNU | GETDATA+4~, MULTIF+3*, MULTIF+7, HITIT+1 |
| MCTEMP | GETDATA+1~ |
| MCTMP | GETDATA+3~, SORT1+4*, SORT1+7, MULTIF+10*, MULTIF+11, SUBFLD+2*, SETNODE+1, SETNODE+3 |
| MCTMP1 | GETDATA+3~ |
| MCTYPE | GETDATA+5~, GETDATA+6*, GETDATA+12 |
| NODE | MEDID+1~, MEDID+4*, MEDID+7 |
| PATID | TTT+1, MEDID~, MEDID+7 |
| PIECE | MEDID+1~, MEDID+4*, MEDID+7 |
| >> TEMP | SETNODE+1*, SETNODE+2 |
| TYPE | GETDATA~, GETDATA+6 |
| U | GETDATA+9, GETDATA+12, GETDATA+14, SORT1+7, SORT1+8, SETNODE+1, SETNODE+3, MEDID+7 |