COMTRAN Reconstruction

J28-6169 · January 1962

90.02.16

PDF page 155 of 221. Download the scanned PDF

The page as scanned

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

The text read off it

[90.02.16]

Immediately following the TXI instruction will be two or more of the following instructions:

TXI  SYS)191, 1, NUMBER-OF-CHARACTERS-TO-MOVE
TXI  SYS)199, 1, NUMBER-OF-CHARACTERS-TO-TEST-FOR-OVERFLOW
TXI  SYS)205, 1, NUMBER OF-CHARACTERS-TO-BYPASS
TXI  SYS)209, 1, NUMBER OF TRAILING-ZEROS-TO-INSERT
TXI  SYS)210, 1, NUMBER-OF-LEADING-ZEROS-TO-INSERT
TRA  SYS)219               Round current character
TXI  SYS)223, 1, TARGET-NUMERIC-LENGTH
TXI  SYS)227, 1, NUMBER-OF-CHARACTERS-TO-MOVE          *Note 1.
TXI  SYS)231, 1, NUMBER-OF-CHARACTERS-TO-TEST-FOR-OVERFLOW
                                                        *Note 1.
TXI  SYS)235, 1, NUMBER-OF-CHARACTERS-TO-BYPASS
                                                        *Note 1.

*Note 1. The last character processed under control of this instruction is examined for source field sign.

This type of MOVPAK call is always terminated by the instruction

TXI  SYS)223, 1, TARGET-NUMERIC-LENGTH

An example of a Move of the type XD to XD might appear in the listing as:

LDI  CP)+NN1                       Load Source Pointer
STI  SYS)132
LDI  CP)+NN2                       Load Target Pointer
STI  SYS)133
TSX  SYS)182,4                     Begin moving field
TXI  SYS)183,1,1                   XD to XD
TXI  SYS)191,1,10                  10 characters to a 10 character field
TXI  SYS)223,1,10

SYS)184

TXI  SYS)184,1,NUMBER-OF-CHARACTERS-TO-CONVERT

This is a MOVPAK subroutine which converts from external decimal to internal decimal leaving results in the AC or AC-MQ. The sign is assumed over the low order digit.

SYS)185

TXI  SYS)185,1,TARGET-EDIT-CONTROL      *Note 1.
OCT  TARGET-CONTROL-WORD-BITS

SYS)185 is a MOVPAK subroutine which moves an external decimal field to an edited field.