Enterprise COBOL for z/OS, V4.2, Language Reference
Use a cláusula EXTERNA para permitir que programas e métodos compilados separadamente (incluindo programas em uma sequência em lote) compartilhem itens de dados.
Código EXTERNAL na descrição dos dados do nível 01 na WORKING-STORAGE SECTION (SEÇÃO TRABALHO-ARMAZENAMENTO).
As seguintes regras se aplicam:
- Os itens subordinados a um item de grupo EXTERNAL são eles mesmos EXTERNAL.
- Você não pode usar o nome de um item de dados EXTERNAL como o nome de outro item EXTERNAL no mesmo programa.
- Você não pode codificar a cláusula VALUE para qualquer item de grupo ou item subordinado que seja EXTERNAL.
Na unidade de execução, qualquer programa ou método COBOL que tenha a mesma descrição de dados para o item que o programa que contém o item pode acessar e
processar esse item.
Por exemplo, suponha que o programa A tenha a seguinte descrição de dados:
01 EXT-ITEM1 EXTERNAL PIC 99.
O programa B pode acessar esse item de dados se ele tiver a descrição de dados idêntica em sua WORKING-STORAGE SECTION.
Qualquer programa que tenha acesso a um item de dados EXTERNO pode alterar o valor desse item.
Portanto, não use esta cláusula para itens de dados que você precisa proteger.
© Copyright IBM Corp.