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

VENKI00F.m

Go to the documentation of this file.
VENKI00F ; ; 16-MAR-2007
 ;;2.6;PCC+;;NOV 12, 2007
 Q:'DIFQR(19707.12)  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.12,863,0)
 ;;=3^Throw Ball Overhand^wcdgm863^^^^^^^^0^85^31.0^32^^1
 ;;^UTILITY(U,$J,19707.12,864,0)
 ;;=3^Throw Ball Overhand^wcdgm864^^^^^^^^0^85^32.0^33^^1
 ;;^UTILITY(U,$J,19707.12,865,0)
 ;;=3^Throw Ball Overhand^wcdgm865^^^^^^^^0^85^33.0^34^^1
 ;;^UTILITY(U,$J,19707.12,866,0)
 ;;=3^Throw Ball Overhand^wcdgm866^^^^^^^^0^85^34.0^35^^1
 ;;^UTILITY(U,$J,19707.12,867,0)
 ;;=3^Throw Ball Overhand^wcdgm867^^^^^^^^0^90^35.0^36^^1
 ;;^UTILITY(U,$J,19707.12,868,0)
 ;;=3^Throw Ball Overhand^wcdgm868^^^^^^^^1^100^36.0^37^^1
 ;;^UTILITY(U,$J,19707.12,869,0)
 ;;=3^Throw Ball Overhand^wcdgm869^^^^^^^^1^100^37.0^38^^1
 ;;^UTILITY(U,$J,19707.12,870,0)
 ;;=3^Throw Ball Overhand^wcdgm870^^^^^^^^1^100^38.0^39^^1
 ;;^UTILITY(U,$J,19707.12,871,0)
 ;;=3^Walk Backwards^wcdgm871^^^^^^^^0^25^12.5^13^^1
 ;;^UTILITY(U,$J,19707.12,872,0)
 ;;=3^Walk Backwards^wcdgm872^^^^^^^^0^40^13.0^13.5^^1
 ;;^UTILITY(U,$J,19707.12,873,0)
 ;;=3^Walk Backwards^wcdgm873^^^^^^^^0^50^13.5^14^^1
 ;;^UTILITY(U,$J,19707.12,874,0)
 ;;=3^Walk Backwards^wcdgm874^^^^^^^^0^60^14.0^14.5^^1
 ;;^UTILITY(U,$J,19707.12,875,0)
 ;;=3^Walk Backwards^wcdgm875^^^^^^^^0^65^14.5^15^^1
 ;;^UTILITY(U,$J,19707.12,876,0)
 ;;=3^Walk Backwards^wcdgm876^^^^^^^^0^70^15.0^15.5^^1
 ;;^UTILITY(U,$J,19707.12,877,0)
 ;;=3^Walk Backwards^wcdgm877^^^^^^^^0^80^15.5^16^^1
 ;;^UTILITY(U,$J,19707.12,878,0)
 ;;=3^Walk Backwards^wcdgm878^^^^^^^^0^85^16.0^16.5^^1
 ;;^UTILITY(U,$J,19707.12,879,0)
 ;;=3^Walk Backwards^wcdgm879^^^^^^^^0^90^16.5^17^^1
 ;;^UTILITY(U,$J,19707.12,880,0)
 ;;=3^Walk Backwards^wcdgm880^^^^^^^^1^100^17.0^17.5^^1
 ;;^UTILITY(U,$J,19707.12,881,0)
 ;;=3^Walk Backwards^wcdgm881^^^^^^^^1^100^17.5^18^^1
 ;;^UTILITY(U,$J,19707.12,882,0)
 ;;=3^Walk Backwards^wcdgm882^^^^^^^^1^100^18.0^18.5^^1
 ;;^UTILITY(U,$J,19707.12,883,0)
 ;;=3^Walk Backwards^wcdgm883^^^^^^^^1^100^19.0^20^^1
 ;;^UTILITY(U,$J,19707.12,884,0)
 ;;=3^Walk Backwards^wcdgm884^^^^^^^^1^100^20.0^21^^1
 ;;^UTILITY(U,$J,19707.12,885,0)
 ;;=3^Walk Up Steps^wcdgm885^^^^^^^^1^25^14.0^14.5^^1
 ;;^UTILITY(U,$J,19707.12,886,0)
 ;;=3^Walk Up Steps^wcdgm886^^^^^^^^1^30^14.5^15^^1
 ;;^UTILITY(U,$J,19707.12,887,0)
 ;;=3^Walk Up Steps^wcdgm887^^^^^^^^0^35^15.0^15.5^^1
 ;;^UTILITY(U,$J,19707.12,888,0)
 ;;=3^Walk Up Steps^wcdgm888^^^^^^^^0^40^15.5^16^^1
 ;;^UTILITY(U,$J,19707.12,889,0)
 ;;=3^Walk Up Steps^wcdgm889^^^^^^^^0^45^16.0^16.5^^1
 ;;^UTILITY(U,$J,19707.12,890,0)
 ;;=3^Walk Up Steps^wcdgm890^^^^^^^^0^50^16.5^17^^1
 ;;^UTILITY(U,$J,19707.12,891,0)
 ;;=3^Walk Up Steps^wcdgm891^^^^^^^^0^60^17.0^17.5^^1
 ;;^UTILITY(U,$J,19707.12,892,0)
 ;;=3^Walk Up Steps^wcdgm892^^^^^^^^0^65^17.5^18^^1
 ;;^UTILITY(U,$J,19707.12,893,0)
 ;;=3^Walk Up Steps^wcdgm893^^^^^^^^0^70^18.0^18.5^^1
 ;;^UTILITY(U,$J,19707.12,894,0)
 ;;=3^Walk Up Steps^wcdgm894^^^^^^^^0^75^19.0^20^^1
 ;;^UTILITY(U,$J,19707.12,895,0)
 ;;=3^Walk Up Steps^wcdgm895^^^^^^^^0^80^20.0^21^^1
 ;;^UTILITY(U,$J,19707.12,896,0)
 ;;=3^Walk Up Steps^wcdgm896^^^^^^^^0^90^21.0^22^^1
 ;;^UTILITY(U,$J,19707.12,897,0)
 ;;=3^Walk Up Steps^wcdgm897^^^^^^^^0^100^22.0^23^^1
 ;;^UTILITY(U,$J,19707.12,898,0)
 ;;=3^Walk Up Steps^wcdgm898^^^^^^^^0^100^23.0^24^^1
 ;;^UTILITY(U,$J,19707.12,899,0)
 ;;=3^Walk Well^wcdgm899^^^^^^^^0^30^11.5^12^^1
 ;;^UTILITY(U,$J,19707.12,900,0)
 ;;=3^Walk Well^wcdgm900^^^^^^^^0^40^12.0^12.5^^1
 ;;^UTILITY(U,$J,19707.12,901,0)
 ;;=3^Walk Well^wcdgm901^^^^^^^^0^50^12.5^13^^1
 ;;^UTILITY(U,$J,19707.12,902,0)
 ;;=3^Walk Well^wcdgm902^^^^^^^^0^60^13.0^13.5^^1
 ;;^UTILITY(U,$J,19707.12,903,0)
 ;;=3^Walk Well^wcdgm903^^^^^^^^0^65^13.5^14^^1
 ;;^UTILITY(U,$J,19707.12,904,0)
 ;;=3^Walk Well^wcdgm904^^^^^^^^0^80^14.0^14.5^^1
 ;;^UTILITY(U,$J,19707.12,905,0)
 ;;=3^Walk Well^wcdgm905^^^^^^^^0^85^14.5^15^^1
 ;;^UTILITY(U,$J,19707.12,906,0)
 ;;=3^Walk Well^wcdgm906^^^^^^^^0^90^15.0^15.5^^1
 ;;^UTILITY(U,$J,19707.12,907,0)
 ;;=3^Walk Well^wcdgm907^^^^^^^^0^100^15.5^16^^1
 ;;^UTILITY(U,$J,19707.12,908,0)
 ;;=3^Walk Well^wcdgm908^^^^^^^^1^100^16.0^16.5^^1
 ;;^UTILITY(U,$J,19707.12,909,0)
 ;;=3^Walk Well^wcdgm909^^^^^^^^1^100^16.5^17^^1
 ;;^UTILITY(U,$J,19707.12,910,0)
 ;;=4^"Ooo/Ahh"^wcdl910^^^^^^^^0^25^.5^1^^1
 ;;^UTILITY(U,$J,19707.12,911,0)
 ;;=4^"Ooo/Ahh"^wcdl911^^^^^^^^0^40^1.0^1.5^^1
 ;;^UTILITY(U,$J,19707.12,912,0)
 ;;=4^"Ooo/Ahh"^wcdl912^^^^^^^^0^60^1.5^2^^1
 ;;^UTILITY(U,$J,19707.12,913,0)
 ;;=4^"Ooo/Ahh"^wcdl913^^^^^^^^0^75^2.0^2.5^^1
 ;;^UTILITY(U,$J,19707.12,914,0)
 ;;=4^"Ooo/Ahh"^wcdl914^^^^^^^^0^80^2.5^3^^1
 ;;^UTILITY(U,$J,19707.12,915,0)
 ;;=4^"Ooo/Ahh"^wcdl915^^^^^^^^0^100^3.0^3.5^^1
 ;;^UTILITY(U,$J,19707.12,916,0)
 ;;=4^2 Words^wcdl916^^^^^^^^0^30^11.0^11.5^^1
 ;;^UTILITY(U,$J,19707.12,917,0)
 ;;=4^2 Words^wcdl917^^^^^^^^0^35^11.5^12^^1
 ;;^UTILITY(U,$J,19707.12,918,0)
 ;;=4^2 Words^wcdl918^^^^^^^^0^40^12.0^12.5^^1
 ;;^UTILITY(U,$J,19707.12,919,0)
 ;;=4^2 Words^wcdl919^^^^^^^^0^50^12.5^13^^1
 ;;^UTILITY(U,$J,19707.12,920,0)
 ;;=4^2 Words^wcdl920^^^^^^^^0^55^13.0^13.5^^1
 ;;^UTILITY(U,$J,19707.12,921,0)
 ;;=4^2 Words^wcdl921^^^^^^^^0^60^13.5^14^^1
 ;;^UTILITY(U,$J,19707.12,922,0)
 ;;=4^2 Words^wcdl922^^^^^^^^0^65^14.0^14.5^^1
 ;;^UTILITY(U,$J,19707.12,923,0)
 ;;=4^2 Words^wcdl923^^^^^^^^0^75^14.5^15^^1
 ;;^UTILITY(U,$J,19707.12,924,0)
 ;;=4^2 Words^wcdl924^^^^^^^^0^80^15.0^15.5^^1
 ;;^UTILITY(U,$J,19707.12,925,0)
 ;;=4^2 Words^wcdl925^^^^^^^^0^80^15.5^16^^1
 ;;^UTILITY(U,$J,19707.12,926,0)
 ;;=4^2 Words^wcdl926^^^^^^^^0^85^16.0^16.5^^1
 ;;^UTILITY(U,$J,19707.12,927,0)
 ;;=4^2 Words^wcdl927^^^^^^^^0^90^16.5^17^^1
 ;;^UTILITY(U,$J,19707.12,928,0)
 ;;=4^2 Words^wcdl928^^^^^^^^1^100^17.0^17.5^^1
 ;;^UTILITY(U,$J,19707.12,929,0)
 ;;=4^2 Words^wcdl929^^^^^^^^1^100^17.5^18^^1
 ;;^UTILITY(U,$J,19707.12,930,0)
 ;;=4^2 Words^wcdl930^^^^^^^^1^100^18.0^18.5^^1
 ;;^UTILITY(U,$J,19707.12,931,0)
 ;;=4^3 Words^wcdl931^^^^^^^^0^25^11.5^12^^1
 ;;^UTILITY(U,$J,19707.12,932,0)
 ;;=4^3 Words^wcdl932^^^^^^^^0^30^12.0^12.5^^1
 ;;^UTILITY(U,$J,19707.12,933,0)
 ;;=4^3 Words^wcdl933^^^^^^^^0^35^12.5^13^^1
 ;;^UTILITY(U,$J,19707.12,934,0)
 ;;=4^3 Words^wcdl934^^^^^^^^0^40^13.0^13.5^^1
 ;;^UTILITY(U,$J,19707.12,935,0)
 ;;=4^3 Words^wcdl935^^^^^^^^0^50^13.5^14^^1
 ;;^UTILITY(U,$J,19707.12,936,0)
 ;;=4^3 Words^wcdl936^^^^^^^^0^55^14.0^14.5^^1
 ;;^UTILITY(U,$J,19707.12,937,0)
 ;;=4^3 Words^wcdl937^^^^^^^^0^60^14.5^15^^1
 ;;^UTILITY(U,$J,19707.12,938,0)
 ;;=4^3 Words^wcdl938^^^^^^^^0^65^15.0^15.5^^1
 ;;^UTILITY(U,$J,19707.12,939,0)
 ;;=4^3 Words^wcdl939^^^^^^^^0^70^15.5^16^^1
 ;;^UTILITY(U,$J,19707.12,940,0)
 ;;=4^3 Words^wcdl940^^^^^^^^0^75^16.0^16.5^^1
 ;;^UTILITY(U,$J,19707.12,941,0)
 ;;=4^3 Words^wcdl941^^^^^^^^0^80^16.5^17^^1
 ;;^UTILITY(U,$J,19707.12,942,0)
 ;;=4^3 Words^wcdl942^^^^^^^^0^80^17.0^17.5^^1
 ;;^UTILITY(U,$J,19707.12,943,0)
 ;;=4^3 Words^wcdl943^^^^^^^^0^85^17.5^18^^1
 ;;^UTILITY(U,$J,19707.12,944,0)
 ;;=4^3 Words^wcdl944^^^^^^^^0^90^18.0^18.5^^1
 ;;^UTILITY(U,$J,19707.12,945,0)
 ;;=4^3 Words^wcdl945^^^^^^^^1^100^19.0^20^^1
 ;;^UTILITY(U,$J,19707.12,946,0)
 ;;=4^3 Words^wcdl946^^^^^^^^1^100^20.0^21^^1
 ;;^UTILITY(U,$J,19707.12,947,0)
 ;;=4^3 Words^wcdl947^^^^^^^^1^100^21.0^22^^1
 ;;^UTILITY(U,$J,19707.12,948,0)
 ;;=4^6 Words^wcdl948^^^^^^^^0^25^13.5^14^^1
 ;;^UTILITY(U,$J,19707.12,949,0)
 ;;=4^6 Words^wcdl949^^^^^^^^0^30^14.0^14.5^^1
 ;;^UTILITY(U,$J,19707.12,950,0)
 ;;=4^6 Words^wcdl950^^^^^^^^0^30^14.5^15^^1
 ;;^UTILITY(U,$J,19707.12,951,0)
 ;;=4^6 Words^wcdl951^^^^^^^^0^40^15.0^15.5^^1
 ;;^UTILITY(U,$J,19707.12,952,0)
 ;;=4^6 Words^wcdl952^^^^^^^^0^40^15.5^16^^1
 ;;^UTILITY(U,$J,19707.12,953,0)
 ;;=4^6 Words^wcdl953^^^^^^^^0^45^16.0^16.5^^1
 ;;^UTILITY(U,$J,19707.12,954,0)
 ;;=4^6 Words^wcdl954^^^^^^^^0^50^16.5^17^^1
 ;;^UTILITY(U,$J,19707.12,955,0)
 ;;=4^6 Words^wcdl955^^^^^^^^0^60^17.0^17.5^^1