ECV5RPC ;ALB/ACS - Event Capture Spreadsheet Data Validation ;12/2/22 16:11
Source file <ECV5RPC.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 |
Package | Total | Caller Graph |
---|---|---|
Event Capture | 2 | ECV4RPC ECV5RPC |
Name | Comments | DBIA/ICR reference |
---|---|---|
VALDIAG | ;Validate Diagnosis Code. Make sure it exists on the ICD file
|
|
FINDDX(PARAM) | ;
; Updates for ICD10 |
|
VALCLIN | ;Validate Associated Clinic. Make sure the clinic is active for
|
|
CLINERR | ;Clinic inactive for this encounter date
|
|
ERROR | ;--Set up array entry to contain the following:
|
|
DIAG1 | ;;Diagnosis code is required for this DSS Unit
|
|
ECDXV | ;;Invalid Diagnosis Code
|
|
ECSEC1V | ;;Secondary Dx 1 is invalid
|
|
ECSEC2V | ;;Secondary Dx 2 is invalid
|
|
ECSEC3V | ;;Secondary Dx 3 is invalid
|
|
ECSEC4V | ;;Secondary Dx 4 is invalid
|
|
CLIN1 | ;;Associated Clinic Name or IEN is required for this DSS Unit
|
|
CLIN2 | ;;Assoc Clinic "B" x-ref not found on Hosp Location File(#44)
|
|
CLIN3 | ;;Assoc Clinic not found on Hosp Location File(#44)
|
|
CLIN4 | ;;Assoc Clinic must be of type "C" (clinic)
|
|
CLIN5 | ;;Assoc Clinic inactive for this encounter date
|
|
CLIN6 | ;;Assoc Clinic IEN must be numeric
|
Name | Field # of Occurrence |
---|---|
^%DT | VALDIAG+2 |
^ECV5RPC | FINDDX+13 |
CLIN1^ECV5RPC | VALCLIN+5 |
CLIN2^ECV5RPC | VALCLIN+22 |
CLIN3^ECV5RPC | VALCLIN+15, VALCLIN+31 |
CLIN4^ECV5RPC | VALCLIN+42 |
CLIN5^ECV5RPC | CLINERR+1 |
CLIN6^ECV5RPC | VALCLIN+10 |
CLINERR^ECV5RPC | VALCLIN+54, VALCLIN+55 |
DIAG1^ECV5RPC | VALDIAG+4 |
$$ICDDX^ICDEX | FINDDX+4 |
$$SINFO^ICDEX | VALDIAG+10 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %DT | VALDIAG+2* |
CLINDATA | VALCLIN+39~, VALCLIN+40*, VALCLIN+41 |
DXIEN | VALDIAG+1~, FINDDX+3*, FINDDX+5*, FINDDX+6, FINDDX+7, FINDDX+8, FINDDX+9, FINDDX+10, FINDDX+11 |
DXPARAM | VALDIAG+1~, VALDIAG+11*, FINDDX+2, FINDDX+4 |
>> ECCLNIEN | VALCLIN+19*, VALCLIN+28*, VALCLIN+29, VALCLIN+40, VALCLIN+49, VALCLIN+52 |
>> ECCLNIPC | VALCLIN+11, VALCLIN+16 |
>> ECCLNIV | VALCLIN+3, VALCLIN+9, VALCLIN+14, VALCLIN+19, VALCLIN+20, VALCLIN+26 |
>> ECCLNNPC | VALCLIN+6, VALCLIN+23, VALCLIN+32, VALCLIN+43, CLINERR+2 |
>> ECCLNNV | VALCLIN+3, VALCLIN+20, VALCLIN+26, VALCLIN+28 |
>> ECCOLERR | VALDIAG+5*, FINDDX+14*, VALCLIN+6*, VALCLIN+11*, VALCLIN+16*, VALCLIN+23*, VALCLIN+32*, VALCLIN+43*, CLINERR+2*, ERROR+7 |
ECCS | VALDIAG+1~, VALDIAG+10*, FINDDX+4 |
ECDT | VALDIAG+1~, VALDIAG+2*, VALDIAG+10, FINDDX+4 |
>> ECDXIEN | FINDDX+7* |
>> ECDXPC | VALDIAG+5, FINDDX+14 |
>> ECDXV | VALDIAG+3 |
>> ECENCV | VALDIAG+2, VALCLIN+54, VALCLIN+55 |
>> ECERRFLG | VALCLIN+2*, VALCLIN+9, VALCLIN+14, VALCLIN+19, VALCLIN+20, VALCLIN+26, VALCLIN+37, VALCLIN+49, ERROR+8* |
>> ECERRMSG | VALDIAG+4*, FINDDX+13*, VALCLIN+5*, VALCLIN+10*, VALCLIN+15*, VALCLIN+22*, VALCLIN+31*, VALCLIN+42*, CLINERR+1*, ERROR+7 |
>> ECINDEX | ERROR+6*, ERROR+7 |
>> ECRECPC | ERROR+7 |
>> ECRECV | ERROR+7 |
>> ECSECDX1 | FINDDX+8* |
>> ECSECDX2 | FINDDX+9* |
>> ECSECDX3 | FINDDX+10* |
>> ECSECDX4 | FINDDX+11* |
INACT | VALCLIN+51~, VALCLIN+52*, VALCLIN+53, VALCLIN+54, VALCLIN+55 |
>> MYDXIEN | FINDDX+3*, FINDDX+4*, FINDDX+5 |
PARAM | FINDDX~, FINDDX+7, FINDDX+8, FINDDX+9, FINDDX+10, FINDDX+11 |
REACT | VALCLIN+51~, VALCLIN+52*, VALCLIN+54, VALCLIN+55 |
>> RESULTS( | ERROR+7* |
U | VALCLIN+41, VALCLIN+52 |
>> X | VALDIAG+2* |
>> Y | VALDIAG+2 |