COMTRAN Reconstruction

J28-6169 · January 1962

90.02.30

PDF page 169 of 221. Download the scanned PDF

The page as scanned

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

The text read off it

[90.02.30]

SYS)267

TXI     SYS)267, 1, TARGET-EDIT-CONTROL
OCT     TARGET-CONTROL-WORD-BITS
AXT     NUMBER-OF-DIGITS-TO-CONVERT, 1

This MOVPAK subroutine converts from internal decimal in the AC-MQ to form an edited field. The TARGET-EDIT-CONTROL and TARGET-CONTROL-WORD-BITS have the same form as described under SYS)185.

SYS)268

TXI     SYS)268, 1, 1

This MOVPAK subroutine converts an edited field to internal decimal leaving the results in the AC-MQ. This instruction is followed by two or more of the following instructions:

TXI     SYS)269, 1, NUMBER-OF-CHARACTERS-TO-CONVERT
TXI     SYS)270, 1, NUMBER-OF-CHARACTERS-TO-TEST-FOR-OVERFLOW
TXI     SYS)271.1, NUMBER-OF-CHARACTERS-TO-BYPASS
TXI     SYS)272, 1, NUMBER-OF-DECIMAL-ZEROS-TO-DEVELOP
TXI     SYS)273, 1, NUMBER-OF-CHARACTERS-TO-SCAN-FOR-SIGN
TRA     SYS)274     Round Current Character
TXI     SYS)275, 1, TARGET-DECIMAL-NUMERIC-LENGTH (end of call
                                                    sequence)
TXI     SYS)276, 1, NUMBER-OF-CHARACTERS-TO-CONVERT          *Note 2
TXI     SYS)277, 1, NUMBER-OF-CHARACTERS-TO-TEST-FOR-OVERFLOW
                                                              *Note 2
TXI     SYS)278, 1, NUMBER-OF-CHARACTERS-TO-BYPASS           *Note 2
TXI     SYS)279, 1, NUMBER-OF-LEADING-DECIMAL-ZEROS-TO-DEVELOP
TXI     SYS)280, 1, NUMBER-OF-CHARACTERS-TO-CONVERT
TXI     SYS)281, 1, NUMBER-OF-CHARACTERS-TO-TEST-FOR-OVERFLOW
TXI     SYS)282, 1, NUMBER-OF-CHARACTERS-TO-BYPASS           *Note 1

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

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

SYS)269

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

This MOVPAK subroutine is used in conjunction with SYS)268 to convert an edited field to internal decimal.

SYS)270

TXI     SYS)270, 1, NUMBER-OF-CHARACTERS-TO-TEST-FOR-OVERFLOW

This MOVPAK subroutine is used in conjunction with SYS)268 to convert an edited field to internal decimal.