Enterprise COBOL for z/OS, V4.2, Language Reference
A cláusula SAME RECORD AREA especifica que dois ou mais arquivos devem usar a mesma área de armazenamento principal para processar o registro lógico atual.
Os arquivos nomeados em uma cláusula SAME RECORD AREA não precisam ter a mesma organização ou acesso.
- file-name-3, file-name-4
- Deve ser especificado no parágrafo file-control do mesmo programa.
file-name-3 e file-name-4 não devem fazer referência a um arquivo definido com a cláusula EXTERNAL.
Todos os arquivos podem ser abertos ao mesmo tempo.
Um registro lógico na área de armazenamento compartilhado é considerado o seguinte:
- Um registro lógico de cada arquivo de saída aberto na cláusula SAME RECORD AREA
- Um registro lógico do arquivo de entrada lido mais recentemente na cláusula SAME RECORD AREA
Mais de uma cláusula SAME RECORD AREA pode ser incluída em um programa.
Contudo:
- Um nome de arquivo específico não deve aparecer em mais de uma cláusula SAME RECORD AREA.
- Se um ou mais nomes de arquivo de uma cláusula SAME AREA aparecerem em uma cláusula SAME RECORD AREA, todos os nomes de arquivo nessa cláusula SAME AREA
deverão aparecer nessa cláusula SAME RECORD AREA.
No entanto, a cláusula SAME RECORD AREA pode conter nomes de arquivos adicionais que não aparecem na cláusula SAME AREA.
- A regra de que na cláusula SAME AREA apenas um arquivo pode ser aberto por vez tem precedência sobre a regra SAME RECORD AREA de que todos os arquivos podem
ser abertos ao mesmo tempo.
- Se a cláusula SAME RECORD AREA for especificada para vários arquivos, as entradas de descrição do registro ou as entradas de descrição do arquivo para esses
arquivos não deverão incluir a cláusula GLOBAL.
- A cláusula SAME RECORD AREA não deve ser especificada quando a cláusula RECORD CONTAINS 0 CHARACTERS for especificada.
Os arquivos nomeados na cláusula SAME RECORD AREA não precisam ter a mesma organização ou acesso.
© Copyright IBM Corp.