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

GMPLI00H.m

Go to the documentation of this file.
GMPLI00H	; ; 25-AUG-1994
	;;2.0;Problem List;;Aug 25, 1994
	Q:'DIFQ(200)  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,99) S:$A(Y)=61 Y=$E(Y,2,999) X NO E  S @X=Y
Q	Q
	;;^DD(200,0,"PT",99.06,.01)
	;;=
	;;^DD(200,0,"PT",99.14,.01)
	;;=
	;;^DD(200,0,"PT",99.17,.01)
	;;=
	;;^DD(200,0,"PT",99.3,.01)
	;;=
	;;^DD(200,0,"PT",99.4,.01)
	;;=
	;;^DD(200,0,"PT",100,.63)
	;;=
	;;^DD(200,0,"PT",100,.66)
	;;=
	;;^DD(200,0,"PT",100,.69)
	;;=
	;;^DD(200,0,"PT",100,1)
	;;=
	;;^DD(200,0,"PT",100,1.1)
	;;=
	;;^DD(200,0,"PT",100,3)
	;;=
	;;^DD(200,0,"PT",100,40)
	;;=
	;;^DD(200,0,"PT",100,44)
	;;=
	;;^DD(200,0,"PT",100.09,.03)
	;;=
	;;^DD(200,0,"PT",100.2,.03)
	;;=
	;;^DD(200,0,"PT",100.212,.01)
	;;=
	;;^DD(200,0,"PT",100.213,.01)
	;;=
	;;^DD(200,0,"PT",100.4,2)
	;;=
	;;^DD(200,0,"PT",100.5,2)
	;;=
	;;^DD(200,0,"PT",100.9002,.01)
	;;=
	;;^DD(200,0,"PT",101,5)
	;;=
	;;^DD(200,0,"PT",112.6,.8)
	;;=
	;;^DD(200,0,"PT",115.011,101)
	;;=
	;;^DD(200,0,"PT",115.012,2)
	;;=
	;;^DD(200,0,"PT",115.02,10)
	;;=
	;;^DD(200,0,"PT",115.03,4)
	;;=
	;;^DD(200,0,"PT",115.03,6)
	;;=
	;;^DD(200,0,"PT",115.03,9)
	;;=
	;;^DD(200,0,"PT",115.04,10)
	;;=
	;;^DD(200,0,"PT",115.04,12)
	;;=
	;;^DD(200,0,"PT",115.05,4)
	;;=
	;;^DD(200,0,"PT",115.06,3)
	;;=
	;;^DD(200,0,"PT",115.06,6)
	;;=
	;;^DD(200,0,"PT",115.07,2)
	;;=
	;;^DD(200,0,"PT",115.07,41)
	;;=
	;;^DD(200,0,"PT",115.07,43)
	;;=
	;;^DD(200,0,"PT",115.08,4)
	;;=
	;;^DD(200,0,"PT",115.08,6)
	;;=
	;;^DD(200,0,"PT",115.7,2)
	;;=
	;;^DD(200,0,"PT",115.7,101)
	;;=
	;;^DD(200,0,"PT",119.5,5)
	;;=
	;;^DD(200,0,"PT",119.6,1)
	;;=
	;;^DD(200,0,"PT",120.5,3)
	;;=
	;;^DD(200,0,"PT",120.8,5)
	;;=
	;;^DD(200,0,"PT",120.8,21)
	;;=
	;;^DD(200,0,"PT",120.8,24)
	;;=
	;;^DD(200,0,"PT",120.81,2)
	;;=
	;;^DD(200,0,"PT",120.813,1)
	;;=
	;;^DD(200,0,"PT",120.814,1)
	;;=
	;;^DD(200,0,"PT",120.826,1)
	;;=
	;;^DD(200,0,"PT",120.85,.5)
	;;=
	;;^DD(200,0,"PT",120.8502,2)
	;;=
	;;^DD(200,0,"PT",121,.05)
	;;=
	;;^DD(200,0,"PT",121,2)
	;;=
	;;^DD(200,0,"PT",121,3)
	;;=
	;;^DD(200,0,"PT",121,4.1)
	;;=
	;;^DD(200,0,"PT",121,6)
	;;=
	;;^DD(200,0,"PT",121,7.1)
	;;=
	;;^DD(200,0,"PT",121.05,.02)
	;;=
	;;^DD(200,0,"PT",121.05,.04)
	;;=
	;;^DD(200,0,"PT",121.2,.05)
	;;=
	;;^DD(200,0,"PT",123,7)
	;;=
	;;^DD(200,0,"PT",123,10)
	;;=
	;;^DD(200,0,"PT",123.02,3)
	;;=
	;;^DD(200,0,"PT",123.02,4)
	;;=
	;;^DD(200,0,"PT",123.02,7)
	;;=
	;;^DD(200,0,"PT",123.5,5)
	;;=
	;;^DD(200,0,"PT",123.5,123.08)
	;;=
	;;^DD(200,0,"PT",123.54,1)
	;;=
	;;^DD(200,0,"PT",123.55,.01)
	;;=
	;;^DD(200,0,"PT",125.8,3)
	;;=
	;;^DD(200,0,"PT",125.8,7)
	;;=
	;;^DD(200,0,"PT",128,1.01)
	;;=
	;;^DD(200,0,"PT",128,1.05)
	;;=
	;;^DD(200,0,"PT",128,1.07)
	;;=
	;;^DD(200,0,"PT",128,1.09)
	;;=
	;;^DD(200,0,"PT",128,1.13)
	;;=
	;;^DD(200,0,"PT",128,1.17)
	;;=
	;;^DD(200,0,"PT",128,1.2)
	;;=
	;;^DD(200,0,"PT",128.2,.02)
	;;=
	;;^DD(200,0,"PT",128.4,.02)
	;;=
	;;^DD(200,0,"PT",128.992,.01)
	;;=
	;;^DD(200,0,"PT",130,.12)
	;;=
	;;^DD(200,0,"PT",130,.14)
	;;=
	;;^DD(200,0,"PT",130,.15)
	;;=
	;;^DD(200,0,"PT",130,.16)
	;;=
	;;^DD(200,0,"PT",130,.164)
	;;=
	;;^DD(200,0,"PT",130,.167)
	;;=
	;;^DD(200,0,"PT",130,.168)
	;;=
	;;^DD(200,0,"PT",130,.18)
	;;=
	;;^DD(200,0,"PT",130,.31)
	;;=
	;;^DD(200,0,"PT",130,.32)
	;;=
	;;^DD(200,0,"PT",130,.33)
	;;=
	;;^DD(200,0,"PT",130,.34)
	;;=
	;;^DD(200,0,"PT",130,.522)
	;;=
	;;^DD(200,0,"PT",130,.525)
	;;=
	;;^DD(200,0,"PT",130,.57)
	;;=
	;;^DD(200,0,"PT",130,.69)
	;;=
	;;^DD(200,0,"PT",130,1.099)
	;;=
	;;^DD(200,0,"PT",130,4)
	;;=
	;;^DD(200,0,"PT",130,5)
	;;=
	;;^DD(200,0,"PT",130,47)
	;;=
	;;^DD(200,0,"PT",130,48)
	;;=
	;;^DD(200,0,"PT",130,61)
	;;=
	;;^DD(200,0,"PT",130,63)
	;;=
	;;^DD(200,0,"PT",130,70)
	;;=
	;;^DD(200,0,"PT",130,123)
	;;=
	;;^DD(200,0,"PT",130,124)
	;;=
	;;^DD(200,0,"PT",130.02,2)
	;;=
	;;^DD(200,0,"PT",130.06,35)
	;;=
	;;^DD(200,0,"PT",130.06,39)
	;;=
	;;^DD(200,0,"PT",130.23,.01)
	;;=