Advpl, Protheus

FieldPos( )

2 semanas ago

6.084 visualizações

1 leitura mínima

Adicionar comentário Ver mais tarde Modo Cinema

Continually embrace sustainable benefits with revolutionary metrics. Completely benchmark premier partnerships through multifunctional convergence. Objectively disseminate customized vortals via front-end schemas.

A função FieldPos() é usada para validar se um campo existe no dicionário de dados (SX3).

Essa função precisa ser usada logo após o comando DbSelectArea( ) para garantir que area de trabalho, ou tabela, esteja ativa ou aberta. A função retorna o valor numérico da posição daquele campo dentro do arquivo, caso o campo não exista, ela retora 0 (zero).

Segue exemplo de uso:

User Function fFieldFpos()
    Local aArea      := FWGetArea()
  
    DbSelectArea("SB1")
  
    //Valida se o campo existe:
    If FieldPos("B1_X_CAMPO") > 0
        /* Aqui da para fazer a customização caso o campo exista */
  
    Else
        FWAlertError('Contate o Administrador do Sistema', 'O campo [B1_X_CAMPO] não foi     encontrado!')
    EndIf
  
    FWRestArea(aArea)
Return