MC44PST0 ;ALB/JAM - MEDICAL DIAGNOSES UPDATE WITH ICD10 CODES ;3/26/12 15:45
Source file <MC44PST0.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN | ;Patch entry point
 | 
|
| RPT | ;Queue entry point for Medical Diagnosis ICD10 update 
 | 
|
| DEL | ;Remove ICD-10 codes that are no longer valid, if patch was installed before
 | 
|
| ADDX | ;* add ICD10 diagnosis code
 | 
|
| FILICD | ;File ICD10 codes in File 697.5
 | 
|
| ERRSET(ERRMSG) | ; set string with error
 | 
|
| LINE(TEXT) | ; Add line to message global
 | 
|
| ; Send message
 | 
||
| CODES | ;
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^MCAR(697.5 - [#697.5] | FIND1^DIC |