Version 4.2.6 for Mainframes (Update)
 —  Messages and Codes  —

Natural System Error Messages 0301-0350

NAT0301: Edit mask too long or not specified correctly.

Text Edit mask too long or not specified correctly.
Expl. Possible reasons for this error:
- The specified edit mask contains no character that would cause any
digit of the value to be output (e.g., for a numeric edit mask no
"Z" or "9" was specified; for an alphanumeric edit mask no "X" was
specified).
- The number of output digits in a numeric edit mask exceeds 31.
- The number of output characters resulting from the edit mask string
exceeds the maximum size of 1073741824 characters.
- The edit mask string you have specified is too long. It must not
exceed 80 source characters on mainframes and 244 on open systems.
- You have specified an edit mask at statement level in a DISPLAY,
FORMAT, INPUT or WRITE statement. At statement level in these
statements, you can only specify "EM=OFF", but no specific edit mask.
Actn. Correct edit mask specification.

NAT0302: Element in WRITE/INPUT statement does not fit on 1 line.

Text Element in WRITE/INPUT statement does not fit on 1 line.
Expl. The size of an element specified in a WRITE/INPUT statement exceeds
the current line size.
Actn. Either increase the line size (parameter LS), or reduce the size
of the element (for example, by using a REDEFINE statement).

NAT0303: Page overflow, too many vertical entries.

Text Page overflow, too many vertical entries.
Expl. The number of vertical entries specified within one INPUT, WRITE or
DISPLAY statement exceeded the current page size.
Actn. Either increase the page size (parameter PS)
or reduce the number of vertical entries.

NAT0304: Invalid printer reference number.

Text Invalid printer reference number.
Expl. A printer number must be specified as a numeric constant or symbolic
constant defined with DEFINE PRINTER enclosed in parentheses.
There is no additional printer support within a map (processing rule).
Actn. Check program and correct error.

NAT0305: Text string must begin and end on the same line.

Text Text string must begin and end on the same line.
Expl. A text string is initiated with an apostrophe and must be ended
on the same line with another apostrophe.
If a text string longer than one line is required, enter the text
in two portions (each within apostrophes) in two consecutive lines
and with a hyphen (-) between the two portions. At execution time,
the two portions will be concatenated.
Actn. Correct error in program.

NAT0306: DO or DOEND either missing or misplaced.

Text DO or DOEND either missing or misplaced.
Expl. A group of statements initiated with a DO statement must be
terminated with a DOEND statement.
The omission of a DOEND statement may only be detected at the
end of a source program.
The position of the error in the program does not necessarily
correspond to the position where the DOEND should be placed.
Actn. Ensure that each DO statement has a corresponding DOEND statement.

NAT0307: Loop in line :1: not closed within conditional block.

Text Loop in line ... not closed within conditional block.
Expl. A processing loop which is initiated within a conditional statement
block must be closed within that block.
Valid example: Invalid example:
-------------- ----------------
IF ... IF ...
DO DO
FIND ... FIND ...
DISPLAY ... DISPLAY ...
LOOP DOEND
DOEND END
END
Actn. Check program and correct error.

NAT0308: Attempt to close a non-existent processing loop.

Text Attempt to close a non-existent processing loop.
Expl. The LOOP statement can only be used to close an active processing
loop.
Either the processing loop to be closed was not properly initiated,
or the processing loop had already been closed.
Actn. Check program and correct error.

NAT0309: Invalid positioning of AT BREAK/END condition.

Text Invalid positioning of AT BREAK/END condition.
Expl. An AT BREAK/END condition cannot be used within a block of
statements which is dependent on another special condition.
Blocks are: AT BREAK
AT END/TOP OF PAGE
AT START/END OF DATA
ON ERROR
IF
Actn. Re-position the AT BREAK/END condition.

NAT0310: AT END OF or AT BREAK requires active processing loop.

Text AT END OF or AT BREAK requires active processing loop.
Expl. An AT BREAK/END statement can only be used within an active
processing loop.
Actn. Check program and correct error.

NAT0311: Error occurred in user exit for source/object programs.

Text Error occurred in user exit for source/object programs.
Expl. A non-zero response code was received from the user exit which is
used to store source/object programs in a user-controlled file.
Actn. Check the coding of the user exit
(response code in register 15 when returning to Natural).

