| 1 | COPY SYS:TEMP.BI<A:HAEREA.CM;SU SYS:TEMP.BI/T\0\r |
| 2 | $JOB\r |
| 3 | .DELETE P:HAEREA.BK,HAEREA.IF\r |
| 4 | .MUNG P:HAINCL,P:HAEREA.FT\r |
| 5 | .MUNG P:HAMAS,P:HAEREA.IF\r |
| 6 | .DELETE P:HAEREA.BK\r |
| 7 | .R F4\r |
| 8 | *P:HAEREA<P:HAEREA.IF\r |
| 9 | $END\r |
| 10 | \1a\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0 |