DGMSEUTL ;ALB/PJH,LBD,DJS,KUM,JAM - MSDS Utility Routine ;12 June 2018 5:36PM
Source file <DGMSEUTL.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MOVMSE(DFN) | ;Move MSE data from .32 node to .3216 multiple in Patient file #2
|
|
| ARRAY(DFN,ARRAY) | ;Get old format VistA data
|
|
| EPISODE(SUB,P1,P2) | ;Get old VistA data and save
|
|
| MSE(DFN,ARRAY,DEL) | ;Copy old VistA data to new .3216 multiple
|
|
| GETMSE(DFN,MSE) | ;Return all records in MSE sub-file #2.3216 in MSE array
|
|
| LAST(DFN) | ;Return last (most recent) MSE
|
|
| UPDMSE(DFN,DGNMSE) | ;File MSE data from the HEC Z11 message
|
|
| ESRDATA(DFN) | ;Check if any records in .3216 are from ESR
|
|
| WARNMSG(DFN) | ;Warning Message if some episodes did not copy
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | Classic Fileman Calls |
| ^DIC(26 - [#26] | FIND1^DIC |
