TTP,TTP/-SP=TTP,EBASCI / LIBR=FORRES:RO MAXBUF=510 ;MAXBUF=10000 //