Nesse vídeo demonstraremos em como criar tabelas no Protheus com a função CheckFile que se baseia no dicionário para fazer a criação (SX2, SX3, SIX, etc).

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

//Bibliotecas
#Include "TOTVS.ch"

/*/{Protheus.doc} User Function zExe079
Exemplo de como criar uma tabela que ainda não existe no banco de dados (também pode ser usado a ChkFile)
@type Function
@author Atilio
@since 08/12/2022
@obs 
    Função CheckFile
    Parâmetros
        + Alias da tabela
        + Nome real da tabela que ficará no banco de dados

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

User Function zExe079()
    Local aArea     := FWGetArea()
    Local cAlias    := ""
    Local cArquivo  := ""

    //Aciona a verificação se a tabela (padrão) não existir, será criada
    cAlias    := "SCA"
    cArquivo  := "SCA990"
    CheckFile(cAlias, cArquivo)

    //Aciona a verificação se a tabela customizada a partir de um alias padrão não existir, será criada
    cAlias    := "SB1"
    cArquivo  := "SB1TESTE"
    CheckFile(cAlias, cArquivo)

    FWRestArea(aArea)
Return

Bom pessoal, por hoje é só.

Abraços e até a próxima.

Tags: AdvPLMaratonaProtheusTL++