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..
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.
EXEC COBOLware
Send Message
"Aplicar alterações"
CAPTION(1)
"~Sim"
CAPTION(2)
"~Não"
OPTION 1;opcao
TIMEOUT-DISABLE
END-EXEC