Versão atual:

Leitura Metadados Protheus - ADVPL

Preciso acessar o Metadados do protheus e para isso atualmente abro a tabela SX3 DbUseArea(.T.,"CTREECDX",cArqX3,cNewX3,.T.,.F.), pratica que não é mais permitida conforme acusado pelo CodeAnalysis. Quais funções existem que fornecem as informações referente ao SX3?

While X3_Arquivo == _TabCab

    If X3Uso(X3_USADO) .and. cNivel >= X3_NIVEL .and. Alltrim(X3_ARQUIVO) == _TabCab .and. X3_CONTEXT <> 'V' .and. X3_TIPO <> 'M'
        aAdd(aArrCab,{X3_TITULO,X3_CAMPO,X3_PICTURE,X3_TAMANHO,X3_DECIMAL,,,X3_TIPO,,,,,,,,,.F.})
    Endif

    dbSkip()

Enddo

Versão (1):

Ver a versão formatada

Leitura Metadados Protheus - ADVPL

Comentário

new question