ECXLBB1 ;ALB/JRC - DSS VBECS EXTRACT ;7/3/18 15:06
Source file <ECXLBB1.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| 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
|
| Name | Field # of Occurrence |
|---|---|
| $$S^%ZTLOAD | START+12 |
| IX1^DIK | FILE+26 |
| ^ECXKILL | BEG+2, LOCAL+2, QUE+1 |
| QUE^ECXTAUTO | QUE+1 |
| ^ECXTLOCL | LOCAL+2 |
| ^ECXTRAC | BEG+2 |
| $$ECXDOB^ECXUTL | GETDATA+4 |
| $$ECXTIME^ECXUTL | GETDATA+4 |
| $$PATCAT^ECXUTL | GETDATA+19 |
| $$INP^ECXUTL2 | GETDATA+5 |
| ECXDEF^ECXUTL2 | SETUP+2 |
| $$PAT^ECXUTL3 | PAT+10 |
| $$ENCNUM^ECXUTL4 | GETDATA+10 |
| $$OBSPAT^ECXUTL4 | GETDATA+8 |
| $$GET^XUA4A72 | AUDRPT+18, AUDRPT+24 |
| $$NPI^XUSNPI | AUDRPT+20, AUDRPT+26 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ECX( | FILE+15, FILE+23*, FILE+24* |
| ^TMP("ECXLBB" | GETDATA+28* |
| ^TMP("ECXLBBC" | GETDATA+31, GETDATA+32* |
| ^VA(200 - [#200] | AUDRPT+16 |
| ^VBEC(6002.03 - [#6002.03] | AUDRPT+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | FILE+14~, FILE+26*! |
| DIK | FILE+14~, FILE+26*! |
| >> EC0 | AUDRPT+3*, AUDRPT+11, AUDRPT+12, AUDRPT+13, AUDRPT+15 |
| >> EC23 | GETDATA+22 |
| EC66 | START+3~ |
| EC7 | FILE+14~, FILE+15*, FILE+16, FILE+23, FILE+24, FILE+26 |
| ECADMT | START+2~, GETDATA+5*, GETDATA+10 |
| ECARRY | START+3~, AUDRPT+30! |
| ECARRY(1 | AUDRPT+12*, GETDATA+4, GETDATA+5, GETDATA+10 |
| ECARRY(10 | AUDRPT+15*, AUDRPT+25*, GETDATA+25 |
| ECARRY(11 | AUDRPT+13*, GETDATA+25 |
| ECARRY(12 | AUDRPT+13*, GETDATA+25 |
| ECARRY(13 | AUDRPT+13*, GETDATA+22, GETDATA+25 |
| ECARRY(3 | AUDRPT+12*, GETDATA+22 |
| ECARRY(4 | AUDRPT+12*, GETDATA+22, GETDATA+31, GETDATA+32 |
| ECARRY(5 | AUDRPT+12*, GETDATA+22 |
| ECARRY(6 | AUDRPT+12*, GETDATA+22 |
| ECARRY(7 | AUDRPT+12*, GETDATA+22 |
| ECARRY(8 | AUDRPT+12*, GETDATA+22 |
| ECARRY(9 | AUDRPT+13*, AUDRPT+23, AUDRPT+24, AUDRPT+26, AUDRPT+28*, GETDATA+25 |
| ECCOUNT | GETDATA+30~*, GETDATA+31*, GETDATA+32 |
| ECD | START+3~, AUDRPT+2*, AUDRPT+3*, AUDRPT+18, AUDRPT+20, AUDRPT+24, AUDRPT+26, GETDATA+28 |
| >> ECED | AUDRPT+2 |
| ECENCTR | START+2~, GETDATA+10*, GETDATA+11, GETDATA+22 |
| ECERR | START+3~, AUDRPT+11* |
| >> ECFILE | BEG+1, FILE+15, FILE+23, FILE+24, FILE+26, SETUP+2 |
| >> ECGRP | SETUP+2 |
| >> ECHEAD | GETDATA+10, SETUP+1*, SETUP+2 |
| ECINOUT | START+3~, GETDATA+5*, GETDATA+8, GETDATA+10, GETDATA+21*, GETDATA+22 |
| >> ECINST | AUDRPT+13*, GETDATA+22 |
| ECLRDFN | START+2~ |
| ECODE | FILE~, FILE+16*, FILE+18*, FILE+23 |
| >> ECODE1 | FILE+19*, FILE+20*, FILE+21*, FILE+23 |
| >> ECODE2 | FILE+22*, FILE+24 |
| >> ECODE3 | FILE+22*, FILE+24 |
| >> ECPACK | SETUP+2 |
| ECPAT | START+2~, PAT+10 |
| ECPAT("ERI" | GETDATA+13 |
| ECPAT("MPI" | GETDATA+15 |
| ECPAT("NAME" | GETDATA+22 |
| ECPAT("SIGI" | GETDATA+16, GETDATA+26 |
| ECPAT("SSN" | GETDATA+10, GETDATA+22 |
| ECPHYNPI | START+4~, AUDRPT+15*, AUDRPT+20*, AUDRPT+21*, FILE+18 |
| >> ECPIECE | SETUP+2 |
| ECREQNPI | START+4~, AUDRPT+15*, AUDRPT+26*, AUDRPT+27*, FILE+19 |
| >> ECRN | FILE+25* |
| >> ECRTN | SETUP+2 |
| >> ECSD | AUDRPT+2 |
| ECTODT | START+2~, AUDRPT+2*, AUDRPT+3 |
| ECTRFDT | START+3~, GETDATA+4*, GETDATA+22, GETDATA+31, GETDATA+32 |
| ECTRFTM | START+3~, GETDATA+4*, GETDATA+22, GETDATA+31, GETDATA+32 |
| ECTRSP | START+2~, GETDATA+5*, GETDATA+8, GETDATA+10 |
| >> ECVER | SETUP+2 |
| ECX | START+3~, GETDATA+5* |
| ECXASIH | GETDATA+2~, GETDATA+5*, GETDATA+21 |
| ECXCERN | GETDATA+3~, FILE+22 |
| >> ECXCFLG | GETDATA+31, GETDATA+32 |
| >> ECXCRPT | GETDATA+29 |
| ECXDFN | START+3~, AUDRPT+11*, GETDATA+5, GETDATA+19, GETDATA+22, GETDATA+28, GETDATA+31, GETDATA+32, PAT~, PAT+10 |
| >> ECXERI | GETDATA+13*, GETDATA+25 |
| ECXERR | PAT+7~, PAT+9*, PAT+11*, PAT+12 |
| ECXESC | START+4~, GETDATA+20*, FILE+21 |
| ECXINST | START+3~ |
| >> ECXLOGIC | GETDATA+23, GETDATA+24, GETDATA+26, FILE+17, FILE+20, FILE+21, FILE+22 |
| ECXNMPI | GETDATA+3~, GETDATA+15*, FILE+22 |
| >> ECXOBS | GETDATA+8*, GETDATA+10 |
| ECXPAT | PAT+10! |
| ECXPATCAT | START+4~, GETDATA+19*, FILE+20 |
| ECXPHY | START+2~, AUDRPT+15*, AUDRPT+16*, AUDRPT+17, AUDRPT+18, AUDRPT+20, AUDRPT+22*, GETDATA+23 |
| ECXPHYPC | START+2~, AUDRPT+15*, AUDRPT+19*, GETDATA+23 |
| >> ECXRPT | GETDATA+27 |
| ECXSIGI | GETDATA+3~, GETDATA+16*, FILE+22 |
| ECXSTR | GETDATA+2~, GETDATA+22*, GETDATA+23*, GETDATA+25*, GETDATA+26*, GETDATA+27, GETDATA+28, GETDATA+32 |
| MD | CHKMOD~, CHKMOD+2, CHKMOD+4 |
| >> MODARY( | CHKMOD+3, CHKMOD+4 |
| MODX | CHKMOD+1~, CHKMOD+3*, CHKMOD+4 |
| OK | PAT+7~, PAT+10*, PAT+11 |
| PERCLS | AUDRPT+18~*, AUDRPT+19, AUDRPT+24~*, AUDRPT+25 |
| >> QFLG | START+12* |
| RECORD | AUDRPT+1~, AUDRPT+2*, AUDRPT+3*, GETDATA+28 |
| RES | CHKMOD+1~, CHKMOD+3*, CHKMOD+4*, CHKMOD+5 |
| U | AUDRPT+11, AUDRPT+12, AUDRPT+13, AUDRPT+15, AUDRPT+19, AUDRPT+21, AUDRPT+25, AUDRPT+27, GETDATA+5, GETDATA+23 , GETDATA+25, FILE+18, FILE+20, FILE+21, FILE+22 |
| X | PAT+7~ |
| >> ZTQUEUED | START+12 |
