Type ASSEMBLE
Source Lines : 383
Fixes Applied : 1
Most Recent Version : Tuesday, December 12, 1978
Last Fix ID : [R13022DS]

Operation

       DMSCIOR(CARDRD) -
       1. IF NUMBER OF BYTES TO READ IS GIVEN, SET R4 WITH THIS
       NUMBER.  OTHERWISE, SET R4 TO 80.
       2. SET R5 TO READER DEVICE ADDRESS.
       3. GO TO 11.

       DMSCIOP(CARDPH) -
       4. ZERO R4 TO INDICATE WE ARE PUNCHING.
       5. SET R5 TO PUNCH DEVICE ADDRESS.
       6. GO TO 11.

       DMSCIOSI -
       7. ZERO R4 TO INDICATE WE ARE PUNCHING.
       8. SET R5 TO PUNCH DEVICE ADDRESS.
       9. SET R11 TO ADDRESS OF CALLER'S BUFFER.
       10. GO TO 13.

       SINGLE CARD SETUP ROUTINE -
       11. ZERO R11 TO INDICATE READING OR PUNCHING 1 CARD RECORD.
       12. BUILD CCWS IN R13 AREA TO READ OR PUNCH ONE CARD.

       I/O ROUTINE -
       13. ISSUE START I/O.
       14. CALL DMSIOW(WAIT) TO WAIT FOR INTERRUPT.
       15. ANALYZE STATUS AND, IF NECESSARY, SENSE INFORMATION.
       16. RETURN TO CALLER WITH APPROPRIATE RETURN CODE.

Calls to Other Routines

                            DMSERR - PROCESS ERROR MESSAGES