Contexto do PENão há quarto argumento explícito na chamada catalogada. O conteúdo de PARAMIXB e os aliases disponíveis não foram confirmados; o array do exemplo pertence exclusivamente ao exercício.
AdvPL GuiaExecBlock("F060LOOP", .F., .F.)Filtro de títulos associado a FINA060/FINA061. Chamada catalogada, contrato pendente e exemplo isolado para conferir uma regra de seleção.
O índice oficial classifica F060LOOP como filtro de títulos em FINA060/FINA061 e mantém a ficha específica em construção. (TOTVS, s.d., ref. 1) A listagem de chamadas registra ExecBlock("F060LOOP", .F., .F.) nas duas rotinas. (TOTVS, s.d., ref. 2) A listagem não informa a expressão que consome o retorno, o alias ativo ou o momento da seleção. Portanto, ela não permite concluir que .T. inclui um título ou que .F. encerra o processamento. Esta ficha está em revisão, baseada em evidência indexada com leitura integral limitada. O exemplo exercita uma regra fictícia fora do PE para facilitar a conferência de resultados esperados.
ExecBlock("F060LOOP", .F., .F.)Contexto do PENão há quarto argumento explícito na chamada catalogada. O conteúdo de PARAMIXB e os aliases disponíveis não foram confirmados; o array do exemplo pertence exclusivamente ao exercício.
Tipo e significado do retorno de F060LOOP não confirmados nas fontes localizadas. Os valores lógicos calculados pelo auxiliar não constituem contrato do PE.
#Include "Protheus.ch"
User Function ExF060Loop()
Local aCasos := {{100, .T.}, {0, .T.}, {100, .F.}}
Local nIndice := 0
Local lElegivel := .F.
// Regra fictícia: valor positivo e autorização local do exercício.
// Não lemos SE1 e não definimos o retorno de F060LOOP.
For nIndice := 1 To Len(aCasos)
lElegivel := aCasos[nIndice][1] > 0 .And. aCasos[nIndice][2]
If lElegivel
ConOut("Caso elegivel no exercicio")
Else
ConOut("Caso inelegivel no exercicio")
EndIf
Next nIndice
Return
O primeiro caso é elegível; o segundo e o terceiro são inelegíveis segundo a regra fictícia. Isso não demonstra como o Protheus seleciona títulos. Depois de confirmar o contrato, compare os três grupos em homologação com o processamento padrão. O exemplo não foi compilado nem executado em Protheus.
© 2026 Usina.BR. Todos os direitos reservados. TOTVS, Protheus, Microsiga e seus respectivos logotipos são marcas de seus titulares. O AdvPL Guia é independente e utiliza citações limitadas, atribuídas e justificadas por finalidade educativa. Consulte os Termos de Uso. Termos de Uso
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.