ACONTROL instruction

The ACONTROL instruction can change these HLASM options and controls within a program:

AFPR
Note: The AFPR option is not available as an assembler option at invocation of the assembler. It can only be used on ACONTROL instructions.
COMPAT
FLAG (except the RECORD/NORECORD and the PUSH/NOPUSH suboptions)
LIBMAC
RA2
TYPECHECK

The selections which can be specified are documented here for completeness.


                                  .-,---------.   
                                  V           |   
>>-+-----------------+--ACONTROL----selection-+----------------><
   '-sequence_symbol-'

sequence_symbol: Is a sequence symbol.
selection: Is one or more selections from the following options.

Because ACONTROL changes existing values, there are no default values for the ACONTROL instruction.


>>-+-AFPR---+--------------------------------------------------><
   '-NOAFPR-'

AFPR: Instructs the assembler that the additional floating point registers 1, 3, 5, and 7 through 15 can be specified in the program.
Note: The assembler starts with AFPR enabled.
NOAFPR: Instructs the assembler that no additional floating point registers, that is, only floating point registers 0, 2, 4, and 6 can be specified in the program.


>>-+-NOCOMPAT--------------------------+-----------------------><
   |            .-,---------------.    |   
   |            V                 |    |   
   '-COMPAT--(------| keyword |---+--)-'   

keyword

|--+-+-CASE---+------+------------------------------------------|
   | '-NOCASE-'      |   
   +-+-LITTYPE---+---+   
   | '-NOLITTYPE-'   |   
   +-+-MACROCASE---+-+   
   | '-NOMACROCASE-' |   
   +-+-SYSLIST---+---+   
   | '-NOSYSLIST-'   |   
   | .-NOTRANSDT-.   |   
   '-+-----------+---'   
     '-TRANSDT---'

COMPAT(CASE), abbreviation CPAT(CASE)

Instructs the assembler to maintain uppercase alphabetic character set compatibility with earlier assemblers.

COMPAT(NOCASE), abbreviation CPAT(NOCASE)

Instructs the assembler to allow mixed case alphabetic character set.

COMPAT(LITTYPE), abbreviation CPAT(LIT)

Instructs the assembler to return 'U' as the type attribute for all literals.

COMPAT(NOLITTYPE), abbreviation CPAT(NOLIT)

Instructs the assembler to return the correct type attribute for literals.

COMPAT(MACROCASE), abbreviation CPAT(MC)

Instructs the assembler to convert internally lowercase alphabetic characters in unquoted macro operands to uppercase alphabetic characters prior to macro expansion. (The source statement is unchanged).

COMPAT(NOMACROCASE), abbreviation CPAT(NOMC)

Instructs the assembler not to convert lowercase alphabetic characters (a through z) in unquoted macro operands.

COMPAT(SYSLIST), abbreviation CPAT(SYSL)

Instructs the assembler to treat sublists in SETC symbols as compatible with earlier assemblers.

COMPAT(NOSYSLIST), abbreviation CPAT(NOSYSL)

Instructs the assembler not to treat sublists in SETC symbols as character strings, when passed to a macro definition in an operand of a macro instruction.

COMPAT(TRANSDT),abbreviation CPAT(TRS)

Instructs the assembler to extend use of the translation table, as specified by the TRANSLATE assembler option, to any C-type character Self-Defining Terms.

COMPAT(NOTRANSDT),abbreviation CPAT(NOTRS)

Instructs the assembler not to translate any C-type character Self-Defining Terms.

NOCOMPAT, abbreviation NOCPAT

Instructs the assembler to:

Allow lowercase alphabetic characters in all language elements.
Treat sublists in SETC symbols as sublists when passed to a macro definition in the operand of a macro instruction.
Return the correct type attribute for literals.


         .-,----------------.     
         V                  |     
