FUNçãOEm revisão

RptStatus

RptStatus( <bAcao>, [cTitulo], [cMsg] )

Exibe um diálogo de acompanhamento com régua de progressão.

RelatóriosInterfaceProcessamentoRégua de progresso

01 · VISÃO GERAL

Visão geral

RptStatus() executa um bloco de código dentro de uma janela de status, permitindo acompanhar visualmente a execução de relatórios ou rotinas longas. A régua é preparada com SetRegua() e incrementada com IncRegua().

02 · SINTAXE

Sintaxe

RptStatus( <bAcao>, [cTitulo], [cMsg] )

Parâmetros

bAcao

Bloco de códigoObrigatório

Bloco executado pela rotina. Pode receber um parâmetro lógico para indicar cancelamento.

cTitulo

CaractereOpcional

Título exibido na janela.

cMsg

CaractereOpcional

Mensagem exibida abaixo da régua de progressão.

03 · EXEMPLO PRÁTICO

Status de processamento

#Include "TOTVS.ch"

User Function ExRptStatus()
    Local bAcao := {|lFim| U_ProcessaRel(@lFim) }

    RptStatus(bAcao, "Relatório", "Preparando dados...")
Return

Resultado esperado

A função abre uma janela de status e executa o bloco indicado.

BOAS PRÁTICAS

Use para rotinas cujo progresso precisa ser comunicado ao usuário.
Dentro do bloco, inicialize a régua com SetRegua().
Atualize a régua com IncRegua() a cada etapa concluída.

ARMADILHAS COMUNS

Evite mensagens genéricas demais; informe ao usuário o que está sendo processado.
Se houver cancelamento, trate o parâmetro lógico antes de continuar o processamento.
Como é uma API histórica, valide compatibilidade visual no SmartClient em uso.

Conteúdos relacionados

REFERÊNCIAS

Help ADVPL.chm. Help AdvPL/APMSLib, documentação oficial histórica, 15 mar. 2004. Conteúdo resumido, reorganizado e marcado para revisão contra documentação atual da TOTVS quando disponível.

Situação: Em revisão
Página criada em: 25/08/2026 às 00:20
Última revisão em: 25/08/2026 às 00:20
Idioma original: Português
Revisão: Usina.BR