Comandos COBOLware

O COBOLware possui um pré-compilador que trata comandos encaixados. Ou seja: comandos extra-COBOL mas que são escritos em fontes COBOL.

Tradicionalmente na linguagem COBOL, desde seus primórdios, comandos desta natureza são delimitados pelo comando EXEC seguido pelo identificador do precompilador em questão encerrando-se o escopo com END-EXEC. O COBOLware adota este padrão assim como os conhecidos pré-compiladores CICS, SQL, e HTML.

Conceitualmente, um precompilador é um programa que lê um programa fonte em uma determinada linguagem e gera um novo fonte nesta mesma linguagem convertendo os comandos embutidos em comandos reconhecidos pelo compilador normal. Os novos recursos tratados pelos comandos encaixados normalmente são tratados por módulos externos.

O comando FCOBOL trata automaticamente do processo. O novo programa fonte produzido é compilado pelo compilador e logo em seguida apagado. Portanto o seu uso é fundamental para que estes comandos tenham efeito. Se o compilador COBOL for utilizado diretamente, todos estes recursos serão tratados como comentários..

Sintaxe

EXEC COBOLware comando
           parâmetro1 valor-inicial1;variável-de-retorno2
           parâmetro2 valor-inicial2;variável-de-retorno2
           parâmetroN valor-inicialN;variável-de-retornoN
           opção1 opção2 opçãoN

END-EXEC

parâmetro

Palavra reservada de acordo com as especificações do comando.

valor-inicial

Variável ou valor constante a ser atribuído ao parâmetro.

variável-de-retorno

Variável que recebe o valor retornado pelo parâmetro . O ponto e vírgula ";" indica que é um argumento de retorno.

Opção

Palavra reservada que ativa uma modalidade de serviço mas que não requer valor inicial nem produz retorno.

Exemplo

EXEC COBOLware Send Message "Aplicar alterações"
           CAPTION(1) "~Sim"
           CAPTION(2) "~Não"
           OPTION 1;opcao
           TIMEOUT-DISABLE
END-EXEC

Comandos:

Ambiente
Interface visual
Processamento