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

User Function AVGERAL()

Local cParam := If(Type("ParamIxb") = "A",ParamIxb,If(Type("ParamIxb") = "C",ParamIxb,""))

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