!JOB APRH00XX,TCPV,7.   COMPILE, LOAD, AND RUN TEST PROGRAM
!LIMIT (CO,40),(TIME,10),(ORDER),(ACCOUNT)
!PAGE
!*
!*
!*    COMPILE, LOAD, AND RUN TEST PROGRAM FOR AP
!*
!*    J:LOAD:TEST.APRH00XX
!*
!*
!*
!ASSIGN M:CI,(FILE,CI:TEST,APRH00XX),(IN)
!ASSIGN M:BO,(FILE,BO:TEST,APRH00XX),(OUT),(SAVE)
!AP  CI,BO,LO
!LOAD (EF,(BO:TEST,APRH00XX)),(LMN,LM:TEST),(PERM),(SL,F),(MAP)
!RUN (LMN,LM:TEST,APRH00XX)
!PCL
  DELETE BO:TEST
  DELETE LM:TEST
  END
!EOD
