4.1.3 SPECIAL-NAMES Paragraph
The SPECIAL-NAMES paragraph:
- Relates IBM-specified environment-names to user-defined mnemonic-names
- Relates alphabetic-names to character sets or collating sequences
- Specifies symbolic characters
- Relates class names to sets of characters
- Specifies a currency sign value, and the currency symbol used in the
X PICTURE clause to represent the currency sign value (multiple currency
X sign values and currency symbols may be specified) - Specifies that the functions of the comma and decimal point are to be
interchanged in PICTURE clauses and numeric literals
X Note: The clauses in the SPECIAL-NAMES paragraph can appear in any order.
___ Format _________________________________________________________________________________________________
| |
| <______________________________________________________________________ |
| >>__SPECIAL-NAMES.____ __________________________________________________________________ _|_____________> |
| |_environment-name-1__ ____ __mnemonic-name-1______________________| |
| | |_IS_| | |
| |_environment-name-2__ _ ____ __mnemonic-name-2__ _____________ _ _| |
| | |_IS_| |_| entry 1 |_| | |
| |_| entry 1 |______________________________| |
| |
| >__ ________________________________________________________________________ ____________________________> |
| | <____________________________________________________________________ | |
| |___ALPHABET__alphabet-name-1__ ____ __ _STANDARD-1__________________ _|_| |
| |_IS_| |_STANDARD-2__________________| |
| |_NATIVE______________________| |
| |_EBCDIC______________________| |
| | <_________________________ | |
| |___literal-1__| phrase 1 |_|_| |
| |
| <_____________________________________________________________________ |
| >____ _________________________________________________________________ _|_______________________________> |
| |_SYMBOLIC__ ____________ __| symbolic |__ _____________________ _| |
| |_CHARACTERS_| |_IN__alphabet-name-2_| |
| |
| <____________________________________________________________________________ |
| >____ ________________________________________________________________________ _|________________________> |
| | <_______________________________________ | |
| |_CLASS__class-name-1__ ____ ____literal-4__ ________________________ _|_| |
| |_IS_| |_ _THROUGH_ __literal-5_| |
| |_THRU____| |
| |
| >__ _________________________________________________________________________________________ ___________> |
| |_CURRENCY__ ______ __ ____ __literal-6__ ______________________________________________ _| |
| |_SIGN_| |_IS_| |_ ________ __ PICTURE __ SYMBOL __ literal-7 _| |
| |_ WITH _| |
| |
| >__ ______________________________ __ ______ ___________________________________________________________>< |
| |_DECIMAL-POINT__ ____ __COMMA_| | (1)| |
| |_IS_| |_.____| |
| |
| entry 1: |
| |__ _ON__ ________ __ ____ __condition-1__ ______________________________________ _ _____________________| |
| | |_STATUS_| |_IS_| |_OFF__ ________ __ ____ __condition-2_| | |
| | |_STATUS_| |_IS_| | |
| |_OFF__ ________ __ ____ __condition-2__ _____________________________________ _| |
| |_STATUS_| |_IS_| |_ON__ ________ __ ____ __condition-1_| |
| |_STATUS_| |_IS_| |
| |
| phrase 1: |
| |__ ________________________ ____________________________________________________________________________| |
| |_ _THROUGH_ __literal-2_| |
| | |_THRU____| | |
| | <_________________ | |
| |___ALSO__literal-3_|____| |
| |
| symbolic: |
| <__________________________________________________ |
| <______________________ <___________ | |
| |______symbolic-character-1_|__ _ARE_ ____integer-1_|_|__________________________________________________| |
| |_IS__| |
| |
| Note: |
X | (1) This separator period must be used if any of the optional clauses are selected. |
| |
|____________________________________________________________________________________________________________|
- environment-name-1
-
System devices or standard system actions taken by the compiler.
| Table 8. Meanings of Environment Names | ||
| Environment Name-1 |
Meaning |
Allowed In |
|---|---|---|
| SYSIN SYSIPT |
System logical input unit |
ACCEPT |
| SYSOUT SYSLIST SYSLST |
System logical output unit |
DISPLAY |
| SYSPUNCH SYSPCH |
System punch device |
DISPLAY |
| CONSOLE | Console | ACCEPT and DISPLAY |
| C01-C12 |
Skip to channel 1 through 12, respectively |
WRITE ADVANCING (On AIX, OS/2, and Windows, with C01-C12, one line is advanced.) |
| CSP | Suppress spacing | WRITE ADVANCING |
| S01-S05 |
Pocket select 1-5 on punch devices |
WRITE ADVANCING (On AIX, OS/2, and Windows, with S01-S05, one line is advanced.) |
| AFP-5A | Advanced Function Printing(TM) | WRITE ADVANCING |
- environment-name-2
-
A 1-byte User Programmable Status Indicator (UPSI) switch. Valid
specifications for environment-name-2 are UPSI-0 through UPSI-7.
- mnemonic-name-1, mnemonic-name-2
-
Mnemonic-name-1 and mnemonic-name-2 follow the rules of formation for
user-defined names. Mnemonic-name-1 can be used in ACCEPT, DISPLAY,
and WRITE statements. Mnemonic-name-2 can be referenced only in the
SET statement. Mnemonic-name-2 can qualify cond-1 or cond-2 names.
Mnemonic-names and environment-names need not be unique. If you choose a mnemonic-name that is also an environment-name, its definition as a mnemonic-name will take precedence over its definition as an environment-name. - ON STATUS IS, OFF STATUS IS
-
UPSI switches process special conditions within a program, such as
year-beginning or year-ending processing. For example, at the
beginning of the Procedure Division, an UPSI switch can be tested; if
it is ON, the special branch is taken. (See "Switch-Status Condition"
in topic 6.1.6.7.)
- cond-1, cond-2
-
Condition-names follow the rules for user-defined names. At least one
character must be alphabetic. The value associated with the
condition-name is considered to be alphanumeric. A condition-name can
be associated with the on status and/or off status of each UPSI switch
specified.
In the Procedure Division, the UPSI switch status is tested through the associated condition-name. Each condition-name is the equivalent of a level-88 item; the associated mnemonic-name, if specified, is considered the conditional variable and can be used for qualification.
Condition-names specified in a containing program's SPECIAL-NAMES paragraph can be referenced from any contained program.
© Copyright IBM Corp. 1991, 1998
IBM Library Server Copyright 1989, 2005 IBM Corporation. All rights reserved.
Return to library: z/OS | z/OS.e | TPF | z/VSE | z/VM | IBM Hardware | IBM System z Redbooks
Glossary: IBM terminology
Publications: How to order publications
Readers: Download IBM Library Reader | Download IBM Softcopy Reader | Download Adobe® Acrobat® Reader®
Library management: Download IBM Softcopy Librarian
Contacts: Contact z/OS
Adobe, the Adobe logo, Acrobat, the Acrobat logo, and Acrobat Reader are registered trademarks of Adobe Systems incorporated.