Try this
Code:
B0      VAR BYTE
B1      VAR BYTE
B2      VAR BYTE
B3      VAR BYTE
BWord1  Var BYTE
BWord2  VAR BYTE
BWord   VAR WORD
VarWord VAR WORD

VarWord = 1389 ' Here is your number you defined

B3 = VarWord DIG 3
B2 = VarWord DIG 2
B1 = VarWord DIG 1
B0 = VarWord DIG 0 

BWord1 = B3 * 16 + B2
BWord2 = B1 * 16 + B0

BWord = BWord1 * $100 + BWord2 ' Here stands your Word like 1389 as hex