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