AVGERAL - Ponto de Entrada "BUSCA_UNID_MED" e "ALTERA_FILIAL"

Descrição

Quando o ponto de entrada AVGERAL estiver passando no parâmetro Paramixb, o conteúdo BUSCA_UNID_MED permitirá a customização da busca de unidades de medida no processo.

Observações

Exemplos

#include "average.ch"
#include "AVGERAL.CH"

User Function AVGERAL()

Local cParam:= ""

If ValType(PARAMIXB) == "A"
cParam := PARAMIXB[1]
Else
cParam := PARAMIXB
EndIf

If cParam == "BUSCA_UNID_MED"
MsgInfo("Entrou no ponto de entrada 'BUSCA_UNID_MED'")
lRet := .F. 
ElseIf cParam == "ALTERA_FILIAL"
If cCampoAux == "W9_NUM"
cAvgFilial:= UPPER(PADR(xFilial(cAliasAux)+x2path(cAliasAux),50))
MsgInfo('Passou pelo ponto de entrada "ALTERA_FILIAL" ')
Endif 
EndIf

Return Nil

Preview

Veja também

Idioma

Português(Brasil)

Versões

Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

Lógico - Parâmetro de exemplo lógico, .T. para a validação, .F. para que não seja feita.

Retorno

Eventos de chamada do Ponto de Entrada

Variáveis

Programa Fonte

AVGERAL.PRW