%
% create the xml based on insertion into Web packet sequence
%
% stack: xml-str status proc
%
empty
exch any? { prattr& } if
exch stattr&
appattr$
jsnow yelem$
%
% stack: push-xml
%