Home

Linha Microsiga Protheus

Páginas filhas
  • AVGERAL - Ponto de Entrada "BUSCA_UNID_MED" e "ALTERA_FILIAL"

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

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",ParamIxb1,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

 

...