Nesse vídeo demonstraremos em como verificar se um campo esta em uso pelo sistema (SX3) através da função CpoUsado.

Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:

//Bibliotecas
#Include "TOTVS.ch"

/*/{Protheus.doc} User Function zExe098
Verifica se um campo esta marcado como usado no Protheus
@type Function
@author Atilio
@since 11/12/2022
@obs 
    Função CpoUsado
    Parâmetros
        + Nome do campo
    Retorno
        + .T. se o campo estiver sendo usado ou .F. se não

    **** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao ****
/*/

User Function zExe098()
    Local aArea     := FWGetArea()
    Local cCampo    := "B1_SEGUM"

    //Testa se o campo é usado
    If CpoUsado(cCampo)
        FWAlertSuccess("O campo é usado", "Teste CpoUsado")
    Else
        FWAlertError("O campo não é usado", "Teste CpoUsado")
    EndIf

    FWRestArea(aArea)
Return

Bom pessoal, por hoje é só.
Abraços e até a próxima.

Tags: AdvPLMaratonaProtheusTL++