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

VEN8I01U.m

Go to the documentation of this file.
VEN8I01U ; 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,4428,0)
 ;;=36^Know 4 Actions^wcdl1223^^1403^1433^^^^^1^85^46.0^47^^1
 ;;^UTILITY(U,$J,19707.17,4429,0)
 ;;=36^Know 4 Actions^wcdl1224^^1433^1464^^^^^1^85^47.0^48^^1
 ;;^UTILITY(U,$J,19707.17,4430,0)
 ;;=36^Know 4 Actions^wcdl1225^^1464^1494^^^^^1^85^48.0^49^^1
 ;;^UTILITY(U,$J,19707.17,4431,0)
 ;;=36^Know 4 Actions^wcdl1226^^1494^1525^^^^^1^85^49.0^50^^1
 ;;^UTILITY(U,$J,19707.17,4432,0)
 ;;=36^Know 4 Actions^wcdl1227^^1525^1555^^^^^1^90^50.0^51^^1
 ;;^UTILITY(U,$J,19707.17,4433,0)
 ;;=36^Know 4 Actions^wcdl1228^^1555^1586^^^^^1^100^51.0^52^^1
 ;;^UTILITY(U,$J,19707.17,4434,0)
 ;;=36^Laughs^wcdl1229^^45^61^^^^^0^25^1.5^2^^1
 ;;^UTILITY(U,$J,19707.17,4435,0)
 ;;=36^Laughs^wcdl1230^^61^76^^^^^0^60^2.0^2.5^^1
 ;;^UTILITY(U,$J,19707.17,4436,0)
 ;;=36^Laughs^wcdl1231^^76^91^^^^^0^75^2.5^3^^1
 ;;^UTILITY(U,$J,19707.17,4437,0)
 ;;=36^Laughs^wcdl1232^^91^106^^^^^0^90^3.0^3.5^^1
 ;;^UTILITY(U,$J,19707.17,4438,0)
 ;;=36^Laughs^wcdl1233^^106^122^^^^^0^100^3.5^4^^1
 ;;^UTILITY(U,$J,19707.17,4439,0)
 ;;=36^Laughs^wcdl1234^^122^137^^^^^0^100^4.0^4.5^^1
 ;;^UTILITY(U,$J,19707.17,4440,0)
 ;;=36^Name 1 Color^wcdl1235^^793^823^^^^^0^25^26.0^27^^1
 ;;^UTILITY(U,$J,19707.17,4441,0)
 ;;=36^Name 1 Color^wcdl1236^^823^854^^^^^1^30^27.0^28^^1
 ;;^UTILITY(U,$J,19707.17,4442,0)
 ;;=36^Name 1 Color^wcdl1237^^854^884^^^^^0^30^28.0^29^^1
 ;;^UTILITY(U,$J,19707.17,4443,0)
 ;;=36^Name 1 Color^wcdl1238^^884^915^^^^^0^35^29.0^30^^1
 ;;^UTILITY(U,$J,19707.17,4444,0)
 ;;=36^Name 1 Color^wcdl1239^^915^945^^^^^0^40^30.0^31^^1
 ;;^UTILITY(U,$J,19707.17,4445,0)
 ;;=36^Name 1 Color^wcdl1240^^945^976^^^^^0^40^31.0^32^^1
 ;;^UTILITY(U,$J,19707.17,4446,0)
 ;;=36^Name 1 Color^wcdl1241^^976^1006^^^^^0^45^32.0^33^^1
 ;;^UTILITY(U,$J,19707.17,4447,0)
 ;;=36^Name 1 Color^wcdl1242^^1006^1037^^^^^0^45^33.0^34^^1
 ;;^UTILITY(U,$J,19707.17,4448,0)
 ;;=36^Name 1 Color^wcdl1243^^1037^1067^^^^^0^50^34.0^35^^1
 ;;^UTILITY(U,$J,19707.17,4449,0)
 ;;=36^Name 1 Color^wcdl1244^^1067^1098^^^^^0^55^35.0^36^^1
 ;;^UTILITY(U,$J,19707.17,4450,0)
 ;;=36^Name 1 Color^wcdl1245^^1098^1128^^^^^1^60^36.0^37^^1
 ;;^UTILITY(U,$J,19707.17,4451,0)
 ;;=36^Name 1 Color^wcdl1246^^1128^1159^^^^^1^65^37.0^38^^1
 ;;^UTILITY(U,$J,19707.17,4452,0)
 ;;=36^Name 1 Color^wcdl1247^^1159^1189^^^^^1^70^38.0^39^^1
 ;;^UTILITY(U,$J,19707.17,4453,0)
 ;;=36^Name 1 Color^wcdl1248^^1189^1220^^^^^1^75^39.0^40^^1
 ;;^UTILITY(U,$J,19707.17,4454,0)
 ;;=36^Name 1 Color^wcdl1249^^1220^1250^^^^^1^80^40.0^41^^1
 ;;^UTILITY(U,$J,19707.17,4455,0)
 ;;=36^Name 1 Color^wcdl1250^^1250^1281^^^^^1^80^41.0^42^^1
 ;;^UTILITY(U,$J,19707.17,4456,0)
 ;;=36^Name 1 Color^wcdl1251^^1281^1311^^^^^1^85^42.0^43^^1
 ;;^UTILITY(U,$J,19707.17,4457,0)
 ;;=36^Name 1 Color^wcdl1252^^1311^1342^^^^^1^85^43.0^44^^1
 ;;^UTILITY(U,$J,19707.17,4458,0)
 ;;=36^Name 1 Color^wcdl1253^^1342^1372^^^^^1^90^44.0^45^^1
 ;;^UTILITY(U,$J,19707.17,4459,0)
 ;;=36^Name 1 Color^wcdl1254^^1372^1403^^^^^1^100^45.0^46^^1
 ;;^UTILITY(U,$J,19707.17,4460,0)
 ;;=36^Name 1 Picture^wcdl1255^^579^610^^^^^1^25^19.0^20^^1
 ;;^UTILITY(U,$J,19707.17,4461,0)
 ;;=36^Name 1 Picture^wcdl1256^^610^640^^^^^0^50^20.0^21^^1
 ;;^UTILITY(U,$J,19707.17,4462,0)
 ;;=36^Name 1 Picture^wcdl1257^^640^671^^^^^0^60^21.0^22^^1
 ;;^UTILITY(U,$J,19707.17,4463,0)
 ;;=36^Name 1 Picture^wcdl1258^^671^701^^^^^0^65^22.0^23^^1
 ;;^UTILITY(U,$J,19707.17,4464,0)
 ;;=36^Name 1 Picture^wcdl1259^^701^732^^^^^1^70^23.0^24^^1
 ;;^UTILITY(U,$J,19707.17,4465,0)
 ;;=36^Name 1 Picture^wcdl1260^^732^762^^^^^1^75^24.0^25^^1
 ;;^UTILITY(U,$J,19707.17,4466,0)
 ;;=36^Name 1 Picture^wcdl1261^^762^793^^^^^1^80^25.0^26^^1
 ;;^UTILITY(U,$J,19707.17,4467,0)
 ;;=36^Name 1 Picture^wcdl1262^^793^823^^^^^1^85^26.0^27^^1
 ;;^UTILITY(U,$J,19707.17,4468,0)
 ;;=36^Name 1 Picture^wcdl1263^^823^854^^^^^1^90^27.0^28^^1
 ;;^UTILITY(U,$J,19707.17,4469,0)
 ;;=36^Name 1 Picture^wcdl1264^^854^884^^^^^1^100^28.0^29^^1
 ;;^UTILITY(U,$J,19707.17,4470,0)
 ;;=36^Name 4 Colors^wcdl1265^^1098^1128^^^^^0^25^36.0^37^^1
 ;;^UTILITY(U,$J,19707.17,4471,0)
 ;;=36^Name 4 Colors^wcdl1266^^1128^1159^^^^^0^30^37.0^38^^1
 ;;^UTILITY(U,$J,19707.17,4472,0)
 ;;=36^Name 4 Colors^wcdl1267^^1159^1189^^^^^0^30^38.0^39^^1
 ;;^UTILITY(U,$J,19707.17,4473,0)
 ;;=36^Name 4 Colors^wcdl1268^^1189^1220^^^^^0^35^39.0^40^^1
 ;;^UTILITY(U,$J,19707.17,4474,0)
 ;;=36^Name 4 Colors^wcdl1269^^1220^1250^^^^^0^40^40.0^41^^1
 ;;^UTILITY(U,$J,19707.17,4475,0)
 ;;=36^Name 4 Colors^wcdl1270^^1250^1281^^^^^0^40^41.0^42^^1
 ;;^UTILITY(U,$J,19707.17,4476,0)
 ;;=36^Name 4 Colors^wcdl1271^^1281^1311^^^^^0^45^42.0^43^^1
 ;;^UTILITY(U,$J,19707.17,4477,0)
 ;;=36^Name 4 Colors^wcdl1272^^1311^1342^^^^^0^50^43.0^44^^1
 ;;^UTILITY(U,$J,19707.17,4478,0)
 ;;=36^Name 4 Colors^wcdl1273^^1342^1372^^^^^0^55^44.0^45^^1
 ;;^UTILITY(U,$J,19707.17,4479,0)
 ;;=36^Name 4 Colors^wcdl1274^^1372^1403^^^^^0^60^45.0^46^^1
 ;;^UTILITY(U,$J,19707.17,4480,0)
 ;;=36^Name 4 Colors^wcdl1275^^1403^1433^^^^^0^60^46.0^47^^1
 ;;^UTILITY(U,$J,19707.17,4481,0)
 ;;=36^Name 4 Colors^wcdl1276^^1433^1464^^^^^0^65^47.0^48^^1
 ;;^UTILITY(U,$J,19707.17,4482,0)
 ;;=36^Name 4 Colors^wcdl1277^^1464^1494^^^^^0^70^48.0^49^^1
 ;;^UTILITY(U,$J,19707.17,4483,0)
 ;;=36^Name 4 Colors^wcdl1278^^1494^1525^^^^^1^70^49.0^50^^1
 ;;^UTILITY(U,$J,19707.17,4484,0)
 ;;=36^Name 4 Colors^wcdl1279^^1525^1555^^^^^1^75^50.0^51^^1
 ;;^UTILITY(U,$J,19707.17,4485,0)
 ;;=36^Name 4 Colors^wcdl1280^^1555^1586^^^^^0^80^51.0^52^^1
 ;;^UTILITY(U,$J,19707.17,4486,0)
 ;;=36^Name 4 Colors^wcdl1281^^1586^1616^^^^^1^80^52.0^53^^1
 ;;^UTILITY(U,$J,19707.17,4487,0)
 ;;=36^Name 4 Colors^wcdl1282^^1616^1647^^^^^1^80^53.0^54^^1
 ;;^UTILITY(U,$J,19707.17,4488,0)
 ;;=36^Name 4 Colors^wcdl1283^^1647^1677^^^^^1^85^54.0^55^^1
 ;;^UTILITY(U,$J,19707.17,4489,0)
 ;;=36^Name 4 Colors^wcdl1284^^1677^1708^^^^^1^85^55.0^56^^1
 ;;^UTILITY(U,$J,19707.17,4490,0)
 ;;=36^Name 4 Colors^wcdl1285^^1708^1738^^^^^1^85^56.0^57^^1
 ;;^UTILITY(U,$J,19707.17,4491,0)
 ;;=36^Name 4 Colors^wcdl1286^^1738^1769^^^^^1^90^57.0^58^^1
 ;;^UTILITY(U,$J,19707.17,4492,0)
 ;;=36^Name 4 Colors^wcdl1287^^1769^1799^^^^^1^100^58.0^59^^1
 ;;^UTILITY(U,$J,19707.17,4493,0)
 ;;=36^Name 4 Colors^wcdl1288^^1799^1830^^^^^1^100^59.0^60^^1
 ;;^UTILITY(U,$J,19707.17,4494,0)
 ;;=36^Name 4 Colors^wcdl1289^^1830^1860^^^^^1^100^60.0^61^^1
 ;;^UTILITY(U,$J,19707.17,4495,0)
 ;;=36^Name 4 Colors^wcdl1290^^1860^1891^^^^^1^100^61.0^62^^1
 ;;^UTILITY(U,$J,19707.17,4496,0)
 ;;=36^Name 4 Colors^wcdl1291^^1891^1921^^^^^1^100^62.0^63^^1
 ;;^UTILITY(U,$J,19707.17,4497,0)
 ;;=36^Name 4 Colors^wcdl1292^^1921^1952^^^^^1^100^63.0^64^^1
 ;;^UTILITY(U,$J,19707.17,4498,0)
 ;;=36^Name 4 Pictures^wcdl1293^^701^732^^^^^1^25^23.0^24^^1
 ;;^UTILITY(U,$J,19707.17,4499,0)
 ;;=36^Name 4 Pictures^wcdl1294^^732^762^^^^^1^30^24.0^25^^1
 ;;^UTILITY(U,$J,19707.17,4500,0)
 ;;=36^Name 4 Pictures^wcdl1295^^762^793^^^^^1^35^25.0^26^^1
 ;;^UTILITY(U,$J,19707.17,4501,0)
 ;;=36^Name 4 Pictures^wcdl1296^^793^823^^^^^1^40^26.0^27^^1
 ;;^UTILITY(U,$J,19707.17,4502,0)
 ;;=36^Name 4 Pictures^wcdl1297^^823^854^^^^^1^50^27.0^28^^1
 ;;^UTILITY(U,$J,19707.17,4503,0)
 ;;=36^Name 4 Pictures^wcdl1298^^854^884^^^^^1^60^28.0^29^^1
 ;;^UTILITY(U,$J,19707.17,4504,0)
 ;;=36^Name 4 Pictures^wcdl1299^^884^915^^^^^1^65^29.0^30^^1
 ;;^UTILITY(U,$J,19707.17,4505,0)
 ;;=36^Name 4 Pictures^wcdl1300^^915^945^^^^^1^70^30.0^31^^1
 ;;^UTILITY(U,$J,19707.17,4506,0)
 ;;=36^Name 4 Pictures^wcdl1301^^945^976^^^^^1^75^31.0^32^^1
 ;;^UTILITY(U,$J,19707.17,4507,0)
 ;;=36^Name 4 Pictures^wcdl1302^^976^1006^^^^^1^80^32.0^33^^1
 ;;^UTILITY(U,$J,19707.17,4508,0)
 ;;=36^Name 4 Pictures^wcdl1303^^1006^1037^^^^^1^80^33.0^34^^1