*DECK ISSUE                                                             000230
      PROC ISSUE ((GH), (I), (J), (K));                                 000240
*CALL COMISSUE                                                          000250
