_VAR erg_byte := SHL(in [...] field erg_word := SHL [...] _uint := SHL(in_uint,n
Temp := SHL(iTemp, BYTE#2 [...] Temp1 := SHL(dwTemp1, BYTE#3
#25); wTemp2 := SHL