HP 3000 Manuals

Data Division (cont.) [ COBOL/HP-UX Language Reference for the Series 700 and 800 ] MPE/iX 5.0 Documentation


COBOL/HP-UX Language Reference for the Series 700 and 800

Data Division (cont.) 
________________________________________________________________________
|(MF) (XOPEN)                                                          |
|                                                                      |
|The BELL Clause                                                       |
|                                                                      |
|Function                                                              |
|                                                                      |
|The BELL clause causes an audible alarm to occur each time the item   |
|containing the clause is displayed.  In order to cause the audible    |
|alarm to sound when the clause is accepted, you must define the       |
|BELL clause in General Format 5 of the ACCEPT statement:  the         |
|alarm will not sound if you define the BELL clause in the Screen      |
|Description Entry and then use General Format 4 of the ACCEPT         |
|statement.                                                            |
________________________________________________________________________

            

General Format 

[]
________________________________________________________________________ |(MF) (XOPEN) | | | |Syntax Rules | | | | | | | |1. This clause is allowed only with elementary items. | | | |2. BELL and BEEP are equivalent. (MF) | | | | | |General Rule | | | |The BELL clause causes an alarm to occur each time the item containing| |the clause is accepted or displayed. | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | |The BLANK Clause | | | |Function | | | |During a DISPLAY operation, each subsidiary item within a screen-name | |is displayed according to source sequence. When an item with BLANK | |LINE is encountered, the line is cleared to spaces from the beginning | |of the line to the end of the line. The cursor remains in the | |same position as before the BLANK LINE was actioned. When an | |item with BLANK SCREEN is encountered, the entire screen is | |cleared to spaces and the cursor repositioned to line 1, column | |1. | ________________________________________________________________________ General Format
[]
________________________________________________________________________ |(MF) (XOPEN) | | | |Syntax Rules | | | | | | | |1. The BLANK SCREEN clause can be specified in any screen | | description entry. | | | |2. The BLANK LINE clause can be specified only for elementary | | items. | | | | | |General Rules | | | | | | | |1. The BLANK SCREEN clause is executed before DISPLAY of a screen | | data item, no matter where it appears. If the clause is | | specified, all the screen is cleared and the cursor is placed at | | line 1, column 1. | | | |2. When BLANK LINE is specified, blanking begins at column 1 of | | the line specified for the screen data element in whose | | description it is included and continues through the end of the | | line. | | | |3. If neither the BLANK nor the ERASE clause is specified, | | only the particular character positions corresponding to | | the screen data element are modified when the element is | | displayed. The rest of the screen content remains the | | same. | | | |4. The BLANK SCREEN clause causes the screen to return to its | | default foreground and background colors. For additional | | effects, if the screen item is subject to a FOREGROUND-COLOR or | | BACKGROUND-COLOR clause, see the sections on those clauses. | | | |5. The BLANK clause is ignored in an ACCEPT statement. | | | |6. The erasing is done before the item is displayed. | | | |7. When the BLANK SCREEN clause is used, only color options | | (foreground-color and background-color) should be used on | | the same screen. Other attributes will be accepted but | | ignored. | | | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | |The BLANK WHEN ZERO Clause in the Screen Section Function | | | |The BLANK WHEN ZERO clause causes the blanking of a screen item when | |its value is zero. | | | |General Format | | | | BLANK WHEN ZERO | | | |Syntax Rule | | | |This clause is allowed only with input, output and update fields that | |are numeric or numeric-edited. | | | |General Rule | | | | | | | |1. The BLANK WHEN ZERO clause causes the blanking of a screen item | | when its value is zero. | | | |2. This clause has no effect when the cursor is in the field, that | | is the contents of the field are always displayed, even if zero, | | if this is the current input field. | | | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | |The BLINK Clause | | | |Function | | | |The BLINK clause causes the screen item to blink when it appears on | |the screen. | | | |General Format | | | | BLINK | | | |Syntax Rules | | | | | | | |1. The BLINK clause is allowed with any screen item. | | | |2. If the BLINK clause is specified at group level, it applies to | | all suitable subordinate elementary items. | | | | | |General Rule | | | |The BLINK clause causes the screen item to blink when it appears on | |the Screen. | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | |The COLUMN Clause | | | |Function | | | |The COLUMN clause specifies the column at which the screen item starts| |on the screen. | ________________________________________________________________________ General Format
[]
________________________________________________________________________ |(MF) (XOPEN) | | | |Syntax Rules | | | | | | | |1. Identifier-l must be an unsigned numeric integer and must contain| | a value greater than zero and less than 256. | | | |2. Integer-l must be unsigned, greater than zero and less than | | 256. | | | |3. PLUS and "+" are equivalent. | | | |4. Omitting the NUMBER option results in a default value of | | +1. | | | |5. COLUMN 1 is assumed for screen descriptions which specify the | | LINE clause but omit the COLUMN clause. | | | |6. The COLUMN clause can be specified with any elementary | | item. | | | |7. COL is an abbreviation for COLUMN. (MF) | | | | | |General Rules | | | | | | | |1. The COLUMN clause specifies the column in which the screen | | item is to appear on the screen in an ACCEPT or DISPLAY | | operation. | | | |2. If the COLUMN clause has an identifier or an integer but does not| | specify PLUS, "+" or "-", the clause gives an absolute | | column number. Column 1 is the column number specified | | in the AT phrase of the statement. If the AT phrase is | | not specified, then column 1 is the first column on the | | screen. | | | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | | | | | |3. If PLUS, "+" or "_" is specified in the COLUMN clause, then the | | column number is relative to that at which the preceding screen | | item ends, regardless of whether or not the statement displays | | the preceding item on the screen. This depends on the | | current effective length of that item at run-time, derived | | from its PICTURE, VALUE and SIZE clauses. The counting | | of column numbers restarts at a level 01 item at column | | 1. | | | |4. If a Screen Description contains neither a LINE or COLUMN clause,| | and the item is not a level 01 item, COLUMN+1 is assumed. The | | item then starts immediately following the preceding item in the | | Screen Section. | | | |5. If a COLUMN position is specified that is off the screen, | | wraparound occurs to the next (or previous) line. | | | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | |The CONTROL Clause | | | |Function | | | |The CONTROL clause allows attributes associated with a screen section | |item to be defined at run-time. | | | |General Format | | | | [CONTROL IS identifier-1] | | | |Syntax Rules | | | | | | | |1. This clause is allowed with any screen item. | | | |2. If this clause is specified at group level, it applies to all | | elementary subordinate items. | | | |3. Identifier-1 must be an alphanumeric data item. The maximum | | permitted size of the item is PIC X(65535). | | | |4. Attributes specified in identifier-1 override any statically | | defined attributes. | | | |5. CONTROL statements must not be nested. | | | |6. Identifier-1 must not be subject to an OCCURS clause. | | | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | |General Rules | | | | | | | |1. The attributes which can be specified in the CONTROL clause are a| | subset of the screen section syntax as shown below. | | | ________________________________________________________________________
[]
________________________________________________________________________ |(MF) (XOPEN) | | | | | | | |2. If identifier-1 contains spaces, the statically defined | | attributes are used for any accept or display of the item. | | | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | |The ERASE Clause | | | |Function | | | |The ERASE clause clears part of the line or the screen starting at the| |cursor position. | ________________________________________________________________________ General Format
[]
________________________________________________________________________ |(MF) (XOPEN) | | | |Syntax Rule | | | |The ERASE clause can be specified only for elementary items. | | | |General Rules | | | | | | | |1. When ERASE EOL is specified, blanking begins at the line and | | column coordinates specified for the screen data element in whose| | description it is included and continues through the end of the | | line. | | | |2. When ERASE EOS is specified, blanking begins at the line and | | column coordinates specified for the screen data element in whose| | description it is included and continues through the end of the | | screen. | | | |3. If neither the BLANK nor the ERASE clause is specified, | | only the particular character positions corresponding to | | the screen data element are modified when the element is | | displayed. | | | |4. The clause is ignored in an ACCEPT operation. | | | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | |The FOREGROUND-COLOR Clause | | | |Function | | | |The FOREGROUND-COLOR clause specifies the foreground color of the | |screen item. | ________________________________________________________________________ General Format
[]
________________________________________________________________________ |(MF) (XOPEN) | | | |Syntax Rules | | | | | | | |1. FOREGROUND-COLOR and FOREGROUND-COLOUR are equivalent. | | | |2. This clause is allowed with any screen item. | | | |3. If this clause is specified at group level, it applies to all | | elementary subordinate items. | | | |4. Integer-1 must be a value from 0 to 7. | | | | | |General Rules | | | | | | | |1. This clause is only available for use with a color screen. | | | |2. Integer-1 or identifier-1 specifies the foreground color of the | | screen item. The colors and their corresponding values | | are: | | | | | | 0 black | | 1 blue | | 2 green | | 3 cyan | | 4 red | | 5 magenta | | 6 brown or yellow | | 7 white | | | | | |3. If this clause is not specified, the foreground color defaults to| | white. | | | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | | | | | |4. to one that does, then when the screen item is displayed by a | | DISPLAY statement the specified color becomes the default | | foreground color. It remains the default foreground color until | | either another screen item with this combination of options | | is displayed (whether in the same DISPLAY statement or | | another), or a Format 3 DISPLAY statement with both options is | | executed. | | | |5. If the HIGHLIGHT clause is also specified, foreground colors are | | brightened and lightened; for example on some hardware, black can| | become grey and brown can become yellow. However, this does not | | apply to the BLANK SCREEN clause. | | | |6. Identifier-1 must be an unsigned numeric integer and should | | contain a value between 0 and 7. Any value higher than 7 | | will be divided by 8 and the remainder used as the color | | value. | | | |7. Identifier-1 must not be subject to OCCURS clauses. | | | |8. Whether a value of 6 in integer-1 or identifier-1 produces brown | | or yellow depends on the terminal hardware. | | | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | |The FULL Clause | | | |Function | | | |The FULL clause specifies that the operator must either leave the | |screen item completely empty or fill it entirely with data. | ________________________________________________________________________ General Format
[]
________________________________________________________________________ |(MF) (XOPEN) | | | |Syntax Rules | | | | | | | |1. The FULL clause is valid only in input and update fields and | | group item. | | | |2. If this clause is specified at group level, it applies to all | | suitable subordinate elementary item. | | | |3. FULL and LENGTH-CHECK are equivalent. (MF) | | | | | |General Rules | | | | | | | |1. The FULL clause is effective during the execution of any | | ACCEPT statement that causes the screen item to be accepted | | provided the cursor enters the screen item at some time during | | the ACCEPT operation. Until this clause is satisfied, | | terminator keystrokes are rejected. If the item is fixed-format | | numeric-edited, the cursor is repositioned to the decimal point | | position. | | | |2. If the screen item is alphanumeric, then to satisfy this clause, | | either the entire item must contain only spaces or prompt | | characters, or the first and last character positions must | | contain non-space, non-prompt characters. | | | |3. If the screen item is free-format numeric or free-format | | numeric-edited, then to satisfy the clause, either the | | resultant value must be zero, or both the first and last | | character positions must contain non-space, non-prompt | | characters. | | | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | | | | | |4. If the screen item is fixed-format numeric-edited, then to | | satisfy the clause either the value must be zero or there must be| | no digit positions in which zero-suppression has taken | | effect. | | | |5. The FULL clause has no effect on fixed-format numeric or on | | numeric-edited screen items that have no zero- suppression | | positions. | | | |6. For update fields, the FULL clause can be satisfied by initial | | data as well as operator-keyed data. | | | |7. The FULL clause can not be effective if a function key is used to| | terminate the ACCEPT operation. (See your COBOL System Reference| | for details of configuration options.) | | | |8. An error message can be configured for display on the screen if | | the FULL clause is not satisfied. (See your COBOL System | | Reference for details of configuration options.) | | | ________________________________________________________________________ ________________________________________________________________________ |(MF) | | | |The GRID Clause | | | |Function | | | |The GRID clause causes each character of the screen item to have a | |vertical line on its left-hand side when the item appears on the | |screen. Each line is within the character-position. | | | |General Format | | | | GRID | | | |Syntax Rules | | | | | | | |1. The GRID clause can be used with any screen item. | | | |2. If the GRID clause is specified at group level, it applies to all| | suitable subordinate elementary items. | | | |3. If this clause is used on a system that does not support | | characters with vertical left-hand lines it has no effect. | | | | | |General Rule | | | |The GRID clause causes each character of the screen item to have a | |vertical line on its left-hand side when the item appears on the | |screen. Each line is within the character-position. | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | |The HIGHLIGHT Clause | | | |The HIGHLIGHT clause causes the screen item to appear in high | |intensity mode when it appears on the screen. | | | |General Format | | | | HIGHLIGHT | | | |Syntax Rules | | | | | | | |1. This clause is valid for input, output, update or literal | | fields. | | | |2. If the HlGHLlGHT clause is specified at group level, it applies | | to all suitable subordinate elementary items. | | | | | |General Rule | | | | | | | |1. If the FOREGROUND-COLOR clause is a]so specified, the HIGHLIGHT | | clause causes the foreground colors to become brighter and | | lighter; for example on some hardware, black can become grey and | | brown can become yellow. | | | |2. This does not apply to the blank screen clauses. | | | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | |The JUSTIFIED Clause in the Screen Section | | | |Function | | | |The JUSTIFIED clause specifies non-standard positioning of data within| |a screen item when data is either moved to it or entered into | |it. | ________________________________________________________________________ General Format
[]
________________________________________________________________________ |(MF) (XOPEN) | | | |Syntax Rules | | | | | | | |1. JUST is an abbreviation for JUSTIFIED. | | | |2. The JUSTIFIED clause is allowed only with input, output and | | update fields. | | | | | |General Rules | | | | | | | |1. If the screen item is an output or update field, when data is | | moved to it from the sending item, the JUSTIFIED clause is | | applied according to the normal rules for MOVE. | | | |2. If the screen item is an input or update field, when the | | accepting of data into it has terminated, the JUSTIFIED clause | | causes the data entered to be moved right by the number of | | character positions occupied by prompt characters, and the left | | of the field to be padded with spaces. This is done before the | | data is moved to the receiving item. This does not occur if data| | is not entered. | | | |3. If the screen item has a SECURE clause, the effect on the | | data is the same as it would be without the presence of | | the SECURE clause, but this effect does not appear on the | | screen. | | | ________________________________________________________________________ ________________________________________________________________________ |(MF) | | | |The LEFTLINE Clause Function | | | |The LEFTLINE clause causes the leftmost character of the screen | |item to have a vertical line on its left-hand side when the | |item appears on the screen. The line is within the character- | |position. | | | |General Format | | | | LEFTLINE | | | |Syntax Rules | | | | | | | |1. The LEFTLINE clause can be used with any screen item. | | | |2. If the LEFTLINE clause is specified at group level, it applies to| | all suitable subordinate elementary items. | | | |3. If this clause is used on a system that does not support | | characters with vertical left-hand lines it has no effect. | | | | | |General Rule | | | |The LEFTlINE clause causes the leftmost character of the screen item | |to have a vertical line on its left-hand side when the item appears on| |the screen. The line is within the character-position. | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | |The LINE Clause | | | |Function | | | |The LINE clause specifies the line at which the screen item starts on | |the screen. | ________________________________________________________________________ General Format
[]
________________________________________________________________________ |(MF) (XOPEN) | | | |Syntax Rules | | | | | | | |1. Identifier-l must be an unsigned numeric integer and must contain| | a value greater than zero and less than 256. | | | |2. Integer-1 must be unsigned, greater than zero and less than | | 256. | | | |3. PLUS and "+" are equivalent. | | | |4. Omitting the NUMBER option results in a default value of | | +1. | | | |5. The current line is assumed for screen descriptions which omit | | the LINE clause. | | | |6. The LINE clause can be specified with any elementary item. | | | | | |General Rules | | | | | | | |1. The LINE clause specifies the line on which the screen | | item is to appear on the screen in an ACCEPT or DISPLAY | | operation. | | | |2. If the LINE clause has an identifier or an integer but does not | | specify PLUS, "+" or "-", the clause gives an absolute line | | number. Line 1 is the line number specified in the AT phrase of | | the statement. If the AT phrase is not specified, then line 1 is| | the first line on the screen. | | | |3. If PLUS, "+" or "-" is specified in the LINE clause, then the | | line number is relative to that at which the preceding | | screen item ends, regardless of whether or not the statement | | displays the preceding item on the screen. This depends on | | the current effective length of that item at run-time, | | derived from its PICTURE, VALUE and SIZE clauses. The | | counting of line numbers restarts at a level 01 item at line | | 1. | | | |4. If a Screen Description contains neither a LINE or COLUMN clause,| | and the item is not a level 01 item, COLUMN +1 is assumed. The | | item then starts immediately following the preceding item in the | | screen section. | | | |5. If a LINE position is specified that is off the screen, the | | ACCEPT or DISPLAY is truncated. | | | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | |The LOWLIGHT Clause | | | |Function | | | |The LOWLIGHT clause specifies that the field is to appear on the | |screen with the lowest intensity. | | | |General Format | | | | LOWLIGHT | | | |Syntax Rule | | | |The LOWLIGHT clause can be specified only for an elementary screen | |description entry. | | | |General Rule | | | |The LOWLIGHT clause specifies that the field is to appear on the | |screen with the lowest intensity. | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | |The OCCURS Clause in the Screen Section Function | | | |The OCCURS clause eliminates the need for separate entries for | |repeated screen items and supplies information required for the | |application of subscripts or indices. | | | |General Format | | | | OCCURS integer-1 TIMES | | | |Syntax Rules | | | | | | | |1. This clause is allowed only with input, output and update fields | | and with group items. | | | |2. If OCCURS clauses apply to the screen item, then the same number | | of OCCURS clauses, specifying the same number of occurrences, | | must apply to the receiving item. These OCCURS clauses must not | | include the DEPENDING phrase. | | | |3. If OCCURS clauses apply to the screen item, either the same | | number of OCCURS clauses, specifying the same number of | | occurrences, or no OCCURS clauses at all, must apply to the | | sending item. These OCCURS clauses must not include the | | DEPENDING phrase. | | | | | |General Rules | | | | | | | |1. In a Screen Description which is subject to an OCCURS clause, the| | LINE and COLUMN clauses apply to each individual table | | entry. Thus either the LINE or the COLUMN clause should | | specify relative positioning, because if they both specify | | an absolute position every entry will appear in the same | | place. | | | |2. If the screen item is an output field, and no OCCURS clauses | | apply to the sending item, then in a DISPLAY operation the | | contents of the sending item are moved to every occurrence of the| | screen item. An elementary item that is fully subscripted is | | deemed to have no OCCURS clauses applying to it. | | | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | | | | | |3. If the screen item is an update field, or it is an output field | | with OCCURS clauses applying to the sending item, then in a | | DISPLAY operation the contents of each occurrence of the sending | | item are moved to the corresponding occurrence of the screen | | item. | | | |4. If the screen item is an update or input field, then in an ACCEPT| | operation the data entered into each occurrence of the screen | | item is moved to the corresponding occurrence of the receiving | | item. | | | ________________________________________________________________________ ________________________________________________________________________ |(MF) (XOPEN) | | | |The OVERLINE Clause | | | |Function | | | |The OVERLINE clause causes every character of the screen item to have | |a horizontal line above it when the item appears on the screen. The | |line is within the character-position. | | | |General Format | | | | OVERLINE | ________________________________________________________________________


MPE/iX 5.0 Documentation