ProcessBarr

Barra de processo.

Sintaxe

ProcessBarr { SHOW | CLOSE }
[ TITLE título ]
[ MESSAGE mensagem ]
[ QUESTION pergunta ]
[ LINE linha ]
[ COLUMN coluna ]
[ FULL decorrido EMPTY  previsto ]
[ CANCEL;indicador-de-processo-interrompido ]

Argumentos

SHOW

Exibe ou atualiza a janela.

CLOSE

Fecha a janela.

título

Título da janela de até 50 caracteres.

mensagem

Mensagem da barra de progresso de até 46 caracteres.

pergunta

Frase de até 50 caracteres formando a pergunta a ser feita ao usuário para confirmar a interrupção do processo.

linha

Linha de posicionamento da janela.

coluna

Coluna de posicionamento da janela.

decorrido

Indica o progresso do processo de geração do relatório, pode ser usado quando a quantidade a processar é conhecida.

previsto

Indica a quantidade prevista no processamento

Fecha a janela.

indicador-de-processo-interrompido

Variável que retorna o valor "Y" se o usuário cancelar o processo.
77 fim PIC X(001) VALUE SPACE.
88
CANCELED VALUE "Y".

Observações

Esse comando consome recursos consideráveis principalmente no modo gráfico, portanto deve ser usado com critério em processos realmente demorados e com intervalos razoáveis.

A acentuação 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

PERFORM VARYING I FROM 1 BY 1
                         UNTIL I > 1000000 OR CANCELED
                   EXEC COBOLware ProcessBarr SHOW
                              MESSAGE "Contando até um milhão"
                              QUESTION "Interromper"
                              FULL I EMPTY 1000000
                             CANCEL;fim
                   END-EXEC
END-PERFORM

Efeito no modo gráfico

procg.jpg (10228 bytes)

Efeito no modo texto

proct.jpg (7336 bytes)