*DECK TXTRSTAT
USETEXT COMCBEG 
PROC COMRSTAT;
CONTROL STEXT;
BEGIN 
*CALL COMRSTAT
END 
TERM
