GMPLCLNP ;ISP/TC - Problem File Cleanup Routine ;01/14/16 13:41
Source file <GMPLCLNP.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Main entry point to task off SCT error scan & cleanup
|
|
| EN1 | ; Main entry point to task off incorrect mapping scan & cleanup
|
|
| SCANSCT | ; Scan Problem file for SCT in Diagnosis field errors
|
|
| CLNSCTE | ; Clean up erroneous PL entries in ^TMP("GMPLSCT")
|
|
| FILEMT(GMPDA,GMPICD,GMPDLM) | ; File the associating Mapping Target codes
|
|
| CLNAUD(GMPLDLM,GMPLDA,GMPLDIEN) | ; Cleanup audit history for Diagnosis field
|
|
| CNVTFMDT(GMPLINVD) | ; Convert an inverted date into FileMan format
|
|
| SCANVCDE | ; Scan Problem file for incorrect mapping (SCT 428283002, ICD-9 V15.89)
|
|
| CLNVCDE | ; Clean up erroneous PL entries in ^TMP("GMPLVCDE")
|
| FileNo | Call Tags |
|---|---|
| ^AUPNPROB - [#9000011] | GET1^DIQ |