NAT0312: Reference invalid in AT START/END OF DATA or AT BREAK.

Text Reference invalid in AT START/END OF DATA or AT BREAK.
Expl. A reference number was used to refer one of the above conditional
statements to a specific processing loop. However, the specified
reference number refers to a line which does not contain the correct
loop-initiating statement.
Actn. Check program and correct error.

NAT0313: Only one BEFORE BREAK/AT START OF DATA allowed in a loop.

Text Only one BEFORE BREAK/AT START OF DATA allowed in a loop.
Expl. Only one AT START OF DATA condition can be specified for a single
processing loop. If multiple statements are to be made dependent
on the AT START OF DATA condition, use a DO/DOEND construction
(see example below).
Example:
READ ...
AT START OF DATA
DO IF ... DO ... DOEND
IF ... DO ... DOEND DOEND
DISPLAY
LOOP
END
Actn. Check program and correct error.

NAT0314: No more than one ON ERROR statement allowed per program.

Text No more than one ON ERROR statement allowed per program.
Expl. Only one ON ERROR condition can be specified in a given program.
To check multiple conditions in an ON ERROR condition, use IF
statements within the ON ERROR condition.
Example:
--------
READ ...
UPDATE ...
ON ERROR IF ... END-IF
IF ... END-IF
END-ERROR
END-READ
END
Actn. Check program and correct error.

NAT0315: Inconsistent usage of "/n/" clause.

Text Inconsistent usage of "/n/" clause.
Expl. The notation "/n/" can be used to specify how many positions of a
variable are to be examined in the evaluation of an AT BREAK
statement or an IF BREAK condition.
A "/n/" clause may only be specified for break variables of format
alphanumeric, binary, numeric or packed.
The value for "n" cannot be greater than the number of positions
defined for the variable, that is, the number of bytes (for
an alphanumeric or binary break variable) or the number of digits
(for a numeric or packed break variable).
Moreover, the value specified must not exceed 253 for alphanumeric
fields and 126 bytes for binary fields.
Actn. Check program and correct error.

NAT0316: Statement not permitted within specified condition.

Text Statement not permitted within specified condition.
Expl. Certain restrictions exist for the use of statements within certain
conditions.
The specified statement is not allowed in this type of condition.
Within an external subroutine object, for example, only DEFINE
SUBROUTINE statements and DEFINE DATA statements are allowed.
Actn. Check program and correct error.

NAT0317: 1 element (column width) must not exceed 250 characters.

Text 1 element (column width) must not exceed 250 characters.
Expl. The maximum length of elements that can be output in a DISPLAY column
is 250 characters.
Actn. Redefine element into smaller elements, or have the fields displayed
in vertical mode.

NAT0318: "FULL VALUE" must not be specified in EXAMINE TRANSLATE.

Text "FULL VALUE" must not be specified in EXAMINE TRANSLATE.
Expl. Unlike in an EXAMINE statement, "FULL VALUE" must not be specified
in an EXAMINE TRANSLATE statement. An EXAMINE TRANSLATE statement
always processes the entire content of the field.
Actn. Correct error in program.

NAT0319: Argument for AVER, TOTAL, SUM must be numeric.

Text Argument for AVER, TOTAL, SUM must be numeric.
Expl. The argument for the evaluation of the Natural system functions
AVER, TOTAL and SUM must be defined with numeric format.
Actn. Check program and correct error.

NAT0320: Edit mask permitted for output elements only.

Text Edit mask permitted for output elements only.
Expl. In an INPUT statement, edit masks can only be used for output elements
(attribute = M or O). For input elements (attribute = A), edit masks
cannot be used.
Note that if you use hexadecimal edit masks for output elements,
you cannot use attribute M = modify.
Actn. Check program and correct error.

NAT0322: Type of variable invalid as system function argument.

Text Type of variable invalid as system function argument.
Expl. 1) A Natural system variable cannot be used as an argument for a
Natural system function.
If a system function is to be evaluated from a system variable,
assign the value of the system variable to a user-defined variable
and use this variable as the argument.
2) A variable used as a password/cipher variable cannot be used as an
argument for a Natural system function.
If the same variable as used for password/cipher is to be used as
an argument for a Natural system function, assign the value to a
user-defined variable, and use that variable as the argument.
Actn. Check program and correct error.

