Window

Tratamento de janelas.

Sintaxe

Window REFERENCE código
CLOSE | OPEN
[ TITLE mensagem ]
[ LINE linha ]
[ COLUMN coluna ]
[ SIZE largura ]
[ LINES altura ]
[ COLOR código-da-cor ]

Argumentos

Código

Campo de 2 bytes que recebe a identificação criada para a janela no momento do OPEN e informa qual janela deve ser fechada no ocasião do CLOSE.

CLOSE

Fecha a janela referenciada em código.

OPEN

Abre, ativa a janela e informa a referencia para CLOSE.

mensagem

Título da janela de até 78 caracteres.

linha

Linha de posicionamento da janela.

coluna

Coluna de posicionamento da janela.

Largura

Tamanho horizontal da janela.

Altura

Tamanho vertical da janela.

código-da-cor

Indica o código da cor (CWNCOR.CPY) a ser usada na janela.

Observações

A acentuação do título deve ser codificada com a página de código 850, os processadores de tela se encarregam de traduzir para o codificação apropriada a plataforma de execução:

Exemplo

Codificação COBOL

EXEC COBOLware Window OPEN
                   TITLE "Dados da música"
                   LINE 10 COLUMN 15 LINES 5 SIZE 50
                   REFERENCE (JANCODE) COLOR 112
END-EXEC
DISPLAY (1, 1) “Nome”
ACCEPT (1, 6) NOME-MUSICA.

Efeito no modo gráfico



Efeito no modo texto