MCARUTL2 ;HOIFO/WAA-Utility Routine #2;11/29/00 09:55
Source file <MCARUTL2.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PATSUB(ARRAY,DFN) | ; Find all Subs for a patient | |
| VALDT(DFN,FN,SUB) | ; Validate that there is a report for that patient | |
| PATLK() | ; Lookup patient in medicine file. | |
| SUB(ARRAY,DFN,SUB,FROM,TO) | ; Set a Screen for certain Speciality | 
| FileNo | Call Tags | 
|---|---|
| ^DPT - [#2] | GET1^DIQ | 
| ^MCAR(690 - [#690] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^MCAR( | SUB+22, SUB+24, SUB+37, SUB+39, PATSUB+16, VALDT+3, VALDT+6 | 
| ^MCAR(690 - [#690] | SUB+7, PATSUB+6 | 
| ^MCAR(697.2 - [#697.2] | SUB+12, SUB+15, PATSUB+8, PATSUB+11 | 
| Name | Line Occurrences | 
|---|---|
| $$VALDT | PATSUB+17 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| % | SUB+1~, SUB+9, PATLK+1~ | 
| %H | SUB+2~ | 
| %I | SUB+2~, PATLK+1~ | 
| ANS | VALDT+1~, VALDT+2*, VALDT+11*, VALDT+13 | 
| ARRAY | SUB~, SUB+3!, SUB+51*, PATSUB~, PATSUB+2!, PATSUB+21*, PATSUB+23* | 
| ARRAY( | SUB+6*, SUB+7*, SUB+10*, SUB+13*, SUB+16*, SUB+35*, SUB+41*, SUB+44*, SUB+45*, SUB+47* , PATSUB+5*, PATSUB+6*, PATSUB+19*, PATSUB+22* | 
| ARRAY(0 | SUB+49*, PATSUB+23* | 
| CNT | SUB+1~, SUB+4*, SUB+6, SUB+7, SUB+10, SUB+13, SUB+16, SUB+34*, SUB+35, SUB+41 , SUB+44, SUB+45, SUB+47, SUB+49, SUB+51, PATSUB+1~, PATSUB+3*, PATSUB+5, PATSUB+6, PATSUB+18* , PATSUB+19, PATSUB+21, PATSUB+22, PATSUB+23 | 
| CNT2 | SUB+37~*, SUB+40*, SUB+41 | 
| DFN | SUB~, SUB+5, SUB+7, SUB+22, PATSUB~, PATSUB+4, PATSUB+6, PATSUB+16, PATSUB+17, VALDT~ , VALDT+3 | 
| DGMT | PATLK+1~ | 
| DGMTE | PATLK+1~ | 
| DGNOCOPF | PATLK+1~ | 
| DGWRT | PATLK+1~ | 
| DIC | PATLK+1~, PATLK+2* | 
| DIC(0 | PATLK+2* | 
| DILN | PATLK+1~ | 
| DISYS | SUB+2~, PATLK+1~, PATSUB+1~ | 
| DST | PATLK+1~ | 
| FILE | SUB+1~, SUB+18*, SUB+19, SUB+35, PATSUB+1~, PATSUB+13*, PATSUB+14 | 
| FLG | SUB+1~, PATSUB+1~ | 
| FN | SUB+1~, SUB+19*, SUB+22, SUB+24, SUB+27, SUB+28, SUB+37, SUB+39, PATSUB+1~, PATSUB+14* , PATSUB+16, PATSUB+17, VALDT~, VALDT+3, VALDT+6, VALDT+9, VALDT+10 | 
| FNAME | SUB+1~, SUB+20*, SUB+35, SUB+47, SUB+49, PATSUB+1~, PATSUB+15*, PATSUB+19 | 
| FROM | SUB~, SUB+8*, SUB+31 | 
| I | SUB+1~, PATLK+1~ | 
| IEN | SUB+1~, SUB+21*, SUB+22*, SUB+24, SUB+35, SUB+37, SUB+39, PATSUB+1~, PATSUB+10~, VALDT+1~ , VALDT+2*, VALDT+3*, VALDT+6 | 
| IEN2005 | SUB+38~, SUB+39*, SUB+41 | 
| IMAGE | SUB+37~*, SUB+39, PATSUB+1~ | 
| LIN | SUB+23~, SUB+24*, SUB+25, SUB+27, SUB+28, SUB+30, VALDT+5~, VALDT+6*, VALDT+7, VALDT+9 , VALDT+10 | 
| LN | PATSUB+10~, PATSUB+11*, PATSUB+12, PATSUB+13, PATSUB+15 | 
| PATNAM | SUB+1~, SUB+4*, SUB+5*, SUB+6, SUB+7, SUB+35, SUB+47, SUB+49, PATSUB+1~, PATSUB+3* , PATSUB+4*, PATSUB+5, PATSUB+6, PATSUB+22, PATSUB+23 | 
| PCNT | PATSUB+10~, PATSUB+17*, PATSUB+19 | 
| PDATE | SUB+1~, SUB+30*, SUB+31, SUB+32, SUB+33, PATSUB+1~ | 
| PEDATE | SUB+1~, SUB+33*, SUB+35, PATSUB+1~ | 
| SPEC | SUB+1~, SUB+15*, SUB+16, SUB+18, SUB+20, PATSUB+1~ | 
| SUB | SUB~, SUB+10, SUB+11, SUB+12*, SUB+13, SUB+15, SUB+27, SUB+28, PATSUB+1~, PATSUB+7* , PATSUB+8*, PATSUB+11, PATSUB+17, PATSUB+19, VALDT~, VALDT+9, VALDT+10 | 
| SUBTXT | SUB+1~, SUB+11*, SUB+13, SUB+16, PATSUB+1~ | 
| TO | SUB~, SUB+9*, SUB+32 | 
| U | SUB+18, SUB+20, SUB+27, SUB+28, SUB+30, SUB+35, SUB+37, SUB+39, SUB+44, SUB+45 , PATSUB+13, PATSUB+15, PATSUB+19, VALDT+9, VALDT+10 | 
| X | SUB+1~, PATLK+1~ | 
| Y | PATLK+1~, PATLK+4 |