COBOL - Programa "Olá Mundo"
Vamos começar a codificação como exibir 'HELLO WORLD' em COBOL,
IDENTIFICATION DIVISION.
PROGRAM-ID. IDSAMPLE.
ENVIRONMENT DIVISION.
PROCEDURE DIVISION.
DISPLAY 'HELLO WORLD'.
STOP RUN. |
Explicação:
- Linha 1 : DIVISÃO DE IDENTIFICAÇÃO. - esta divisão é obrigatória.
- Linha 2 : PROGRAM-ID. IDSAMPLE. - é obrigatório declarar o id do programa nome-IDSAMPLE na divisão de identificação. geralmente esse nome é igual ao nome do membro PDS (nome do arquivo).
- Linha 3 : DIVISÃO DE MEIO AMBIENTE. - esta divisão é opcional.
- Linha 4 : DIVISÃO DE PROCEDIMENTOS. - esta divisão é obrigatória.
- Linha 5 : EXIBIR 'HELLO WORLD'. - Instrução DISPLAY usada para transferir os dados para o dispositivo/tela de saída. O dispositivo de saída pode ser decidido com base no SYSOUT em JCL se for um programa em lote. Aqui a instrução de exibição é usada para exibir o valor codificado permanentemente 'HELLO WORLD'.
- Linha 6: PARAR DE EXECUTAR. - Fim do programa. É obrigatório adicionar no final do programa. Esta é a última instrução executável no programa que retornará o controle de volta ao sistema operacional. STOP RUN sempre codificado no programa principal. Se STOP RUN estiver codificado no subprograma, o controle retornará ao sistema operacional em vez de retornar ao programa principal.
Vamos ver como o código fica na tela do mainframe.
Pontos para lembrar:
- Número de sequência presente na coluna 1-6. isso é gerado automaticamente. Desenvolvedor não precisa adicionar.
- Todo nome de divisão deve começar na coluna 8 (Área A). também ID do programa.
- A instrução DISPLAY & STOP RUN deve começar na coluna 12 (área B).
- Você anotou a cor de cada palavra nas declarações? É porque, como outro mainframe de linguagem de programação (emulador), diferencia a palavra/instrução do usuário por cor. As palavras definidas pelo sistema estão na cor VERMELHA. Os valores codificados estão na cor BRANCA. As palavras definidas pelo usuário estão na cor VERDE.
Nota: As cores podem ser modificadas na opção de configuração.