Pular para o conteúdo
Início » Advpl CriaTrab

Advpl CriaTrab

    Tipo: Processamento

    Cria arquivo de trabalho.

    Sintaxe

    CriaTrab(aArray,lDbf)

    Parâmetros

    aArray – Array multidimensional contendo os campos a criar {Nome, Tipo, Tamanho, Decimal}

    lDbf – Determina se o arquivo de trabalho deve ser criado ( .T.) ou não (.F. )

    Retorna

    ExpC1 – Nome do Arquivo gerado pela função.

    Comentários

    Esta função retorna o nome de um arquivo de trabalho que ainda não exista.

    Caso lDbf = .T., a função criará um arquivo DBF com este nome e a estrutura definida em aArray.

    Caso lDbf = .F., a função não criará arquivo de nenhum tipo, apenas fornecerá um nome válido.

    Exemplos

    // Com lDbf = .F.

    cArq := CriaTrab(NIL, .F.)

    cIndice := “C9_AGREG+”+IndexKey()

    Index on &cIndice To &cArq

    // Com lDbf = .T.

    aStru := {}

    AADD(aStru,{ “MARK” , “C”, 1, 0})

    AADD(aStru,{ “AGLUT” , “C”, 10, 0})

    AADD(aStru,{ “NUMOP” , “C”, 10, 0})

    AADD(aStru,{ “PRODUTO”, “C”, 15, 0})

    AADD(aStru,{ “QUANT” , “N”, 16, 4})

    AADD(aStru,{ “ENTREGA”, “D”, 8, 0})

    AADD(aStru,{ “ENTRAJU”, “D”, 8, 0})

    AADD(aStru,{ “ORDEM” , “N”, 4, 0})

    AADD(aStru,{ “GERADO” , “C”, 1, 0})

    cArqTrab := CriaTrab(aStru, .T.)

    USE &cArqTrab ALIAS TRB NEW