source: FOIAVistA/trunk/r/PATIENT_DATA_EXCHANGE-VAQ/VAQDBII1.m@ 1540

VAQDBII1 ;ALB/JRP - DATA EXTRACTED BY PDX;22-MAR-93 [ 12/09/96  4:16 PM ]
 ;;1.5;PATIENT DATA EXCHANGE;**13,24,40**;NOV 17, 1993
 ;
 ;----------
 ;THIS ROUTINE ONLY HOLDS REFERENCES TO DATA THAT PDX EXTRACTS ITSELF
 ;
 ;;FILE;FIELD,FIELD,...,FIELD;MULTIPLE LIMIT;REVERSE MULTIPLE ORDER
 ;----------
 ;
MIN ;MINIMUM PATIENT INFORMATION
 ;;2;.01,.02,.03,.05,.08,.09,.111,.112,.113,.114,.115
 ;;2;.1112,.117,.131,.301,.302,.323,.361,391,1901
 ;;2;.12105,.1211,.12111,.12112,.1212,.1213,.1214,.1215,.1217
 ;;2;.1218,.1219
 ;;
 ;----------
MAS ;MAS (REGISTRATION) INFORMATION
 ;;2;.01,.02,.03,.05,.07,.08,.09,.091,.092,.093
 ;;2;.111,.112,.113,.114,.115,.117,.1211,.1212,.1213
 ;;2;.1214,.1215,.1217,.1218,.1219,.131,.132,.152,.153
 ;;2;.1651,.1653,.1654,.1656,.1657,.1658,.1659,.211,.212,.213
 ;;2;.214,.215,.216,.217,.219,.2191,.2192,.2193,.2194
 ;;2;.2195,.2196,.2197,.2199,.2401,.2402,.2403,.251,.252
 ;;2;.253,.254,.255,.256,.258,.301,.302,.3025,.303
 ;;2;.306,.307,.3111,.31115,.3112,.3113,.3114,.3115,.3116,.3117
 ;;2;.3119,.312,.313,.32101,.32102,.32103,.32104,.32105
 ;;2;.32107,.32109,.3211,.32111,.3212,.322,.323,.324,.325,.326
 ;;2;.327,.328,.3285,.329,.3291,.3292,.3293,.3294,.32945,.3295,.3296,.3297
 ;;2;.3298,.3299,.331,.3311,.3312,.3313,.3314,.3315,.3316,.3317
 ;;2;.3319,.332,.333,.334,.335,.336,.337,.339
 ;;2;.341,.342,.343,.344,.345,.346,.347,.349,.361
 ;;2;.3611,.3612,.3614,.3615,.3616,.362,.36205,.3621,.36215,.3622
 ;;2;.36225,.3623,.36235,.3624,.3625,.36255,.3626,.36265,.3627,.36275
 ;;2;.3628,.36285,.3629,.368,.369,.525,.526,.527,.528,.5291
 ;;2;.5292,.5293,.5294,57.4,391,1010.15,1010.151,1010.152,1010.153
 ;;2;.21011,.211011,.381,.3221,.3222,.3223,.3224,.3225,.3226
 ;;2;.3227,.3228,.3229,.32201,.322011,.322012,.322013,.322014,.322015
 ;;2;.322016,.322017,.322018,.304,.305,.3012,.293,.292,.291,.36205
 ;;2;.36215,.36235,.3025,.36295,.36265,.3626,.31011,.311011,.34011
 ;;2;.2514,.2515,1010.154,1901,.33011,.331011
 ;;2;.1112,.12105,.12111,.12112,.382,.314,.2201,.2202,.2203,.2204
 ;;2;.2205,.2206,.2207,.290012,.29013
 ;;2;.322019,.32202,.322021,.531,.532,.533
 ;;2.04;.01,2,3
 ;;2.001;.01
 ;;2.16;.01
 ;;2.01;.01,1
 ;;2.05;.01,.02
 ;;2.101;.01,2,3,20,23;5
 ;;
 ;----------
ELIG ;OTHER ELIGIBILITIES
 ;;2.0361;.01
 ;;
 ;----------
DENTAL ;DENTAL TREATMENTS (NOT STORED IN SPECIFIC ORDER) (TAKE 5 MOST RECENT)
 ;;2.11;.01,2,3
 ;;
 ;----------
APPOINT ;APPOINTMENTS (.001 FIELD IS ID FOR .01 FIELD) (TAKE 5 MOST RECENT)
 ;;2.98;.01,3,9,9.5
 ;;
 ;----------
INSURE ;INSURANCE INFORMATION (FILE 36 MAKES THIS DIFF.) (ALL NON-EXPIRED)
 ;;2.312;.01,.18,1,2,3,6,7,8,16,17
 ;;36;.01;.111,.112,.113,.114,.115,.1112,.131
 ;;355.3;.01,.02,.03,.04,.1
 ;;2;.3192
 ;;
 ;----------
RXPAT ;PATIENT INFORMATION USED FOR MED PROFILES
 ;;2;.01,.03,.09,.111,.112,.113
 ;;2;.114,.115,.1112,.131,.361
 ;;2.04;.01,2,3
 ;;55;1
 ;;55;.02,.03,.04
 ;;
 ;----------
PROFILE ;PRESCRIPTION INFORMATION
 ;;52;.01,1,4,6,7,8,9,10
 ;;52;12,16,20,22,26,100,101
 ;;52.1;.01
 ;;
 ;----------