CALL TPCB.ExTrans(3,3,3,3.00);