Tipo: Processamento
Descompacta uma string binária COMP-3 em um array. Esta função é utilizada para descompactar a movimentação de Clientes e Fornecedores. A compactação é feita pela função complementar Comp3.
Sintaxe
DeComp3(cCampo)
Parâmetros
cCampo – Nome do Campo aglutinador da compactação.
Retorna
aArray – Array contendo os 25 campos compactados.
Exemplo
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 Comp3
Estude para provas de certificações em TI com os simulados Bynem