CRP-IOL, I$CA, I$CBFS

* ????-???-???? (CRP-IOL) DRAWING NO. ????????-???-?? PAGE 3

0101 * 0102 * I$CA CALL I$CA I$CWBS CE CARD READER 0103 * DAC HEADING BUFFER I$CRDY ERROR 0104 * EOF RETURN I$CK 0105 * NORMAL RETURN C$CTLU 0106 * C$CTCI 0107 * 0108 * I$CBFS XAC I$CBFS NONE 0109 * (LINKED WITH I$CA) 0110 * 0111 * I$CK CALL I$CK I$CHER CE CARD READER 0112 * ERROR RETURN ERROR 0113 * NORMAL RETURN 0114 * 0115 * A-REGISTER CONTAINS CHARACTER 0116 * ON NORMAL RETURN 0117 * 0118 * I$CRDY CALL I$CRDY I$CHER CE CARD READER 0119 * ERROR RETURN ERROR 0120 * NORMAL RETURN 0121 * 0122 * I$CHER CALL I$CHER C$ER CE CARD READER 0123 * ERROR RETURN ERROR 0124 * NORMAL RETURN 0125 * 0126 * I$CWBS CALL I$CWBS NONE 0127 * RETURN 0128 * 0129 * EXTERNAL MODULES 0130 * 0131 * NAME DEFINITION 0132 * 0133 * C$CTLU CHARACTER TABLE LOOK-UP 0134 * 0135 * C$CTCI CARD CODE TO ISO CODE CONVERSION TABLE 0136 * 0137 * C$ER CONTROL ERROR ROUTINE 0138 * 0139 * 0140 * ERRORS 0141 * 0142 * CE CARD READER ERROR 0143 * 0144 * THIS ERROR IS REPORTED THROUGH C$ER (CONTROL ERROR 0145 * ROUTINE). 0146 * 0147 * 0148 * METHOD 0149 * 0150 * I$CA READS ONE CARD, CONVERTING THE 6-BIT CHARACTER CODES