PARAMIXB[1]ArrayContexto de execução
Títulos selecionados para estorno/exclusão. (Ref. 1)
PONTO DE ENTRADAEm revisão
F330EXCOMP
User Function F330EXCOMP()Valida a exclusão ou o estorno da compensação a receber.
Visão geral
O TDN documenta PARAMIXB[1] como títulos, [2] como registros SE5 e [3] como operação: 5 para estorno e 4 para exclusão. Retorno .T. permite a operação e .F. a aborta. A ficha lista 12 posições por título, incluindo documento, E5_SEQ, valor líquido, valor compensado e filial; não confundir essa estrutura com os cinco valores de F330ESE5. (Ref. 1) A chamada comunitária confirma os três argumentos. (Ref. 2)
Sintaxe
User Function F330EXCOMP()Parâmetros
PARAMIXB[2]ArrayContexto de execução
Registros com RecNo da SE5 vinculados à compensação. (Ref. 1)
PARAMIXB[3]NumericContexto de execução
Operação: 5 estorno; 4 exclusão. (Ref. 1)
Retorno
Lógico: .T. efetiva a exclusão/estorno; .F. aborta a operação e mantém os registros íntegros, conforme a ficha.
Exemplo editorial baseado na documentação
#Include "Protheus.ch"
User Function F330EXCOMP()
// Adaptado do exemplo TOTVS (ref. 1); confirmação apenas interativa.
Local nOperacao := PARAMIXB[3]
Local lPermitir := .F.
If Len(PARAMIXB[1]) > 0 .And. Len(PARAMIXB[2]) > 0
If nOperacao == 5
lPermitir := MsgYesNo("Confirmar estorno da compensacao?")
ElseIf nOperacao == 4
lPermitir := MsgYesNo("Confirmar exclusao da compensacao?")
EndIf
EndIf
Return lPermitirResultado 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.
// FINA330.PRX - FA330DESC() -> LF330EXCLUI := (EXECBLOCK( "F330EXCOMP", .F., .F.,{ATITULOS,AREGISTROS,NOPC}))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 confirmação com diálogo é ilustrativa e depende de execução interativa. Testar as operações 4 e 5 separadamente e conferir títulos, movimentos e contabilização após resposta negativa.
- 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.