Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Raphaela Marcela Ferreira

Gravado em

comparado com

Nova versão 2

changes.mady.by.user Usuário desconhecido (felipe.valcanaia)

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese

Pagetitle
MT110LOK - Validações Específicas do usuário
MT110LOK - Validações Específicas do usuário

Ponto-de-Entrada: MT110LOK - Validações Específicas do usuário
Versões: Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição: 
LOCALIZAÇÃO : Function A110LinOk() responsável pela validação de cada linha da GetDados da Solicitação de Compras .

EM QUE PONTO : O ponto se encontra no final da função e deve ser utilizado para validações especificas do usuario onde será controlada pelo retorno do ponto de entrada o qual se for .F. o processo será interrompido e se .T. será validado.
Eventos


 

Programa Fonte 
MATA110.PRX
Sintaxe

MT110LOK - Validações Específicas do usuário ( < PARAMIXB> ) --> lRetorno

Parâmetros:
NomeTipoDescriçãoDefaultObrigatórioReferência
PARAMIXBVetorParamixb[1] = lRetorno no momento da chamada do ponto de entrada ; Paramixb[2] = Data da solicitação de comprasX
Retorno
    lRetorno(logico)
  • lRetorno = .T. valida a operação
    .F. invalida a operação.
Observações


 

Exemplos 
User Function  MT110LOK()Local nPosPrd    := aScan(aHeader,{|x| AllTrim(x[2]) == 'C1_PRODUTO'})Local nPosItem    := aScan(aHeader,{|x| AllTrim(x[2]) == 'C1_ITEM'})Local lValido := .T.dbSelectArea('SC1')dbSetOrder(2)If MsSeek(xFilial('SC1')+aCols[n][nPosPrd]+cA110Num+aCols[n][nPosItem])     If (C1_QUJE > 0) .Or. (C1_RESIDUO == 'S') )          lValido := .F.     EndIfEndIf Return(lValido)