(* @PATH := '\/Functions_Collection\/FillingHead' *)
(* @SYMFILEFLAGS := '59392' *)
PROGRAM Word_To_Bytes
VAR_INPUT
	i_Word						: WORD ;
END_VAR
VAR_OUTPUT
	o_Bytes_0					: BYTE ;
	o_Bytes_1					: BYTE ;
END_VAR
VAR
	mAuxShl					: WORD ;
END_VAR


(* @END_DECLARATION := '0' *)
mAuxShl := i_Word ;
o_Bytes_0 := WORD_TO_BYTE(i_Word) ;
mAuxShl := SHR(mAuxShl, 8) ;
o_Bytes_1 := WORD_TO_BYTE(mAuxShl) ;
END_PROGRAM