Conceitos
As instruções ACCEPT e DISPLAY são utilizadas para receber ou mostrar um pequeno volume de caracteres através do dispositivo padrão de entrada e saída do computador. Nos micro computadores, o dispositivo padrão de entradas e saidas é o monitor, também chamado de console. Normalmente este recurso é utilizado para passar uma informação para o programa, tal como uma data ou para mostrar uma pequena mensagem, tal como uma mensagem de erro.
ACCEPT
A instrução ACCEPT é utilizada para o programa receber uma informação simples na WORKING-STORAGE SECTION.
Formatos:
ACCEPT variavel-1 FROM CONSOLE.
ACCEPT variavel-1 FROM DATE.
ACCEPT variavel-1 FROM DAY.
ACCEPT variavel-1 FROM DAY-OF-WEEK.
ACCEPT variavel-1 FROM TIME.
Considerações
variavel-1 deverá ser uma variável definida na WORKING-STORAGE SECTION.
Para uso com FROM CONSOLE variavel-1 poderá ser alfabética ou numérica.
Para uso com FROM DATE variavel-1 deverá ser PIC 9(6) e receberá a data no formato AAMMDD (ano, mês, dia).
Para uso com FROM DAY variavel-1 deverá ser PIC 9(5) e receberá o dia no formato AADDD onde DDD é o número de dias desde 1o de janeiro.
Para uso com FROM DAY-OF-WEEK variavel-1 deverá ser PIC 9 e receberá o dia da semana no formato; 1 = segunda-feira, 2 = terça-feira, etc.
Para uso com FROM TIME variavel-1 deverá ser PIC 9(8) e receberá o horário no formato HHMMSSCC onde HH utiliza o fromato 24 horas e CC são centésimos de segundo.
A
cláusula FROM CONSOLE é opcional. Se omitida os dados serão obtidos da
console da seguinte maneira; cada caracter digitado ocupará uma posição
em variavel-1 até a mesma ser preenchida. Assim para uma
variável alfanumérica com 3 caracteres poderá ser digitado: a + ENTER,
b + ENTER, c + ENTER, ou abc + ENTER, ou abcde + ENTER e neste caso
"de" serão perdidos.
Se
a cláusula FROM CONSOLE for especificada, o programa é interrompido
nesta instrução, o cursor aparece na console do computador, aguardando
por uma entrada de dados e somente quando o usuário digita a tecla
ENTER na console o programa continua a execução, mesmo que nenhum dados
tenha sido digitado. Os dados digitados serão truncados pelo tamanho da
variável receptora.
Por exemplo, dadas as declarações;
WORKING-STORAGE SECTION.
01 CAMPO-01 PIC X(5).
PROCEDURE DIVISION.
ACCEPT CAMPO-01.
ACCEPT CAMPO-01 FROM CONSOLE.
quando FROM CONSOLE for omitida a variável CAMPO-01 receberá os 5 primeiros caracteres digitados na console. Se forem digitados apenas 3 caracteres, a console continuará solicitando dados até a variável ser preenchida.
DISPLAY
A instrução DISPLAY exibe o conteúdo de variáveis ou literais na console do computador.
Formato:
DISPLAY variavel-1 variavel-2 ... UPON CONSOLE.
Considerações
variavel-1 e variavel-2 poderão variáveis de qualquer tipo ou literais.
A cláusula UPON CONSOLE pode ser omitida.
Por exemplo, supondo que CAMPO-01 contenha o valor "MARIA";
DISPLAY " O CONTEÚDO DA VARIAVEL CAMPO-01 É " CAMPO-01 UPON CONSOLE.
exibirá na console --> O CONTEÚDO DA VARIAVEL CAMPO-01 É MARIA