TX=[P:*]; TXX=<10; TXY=20; BL=25; C=($SELECT(SAMECAT=WPEGT_T48A;WAY=T*;MAX=1;))[SS:10];