Added Encode7 procedure