PARAMIXB[1] / aTitulosArrayContexto de execução
Títulos, com marcação lógica na posição 8. (Refs. 1–2)
PONTO DE ENTRADAEm revisão
F340VALOK
User Function F340VALOK()Valida a confirmação dos títulos marcados para compensação.
Visão geral
A ficha informa aTitulos em PARAMIXB[1] e marcação lógica na posição 8 de cada linha. Retornar .T. confirma; .F. cancela a confirmação e mantém a tela de marcação. O exemplo oficial recusa a confirmação quando não há títulos marcados. Isso não é o mesmo momento da validação F340VLD. (Refs. 1–2)
Sintaxe
User Function F340VALOK()Parâmetros
Retorno
Lógico: .T. confirma; .F. retorna à marcação sem confirmar.
Exemplo editorial baseado na documentação
#Include "Protheus.ch"
User Function F340VALOK()
// Adaptacao da regra oficial: exigir ao menos um titulo marcado.
Local aTitulos := PARAMIXB[1]
Local nLinha := 0
Local nMarcados := 0
For nLinha := 1 To Len(aTitulos)
If ValType(aTitulos[nLinha]) == "A"
If Len(aTitulos[nLinha]) >= 8
If ValType(aTitulos[nLinha][8]) == "L"
If aTitulos[nLinha][8]
nMarcados++
EndIf
EndIf
EndIf
EndIf
Next
Return nMarcados > 0Resultado esperado
Proposta didática com o comportamento descrito nos comentários. Conferir o contexto antes de compilar em homologação. Em revisão: exemplo não compilado nem executado em Protheus. Aliases, bloqueios, posição na transação e compatibilidade devem ser conferidos no release e patch utilizados.
Chamada observada e contexto
// Trecho do chamador P12.2210 (EURAI, ref. 2); não é implementação do PE.
// FINA340.PRX - FA340OK() -> LRET := EXECBLOCK("F340VALOK", .F., .F., {ATITULOS})Resultado esperado
O registro mostra argumentos e uso imediato do retorno quando presentes. Não inclui o corpo completo do chamador nem comprova a posição do commit.
- A regra didática verifica se existe alguma marca válida. Não modifica títulos nem recalcula saldos. Testar nenhum, um e vários títulos selecionados.
- Uma chamada sem quarto argumento não documenta um layout de PARAMIXB. Preservar identificadores do chamador e não inventar campos ou posições.
- Roteiro de homologação: comparar o fluxo padrão e o customizado, testar sucesso, recusa e repetição e conferir saldos, movimentos e contabilização conforme o processo.
- Em revisão: exemplo não compilado nem executado em Protheus. Aliases, bloqueios, posição na transação e compatibilidade devem ser conferidos no release e patch utilizados.
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.