Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: VEN8I01T

VEN8I01T.m

Go to the documentation of this file.
VEN8I01T ; IHS/OIT/GIS - DIFROM SUPPLIMENT TO KIDS ; 
 ;;2.6;PCC+;**1,3**;APR 03, 2012;Build 24
 Q:'DIFQR(19707.17)  F I=1:2 S X=$T(Q+I) Q:X=""  S Y=$E($T(Q+I+1),4,999),X=$E(X,4,999) S:$A(Y)=126 I=I+1,Y=$E(Y,2,999)_$E($T(Q+I+1),5,999) S:$A(Y)=61 Y=$E(Y,2,999) X NO E  S @X=Y
Q Q
 ;;^UTILITY(U,$J,19707.17,4350,0)
 ;;=36^Know 2 Actions^wcdl1145^^823^854^^^^^0^45^27.0^28^^1
 ;;^UTILITY(U,$J,19707.17,4351,0)
 ;;=36^Know 2 Actions^wcdl1146^^854^884^^^^^1^50^28.0^29^^1
 ;;^UTILITY(U,$J,19707.17,4352,0)
 ;;=36^Know 2 Actions^wcdl1147^^884^915^^^^^0^55^29.0^30^^1
 ;;^UTILITY(U,$J,19707.17,4353,0)
 ;;=36^Know 2 Actions^wcdl1148^^915^945^^^^^0^60^30.0^31^^1
 ;;^UTILITY(U,$J,19707.17,4354,0)
 ;;=36^Know 2 Actions^wcdl1149^^945^976^^^^^0^65^31.0^32^^1
 ;;^UTILITY(U,$J,19707.17,4355,0)
 ;;=36^Know 2 Actions^wcdl1150^^976^1006^^^^^0^70^32.0^33^^1
 ;;^UTILITY(U,$J,19707.17,4356,0)
 ;;=36^Know 2 Actions^wcdl1151^^1006^1037^^^^^0^75^33.0^34^^1
 ;;^UTILITY(U,$J,19707.17,4357,0)
 ;;=36^Know 2 Actions^wcdl1152^^1037^1067^^^^^0^80^34.0^35^^1
 ;;^UTILITY(U,$J,19707.17,4358,0)
 ;;=36^Know 2 Actions^wcdl1153^^1067^1098^^^^^1^80^35.0^36^^1
 ;;^UTILITY(U,$J,19707.17,4359,0)
 ;;=36^Know 2 Actions^wcdl1154^^1098^1128^^^^^0^85^36.0^37^^1
 ;;^UTILITY(U,$J,19707.17,4360,0)
 ;;=36^Know 2 Actions^wcdl1155^^1128^1159^^^^^0^85^37.0^38^^1
 ;;^UTILITY(U,$J,19707.17,4361,0)
 ;;=36^Know 2 Actions^wcdl1156^^1159^1189^^^^^1^90^38.0^39^^1
 ;;^UTILITY(U,$J,19707.17,4362,0)
 ;;=36^Know 2 Actions^wcdl1157^^1189^1220^^^^^1^100^39.0^40^^1
 ;;^UTILITY(U,$J,19707.17,4363,0)
 ;;=36^Know 2 Actions^wcdl1158^^1220^1250^^^^^1^100^40.0^41^^1
 ;;^UTILITY(U,$J,19707.17,4364,0)
 ;;=36^Know 2 Actions^wcdl1159^^1250^1281^^^^^1^100^41.0^42^^1
 ;;^UTILITY(U,$J,19707.17,4365,0)
 ;;=36^Know 2 Actions^wcdl1160^^1281^1311^^^^^1^100^42.0^43^^1
 ;;^UTILITY(U,$J,19707.17,4366,0)
 ;;=36^Know 2 Actions^wcdl1161^^1311^1342^^^^^1^100^43.0^44^^1
 ;;^UTILITY(U,$J,19707.17,4367,0)
 ;;=36^Know 2 Adjectives^wcdl1162^^915^945^^^^^1^25^30.0^31^^1
 ;;^UTILITY(U,$J,19707.17,4368,0)
 ;;=36^Know 2 Adjectives^wcdl1163^^945^976^^^^^1^30^31.0^32^^1
 ;;^UTILITY(U,$J,19707.17,4369,0)
 ;;=36^Know 2 Adjectives^wcdl1164^^976^1006^^^^^1^40^32.0^33^^1
 ;;^UTILITY(U,$J,19707.17,4370,0)
 ;;=36^Know 2 Adjectives^wcdl1165^^1006^1037^^^^^1^50^33.0^34^^1
 ;;^UTILITY(U,$J,19707.17,4371,0)
 ;;=36^Know 2 Adjectives^wcdl1166^^1037^1067^^^^^1^60^34.0^35^^1
 ;;^UTILITY(U,$J,19707.17,4372,0)
 ;;=36^Know 2 Adjectives^wcdl1167^^1067^1098^^^^^1^70^35.0^36^^1
 ;;^UTILITY(U,$J,19707.17,4373,0)
 ;;=36^Know 2 Adjectives^wcdl1168^^1098^1128^^^^^1^75^36.0^37^^1
 ;;^UTILITY(U,$J,19707.17,4374,0)
 ;;=36^Know 2 Adjectives^wcdl1169^^1128^1159^^^^^1^80^37.0^38^^1
 ;;^UTILITY(U,$J,19707.17,4375,0)
 ;;=36^Know 2 Adjectives^wcdl1170^^1159^1189^^^^^1^80^38.0^39^^1
 ;;^UTILITY(U,$J,19707.17,4376,0)
 ;;=36^Know 2 Adjectives^wcdl1171^^1189^1220^^^^^1^80^39.0^40^^1
 ;;^UTILITY(U,$J,19707.17,4377,0)
 ;;=36^Know 2 Adjectives^wcdl1172^^1220^1250^^^^^1^85^40.0^41^^1
 ;;^UTILITY(U,$J,19707.17,4378,0)
 ;;=36^Know 2 Adjectives^wcdl1173^^1250^1281^^^^^1^85^41.0^42^^1
 ;;^UTILITY(U,$J,19707.17,4379,0)
 ;;=36^Know 2 Adjectives^wcdl1174^^1281^1311^^^^^1^85^42.0^43^^1
 ;;^UTILITY(U,$J,19707.17,4380,0)
 ;;=36^Know 2 Adjectives^wcdl1175^^1311^1342^^^^^1^90^43.0^44^^1
 ;;^UTILITY(U,$J,19707.17,4381,0)
 ;;=36^Know 2 Adjectives^wcdl1176^^1342^1372^^^^^1^100^44.0^45^^1
 ;;^UTILITY(U,$J,19707.17,4382,0)
 ;;=36^Know 3 Adjectives^wcdl1177^^1067^1098^^^^^1^25^35.0^36^^1
 ;;^UTILITY(U,$J,19707.17,4383,0)
 ;;=36^Know 3 Adjectives^wcdl1178^^1098^1128^^^^^1^30^36.0^37^^1
 ;;^UTILITY(U,$J,19707.17,4384,0)
 ;;=36^Know 3 Adjectives^wcdl1179^^1128^1159^^^^^1^40^37.0^38^^1
 ;;^UTILITY(U,$J,19707.17,4385,0)
 ;;=36^Know 3 Adjectives^wcdl1180^^1159^1189^^^^^1^50^38.0^39^^1
 ;;^UTILITY(U,$J,19707.17,4386,0)
 ;;=36^Know 3 Adjectives^wcdl1181^^1189^1220^^^^^1^55^39.0^40^^1
 ;;^UTILITY(U,$J,19707.17,4387,0)
 ;;=36^Know 3 Adjectives^wcdl1182^^1220^1250^^^^^1^55^40.0^41^^1
 ;;^UTILITY(U,$J,19707.17,4388,0)
 ;;=36^Know 3 Adjectives^wcdl1183^^1250^1281^^^^^1^60^41.0^42^^1
 ;;^UTILITY(U,$J,19707.17,4389,0)
 ;;=36^Know 3 Adjectives^wcdl1184^^1281^1311^^^^^1^60^42.0^43^^1
 ;;^UTILITY(U,$J,19707.17,4390,0)
 ;;=36^Know 3 Adjectives^wcdl1185^^1311^1342^^^^^1^60^43.0^44^^1
 ;;^UTILITY(U,$J,19707.17,4391,0)
 ;;=36^Know 3 Adjectives^wcdl1186^^1342^1372^^^^^1^65^44.0^45^^1
 ;;^UTILITY(U,$J,19707.17,4392,0)
 ;;=36^Know 3 Adjectives^wcdl1187^^1372^1403^^^^^1^65^45.0^46^^1
 ;;^UTILITY(U,$J,19707.17,4393,0)
 ;;=36^Know 3 Adjectives^wcdl1188^^1403^1433^^^^^1^70^46.0^47^^1
 ;;^UTILITY(U,$J,19707.17,4394,0)
 ;;=36^Know 3 Adjectives^wcdl1189^^1433^1464^^^^^1^70^47.0^48^^1
 ;;^UTILITY(U,$J,19707.17,4395,0)
 ;;=36^Know 3 Adjectives^wcdl1190^^1464^1494^^^^^1^75^48.0^49^^1
 ;;^UTILITY(U,$J,19707.17,4396,0)
 ;;=36^Know 3 Adjectives^wcdl1191^^1494^1525^^^^^1^80^49.0^50^^1
 ;;^UTILITY(U,$J,19707.17,4397,0)
 ;;=36^Know 3 Adjectives^wcdl1192^^1525^1555^^^^^1^80^50.0^51^^1
 ;;^UTILITY(U,$J,19707.17,4398,0)
 ;;=36^Know 3 Adjectives^wcdl1193^^1555^1586^^^^^1^80^51.0^52^^1
 ;;^UTILITY(U,$J,19707.17,4399,0)
 ;;=36^Know 3 Adjectives^wcdl1194^^1586^1616^^^^^1^80^52.0^53^^1
 ;;^UTILITY(U,$J,19707.17,4400,0)
 ;;=36^Know 3 Adjectives^wcdl1195^^1616^1647^^^^^1^80^53.0^54^^1
 ;;^UTILITY(U,$J,19707.17,4401,0)
 ;;=36^Know 3 Adjectives^wcdl1196^^1647^1677^^^^^1^80^54.0^55^^1
 ;;^UTILITY(U,$J,19707.17,4402,0)
 ;;=36^Know 3 Adjectives^wcdl1197^^1677^1708^^^^^1^80^55.0^56^^1
 ;;^UTILITY(U,$J,19707.17,4403,0)
 ;;=36^Know 3 Adjectives^wcdl1198^^1708^1738^^^^^1^80^56.0^57^^1
 ;;^UTILITY(U,$J,19707.17,4404,0)
 ;;=36^Know 3 Adjectives^wcdl1199^^1738^1769^^^^^1^85^57.0^58^^1
 ;;^UTILITY(U,$J,19707.17,4405,0)
 ;;=36^Know 3 Adjectives^wcdl1200^^1769^1799^^^^^1^85^58.0^59^^1
 ;;^UTILITY(U,$J,19707.17,4406,0)
 ;;=36^Know 3 Adjectives^wcdl1201^^1799^1830^^^^^1^85^59.0^60^^1
 ;;^UTILITY(U,$J,19707.17,4407,0)
 ;;=36^Know 3 Adjectives^wcdl1202^^1830^1860^^^^^1^85^60.0^61^^1
 ;;^UTILITY(U,$J,19707.17,4408,0)
 ;;=36^Know 3 Adjectives^wcdl1203^^1860^1891^^^^^1^85^61.0^62^^1
 ;;^UTILITY(U,$J,19707.17,4409,0)
 ;;=36^Know 3 Adjectives^wcdl1204^^1891^1921^^^^^1^85^62.0^63^^1
 ;;^UTILITY(U,$J,19707.17,4410,0)
 ;;=36^Know 3 Adjectives^wcdl1205^^1921^1952^^^^^1^90^63.0^64^^1
 ;;^UTILITY(U,$J,19707.17,4411,0)
 ;;=36^Know 3 Adjectives^wcdl1206^^1952^1982^^^^^1^100^64.0^65^^1
 ;;^UTILITY(U,$J,19707.17,4412,0)
 ;;=36^Know 4 Actions^wcdl1207^^915^945^^^^^1^25^30.0^31^^1
 ;;^UTILITY(U,$J,19707.17,4413,0)
 ;;=36^Know 4 Actions^wcdl1208^^945^976^^^^^1^40^31.0^32^^1
 ;;^UTILITY(U,$J,19707.17,4414,0)
 ;;=36^Know 4 Actions^wcdl1209^^976^1006^^^^^1^50^32.0^33^^1
 ;;^UTILITY(U,$J,19707.17,4415,0)
 ;;=36^Know 4 Actions^wcdl1210^^1006^1037^^^^^1^55^33.0^34^^1
 ;;^UTILITY(U,$J,19707.17,4416,0)
 ;;=36^Know 4 Actions^wcdl1211^^1037^1067^^^^^1^60^34.0^35^^1
 ;;^UTILITY(U,$J,19707.17,4417,0)
 ;;=36^Know 4 Actions^wcdl1212^^1067^1098^^^^^0^60^35.0^36^^1
 ;;^UTILITY(U,$J,19707.17,4418,0)
 ;;=36^Know 4 Actions^wcdl1213^^1098^1128^^^^^1^65^36.0^37^^1
 ;;^UTILITY(U,$J,19707.17,4419,0)
 ;;=36^Know 4 Actions^wcdl1214^^1128^1159^^^^^1^70^37.0^38^^1
 ;;^UTILITY(U,$J,19707.17,4420,0)
 ;;=36^Know 4 Actions^wcdl1215^^1159^1189^^^^^0^70^38.0^39^^1
 ;;^UTILITY(U,$J,19707.17,4421,0)
 ;;=36^Know 4 Actions^wcdl1216^^1189^1220^^^^^0^75^39.0^40^^1
 ;;^UTILITY(U,$J,19707.17,4422,0)
 ;;=36^Know 4 Actions^wcdl1217^^1220^1250^^^^^0^80^40.0^41^^1
 ;;^UTILITY(U,$J,19707.17,4423,0)
 ;;=36^Know 4 Actions^wcdl1218^^1250^1281^^^^^0^80^41.0^42^^1
 ;;^UTILITY(U,$J,19707.17,4424,0)
 ;;=36^Know 4 Actions^wcdl1219^^1281^1311^^^^^0^80^42.0^43^^1
 ;;^UTILITY(U,$J,19707.17,4425,0)
 ;;=36^Know 4 Actions^wcdl1220^^1311^1342^^^^^0^80^43.0^44^^1
 ;;^UTILITY(U,$J,19707.17,4426,0)
 ;;=36^Know 4 Actions^wcdl1221^^1342^1372^^^^^1^80^44.0^45^^1
 ;;^UTILITY(U,$J,19707.17,4427,0)
 ;;=36^Know 4 Actions^wcdl1222^^1372^1403^^^^^1^85^45.0^46^^1