ECXLBB1 ;ALB/JRC - DSS VBECS EXTRACT ;7/3/18 15:06
Source file <ECXLBB1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BEG | ;entry point from option
|
|
| START | ; Entry point from tasked job
; begin package specific extract |
|
| AUDRPT | ; entry point for pre-extract audit report
|
|
| GETDATA | ; gather rest of extract data that will be recorded in an
; entry in file 727.829 |
|
| PAT(ECXDFN) | ;get/set patient data
; INPUT - ECXDFN = patient ien (DFN) ; OUTPUT - ECPAT array: ; ECPAT("SSN") ; ECPAT("NAME") ; returns 0 or 1 in ECXERR - 0=successful ; 1=error condition |
|
| FILE(ECODE) | ;
; Input - ECODE = extract record |
|
| SETUP | ;Set required input for ECXTRAC.
|
|
| LOCAL | ; to extract nightly for local use not to be transmitted to TSI
; should be queued with a 1D frequency |
|
| CHKMOD(MD) | ;check if modifier is contained in string
|
|
| QUE | ; entry point for the background requeuing handled by ECXTAUTO
|
