QACI2B ; OAKOIFO/TKW - DATA MIGRATION - BUILD SUPPORTING TABLE DATA ;4/10/06 12:06
Source file <QACI2B.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 |
---|---|---|
PTDATA(STATION,DFN,QACI0,PATSERR,PATSCNT) | ; Put patient data into ^XTMP global for migration
|
|
ELIGCAT(ELIGSTAT,CATEGORY,ROC0) | ; Get Patient Eligibility Status and Category from ROC
|
|
USERDATA(STATION,IEN,USERTYPE,QACI0,PATSERR,PATSCNT) | ; Load pats_user data for migration
|
|
CONVDATE(OLDDATE) | ; Convert data to MM/DD/YYYY format
|
|
NAMERR | ;
|
Name | Field # of Occurrence |
---|---|
GETS^DIQ | USERDATA+12 |
$$GETICN^MPIF001 | PTDATA+11 |
ERROC^QACI2A | ELIGCAT+2, ELIGCAT+5 |
$$TXTERR^QACI2C | PTDATA+23, PTDATA+24, PTDATA+25, PTDATA+26, PTDATA+46, PTDATA+54, ELIGCAT+2, ELIGCAT+5, USERDATA+17, USERDATA+18 , USERDATA+29, USERDATA+30, USERDATA+31, USERDATA+32 |
ERREF^QACI2C | PTDATA+12, PTDATA+27, PTDATA+32, PTDATA+34, PTDATA+36, PTDATA+45, PTDATA+47, PTDATA+53, PTDATA+55, PTDATA+58 , PTDATA+61, PTDATA+66, PTDATA+69, USERDATA+14, USERDATA+17, USERDATA+18, NAMERR+3 |
$$GETENRL^QACVDEM | PTDATA+16 |
RACETH^QACVDEM | PTDATA+72 |
DEM^VADPT | PTDATA+8 |
ELIG^VADPT | PTDATA+42 |
$$FMTE^XLFDT | CONVDATE+5 |
$$HLNAME^XLFNAME | PTDATA+19, USERDATA+24 |
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GETS^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DG(408.32 - [#408.32] | PTDATA+65 |
^DIC(3.1 - [#3.1] | USERDATA+13 |
^DPT - [#2] | PTDATA+65 |
^VA(200 - [#200] | USERDATA+8, USERDATA+13 |
^XTMP("QACMIGR" | PTDATA+2, PTDATA+3, PTDATA+4, PTDATA+82*, PTDATA+83*, USERDATA+3, USERDATA+4, USERDATA+5, USERDATA+38* |
Name | Line Occurrences |
---|---|
$$CONVDATE | PTDATA+33 |
NAMERR | USERDATA+35 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CATEGORY | ELIGCAT~, ELIGCAT+4*, ELIGCAT+5 |
DD | CONVDATE+1~*, CONVDATE+3*, CONVDATE+4 |
DFN | PTDATA~, PTDATA+2, PTDATA+3, PTDATA+4, PTDATA+11, PTDATA+12, PTDATA+14, PTDATA+16, PTDATA+18, PTDATA+27 , PTDATA+32, PTDATA+34, PTDATA+36, PTDATA+45, PTDATA+47, PTDATA+53, PTDATA+55, PTDATA+58, PTDATA+61, PTDATA+65 , PTDATA+66, PTDATA+69, PTDATA+82, PTDATA+83 |
DOB | PTDATA+5~, PTDATA+33*, PTDATA+37 |
DSPNAME | PTDATA+5~, PTDATA+9*, PTDATA+12, PTDATA+27, PTDATA+32, PTDATA+34, PTDATA+36, PTDATA+45, PTDATA+47, PTDATA+53 , PTDATA+55, PTDATA+58, PTDATA+61, PTDATA+66, PTDATA+69, USERDATA+6~, USERDATA+8*, USERDATA+9*, USERDATA+14, USERDATA+17 , USERDATA+18, NAMERR+2 |
ELIGSTAT | ELIGCAT~, ELIGCAT+1*, ELIGCAT+2 |
EMPDATA | USERDATA+6~, USERDATA+7*, USERDATA+21*, USERDATA+33*, USERDATA+37*, USERDATA+38 |
EMPDATA(200 | USERDATA+15, USERDATA+16 |
ETH | PTDATA+5~, PTDATA+72, PTDATA+73 |
GENDER | PTDATA+5~, PTDATA+31*, PTDATA+37 |
I | PTDATA+5~, PTDATA+26*, PTDATA+75*, PTDATA+77 |
IEN | USERDATA~, USERDATA+3, USERDATA+4, USERDATA+5, USERDATA+7, USERDATA+8, USERDATA+13, USERDATA+14, USERDATA+17, USERDATA+18 , USERDATA+21, USERDATA+38, NAMERR+3 |
IENS | USERDATA+6~, USERDATA+7*, USERDATA+12, USERDATA+15, USERDATA+16, USERDATA+23 |
MAILCODE | USERDATA+6~, USERDATA+16*, USERDATA+18, USERDATA+37 |
MM | CONVDATE+1~*, CONVDATE+2*, CONVDATE+4 |
NAMECOMP | USERDATA+6~, USERDATA+24*, USERDATA+27 |
NAMECOMP("FIELD" | USERDATA+23* |
NAMECOMP("FILE" | USERDATA+23* |
NAMECOMP("IENS" | USERDATA+23* |
NAMEJ | USERDATA+6~, USERDATA+26*, USERDATA+27, USERDATA+29, USERDATA+30, USERDATA+31, USERDATA+32, USERDATA+33 |
NMERR | PTDATA+21~*, PTDATA+22*, PTDATA+23*, PTDATA+24*, PTDATA+25*, PTDATA+26*, PTDATA+27, USERDATA+6~, USERDATA+25*, USERDATA+28* , USERDATA+29*, USERDATA+30*, USERDATA+31*, USERDATA+32*, USERDATA+35 |
OLDDATE | CONVDATE~, CONVDATE+1, CONVDATE+4*, CONVDATE+5 |
>> OLDROC | ELIGCAT+2, ELIGCAT+5 |
PATSCNT | PTDATA~, USERDATA~ |
PATSCNT( | USERDATA+39* |
PATSCNT("PT" | PTDATA+84* |
PATSDAT2 | PTDATA+5~, PTDATA+6*, PTDATA+56*, PTDATA+59*, PTDATA+63*, PTDATA+70*, PTDATA+73*, PTDATA+77*, PTDATA+83 |
PATSDATA | PTDATA+5~, PTDATA+6*, PTDATA+14*, PTDATA+29*, PTDATA+37*, PTDATA+38*, PTDATA+48*, PTDATA+82 |
PATSENRL | PTDATA+5~, PTDATA+16*, PTDATA+48 |
PATSERR | PTDATA~, PTDATA+1*, PTDATA+4*, PTDATA+12*, PTDATA+27*, PTDATA+32*, PTDATA+34*, PTDATA+36*, PTDATA+45*, PTDATA+47* , PTDATA+53*, PTDATA+55*, PTDATA+58*, PTDATA+61*, PTDATA+66*, PTDATA+69*, PTDATA+80, USERDATA~, USERDATA+1*, USERDATA+5* , USERDATA+14*, USERDATA+17*, USERDATA+18*, USERDATA+36, NAMERR+3* |
PATX | PTDATA+5~, PTDATA+38* |
PTICN | PTDATA+5~, PTDATA+11*, PTDATA+12, PTDATA+14 |
PTNAME | PTDATA+5~, PTDATA+19*, PTDATA+22, PTDATA+23, PTDATA+24, PTDATA+25, PTDATA+26, PTDATA+29 |
PTNAME("FIELD" | PTDATA+18* |
PTNAME("FILE" | PTDATA+18* |
PTNAME("IENS" | PTDATA+18* |
QACI0 | PTDATA~, PTDATA+14, PTDATA+29, PTDATA+37, PTDATA+38, PTDATA+48, PTDATA+56, PTDATA+59, PTDATA+63, PTDATA+70 , USERDATA~, USERDATA+21, USERDATA+33, USERDATA+37 |
RACE | PTDATA+5~, PTDATA+72 |
RACE( | PTDATA+75, PTDATA+77 |
ROC0 | ELIGCAT~, ELIGCAT+1, ELIGCAT+4 |
STATION | PTDATA~, PTDATA+14, USERDATA~, USERDATA+21 |
TITLE | USERDATA+6~, USERDATA+15*, USERDATA+17, USERDATA+37 |
USERTYPE | USERDATA~, USERDATA+2, USERDATA+11, USERDATA+37 |
UTYPE | USERDATA+2~*, USERDATA+3, USERDATA+4, USERDATA+5, USERDATA+38, USERDATA+39, NAMERR+3 |
VADM | PTDATA+5~, PTDATA+72 |
VADM(1 | PTDATA+9 |
VADM(2 | PTDATA+35, PTDATA+38 |
VADM(3 | PTDATA+33 |
VADM(5 | PTDATA+31 |
VAEL | PTDATA+5~ |
VAEL(1 | PTDATA+43, PTDATA+44 |
VAEL(2 | PTDATA+51, PTDATA+52 |
VAEL(3 | PTDATA+57, PTDATA+60 |
VAEL(9 | PTDATA+67 |
VAN | PTDATA+5~ |
VAV | PTDATA+5~ |
VAX | PTDATA+5~ |
X | PTDATA+5~, PTDATA+23*, PTDATA+24*, PTDATA+25*, PTDATA+35*, PTDATA+37, PTDATA+43*, PTDATA+44, PTDATA+46, PTDATA+48 , PTDATA+51*, PTDATA+52, PTDATA+54, PTDATA+56, PTDATA+57*, PTDATA+59, PTDATA+60*, PTDATA+61, PTDATA+63, PTDATA+65* , PTDATA+67*, PTDATA+68, PTDATA+70, PTDATA+74*, PTDATA+76*, PTDATA+77, USERDATA+13*, USERDATA+27*, USERDATA+28, USERDATA+29 , USERDATA+30, USERDATA+31, USERDATA+32, USERDATA+33, NAMERR+1~*, NAMERR+2*, NAMERR+3 |
Y | PTDATA+5~ |