NAT0323: ON ERROR statement not allowed within condition.

Text ON ERROR statement not allowed within condition.
Expl. An ON ERROR statement must not be placed within any of the following
statement blocks:
- AT START/END OF DATA
- AT TOP/END OF PAGE
- AT BREAK
- BEFORE BREAK PROCESSING
- IF
- IF NO RECORDS FOUND
- AT END OF FILE
- DEFINE SUBROUTINE
Actn. Check program and correct error.

NAT0324: DOEND missing for DO statement in line :1:.

Text DOEND missing for DO statement in line ....
Expl. A statement block initiated with a DO statement must be terminated
with a DOEND statement.
Actn. Correct error in program.

NAT0325: Inconsistent naming of fields in the data dictionary.

Text Inconsistent naming of fields in the data dictionary.
Expl. The same field name was used twice in a database view definition
in the data dictionary.
Actn. Inform your Natural administrator,
or use the LIST FILE command to check the view definition.

NAT0327: Numeric edit mask specifies no valid positions in value.

Text Numeric edit mask specifies no valid positions in value.
Expl. The specified numeric edit mask does not contain any positions
which actually exist in the value to which the edit mask is applied.
Actn. Check program and correct error.

NAT0328: Maximum number/length of sort fields exceeded.

Text Maximum number/length of sort fields exceeded.
Expl. Either the total length of the fields to be sorted was greater than 253,
or the total number of fields to be sorted was greater than 10.
Actn. Reduce the size of the sort criteria.

NAT0329: AT BREAK required with PERFORM BREAK PROCESSING.

Text AT BREAK required with PERFORM BREAK PROCESSING.
Expl. After a PERFORM BREAK PROCESSING statement, no AT BREAK statement was
issued.
This error can also occur if the PERFORM BREAK PROCESSING is within an
IF condition and the PERFORM BREAK PROCESSING and subsequent AT BREAK
are not explicitly bounded by DO and DOEND statements.
Actn. Check program and correct error.

NAT0330: AT END OF DATA specified more than once for a loop.

Text AT END OF DATA specified more than once for a loop.
Expl. Only one AT END OF DATA statement is allowed per processing loop.
Actn. Check program and correct error.

NAT0332: The parameters LC and IC cannot be used together.

Text The parameters LC and IC cannot be used together.
Expl. The LC and IC characters are mutually exclusive.
Actn. Check program and correct error.

NAT0333: Alphanumeric edit mask may not be used for numeric value.

Text Alphanumeric edit mask may not be used for numeric value.
Expl. The error may be caused by an incorrect definition of the edit mask
in the data dictionary.
Actn. Check program or data dictionary and correct edit mask specification.

NAT0335: Text string for SCAN must be enclosed within apostrophes.

Text Text string for SCAN must be enclosed within apostrophes.
Expl. The text string to be used for a SCAN operation must be enclosed within
apostrophes, and it must be contained on a single source code line.
Actn. Check program and correct error.

NAT0336: Field to be examined must be a variable if it is modified.

Text Field to be examined must be a variable if it is modified.
Expl. In an EXAMINE statement, the field to be examined must not be a
constant if it is to be modified, that is, if a DELETE/REPLACE
clause is used.
This error also occurs if a constant is specified in an EXAMINE
TRANSLATE statement; the field to be TRANSLATEd must be a variable.
Actn. Correct error in program.

NAT0337: Format/length of translate table must be A2, B2 or U2.

Text Format/length of translate table must be A2, B2 or U2.
Expl. The format/length of the translate table specified in the USING clause
of an EXAMINE TRANSLATE statement must be A2, B2 or U2.
Actn. Correct error in program.

NAT0338: A database field with no active reference was used.

Text A database field with no active reference was used.
Expl. A database field can be referenced only within an active processing
loop. If the processing loop has been closed, reference to fields made
available by the processing loop is no longer allowed.
Actn. Ensure that all references to database fields are contained within an
active processing loop.

NAT0339: No specific heading allowed for group names in WRITE.

Text No specific heading allowed for group names in WRITE.
Expl. If a group name is used in a WRITE (or INPUT) statement,
no specific header text may be specified for the group.
Actn. Check program and correct error.

NAT0340: Invalid tab setting; occupied column overlaid.

