INS 5/2 ;08C1 ;JEH 19-MAR-84 [1516] Don't zero sort record area if SAME RECORD AREA ; clause used INS 35/58 ;08C2 HLRZ TA,CURFIL ;[1516] GET FILE TABLE ADDRESS PUSHJ PP,LNKSET ;[1516] SO THAT WE CAN FIND OUT LDB TE,FI.SRA## ;[1516] IF SAME RECORD AREA, IF SO JUMPN TE,PUT.PJ ;[1516] WE DON'T WANT TO CLEAR THE RECORD AREA. SUM 107626