| Produto: |
TOTVS Backoffice
|
|---|---|
| Linha de Produto: | Linha Protheus |
| Segmento: | Serviços |
| Módulo: | TOTVS Backoffice (Linha Protheus) - Planejamento e Controle Orçamentário (SIGAPCO)
|
| Função: | PCOA482 |
| País: | Brasil |
| Ticket: | Interno |
| Requisito/Story/Issue | DSERCTR1-46030 |
Este ponto de entrada é chamado para realizar uma validação customizada após a validação padrão da tela e dos itens que estão sendo manipulados. O retorno do ponto de entrada deve ser um valor lógico que indica se a validação foi bem-sucedida (.T.) ou se falhou (.F.), permitindo personalizar as condições de aceitação dos dados.
If ExistBlock( "PCOA4823" )
//P_EÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//P_E³ Ponto de entrada utilizado para validação do tudo Ok da tela. ³
//P_E³ ³
//P_E³ Parametros : Validação Padrão ³
//P_E³ Retorno : Logico ³
//P_E³ Ex. : User Function PCOA4823 ³
//P_E³ Return {.T.) ³
//P_EÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
If ValType( lOk := ExecBlock( "PCOA4823", .F., .F. ,lRet) ) == "L"
lRet := lOk
EndIf
EndIf
User Function PCOA4823(lRet)
Local lOk := PARAMIXB[1]
Local lRet:= .F.
Local nPosPerc := aScan(aHeader , {|x| ALLTRIM(x[2])== "AM9_PERC" })
Local nX := 0
For nX := 1 To Len(aCols)
If !aCols[nX][Len(aCols[nX])] // Não Deletada
// validacao do cliente
EndIf
Next nX
Return lRet
Importante !!