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