changes.mady.by.user Alberto Rodriguez Lopez
Gravado em 19 fev, 2019
...
dbSelectArea("SA1")
dbSetOrder(1)
dbSeek(xFilial("SA1")+cCliente+cLoja)
EndIf
SA1->(RestArea(aAreaSA1))
RestArea(aArea)