Previous File Previous Page Single Page Next Page Next File

* O100-01-H101 (DPM2UP) DRAWING NO. 41286623-001-02 PAGE 61

2096 * 2097 * R6C : READ AND CHECK EXTERNAL NAME 2098 * 2099 * 2100 * CALLING SEQUENCE: 2101 * JST R6C 2102 * ......RETURN 2103 * 2104 * THE SIX CHARACTER NAME IS PLACED IN SYL-SYL+2. IF 2105 * A NAME IS NOT FOUND. A 'V' ERROR IS FLAGGED AND 2106 * RETURN IS MAKE TO THE STATEMENT PROCESSOR. 2107 * 2108 * 2109 03016 0 000000 R6C DAC ** 2110 03017 -0 10 00533 JST* SYLR INPUT UP TO SIX CHARACTERS 2111 03020 0 02 00450 LDA SYL FETCH WORD CONTAINING FIRST TWO CHARS. 2112 03021 100040 SZE SKIP IF BOTH ARE BLANKS 2113 03022 -0 01 03016 JMP* R6C NAME EXISTS - RETURN TO CALLER 2114 03023 -0 01 00604 JMP* BCE9 FLAG 'V' ERROR AND EXIT - NO NAME 2115 * 2116 * 2117 EJCT *************************************************************
Previous File Previous Page Single Page Next Page Next File