Enterprise COBOL for z/OS, Version 4.2, Programming Guide

Ao chamar programas aninhados, você pode criar aplicativos que usam técnicas de programação estruturada.
Você também pode chamar programas aninhados em vez de procedimentos PERFORM para evitar modificação não intencional de itens de dados.
Use o literal CALL ou as instruções do identificador CALL para fazer chamadas para programas aninhados.

Você pode chamar um programa contido apenas a partir de seu programa contido diretamente, a menos que você identifique o programa contido como COMMON em seu parágrafo PROGRAM-ID. Nesse caso, você pode chamar o programa comum de qualquer programa contido (direta ou indiretamente) no mesmo programa que o programa comum. Apenas os programas contidos podem ser identificados como COMMON.
Chamadas recursivas não são permitidas.

Siga estas diretrizes ao usar estruturas de programa aninhadas:

• Codifique uma IDENTIFICATION DIVISION em cada programa. Todas as outras divisões são opcionais.


• Opcionalmente, torne o nome de cada programa contido exclusivo.
  Embora os nomes dos programas contidos não precisem ser exclusivos (conforme descrito na referência relacionada sobre o escopo dos nomes), tornar os nomes exclusivos pode ajudar a tornar seu aplicativo mais sustentável.
  Você pode usar qualquer palavra válida definida pelo usuário ou um literal alfanumérico como o nome de um programa contido.


• No programa mais externo, codifique quaisquer entradas de CONFIGURATION SECTION que possam ser necessárias.
  Os programas contidos não podem ter uma CONFIGURATION SECTION.


• Inclua cada programa contido no programa contido imediatamente antes do marcador END PROGRAM do programa contido.


• Use um marcador END PROGRAM para encerrar programas contidos e contidos.

Você não pode usar a opção THREAD ao compilar programas que contêm programas aninhados.

Conceitos relacionados