COBOL - Compiler limit comparison - Comparação de limite do compilador

COBOL - Compiler limit comparison - Comparação de limite do compilador

Enterprise COBOL for z/OS 6.3.0

A tabela a seguir lista os limites do compilador para Enterprise COBOL V5 e V6, outras versões Enterprise COBOL, IBM® COBOL, VS COBOL II e programas OS/VS COBOL.

Embora o compilador COBOL suporte o endereçamento de várias áreas de memória em uma unidade de compilação até os limites descritos neste apêndice, um aplicativo completo, geralmente consistindo em várias unidades de compilação, ainda é restrito pela quantidade de armazenamento privado disponível no espaço de endereço no qual ele corre.

Em outras palavras, um aplicativo pode ficar sem armazenamento antes de atingir os limites descritos.

Language element	Enterprise COBOL V5 and V6	Other Enterprise COBOL versions	IBM COBOL and VS COBOL II	OS/VS COBOL
Size of program	999,999 lines	999,999 lines	999,999 lines	999,999 lines
Number of literals	4,194,303 bytes¹	4,194,303 bytes¹	4,194,303 bytes¹	16,384 bytes
Total length of literals	4,194,303 bytes¹	4,194,303 bytes¹	4,194,303 bytes¹	32,767 bytes after OPT
Reserved word table entries	1536	1536	1536	No limit
COPY REPLACING . . . BY . . . (items per COPY statement)	No limit	No limit	No limit	150
Number of COPY libraries	No limit	No limit	No limit	No limit
Block size of COPY library	32,760 bytes	32,760 bytes	32,760 bytes	16,384 bytes
IDENTIFICATION DIVISION
ENVIRONMENT DIVISION
Configuration section
Special-names paragraph
`mnemonic-name` IS	18	18	18	18
UPSI-`n` ... (switches)	0-7	0-7	0-7	0-7
`alphabet-name` IS . . .	No limit	No limit	No limit	No limit
Literal THRU . . . or ALSO . . .	256	256	256	256
Input-Output section
File-control paragraph
SELECT `file-name` ...	A maximum of 65,535 file names can be assigned external names	A maximum of 65,535 file names can be assigned external names	A maximum of 65,535 file names can be assigned external names	A maximum of 65,535 file names can be assigned external names
ASSIGN `system-name` ...	No limit	No limit	No limit	No limit
ALTERNATE RECORD KEY `data-name` ...	253	253	253	253
RECORD KEY length	No limit²	No limit²	No limit²	255
RESERVE `integer` (buffers)	255³	255³	255³	255³
I-O-control paragraph
RERUN ON `system-name` ...	32,767	32,767	32,767	32,767
RERUN `integer` RECORDS	16,777,215	16,777,215	16,777,215	16,777,215
SAME RECORD AREA	255	255	255	255
SAME RECORD AREA FOR `file-name` ...	255	255	255	255
SAME SORT/MERGE AREA	No limit⁴	No limit⁴	No limit⁴	No limit⁴
MULTIPLE FILE `file-name` ...	No limit⁴	No limit⁴	No limit⁴	No limit⁴
DATA DIVISION
77 data item size	With LP(32): 999,999,999 bytes With LP(64): 2,147,483,646 bytes	134,217,727	16,777,215	1,048,576
Total 01 + 77 (data items)	No limit	No limit	No limit	255
88 condition-names . . .	No limit	No limit	No limit	No limit
66 RENAMES . . .	No limit	No limit	No limit	No limit
PICTURE clause, number of characters in `character-string`	50	50	30	30
PICTURE clause, numeric item digit positions	With ARITH(COMPAT): 18 With ARITH(EXTEND): 31	18 (or 31)⁶	For IBM COBOL:18 (or 31)⁶ For VS COBOL II: 18	18
PICTURE clause, numeric-edited character positions	249	249	249	127
Picture symbol replication ( )	With LP(32): 999,999,999 With LP(64): 2,147,483,646	134,217,727	16,777,215	99,999
Picture symbol replication ( ), class DBCS items	With LP(32): 499,999,999 With LP(64): 1,073,741,823	67,108,863	8,388,607	N/A
Picture symbol replication ( ), class national items	With LP(32): 499,999,999 With LP(64): 1,073,741,823	67,108,863	N/A	N/A
PICTURE symbol replication (editing)	32,767	32,767	32,767	99,999
Elementary item size	With LP(32): 999,999,999 With LP(64): 2,147,483,646	134,217,727	16,777,215	32,767
OCCURS integer	With LP(32): 999,999,999 With LP(64): 2,147,483,646	134,217,727	4,194,303	65,535
Table size	With LP(32): 999,999,999 With LP(64): 2,147,483,646	134,217,727	8,388,607	32,767
Table element size	With LP(32): 999,999,999 With LP(64): 2,147,483,646	134,217,727
ASCENDING or DESCENDING KEY . . . (per OCCURS clause)	12 KEYS	12 KEYS	12 KEYS	12 KEYS
Total length of keys (per OCCURS clause)	256 bytes	256 bytes	256 bytes	256 bytes
INDEXED BY . . . (index names per OCCURS clause)	12	12	12	12
Total number of indexes (index names) per class or program	65,535	65,535	65,535	65,535
Size of relative index	32,765	32,765	32,765	32,765
FILE SECTION
FD record description entry	1,048,575 bytes	1,048,575	1,048,575	1,048,575
FD `file-name` . . .	65,535	65,535	65,535	65,535
LABEL `data-name` . . . (if no optional clauses)	255	255	255	185
Label record length	80 bytes	80 bytes	80 bytes	80 bytes
DATA RECORD `data-name` . . .	No limit⁴	No limit⁴	No limit⁴	No limit⁴
BLOCK CONTAINS `integer`	2,147,483,647⁹	2,147,483,647⁹	For IBM COBOL: 2,147,483,647 For VS COBOL II: 1,048,5755	32,760
RECORD CONTAINS `integer`	1,048,575⁵	1,048,575⁵	1,048,575⁵	32760
SD file-name . . .	65,535	65,535	65,535	65,535
DATA RECORD data-name . . .	No limit⁴	No limit⁴	No limit⁴	No limit⁴
WORKING-STORAGE SECTION
Total size of items without the external attribute	With LP(32): 2,147,483,646 bytes With LP(64): Unlimited, up to the available 64-bit addressing capacity of the machine.	134,217,727 bytes	134,217,727 bytes	1,048,576
Total size of items with the external attribute	With LP(32): 2,147,483,646 bytes With LP(64): Unlimited, up to the available 64-bit addressing capacity of the machine.	134,217,727 bytes	134,217,727 bytes	N/A
LINKAGE SECTION
Total size	With LP(32): 2,147,483,646 bytes With LP(64): Unlimited, up to the available 64-bit addressing capacity of the machine.	134,213,631 bytes	134,217,727 bytes	1,048,576
LOCAL-STORAGE SECTION
Total size	2,147,483,646 bytes
PROCEDURE DIVISION
Procedure and constant area	4,194,303 bytes¹	4,194,303 bytes¹	4,194,303 bytes¹	1M + 32 - KB
PROCEDURE DIVISION USING `identifier` . . .	32,767	32,767	v	No limit
Procedure-names	1,048,575¹	1,048,575¹	1,048,575¹	64 KB¹
Statements per line (FDUMP/TEST)	7	7	7	7
Subscripted data-names per statement	32,767	32,767	32,767	511
ADD `identifier` . . .	No limit	No limit	No limit	No limit
ALTER `procedure-name-1` TO `procedure-name-2` . . .	4,194,303¹	4,194,303¹	4,194,303¹	64-KB1¹
CALL . . . BY CONTENT `identifier`	2,147,483,647 bytes	2,147,483,647 bytes	2,147,483,647 bytes	No limit
CALL `identifier` or `literal` USING `identifier` or `literal` . . .	16,380	16,380	16,380	No limit
CALL `literal` . . .	4,194,303¹	4,194,303¹	4,194,303¹	No limit
Active programs in a run unit	32,767	32,767	32,767	32,767
Number of names called (DYN option)	No limit	No limit	No limit	64 K
CANCEL `identifier` or `literal` . . .	No limit	No limit	No limit	No limit
CLOSE file-name . . .	No limit	No limit	No limit	No limit
COMPUTE `identifier` . . .	No limit	No limit	No limit	No limit
DISPLAY `identifier` or `literal` . . .	No limit	No limit	No limit	No limit
DIVIDE `identifier` . . .	No limit	No limit	No limit	No limit
ENTRY USING `identifier` or `literal` . . .	No limit	No limit	No limit	No limit
EVALUATE . . . subjects	64	64	64	No limit
EVALUATE . . . WHEN clauses	256	256	256	No limit
GO `procedure-name` . . . DEPENDING	255	255	255	2031
INSPECT TALLYING and REPLACING clauses	No limit	No limit	No limit	15
MERGE `file-name` ASC or DES KEY . . .	No limit	No limit	No limit	12
Total merge key length	4,092 bytes⁷	4,092 bytes⁷	4,092 bytes⁷	256 bytes
MERGE USING `file-name` . . .	16⁸	16⁸	16⁸	16⁸
MOVE `identifier` or `literal` TO `identifier` . . .	No limit	No limit	No limit	No limit
MULTIPLY `identifier` . . .	No limit	No limit	No limit	No limit
OPEN file-name . . .	No limit	No limit	No limit	No limit
PERFORM	4,194,303	4,194,303	4,194,303	64 K
SEARCH . . . WHEN . . .	No limit	No limit	No limit	No limit
SET `index` or `identifier` . . . TO	No limit	No limit	No limit	No limit
SET `index` . . . UP/DOWN	No limit	No limit	No limit	No limit
SORT `file-name` ASC or DES KEY	No limit	No limit	No limit	12
Total sort key length	4,092 bytes⁷	4,092 bytes⁷	4,092 bytes⁷	256 bytes
SORT USING `file-name` . . .	16⁸	16⁸	16⁸	16⁸
STRING `identifier` . . .	No limit	No limit	No limit	No limit
STRING DELIMITED `identifier` or `literal` . . .	No limit	No limit	No limit	No limit
UNSTRING DELIMITED `identifier` or `literal` . . .	No limit	255	255	15
UNSTRING INTO `identifier` or `literal` . . .	No limit	No limit	No limit	No limit
USE . . . ON `file-name` . . .	No limit	No limit	No limit	No limit
Notes: Items included in limit for procedure plus constant area. Itens incluídos no limite para procedimento mais área constante. No compiler limit, but VSAM limits it to 255 bytes. Sem limite do compilador, mas o VSAM o limita a 255 bytes. QSAM limit. Limite de QSAM. Syntax checked, but has no effect on the execution of the program; there is no limit. Sintaxe verificada, mas não tem efeito na execução do programa; não há limite. The compiler limit is shown, but QSAM limits it to 32,767 bytes. O limite do compilador é mostrado, mas o QSAM o limita a 32.767 bytes. For COBOL for OS/390® & VM V2R2 and later versions, 18 if ARITH(COMPAT) is in effect, or 31 if ARITH(EXTEND) is in effect. Para COBOL para OS / 390® & VM V2R2 e versões posteriores, 18 se ARITH (COMPAT) estiver em vigor, ou 31 se ARITH (EXTEND) estiver em vigor. For QSAM and VSAM, the limit is 4088 bytes if EQUALS is coded on the OPTION control statement. Para QSAM e VSAM, o limite é 4088 bytes se EQUALS estiver codificado na instrução de controle OPTION. SORT limit for QSAM and VSAM. Limite SORT para QSAM e VSAM. Requires large block interface (LBI) support provided by OS/390 DFSMS Version 2 Release 10.0 or later. On OS/390 systems with earlier releases of DFSMS, the limit is 32,767 bytes. For more information about using large block sizes, see the Enterprise COBOL for z/OS® Programming Guide. Requer suporte de interface de bloco grande (LBI) fornecido pelo OS / 390 DFSMS Versão 2 Release 10.0 ou posterior. Em sistemas OS / 390 com versões anteriores do DFSMS, o limite é de 32.767 bytes. Para obter mais informações sobre como usar tamanhos de bloco grandes, consulte o Enterprise COBOL for z / OS® Programming Guide .