Text Invalid tab setting; occupied column overlaid.
Expl. The tabulation "nT" can only be used to position forward in a line.
The tabulator notation must not position the new value over an already
occupied output position.
Actn. Check program and correct error.

NAT0341: Repetition factor for text string > 250 or invalid.

Text Repetition factor for text string > 250 or invalid.
Expl. The repetition factor may be used to cause a one-character text
string to be repeated.
The repetition factor must be a numeric integer constant enclosed
in parentheses. The maximum repetition factor allowed is 250.
Actn. Check program and correct error.

NAT0342: AT BREAK not possible in this type of processing loop.

Text AT BREAK not possible in this type of processing loop.
Expl. The AT BREAK statement may only be used in processing loops
that are initiated by a FIND, READ, HISTOGRAM or SORT statement.
User-initiated break processing can be done with the statement
PERFORM BREAK PROCESSING.
Actn. Check program and correct error.

NAT0343: Only literal of one character can be used for repetition.

Text Only literal of one character can be used for repetition.
Expl. A character string that is to be repeated using a repetition factor
may consist of only one single character.
Actn. Check program and correct error.

NAT0344: WRITE TITLE/TRAILER is not allowed within condition.

Text WRITE TITLE/TRAILER is not allowed within condition.
Expl. A WRITE TITLE or WRITE TRAILER statement must not be placed within any
of the following statement blocks:
- IF
- AT START/END OF DATA
- AT TOP/END OF PAGE
- AT BREAK
- BEFORE BREAK PROCESSING
- AT END OF FILE
- ON ERROR
- IF NO RECORDS FOUND
- DEFINE SUBROUTINE
Actn. Place WRITE TITLE/WRITE TRAILER outside such a statement block.

NAT0345: Edit mask definition error in data dictionary.

Text Edit mask definition error in data dictionary.
Expl. The edit mask for a database field, as defined in the data dictionary,
is incorrect.
Actn. Contact your Natural administrator. A temporary by-pass may be to
override the edit mask definition in the program.

NAT0346: Data definition module (DDM) :1: cannot be loaded.

Text Data definition module (DDM) ... cannot be loaded.
Expl. The data definition module (DDM) for the requested file cannot be
loaded, because the internal DDM load buffer could not be allocated
with a sufficient size.
Actn. Start Natural in a larger thread/partition/region/task environment.

NAT0347: SORT statement must not be placed within condition.

Text SORT statement must not be placed within condition.
Expl. The SORT statement closes all existing processing loops and initiates
a new processing loop to process all records after they have been
sorted. Therefore, the SORT statement cannot be placed within any
of the following statement blocks:
- AT START/END OF DATA - IF
- AT TOP/END OF PAGE - IF NO RECORDS FOUND
- AT BREAK - ON ERROR
- BEFORE BREAK PROCESSING - DECIDE
- AT END OF FILE
Actn. Check program and correct error.

NAT0348: AT TOP/END OF PAGE must not be placed within condition.

Text AT TOP/END OF PAGE must not be placed within condition.
Expl. The statements AT TOP OF PAGE and AT END OF PAGE can only be used
outside the following statement blocks:
- AT START/END OF DATA
- AT TOP/END OF PAGE
- AT BREAK
- BEFORE BREAK PROCESSING
- AT END OF FILE
- IF
- IF NO RECORDS FOUND
- ON ERROR
- DEFINE SUBROUTINE
Actn. Place AT TOP/END OF PAGE outside such a statement block.

NAT0349: Invalid parameter value in (SET) GLOBALS statement/cmd.

Text Invalid parameter value in (SET) GLOBALS statement/command.
Expl. The value for a parameter specified in a SET GLOBALS statement (or
GLOBALS command) was invalid. Possible values for the parameter in
question are "ON" and "OFF" (or "T" and "F" respectively).
Actn. Check program and correct error.

NAT0350: Too many vertical entries in one INPUT/WRITE/DISPLAY.

Text Too many vertical entries in one INPUT/WRITE/DISPLAY.
Expl. One INPUT, WRITE or DISPLAY statement can generate a maximum of 250
lines vertically.
The row value in the notation "X/Y" must not exceed 250.
The number of header lines must not exceed 14.
Actn. Check program and correct error.

Top of page