90.02.15

The text read off it

[90.02.15]

Case 3. For Data items located by a Positional Indicator.

MON  PI)NN,,0

where PI)NN is the Positional Indicator which locates the data item.

SYS)180

TSX  SYS)180,4
     TARGET-ADDRESS-REFERENCE
                                    Begin specific subroutine call

This is an entry to MOVPAK in which either the source address of the data item has been previously stored in SYS)132, or the source item is in a machine register (AC or MQ). In either case, the Target Pointer, SYS)133, is set up using the information in the calling sequence in the same manner as SYS)179, and the specific MOVE instructions beginning at 2,4 are executed.

SYS)181

TSX  SYS)181,4
     SOURCE-ADDRESS-REFERENCE
                                    Begin specific subroutine call

This is an entry to MOVPAK in which the target address of the data item has been previously stored in SYS)133 or the target address is a machine register (AC or MQ). In either case, the Source Pointer is set up using the information in the calling sequence in the same manner as SYS)179, and the specific Move instructions beginning at 2,4 are executed.

SYS)182

TSX  SYS)182,4
                                    Begin specific subroutine call

This is an entry to MOVPAK in which both the Source Pointer, SYS)132 and the Target Pointer SYS)133, have been preset by inline instructions; or a machine register is used for either or both source and target. The specific Move instructions are executed beginning at 1,4.

SYS)183

TXI  SYS)183,1,TARGET-SIGN-CONVENTION

This MOVPAK subroutine moves external decimal fields to external decimal fields. The TARGET-SIGN-CONVENTION is as follows: