bAcaoBlocoObrigatório
Bloco de código que será executado dentro da janela de processamento.
FUNçãOPublicado
Processa
Processa( <bAcao>, [<cTitulo>], [<cMsg>], [<lAborta>] )Cria uma janela de processamento com régua de progressão para acompanhar a execução de uma ação.
Visão geral
Processa cria um diálogo com uma régua de progressão e executa uma ação informada por bloco de código. A rotina chamada pode receber uma variável lógica por referência para identificar solicitação de cancelamento. Em conjunto com ProcRegua e IncProc, a função permite informar o total de passos e atualizar visualmente o avanço do processamento.
Sintaxe
Processa( <bAcao>, [<cTitulo>], [<cMsg>], [<lAborta>] )Parâmetros
cTituloCaractereOpcional
Título da janela.
cMsgCaractereOpcional
Mensagem apresentada abaixo da régua de progressão.
lAbortaLógicoOpcional
Quando verdadeiro, habilita botão de cancelamento.
Retorno
Nil, conforme referência da Central TOTVS.
Criar janela de progresso
#Include "TOTVS.ch"
User Function ExProcessa()
Local bAcao := {|lFim| U_ExProcessaItens(@lFim)}
Local cTitulo := "Processamento"
Local cMsg := "Processando itens..."
Local lAborta := .T.
Processa(bAcao, cTitulo, cMsg, lAborta)
Return
User Function ExProcessaItens(lFim)
Local nItem
Local nTotal := 100
ProcRegua(nTotal)
For nItem := 1 To nTotal
If lFim
Exit
EndIf
// Execute aqui o processamento do item.
IncProc()
Next nItem
ReturnResultado esperado
Processa abre a janela; ProcRegua define 100 passos e IncProc avança a régua durante o For...Next.
- Use ProcRegua para informar o total da régua dentro da rotina processada.
- Use IncProc para incrementar a régua a cada item processado.
- Se lAborta estiver habilitado, trate a variável lógica recebida pela ação para encerrar o processamento com segurança.
- Não ignore o cancelamento se a ação receber a variável de controle por referência.
- Não use Processa para tarefas instantâneas; a janela adiciona complexidade sem ganho para o usuário.
- Evite abrir Processa em execução sem interface.
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.