ExisteSx6

ExisteSx6

19 de novembro de 2016 0

Verifica se um determinado parâmetro existe na tabela SX6.

Exemplo:

//
dbSelectArea("SX6")
dbSetOrder(1)
If ExisteSx6("MV_EXERC1")
	RecLock("SX6",.F.)
	Replace X6_CONTEUD  With StrZero(nAnoFech,4)
	Replace X6_CONTSPA  With StrZero(nAnoFech,4)
	Replace X6_CONTENG  With StrZero(nAnoFech,4)
	MsUnlock( )
End