Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: | |
Função: | ATFA250 |
País: | Brasil |
Ticket: | Interno |
Requisito/Story/Issue | DSERCTR1-46030 |
Este ponto de entrada é utilizado para realizar validações de usuário no cancelamento.
Para ser chamado o registro primeiramente já tem que ter passado por todas as validações padrões do sistema.
If lCancela .AND. ExistBlock("AF250CAN") lCancela := Execblock("AF250CAN",.F.,.F.,{aCols,nCnt}) lCancela := IIF(ValType(lCancela) == "L",lCancela,.T.) EndIf |
User Function AF250CAN() // Variáveis recebidas via PARAMIXB Local aCols := PARAMIXB[1] // Array contendo os registros de itens Local nCnt := PARAMIXB[2] // Número de registros no array Local lRet := .F. // Exemplo de uso If SN3->N3_IDBAIXA = "2" // validação do cliente lRet := .T. EndIf Return lRet |
|