Bom dia, preciso que em meu fonte, antes de atribuir um dado no campo, que ele limpe o valor que estava armazenado, assim limpando o campo e atribuindo um valor novo

Ex:campo CURVAM tem o valor "C", preciso que o campo fique vazio e depois ele tenha a atribuição do respectivo valor

cSQL := ChangeQuery(cSQL) TCQUERY cSQL NEW ALIAS "QCURVM" DbSelectArea("QCURVM")

aProds := {} nTotalGeral := 0 nPercent := 0

While !Eof()

nTotalGeral += QCURVM->TOTAL AADD(aProds,{QCURVM->B1_COD,QCURVM->MARCA,QCURVM->PRODUTO,QCURVM->TOTAL, 0}) DbSelectArea("QCURVM") DBSKIP()

End

For nCtaFor := 1 To Len(aProds)

aProds[nCtaFor][5] := (aProds[nCtaFor][4] / nTotalGeral) * 100

Next nCtaFor

aSort( aProds,,,{|x,y| x[5] < y[5]})

For nCtaFor := 1 To Len(aProds)

nPercent += aProds[nCtaFor][5]

if nPercent <= 5 cCurva := "C" elseif nPercent > 5 .and. nPercent <= 15 cCurva := "B" else cCurva := "A" endif