DG53372A ;ALB/PDJ - Convert Eligibility codes ; 03/29/2001
Source file <DG53372A.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 3 | C^%DTC UPDATE^DIE ^DIK |
Kernel | 2 | $$DT^XLFDT ($$COMCP,$$NEWCP,$$PARCP,$$UPCP,$$VERCP,BMES)^XPDUTL |
Registration | 2 | MAIL^DG53372M $$UPD^DGENDBS |
Name | Comments | DBIA/ICR reference |
---|---|---|
PROCELG | ; Process PATIENT file
|
|
EN | ||
EN1 | ||
CLEANUP | ; Used to cleanup XTMP global for testing only
|
|
PROCENC | ; Process PATIENT ENCOUNTER file
|
|
PROCSELG | ; Process secondary eligibility codes
|
Name | Field # of Occurrence |
---|---|
C^%DTC | EN+54 |
MAIL^DG53372M | EN+17, EN1+12 |
$$UPD^DGENDBS | PROCENC+23, PROCELG+15 |
UPDATE^DIE | PROCSELG+24 |
^DIK | PROCSELG+30 |
$$DT^XLFDT | EN+55 |
$$COMCP^XPDUTL | EN1+13 |
$$NEWCP^XPDUTL | EN+48 |
$$PARCP^XPDUTL | EN1+1 |
$$UPCP^XPDUTL | EN1+10 |
$$VERCP^XPDUTL | EN+47, EN+69 |
BMES^XPDUTL | EN+12, EN+13, EN+14, EN+15, EN+16, EN+25, EN+26, EN+27, EN+28, EN+29 , EN+30, EN+31, EN+35, EN+36, EN+37, EN+38, EN+39, EN+40, EN+41, EN+42 , EN1+14 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(8 - [#8] | EN+4, EN+5, EN+23, EN+36 |
^DPT - [#2] | EN1+2, EN1+6, PROCELG+2, PROCSELG+3, PROCSELG+4, PROCSELG+17 |
^SCE - [#409.68] | PROCENC+10 |
^SCE("ADFN" | PROCENC+8, PROCENC+9 |
^XTMP( | EN+64*, EN+65*, EN+66*, EN+67*, EN+68*, PROCENC+16*, PROCENC+17*, PROCENC+24*, PROCELG+8*, PROCELG+9* , PROCELG+16*, PROCSELG+11*, PROCSELG+12*, PROCSELG+26*, CLEANUP+5!, CLEANUP+6!, CLEANUP+7! |
^XTMP("DG*5.3*372-" | EN+51, EN+57* |
Name | Line Occurrences |
---|---|
EN1 | EN+71 |
PROCELG | EN1+8 |
PROCENC | EN1+7 |
PROCSELG | EN1+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | EN~, EN+48*, EN+69*, EN+70*, EN+71, EN1+10*, EN1+13* |
CLNOK | EN~, EN+2*, EN+11* |
DA | PROCELG+1~, PROCSELG+1~, PROCSELG+28!, PROCSELG+29* |
DA(1 | PROCSELG+29* |
DATA | EN~, PROCENC+1~, PROCENC+23, PROCELG+1~, PROCELG+15, PROCSELG+1~, PROCSELG+18!, PROCSELG+28! |
DATA( | PROCENC+22*, PROCELG+14*, PROCSELG+20*, PROCSELG+21*, PROCSELG+22* |
DFN | EN~, EN1*, EN1+1*, EN1+2*, EN1+6, EN1+10, PROCENC+8, PROCENC+9, PROCENC+16, PROCENC+24 , PROCELG+2, PROCELG+8, PROCELG+15, PROCELG+16, PROCSELG+3, PROCSELG+4, PROCSELG+11, PROCSELG+17, PROCSELG+19, PROCSELG+26 , PROCSELG+29 |
DIK | PROCSELG+1~, PROCSELG+29* |
DT | EN+52 |
ELIGCD | PROCENC+1~, PROCENC+10*, PROCENC+11, PROCENC+12, PROCENC+16, PROCENC+21, PROCENC+22, PROCENC+24, PROCELG+1~, PROCELG+2* , PROCELG+3, PROCELG+4, PROCELG+8, PROCELG+13, PROCELG+14, PROCELG+16, PROCSELG+5*, PROCSELG+6, PROCSELG+7, PROCSELG+11 , PROCSELG+16, PROCSELG+17, PROCSELG+20, PROCSELG+23, PROCSELG+26, PROCSELG+29 |
ERRMSG | EN~, EN+44* |
ERROR | PROCENC+1~, PROCENC+23, PROCENC+24, PROCELG+1~, PROCELG+15, PROCELG+16, PROCSELG+18!, PROCSELG+25, PROCSELG+26 |
FDAIEN | PROCSELG+1~, PROCSELG+18! |
FDAIEN(1 | PROCSELG+23* |
FILERR | EN~, EN+44* |
I | EN~, EN+50*, EN+51, EN+56, EN+57 |
IEN | EN~, EN+21*, EN+22, EN+23, EN+24, EN+26, EN+33, EN+34, EN+36, EN+37 |
LFDATE | EN~ |
NAME | EN+1~, EN1+6*, PROCENC+16, PROCENC+24, PROCELG+8, PROCELG+16, PROCSELG+11, PROCSELG+26 |
NEWIEN | PROCSELG+1~, PROCSELG+18!, PROCSELG+19*, PROCSELG+20, PROCSELG+21, PROCSELG+22 |
NODE | PROCSELG+1~, PROCSELG+4*, PROCSELG+5, PROCSELG+21, PROCSELG+22 |
NSTD | EN~ |
NSTD( | EN+22*, EN+24*, EN+34*, PROCENC+12, PROCENC+21, PROCELG+4, PROCELG+13, PROCSELG+7, PROCSELG+16 |
SCEDT | PROCENC+1~, PROCENC+3*, PROCENC+8*, PROCENC+9, PROCENC+16, PROCENC+24 |
SCEIEN | PROCENC+1~, PROCENC+3*, PROCENC+9*, PROCENC+10, PROCENC+16, PROCENC+23, PROCENC+24 |
SIEN | PROCSELG+1~, PROCSELG+2*, PROCSELG+3*, PROCSELG+4, PROCSELG+11, PROCSELG+26 |
STDCDS | EN~ |
STDCDS( | EN+26, EN+33, PROCENC+22, PROCELG+14, PROCSELG+17, PROCSELG+20, PROCSELG+23 |
STDCDS(3 | EN+4*, EN+10 |
STDCDS(5 | EN+5*, EN+10 |
TEXT | EN~, EN+55*, EN+56*, EN+57 |
X | EN~, EN+55 |
X1 | EN~, EN+52* |
X2 | EN~, EN+53* |
>> XPDNM | EN+46, EN+63, EN+66, EN+67, EN+68, EN+69, EN1, EN1+1, EN1+10, EN1+13 |
XTENC | EN+1~, EN+60*, EN+65, EN+67, PROCENC+16, PROCENC+17, CLEANUP+2*, CLEANUP+6 |
XTERR | EN+1~, EN+61*, EN+68, PROCENC+24, PROCELG+16, PROCSELG+26, CLEANUP+3*, CLEANUP+7 |
XTPAT | EN+1~, EN+59*, EN+64, EN+66, PROCELG+8, PROCELG+9, PROCSELG+11, PROCSELG+12, CLEANUP+1*, CLEANUP+5 |