COMTRAN Reconstruction

J28-6169 · January 1962

90.02.26

PDF page 165 of 221. Download the scanned PDF

The page as scanned

The scan of PDF page 165 of J28-6169
Select the scan to open it at full size.

The text read off it

[90.02.26]

SYS)244

TXI     SYS)244, 1, NUMBER-OF-ZEROS-TO-INSERT

This MOVPAK subroutine moves zeros to an alphabetic field.

SYS)245

TXI     SYS)245, 1, NUMBER-OF-CHARACTERS-TO-INSERT
OCT     CHARACTERS

This MOVPAK subroutine moves characters to an alphabetic field. The second word contains 6 characters of the type to be moved.

SYS)246

TXI     SYS)246, 1, NUMBER-OF-CHARACTERS-IN-TARGET-AREA

This MOVPAK subroutine moves the internal decimal right justified field in the AC or AC-MQ to an internal decimal field not justified.

SYS)247

TXI     SYS)247, 1, NUMBER-OF-CHARACTERS-IN-SOURCE-AREA

This MOVPAK subroutine moves from an internal decimal field not justified to internal decimal right justified in the AC or AC-MQ.

SYS)248

TRA     SYS)248
TARGET-CONTROL-WORD-TYPE-SD     *Note 1.

This MOVPAK subroutine converts the floating point AC to scientific decimal.

*Note 1. The CONTROL-WORD-TYPE-SD has the following form:

  • Prefix — = MZE if decimal in pictorial. = PZE if no decimal in pictorial.
  • Address — = Scale applied to mantissa in pictorial.
  • Tag — is Sign Convention.
    • = 0 is mantissa and exponent sign conventions are both minus.
    • = 1 if mantissa sign convention is minus and exponent sign convention is plus.
    • = 2 if mantissa sign convention is plus and exponent sign convention is minus.
    • = 3 if both mantissa and exponent sign conventions are plus.
  • Decrement — = Total length in characters, of the field.