First code will work, if you use PBPL, because result is stored into temporally long variable.
That is same as this

Temp VAR LONG
BVal VAR BYTE
BVal = 0
Temp = BVal - 1
If Temp < 0 THEN Negative