>>-FLAG(---+-integer------+-+-)--------------------------------><
           +-+-ALIGN---+--+       
           | '-NOALIGN-'  |       
           +-+-CONT---+---+       
           | '-NOCONT-'   |       
           +-+-EXLITW---+-+       
           | '-NOEXLITW-' |       
           +-+-IMPLEN---+-+       
           | '-NOIMPLEN-' |       
           +-+-PAGE0---+--+       
           | '-NOPAGE0-'  |       
           +-+-SUBSTR---+-+       
           | '-NOSUBSTR-' |       
           '-+-USING0---+-'       
             '-NOUSING0-'

integer: Specifies that error diagnostic messages with this or a higher severity code are printed in the source and object section of the assembly listing.
FLAG(ALIGN), abbreviation FLAG(AL): instructs the assembler to issue diagnostic message ASMA033I, ASMA212W, or ASMA213W when an inconsistency is detected between the operation code and the alignment of addresses in machine instructions.
FLAG(NOALIGN), abbreviation FLAG(NOAL): instructs the assembler not to issue diagnostic message ASMA033I, ASMA212W, or ASMA213W when an inconsistency is detected between the operation code and the alignment of addresses in machine instructions.
FLAG(CONT): specifies that the assembler is to issue diagnostic messages ASMA430W through ASMA433W when an inconsistent continuation is encountered in a statement.
FLAG(NOCONT): specifies that the assembler is not to issue diagnostic messages ASMA430W through ASMA433W when an inconsistent continuation is encountered in a statement.
FLAG(EXLITW): instructs the assembler to issue diagnostic warning ASMA016W when a literal is specified as the object of an EX instruction.
FLAG(NOEXLITW): instructs the assembler to suppress diagnostic warning message ASMA016W when a literal is specified as the object of an EX instruction.
FLAG(IMPLEN): instructs the assembler to issue diagnostic message ASMA169I when an explicit length subfield is omitted from an SS-format machine instruction.
FLAG(NOIMPLEN): instructs the assembler not to issue diagnostic message ASMA169I when an explicit length subfield is omitted from an SS-format machine instruction.
FLAG(PAGE0): instructs the assembler to issue diagnostic message ASMA309W when an operand is resolved to a baseless address and a base and displacement is expected.
FLAG(NOPAGE0): instructs the assembler not to issue diagnostic message ASMA309W when an operand is resolved to a baseless address and a base and displacement is expected.
FLAG(SUBSTR), abbreviation FLAG(SUB): instructs the assembler to issue warning diagnostic message ASMA094I when the second subscript value of the substring notation indexes past the end of the character expression.
FLAG(NOSUBSTR), abbreviation FLAG(NOSUB): instructs the assembler not to issue warning diagnostic message ASMA094I when the second subscript value of the substring notation indexes past the end of the character expression.
FLAG(USING0), abbreviation FLAG(US0): instructs the assembler to issue diagnostic warning message ASMA306W for a USING that is coincident with or overlaps the implied USING 0,0, when the USING(WARN) suboption includes the condition numbers 1 and 4.
FLAG(NOUSING0), abbreviation FLAG(NOUS0): instructs the assembler to suppress diagnostic warning message ASMA306W


>>-+-NOLIBMAC-+------------------------------------------------><
   '-LIBMAC---'

LIBMAC, abbreviation LMAC: Specifies that, for each macro, macro definition statements read from a macro library are to be embedded in the input source program immediately preceding the first invocation of that macro.
NOLIBMAC, abbreviation NOLMAC: Specifies that macro definition statements read from a macro library are not to be included in the input source program.


                    .-,NOLIST-.     
>>-OPTABLE(-+-DOS-+-+---------+-)------------------------------><
            +-ESA-+ '-,LIST---'     
            +-XA--+                 
            +-370-+                 
            +-YOP-+                 
            +-ZOP-+                 
            +-ZS3-+                 
            +-ZS4-+                 
            +-ZS5-+                 
            '-ZS6-'

OPTABLE

Lets you switch to a different opcode table. This table is then used to resolve any opcodes after the ACONTROL statement.

