1130 Commercial Subroutine Package - All about the IBM 1130 ...
1130 Commercial Subroutine Package - All about the IBM 1130 ...
1130 Commercial Subroutine Package - All about the IBM 1130 ...
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
INTRODUCTIONThe <strong>1130</strong> <strong>Commercial</strong> <strong>Subroutine</strong> <strong>Package</strong> has been written to facilitate <strong>the</strong> use ofFORTRAN in basic commercial programming. Included in <strong>the</strong> package are <strong>the</strong> followingitems:• The GET routine, which allows <strong>the</strong> programmer to decode input records after <strong>the</strong>yhave been read. This eliminates <strong>the</strong> common FORTRAN-associated problem thatoccurs when input cards enter <strong>the</strong> system in an unknown sequence. Input recordsthat vary in this way may be read with <strong>the</strong> Al format and converted to real numbers(using GET) after <strong>the</strong> program has determined which type record was just read.• An editing routine, EDIT, for <strong>the</strong> preparation of output in special formats. WithEDIT it is possible to insert commas, supply leading blanks, float dollar signs,display a CR symbol after negative numbers, etc. EDIT is especially useful in <strong>the</strong>preparation of invoices, checks, and o<strong>the</strong>r commercial documents.• Code conversion routines for data manipulation and more efficient data packing:GET - Al format to RealPUT - Real to Al formatPACK - Al to A2 formatUNPAC - A2 to Al formatA1A3 - Al to A3 formatA3A1 - A3 to Al formatDPACK - Dl to D4 formatDUNPK - D4 to D1 formatA1DEC - Al to decimal formatDECA1 - Decimal to Al format• A variable-length decimal arithmetic package. In this system, all arithmetic is donewith integer or decimal numbers, with field lengths chosen by <strong>the</strong> user. This subsetof <strong>the</strong> <strong>Commercial</strong> <strong>Subroutine</strong> <strong>Package</strong> includes routines for variable-length decimaladd (ADD), subtract (SUB), multiply (MPY), divide (DIV), compare (ICOMP), andsign test (NSIGN).Use of this system eliminates two of <strong>the</strong> arithmetic problems associated withFORTRAN: <strong>the</strong> accuracy problem (<strong>the</strong> inexact representation of fractions) and <strong>the</strong>magnitude problem (extended precision values limited to nine digits, etc.).• <strong>Subroutine</strong>s for improved speed and control of I/O devices. By taking advantage of<strong>the</strong> <strong>1130</strong>'s cycle-stealing capability, <strong>the</strong> overlapped I/O routines can substantiallyspeed <strong>the</strong> throughput rates of many jobs. <strong>Subroutine</strong>s are supplied for <strong>the</strong><strong>IBM</strong> 1442 Card Read Punch<strong>IBM</strong> 1442-5 Card Punch<strong>IBM</strong> 2501 Card Reader<strong>IBM</strong> 1132 Printer<strong>IBM</strong> 1403 PrinterConsole KeyboardConsole Typewriter-1-1.1.1.1111111111$11111E HHIcilil 1111111111n 11111 1111111111111111111111111 1111111111111111111111111