Set the key,value attrtibutes of an ObjSXMLNode object .
fun [ObjSXMLNode [[S S] r1]] ObjSXMLNode
Return : ObjSXMLNode the same node object or NIL if the function fails