DOS: Instructs the assembler to load and use the DOS operation code table. The DOS operation code is designed specifically for assembling programs previously assembled using the DOS/VSE assembler. The operation code table contains the System/370 machine instructions, excluding those with a vector facility.
ESA: Instructs the assembler to load and use the operation code table that contains the ESA/370 and ESA/390 architecture machine instructions, including those with a vector facility. Equivalent to MACHINE(S390E).
UNI: Instructs the assembler to load and use the operation code table that contains the System/370 and System/390 architecture machine instructions, including those with a vector facility, and Z/Architecture machine instructions.
XA: Instructs the assembler to load and use the operation code table that contains the System/370 extended architecture machine instructions, including those with a vector facility. Equivalent to MACHINE(S370XA).
370: Instructs the assembler to load and use the operation code table that contains the System/370 machine instructions, including those with a vector facility. Equivalent to MACHINE(S370).
YOP: Same as OPTABLE(ZOP) but with the addition of the long displacement facility. Equivalent to MACHINE(ZSERIES-2).
ZOP: Instructs the assembler to load and use the operation code table that contains the symbolic operation codes for the machine instructions specific to Z/Architecture systems. Equivalent to MACHINE(ZSERIES).
ZS3: Same as OPTABLE(YOP) but with the addition of support for the z9-109 instructions. Equivalent to MACHINE(ZSERIES-3).
ZS4: Same as OPTABLE(ZS3) but with the addition of support for the z10 instructions. Equivalent to MACHINE(ZSERIES-4).
ZS5: Same as OPTABLE(ZS4) but with the addition of support for the z196 instructions. Equivalent to MACHINE(ZSERIES-5).
ZS6: Same as OPTABLE(ZS5) but with the addition of support for the zEnterprise EC12 (zEC12) instructions. Equivalent to MACHINE(ZSERIES-6).
LIST: Instructs the assembler to produce the Operation Code Table Contents section in the listing. Equivalent to MACHINE(LIST).
NOLIST: Instructs the assembler not to produce the Operation Code Table Contents section in the listing. Equivalent to MACHINE(NOLIST).

Note: Any macros fetched from SYSLIB receive the current optable setting. If a switch is made to a different table, then any previously resolved macros might be fetched again. Conversely if a switch is made back to a previously used table then any macros that were fetched earlier are available again.


>>-+-NORA2-+---------------------------------------------------><
   '-RA2---'

RA2: Instructs the assembler to suppress error diagnostic message ASMA066W when 2 byte relocatable address constants are defined in the source
NORA2: Instructs the assembler to issue error diagnostic message ASMA066W when 2 byte relocatable address constants are defined in the source


>>-+-+-------------+------------------------------+------------><
   | '-NOTYPECHECK-'                              |   
   |            .-,-----------------------.       |   
   |            V   .-MAGNITUDE-------.   | (1)   |   
   '-TYPECHECK(---+-+-----------------+-+-+-----)-'   
                  | '-+-------------+-' |             
                  |   '-NOMAGNITUDE-'   |             
                  | .-REGISTER-------.  |             
                  '-+----------------+--'             
                    '-+------------+-'                
                      '-NOREGISTER-'

Notes:

Choose at least one option.

TYPECHECK(MAGNITUDE): Specifies that the assembler performs magnitude validation of signed immediate-data fields of machine instruction operands.
TYPECHECK(NOMAGNITUDE): Specifies that the assembler not perform magnitude validation of signed immediate-data fields of machine instruction operands.
TYPECHECK(REGISTER): Specifies that the assembler performs type checking of register fields of machine instruction operands.
TYPECHECK(NOREGISTER): Specifies that the assembler not perform type checking of register fields of machine instruction operands.
NOTYPECHECK: Specifies that the assembler not perform any type checking of machine instruction operands.

For further details of the TYPECHECK option, refer to the appendix "TYPECHECK Assembler Option" in the HLASM Programmer's Guide.