Histórico da Página
FT050TOK - Validação das Metas de Venda
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Serviços | ||||
Módulo: | Faturamento | ||||
Rotina: |
| ||||
País(es): | Todos | ||||
Banco(s) de Dados: | Todos | ||||
Sistema(s) Operacional(is): | Todos |
Ponto de Entrada
Descrição: | A finalidade do ponto de entrada FT050TOK é permitir que seja feita a validação dos dados das Metas de Venda, antes de efetuar as gravações. | ||||||||
Localização: | Atualizações/Cenários de Venda/Metas de Venda | ||||||||
Eventos: | FT050TOK( oModel ) --> lRet | ||||||||
Programa Fonte: | FATA050.PRX | ||||||||
Parâmetros: | PARAMIXB[1] - Objeto --> Modelo de dados das Metas de Venda | ||||||||
Retorno: |
| ||||||||
| Observação: | Se o ponto de entrada retornar falso, não será possível realizar a gravação e um erro será atribuído ao model, sendo necessário indicar a natureza do erro através da função Help, conforme o exemplo abaixo. Para maiores detalhes, veja o parâmetro bPost da classe MPFormModel |
Exemplo:
| Bloco de código | ||||
|---|---|---|---|---|
| ||||
#Include 'Protheus.ch'
User Function FT050TOK()
Local nLin := 0
Local lRet := .T.
Local oModSCT := PARAMIXB[1]
Local oGridSCT := oModSCT:GetModel('SCTGRID')
Local nPosVend := Ascan(oGridSCT:aHeader,{|x| AllTrim(x[2]) == "CT_VEND"})
For nLin := 1 To Len(oGridSCT:aCols)
If !oGridSCT:aCols[nLin,Len(oGridSCT:aCols[nLin])] .And. AllTrim(oGridSCT:aCols[nLin,nPosVend]) == "000002"
Help(" ",1,"TESTE",,"O vendedor 000002 não pode ser utilizado.", 3, 0)
lRet := .F.
EndIf
Next nLin
Return lRet |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas