ECXLABN ;ALB/JAP,BIR/CML-Lab Extract for DSS (New Format - With LMIP Codes) ;6/4/19 14:40
Source file <ECXLABN.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BEG | ;entry point
|
|
| START | ; entry when queued
|
|
| GET | ;get data
|
|
| PAT(ECXDFN,ECXDATE,ECXERR) | ;get/set patient data
|
|
| FILE | ;file record
|
|
| SETUP | ;Set required input for ECXTRAC
|
|
| QUE | ; entry point for the background requeuing handled by ECXTAUTO
|
|
| GETCPT(CPT,ECWKLD) | ;170 Section added to get CPT codes associated with workload code
|
| FileNo | Call Tags |
|---|---|
| ^LAM - [#64] | GETS^DIQ |
| ^LRO(64.03 - [#64.03] | FIELD^DID |
