COMTRAN Reconstruction

J28-6169 · January 1962

90.02.25

PDF page 164 of 221. Download the scanned PDF

The page as scanned

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

The text read off it

[90.02.25]

SYS)237

TXI     SYS)237, 1, NUMBER-OF-CHARACTERS-TO-BYPASS

This MOVPAK subroutine is used in conjunction with SYS)189 to move edited fields to external decimal fields.

SYS)238

TXI     SYS)238, 1, NUMBER-OF-CHARACTERS-TO-BYPASS

This MOVPAK subroutine is used in conjunction with SYS)190 to move edited fields to edited fields.

SYS)239

TXI     SYS)239, 1, NUMBER-OF-CHARACTERS-TO-MOVE

This MOVPAK subroutine moves alphabetic fields to alphabetic fields.

SYS)240

TXI     SYS)240, 1, NUMBER-OF-CHARACTERS-TO-MOVE

This MOVPAK subroutine moves alphabetic fields to alphabetic fields with additional blank insertion.

SYS)241

TXI     SYS)241, 1, NUMBER-OF-BLANKS-TO-INSERT

This MOVPAK subroutine is used in conjunction with SYS)240 to move alphabetic fields to alphabetic fields.

SYS)242

TXI     SYS)242, 1, ALPHABETIC-CONTROL     *Note 1.
PZE     CONTROL1,, CONTROL2

This MOVPAK subroutine moves alphabetic fields to alphabetic fields where some information was unknown at compile time.

*Note 1. ALPHABETIC CONTROL

Bits are placed in the decrement which indicate the following about CONTROL1 and CONTROL2.

OCTAL DIGIT MEANING
00001 Target field's length is in words (not characters)
00002 Source field's length is in words (not characters)
00004 CONTROL2 is the location of the target field's length (not length itself)
00010 CONTROL1 is the location of the source field's length (not length itself)

SYS)243

TXI     SYS)243, 1, NUMBER-OF-BLANKS-TO-INSERT

This MOVPAK subroutine moves blanks to an alphabetic field.