&LABL    PROC                                                           MR$00010
MA#P9    NAME                                                           MR$00020
MR$SRT   NAME           .SORT ENTER AND PROCESS              . 06/06/72 MR$00030
&LABL    L     15,=A(MR$ORT)                                            MR$00040
         LA    0,8(0,0)            SORT NO MORE RECORDS                 MR$00050
         BALR  14,15                                                    MR$00060
         END                                                            MR$00070
