FUNCIóNEn revisión

IncProc

IncProc()

Incrementa la barra de progreso creada por Processa().

FrameworkProcesamientoBarra de progresoInterfaz

01 · DESCRIPCIÓN GENERAL

Descripción general

IncProc() avanza en una unidad la barra de progreso preparada dentro de una rutina ejecutada por Processa(). Normalmente se usa en bucles de procesamiento para indicar visualmente que la rutina sigue en ejecución.

02 · SINTAXIS

Sintaxis

IncProc()

03 · EJEMPLO PRÁCTICO

Incrementando la barra de Processa

#Include "TOTVS.ch"

User Function ExIncProc()
    Local bAcao := {|lFim| U_Executa(@lFim) }

    Processa(bAcao, "Processamento", "Processando registros...", .T.)
Return

User Function Executa(lFim)
    Local nItem

    ProcRegua(100)
    For nItem := 1 To 100
        If lFim
            Exit
        EndIf

        // Processa o item atual
        IncProc()
    Next
Return

Resultado esperado

ProcRegua() define el total e IncProc() avanza la barra por cada elemento procesado.

BUENAS PRÁCTICAS

Use ProcRegua() antes do laço para informar o total esperado de passos.
Chame IncProc() a cada item efetivamente processado.
Quando Processa() permitir cancelamento, respeite o parâmetro lógico recebido pelo bloco de ação.

ERRORES COMUNES

Sin ProcRegua(), la barra puede no reflejar correctamente el porcentaje de ejecución.
Incrementar la barra fuera de la misma rutina controlada por Processa() dificulta entender el flujo.
Como la referencia utilizada es histórica, valida el comportamiento en releases actuales de Protheus.

Contenido relacionado

REFERENCIAS

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.

Estado: En revisión
Página creada el: 25/08/2026 às 00:20
Última revisión el: 25/08/2026 às 00:20
Idioma original: Portugués
Revisión: Usina.BR