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

Advpl Comp3

    Tipo: Processamento

    Compacta um valor numérico em uma string binária COMP-3. Esta função é utilizada para compactar a movimentação de Clientes e Fornecedores. A descompactação é feita pela função complementar DeComp3.

    Sintaxe

    Comp3(aArray)

    Parâmetros

    aArray – Array contendo os 25 campos compactados (o Saldo Inicial, os 12 Débitos e 12 Créditos)

    Retorna

    ExpC1 – Nome do Campo aglutinador da compactação.

    Exemplos

    aSaldos:=DeComp3(A1_MOVIMEN)

    nSaldo:=aSaldos[1]

    For j := 2 To 24 STEP 2

    nSaldo := nSaldo – aSaldos [ j ] + aSaldos [ j + 1 ]

    Next j

    aSaldos[1]:=nSaldo

    AFILL(aSaldos,0,2,24)

    Reclock(“SA1”)

    REPLACE A1_MOVIMEN With Comp3(aSaldos)

    Ver também

    Função DeComp3