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

VEN8I01Q.m

Go to the documentation of this file.
VEN8I01Q ; 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,4104,0)
 ;;=35^Walk Well^wcdgm899^^350^366^^^^^0^30^11.5^12^^1
 ;;^UTILITY(U,$J,19707.17,4105,0)
 ;;=35^Walk Well^wcdgm900^^366^381^^^^^0^40^12.0^12.5^^1
 ;;^UTILITY(U,$J,19707.17,4106,0)
 ;;=35^Walk Well^wcdgm901^^381^396^^^^^0^50^12.5^13^^1
 ;;^UTILITY(U,$J,19707.17,4107,0)
 ;;=35^Walk Well^wcdgm902^^396^411^^^^^0^60^13.0^13.5^^1
 ;;^UTILITY(U,$J,19707.17,4108,0)
 ;;=35^Walk Well^wcdgm903^^411^427^^^^^0^65^13.5^14^^1
 ;;^UTILITY(U,$J,19707.17,4109,0)
 ;;=35^Walk Well^wcdgm904^^427^442^^^^^0^80^14.0^14.5^^1
 ;;^UTILITY(U,$J,19707.17,4110,0)
 ;;=35^Walk Well^wcdgm905^^442^457^^^^^0^85^14.5^15^^1
 ;;^UTILITY(U,$J,19707.17,4111,0)
 ;;=35^Walk Well^wcdgm906^^457^472^^^^^0^90^15.0^15.5^^1
 ;;^UTILITY(U,$J,19707.17,4112,0)
 ;;=35^Walk Well^wcdgm907^^472^488^^^^^0^100^15.5^16^^1
 ;;^UTILITY(U,$J,19707.17,4113,0)
 ;;=35^Walk Well^wcdgm908^^488^503^^^^^1^100^16.0^16.5^^1
 ;;^UTILITY(U,$J,19707.17,4114,0)
 ;;=35^Walk Well^wcdgm909^^503^518^^^^^1^100^16.5^17^^1
 ;;^UTILITY(U,$J,19707.17,4115,0)
 ;;=36^'Ooo/Ahh'^wcdl910^^15^30^^^^^0^25^.5^1^^1
 ;;^UTILITY(U,$J,19707.17,4116,0)
 ;;=36^'Ooo/Ahh'^wcdl911^^30^45^^^^^0^40^1.0^1.5^^1
 ;;^UTILITY(U,$J,19707.17,4117,0)
 ;;=36^'Ooo/Ahh'^wcdl912^^45^61^^^^^0^60^1.5^2^^1
 ;;^UTILITY(U,$J,19707.17,4118,0)
 ;;=36^'Ooo/Ahh'^wcdl913^^61^76^^^^^0^75^2.0^2.5^^1
 ;;^UTILITY(U,$J,19707.17,4119,0)
 ;;=36^'Ooo/Ahh'^wcdl914^^76^91^^^^^0^80^2.5^3^^1
 ;;^UTILITY(U,$J,19707.17,4120,0)
 ;;=36^'Ooo/Ahh'^wcdl915^^91^106^^^^^0^100^3.0^3.5^^1
 ;;^UTILITY(U,$J,19707.17,4121,0)
 ;;=36^2 Words^wcdl916^^335^350^^^^^0^30^11.0^11.5^^1
 ;;^UTILITY(U,$J,19707.17,4122,0)
 ;;=36^2 Words^wcdl917^^350^366^^^^^0^35^11.5^12^^1
 ;;^UTILITY(U,$J,19707.17,4123,0)
 ;;=36^2 Words^wcdl918^^366^381^^^^^0^40^12.0^12.5^^1
 ;;^UTILITY(U,$J,19707.17,4124,0)
 ;;=36^2 Words^wcdl919^^381^396^^^^^0^50^12.5^13^^1
 ;;^UTILITY(U,$J,19707.17,4125,0)
 ;;=36^2 Words^wcdl920^^396^411^^^^^0^55^13.0^13.5^^1
 ;;^UTILITY(U,$J,19707.17,4126,0)
 ;;=36^2 Words^wcdl921^^411^427^^^^^0^60^13.5^14^^1
 ;;^UTILITY(U,$J,19707.17,4127,0)
 ;;=36^2 Words^wcdl922^^427^442^^^^^0^65^14.0^14.5^^1
 ;;^UTILITY(U,$J,19707.17,4128,0)
 ;;=36^2 Words^wcdl923^^442^457^^^^^0^75^14.5^15^^1
 ;;^UTILITY(U,$J,19707.17,4129,0)
 ;;=36^2 Words^wcdl924^^457^472^^^^^0^80^15.0^15.5^^1
 ;;^UTILITY(U,$J,19707.17,4130,0)
 ;;=36^2 Words^wcdl925^^472^488^^^^^0^80^15.5^16^^1
 ;;^UTILITY(U,$J,19707.17,4131,0)
 ;;=36^2 Words^wcdl926^^488^503^^^^^0^85^16.0^16.5^^1
 ;;^UTILITY(U,$J,19707.17,4132,0)
 ;;=36^2 Words^wcdl927^^503^518^^^^^0^90^16.5^17^^1
 ;;^UTILITY(U,$J,19707.17,4133,0)
 ;;=36^2 Words^wcdl928^^518^533^^^^^1^100^17.0^17.5^^1
 ;;^UTILITY(U,$J,19707.17,4134,0)
 ;;=36^2 Words^wcdl929^^533^549^^^^^1^100^17.5^18^^1
 ;;^UTILITY(U,$J,19707.17,4135,0)
 ;;=36^2 Words^wcdl930^^549^564^^^^^1^100^18.0^18.5^^1
 ;;^UTILITY(U,$J,19707.17,4136,0)
 ;;=36^3 Words^wcdl931^^350^366^^^^^0^25^11.5^12^^1
 ;;^UTILITY(U,$J,19707.17,4137,0)
 ;;=36^3 Words^wcdl932^^366^381^^^^^0^30^12.0^12.5^^1
 ;;^UTILITY(U,$J,19707.17,4138,0)
 ;;=36^3 Words^wcdl933^^381^396^^^^^0^35^12.5^13^^1
 ;;^UTILITY(U,$J,19707.17,4139,0)
 ;;=36^3 Words^wcdl934^^396^411^^^^^0^40^13.0^13.5^^1
 ;;^UTILITY(U,$J,19707.17,4140,0)
 ;;=36^3 Words^wcdl935^^411^427^^^^^0^50^13.5^14^^1
 ;;^UTILITY(U,$J,19707.17,4141,0)
 ;;=36^3 Words^wcdl936^^427^442^^^^^0^55^14.0^14.5^^1
 ;;^UTILITY(U,$J,19707.17,4142,0)
 ;;=36^3 Words^wcdl937^^442^457^^^^^0^60^14.5^15^^1
 ;;^UTILITY(U,$J,19707.17,4143,0)
 ;;=36^3 Words^wcdl938^^457^472^^^^^0^65^15.0^15.5^^1
 ;;^UTILITY(U,$J,19707.17,4144,0)
 ;;=36^3 Words^wcdl939^^472^488^^^^^0^70^15.5^16^^1
 ;;^UTILITY(U,$J,19707.17,4145,0)
 ;;=36^3 Words^wcdl940^^488^503^^^^^0^75^16.0^16.5^^1
 ;;^UTILITY(U,$J,19707.17,4146,0)
 ;;=36^3 Words^wcdl941^^503^518^^^^^0^80^16.5^17^^1
 ;;^UTILITY(U,$J,19707.17,4147,0)
 ;;=36^3 Words^wcdl942^^518^533^^^^^0^80^17.0^17.5^^1
 ;;^UTILITY(U,$J,19707.17,4148,0)
 ;;=36^3 Words^wcdl943^^533^549^^^^^0^85^17.5^18^^1
 ;;^UTILITY(U,$J,19707.17,4149,0)
 ;;=36^3 Words^wcdl944^^549^564^^^^^0^90^18.0^18.5^^1
 ;;^UTILITY(U,$J,19707.17,4150,0)
 ;;=36^3 Words^wcdl945^^579^610^^^^^1^100^19.0^20^^1
 ;;^UTILITY(U,$J,19707.17,4151,0)
 ;;=36^3 Words^wcdl946^^610^640^^^^^1^100^20.0^21^^1
 ;;^UTILITY(U,$J,19707.17,4152,0)
 ;;=36^3 Words^wcdl947^^640^671^^^^^1^100^21.0^22^^1
 ;;^UTILITY(U,$J,19707.17,4153,0)
 ;;=36^6 Words^wcdl948^^411^427^^^^^0^25^13.5^14^^1
 ;;^UTILITY(U,$J,19707.17,4154,0)
 ;;=36^6 Words^wcdl949^^427^442^^^^^0^30^14.0^14.5^^1
 ;;^UTILITY(U,$J,19707.17,4155,0)
 ;;=36^6 Words^wcdl950^^442^457^^^^^0^30^14.5^15^^1
 ;;^UTILITY(U,$J,19707.17,4156,0)
 ;;=36^6 Words^wcdl951^^457^472^^^^^0^40^15.0^15.5^^1
 ;;^UTILITY(U,$J,19707.17,4157,0)
 ;;=36^6 Words^wcdl952^^472^488^^^^^0^40^15.5^16^^1
 ;;^UTILITY(U,$J,19707.17,4158,0)
 ;;=36^6 Words^wcdl953^^488^503^^^^^0^45^16.0^16.5^^1
 ;;^UTILITY(U,$J,19707.17,4159,0)
 ;;=36^6 Words^wcdl954^^503^518^^^^^0^50^16.5^17^^1
 ;;^UTILITY(U,$J,19707.17,4160,0)
 ;;=36^6 Words^wcdl955^^518^533^^^^^0^60^17.0^17.5^^1
 ;;^UTILITY(U,$J,19707.17,4161,0)
 ;;=36^6 Words^wcdl956^^533^549^^^^^0^65^17.5^18^^1
 ;;^UTILITY(U,$J,19707.17,4162,0)
 ;;=36^6 Words^wcdl957^^549^564^^^^^0^70^18.0^18.5^^1
 ;;^UTILITY(U,$J,19707.17,4163,0)
 ;;=36^6 Words^wcdl958^^579^610^^^^^0^75^19.0^20^^1
 ;;^UTILITY(U,$J,19707.17,4164,0)
 ;;=36^6 Words^wcdl959^^610^640^^^^^0^80^20.0^21^^1
 ;;^UTILITY(U,$J,19707.17,4165,0)
 ;;=36^6 Words^wcdl960^^640^671^^^^^0^90^21.0^22^^1
 ;;^UTILITY(U,$J,19707.17,4166,0)
 ;;=36^6 Words^wcdl961^^671^701^^^^^1^100^22.0^23^^1
 ;;^UTILITY(U,$J,19707.17,4167,0)
 ;;=36^6 Words^wcdl962^^701^732^^^^^1^100^23.0^24^^1
 ;;^UTILITY(U,$J,19707.17,4168,0)
 ;;=36^Body Parts - 6^wcdl963^^579^610^^^^^0^25^19.0^20^^1
 ;;^UTILITY(U,$J,19707.17,4169,0)
 ;;=36^Body Parts - 6^wcdl964^^610^640^^^^^0^50^20.0^21^^1
 ;;^UTILITY(U,$J,19707.17,4170,0)
 ;;=36^Body Parts - 6^wcdl965^^640^671^^^^^0^60^21.0^22^^1
 ;;^UTILITY(U,$J,19707.17,4171,0)
 ;;=36^Body Parts - 6^wcdl966^^671^701^^^^^0^70^22.0^23^^1
 ;;^UTILITY(U,$J,19707.17,4172,0)
 ;;=36^Body Parts - 6^wcdl967^^701^732^^^^^0^75^23.0^24^^1
 ;;^UTILITY(U,$J,19707.17,4173,0)
 ;;=36^Body Parts - 6^wcdl968^^732^762^^^^^0^80^24.0^25^^1
 ;;^UTILITY(U,$J,19707.17,4174,0)
 ;;=36^Body Parts - 6^wcdl969^^762^793^^^^^0^80^25.0^26^^1
 ;;^UTILITY(U,$J,19707.17,4175,0)
 ;;=36^Body Parts - 6^wcdl970^^793^823^^^^^0^85^26.0^27^^1
 ;;^UTILITY(U,$J,19707.17,4176,0)
 ;;=36^Body Parts - 6^wcdl971^^823^854^^^^^0^85^27.0^28^^1
 ;;^UTILITY(U,$J,19707.17,4177,0)
 ;;=36^Body Parts - 6^wcdl972^^854^884^^^^^0^90^28.0^29^^1
 ;;^UTILITY(U,$J,19707.17,4178,0)
 ;;=36^Body Parts - 6^wcdl973^^884^915^^^^^1^100^29.0^30^^1
 ;;^UTILITY(U,$J,19707.17,4179,0)
 ;;=36^Body Parts - 6^wcdl974^^915^945^^^^^1^100^30.0^31^^1
 ;;^UTILITY(U,$J,19707.17,4180,0)
 ;;=36^Combine Syllables^wcdl975^^183^198^^^^^0^35^6.0^6.5^^1
 ;;^UTILITY(U,$J,19707.17,4181,0)
 ;;=36^Combine Syllables^wcdl976^^198^213^^^^^0^50^6.5^7^^1
 ;;^UTILITY(U,$J,19707.17,4182,0)
 ;;=36^Combine Syllables^wcdl977^^213^228^^^^^0^65^7.0^7.5^^1
 ;;^UTILITY(U,$J,19707.17,4183,0)
 ;;=36^Combine Syllables^wcdl978^^228^244^^^^^0^75^7.5^8^^1
 ;;^UTILITY(U,$J,19707.17,4184,0)
 ;;=36^Combine Syllables^wcdl979^^244^259^^^^^0^80^8.0^8.5^^1
 ;;^UTILITY(U,$J,19707.17,4185,0)
 ;;=36^Combine Syllables^wcdl980^^259^274^^^^^0^80^8.5^9^^1
 ;;^UTILITY(U,$J,19707.17,4186,0)
 ;;=36^Combine Syllables^wcdl981^^274^289^^^^^0^85^9.0^9.5^^1
 ;;^UTILITY(U,$J,19707.17,4187,0)
 ;;=36^Combine Syllables^wcdl982^^289^305^^^^^0^85^9.5^10^^1
 ;;^UTILITY(U,$J,19707.17,4188,0)
 ;;=36^Combine Syllables^wcdl983^^305^320^^^^^0^90^10.0^10.5^^1
 ;;^UTILITY(U,$J,19707.17,4189,0)
 ;;=36^Combine Syllables^wcdl984^^320^335^^^^^0^100^10.5^11^^1