| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | PCOA482 |
| País: | Brasil |
| Ticket: | Interno |
| Requisito/Story/Issue | DSERCTR1-46030 |
O ponto de entrada PCOA4822 permite ao usuário adicionar uma validação personalizada para cada linha processada na função A482Lok. Ele oferece flexibilidade ao permitir a execução de lógica de validação específica para uma linha e retorna um valor booleano que determina se a validação foi bem-sucedida.
If ExistBlock( "PCOA4822" )
//P_EÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//P_E³ Ponto de entrada utilizado para validação da linha da GetDados ³
//P_E³ ³
//P_E³ Parametros : Validação Padrão ³
//P_E³ Retorno : Logico ³
//P_E³ Ex. : User Function PCOA4822 ³
//P_E³ Return {.T.) ³
//P_EÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
If ValType( lOk := ExecBlock( "PCOA4822", .F., .F. , lRet ) ) == "L"
lRet := lOk
EndIf
EndIf |
User Function PCOA4822()
Local lRet:= PARAMIXB[1]
Local nPosPerc := aScan(aHeader , {|x| ALLTRIM(x[2])== "AM9_PERC" })
// Implementa a lógica de validação aqui
// Exemplo: Validar se um campo específico contém um valor válido
For nX := 1 To Len(aCols)
If aCols[nX,nPosPerc] > 0
lRet := .F. // Caso a condição de validação falhe
EndIf
Next nX
Return lRet |
|